VistA Analysis » VistA Reference » RPCs » TIU LONG LIST OF TITLES

TIU LONG LIST OF TITLES

This RPC serves data to a longlist of selectable TITLES by CLASS. e.g.,passing the class PROGRESS NOTES will return active Progress Notes titleswhich the current user is authorized to enter notes under.

Properties

Property Value
Label LONGLIST
MUMPS Implementation TIUSRVD
Return Type ARRAY

Input Parameters

Name Type Maximum Data Length Required Description
CLASS LITERAL   true This is a pointer to the CLASS in the Document Definition File (#8925.1)from which the application intends to allow selection of TITLES.
FROM LITERAL   true This is the reference title from which the longlist is scrolling.
DIR LITERAL     This is the direction in which the longlist is scrolling from thereference title.

MUMPS Method Description

Property Value
Method LONGLIST^TIUSRVD
Method Comment long list of titles for a class
Input Parameters CLASS, FROM, DIR, IDNOTE
First Comment 
 .Y=returned list, CLASS=ptr to class in 8925.1, FROM=text to $O from,
 DIR=$O direction, IDNOTE=flag to indicate selection for ID Entry
Code 
 N I,DA,CNT S I=0,CNT=44,DIR=$G(DIR,1)
 F  Q:I' . S DA=0
 . F  Q:I'0  D
 . . I $S(+$$CANENTR^TIULP(DA)'>0:1,+$$CANPICK^TIULP(DA)'>0:1,1:0) Q
 . . I +$L($T(CANLINK^TIULP)),+$G(IDNOTE),(+$$CANLINK^TIULP(DA)'>0) Q
 . . S I=I+1,Y(I)=DA_"^"_FROM

CPRS

File Type Description
Pascal File rDCSumm.pas
Pascal File rTIU.pas
Pascal File Options/rOptions.pas


Document generated on August 31st 2022, 2:55:43 pm