TIUCNSLT ; SLC/JER - Patient movement look-up ;1/7/03 [6/11/04 8:34am]
Source file <TIUCNSLT.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
GETCNSLT(DFN,TIUCPF,TIUDA,TIUOVR) | ; Match consult result
|
|
AGN | ; Loop for handling repeated attempts
|
|
GETX | ||
BREAK | ; Handle prompting
|
|
DADCR(DA) | ; Get the Consult request associated with the parent record
|
|
WRITE | ||
POST(TIUDA,STATUS) | ; Post status updates to Consult Tracking
|
|
ISCNSLT(TIUY,TITLE) | ; Boolean RPC to evaluate whether TITLE is a CONSULT
|
|
CHANGE(TIUDA,TIUCPF,TIUNOCS) | ; Re-direct the TIU Document to a different CT Record
; Passes back TIUNOCS=-1 if pt has no requests or none is selected |
|
CHAGN | ||
RETREAT(DA,TIUD14) | ; If Pt has no requests, retreat gracefully
|
|
UPDTADD(TIUDA,TIUCVP) | ; Addenda for re-linked original are updated
|
|
ROLLBACK(TIUDA) | ; Roll back CT Record when TIU changes require it
|
|
CLASS() | ; What is the TIU Class (or Document Class) for CONSULTS
|
|
REMCNSLT(TIUDA) | ;Remove link to consult if there is one ;*171
|
|
CONSCT(TIUDA,TIUOTTL,TIUNTTL) | ;
|
|
CNSCTGUI(TIUDA,TIUOTTL,TIUNTTL) | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
RPC Name | Call Tags |
---|---|
TIU IS THIS A CONSULT? | ISCNSLT |
FileNo | Call Tags |
---|---|
^TIU(8925 - [#8925] | Classic Fileman Calls |