Routine: TIUSRVD

Information

TIUSRVD ;SLC/JER - RPC's for Document Definition ;04/13/17 13:52

Source file <TIUSRVD.m>

Name	Comments	DBIA/ICR reference
NOTES(TIUY)	; Get list of PN Titles
SUMMARY(TIUY)	; Get list of DS Titles
LIST(TIUY,CLASS,TYPE,TIUK)	; Get list of document titles
TRAVERSE(TIUY,CLASS,TYPE,TIUK)	; Get all selectable titles for the CLASS
PERSLIST(TIUY,DUZ,CLASS,TIUC,TIUFLG)	; Get personal list for a user
BLRSHELL(TIUY,TITLE,DFN,VSTR)	; Shell for boilerplate RPC
BLRPLT(TIUY,TITLE,DFN,VSTR,ROOT)	; Load/Execute the Boilerplate for TITLE ; or ROOT
BOIL(LINE,COUNT)	; Execute Boilerplates
CANXEC(TIUODA)	; Evaluate Object Status
APPEND(X)	;
REPLACE(LINE,X,TIUI)	; Replace the TIUIth object in LINE w/X
INSMULT(LINE,TARGET,TIULCNT)	; Mult-valued results
LNGCNSLT(Y,FROM,DIR)	; Handle long list of titles for CONSULTS
LNGSURG(Y,FROM,DIR,CLNAME)
LONGLIST(Y,CLASS,FROM,DIR,IDNOTE)	; long list of titles for a class ; .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
CNSLCLAS(Y)	; RPC to identify class CONSULTS
SURGCLAS(Y,CLNAME)	; RPC to identify class ; CLNAME = "SURGICAL REPORTS" or "PROCEDURE REPORTS (NON-O.R.)"
CANLINK(Y,TIUTTL)