| $$HASDS(DFN,VISIT) |
Returns a string based on whether a discharge summary
exists for the given PATIENT and VISIT file pointers.
If no summary found, output is 0^0
If summary is found, output is: IEN of TIU DOCUMENT file (#8925)^context
'context; is based on the TIU STATUS file (#8925.6) pointer from the TIU
DOCUMENT file. If no valid status is found, a 0 is returned, if the status is
UNSIGNED, the context is set to 2, for all other valid discharge summary
statuses, the value returned is 1.
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
DFN |
Input |
IEN of the PATIENT file (#2)
|
VISIT |
Input |
IEN of the VISIT file (#9000010).
|
|
NEEDSIG(.TIUY,USER,CLASS) |
This component allows the gathering of a list of TIU
documents for which USER is an additional signer
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
TIUY |
Both |
This variable is passed by reference and it is
returned with a reference to a global array that contains the list of TIU
documents for which the user has been identified as an additional signer.
|
USER |
Input |
Pointer to the NEW PERSON (#200) file.
|
CLASS |
Input |
Pointer to TIU DOCUMENT DEFINITION (#8925.1) file.
|
|
