| RT(IEN,ARRAY) |
Returns narrative for a consult result report
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
IEN |
Input |
IEN of request in the REQUEST/CONSULTATION file
(#123)
|
ARRAY |
Both |
Name of the array in which to return the text of the
report as ARRAY(#,0)=line of text
|
|
$$DC(IEN,PROVIDER,DATETIME,STATUS,.COMMENT) |
Entry point to discontinue or deny a consult request.
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
IEN |
Input |
IEN of REQUEST/CONSULTATION file (#123)
|
PROVIDER |
Input |
Pointer to NEW PERSON file (#200) denoting provider
who discontinued or denied the consult request.
|
DATETIME |
Input |
Date/time the actual activity (discontinuation or
denial) took place.
|
STATUS |
Input |
DY if Cancelled (previously 'deny') DC if
Discontinued
|
.COMMENT |
Input |
Array of comment containing explanation of denial or
discontinuation.
|
OUTPUT |
Output |
Extrinsic function returns: ErrorFlag^ErrorMessage
ErrorFlag is 0 if no error found or 1 if an errror occured. ErrorMessage is
null for no error or descriptive of error if one occurred.
|
|
['$$FR(IEN,SERVICE,PROVIDER,ATTENTION,URGENCY,.COMMENT,DATE', 'TIME)'] |
Call to forward an existing consult to a different
service.
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
IEN |
Input |
IEN of REQUEST/CONSULTATION file (#123)
|
SERVICE |
Input |
Pointer to REQUEST SERVICES file (#123.5) indicating
service consult request should be forwarded to.
|
PROVIDER |
Input |
Pointer to NEW PERSON file (#200) indicating provider
responsible for the forwarding action.
|
ATTENTION |
Input |
Pointer to NEW PERSON file (#200) indicating the
person to whose attention the forwarded consult should be directed.
|
URGENCY |
Input |
Value of the URGENCY from the PROTOCOL file (#101)
|
.COMMENT |
Input |
Array of comments that explains the reason the
request was forwarded.
|
DATETIME |
Input |
The date/time the request was forwarded
|
OUTPUT |
Output |
Extrinsic function returns: ErrorFlag^ErrorMessage
ErrorFlag is 0 if no error found or 1 if an errror occured. ErrorMessage is
null for no error or descriptive of error if one occurred.
|
|
$$RC(IEN,RECEIVER,DATETIME,.COMMENTS,ENTERER) |
Call to receive a consult into a service
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
IEN |
Input |
IEN of REQUEST/CONSULTATION file (#123)
|
RECEIVER |
Input |
Pointer to NEW PERSON file (#200) denoting person who
received the consult request.
|
DATETIME |
Input |
Actual date/time the consult was received by the
service
|
COMMENTS |
Input |
Array of comments entered for request
|
ENTERER |
Input |
IEN of NEW PERSON file (#200) indicating person who
entered consult as being received.
|
OUTPUT |
Output |
Extrinsic function returns: ErrorFlag^ErrorMessage
ErrorFlag is 0 if no error found or 1 if an errror occured. ErrorMessage is
null for no error or descriptive of error if one occurred.
|
|
