| CMT(IEN,.COMMENTS,.RECIPIENTS,DATE,WHO) |
Entry point to add a comment to a consult record.
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
IEN |
Input |
IEN of the REQUEST/CONSULTATION file (#123)
|
COMMENTS |
Input |
Array of commnets in format
COMMENTS(1)="xxxx",COMMENTS(2)="xxx", etc.
|
RECIPIENTS |
Input |
Array of alert recipients who should be alerted of
comment addition. (optional)
|
DATE |
Input |
Date/time of activity in internal FM format.
|
WHO |
Input |
IEN of the NEW PERSON who is responsible for the
comment (OPTIONAL)
|
|
['$$SFILE(IEN,TYPE,SIGFIND,PROVIDER,WHO,.COMMENTS,FLAG,WHOG', 'ETS,DATE)'] |
This entry point was written for CPRS GUI to process
various file update functions including administrative completion and
significant findings.
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
IEN |
Input |
IEN of REQUEST/CONSULTATION file (#123).
|
TYPE |
Input |
Pointer to the REQUEST ACTION TYPES file (#123.1)
(10=complete, 4=significant findings)
|
SIGFIND |
Input |
Y for significant finding N for no significant
finding U for unknown significant finding
|
PROVIDER |
Input |
IEN of NEW PERSON file (#200) denoting provider
responsible for the action.
|
WHO |
Input |
Pointer to the NEW PERSON file (#200) denoting person
actually performing the action.
|
COMMENTS |
Input |
Array of comments describing the action in format
COMMENTS(1)="xxxx", COMMENTS(2)="xxx"
|
FLAG |
Input |
Flag to signal whether alerts should be sent (Y for
yes, N for no).
|
WHOGETS |
Input |
Comma-delimited string of NEW PERSON file IENs
denoting who should receive an alert.
|
DATE |
Input |
Date/time the activity took place.
|
RESULT |
Output |
Result of extrinsic function returned as Error
Flag^Error Message
Error Flag=1 if error, otherwise 0. Error Message is null if Error Flag is
set to 0.
|
|
DOCLIST(GMRCAR,GMRCDA) |
Returns a list of TIU documents linked to the
selected consult
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
GMRCAR |
Both |
Passed in as the array to return results in.
The array will be returned as follows with multiple 50 nodes for every TIU
document number:
GMRC(0) = zero node of the record.
GMRC(50,1) = "ien;TIU(8925,"
GMRC(50,2) = "ien;TIU(8925,"
|
GMRCDA |
Input |
IEN of consult to provide array of TIU documents.
|
|
SCH(IEN,WHO,DATE,RECIPIENTS,COMMENTS) |
Entry point to move a consult record to scheduled
status
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
IEN |
Input |
IEN of the REQUEST/CONSULTATION file (#123)
|
WHO |
Input |
IEN of the NEW PERSON who is responsible for the
comment (OPTIONAL)
|
DATE |
Input |
Date/time of activity in internal FM format.
|
RECIPIENTS |
Input |
Array (passed by reference) of alert recipients who
should be alerted of comment addition. (OPTIONAL)
|
COMMENTS |
Input |
Array (passed by reference) of comments (OPTIONAL)
in format: COMMENTS(1)="xxxx",COMMENTS(2)="xxx", etc.
|
|
