XWB2HL7A ;;ISF/AC - Remote RPCs via HL7. ;03/26/09 16:22
Source file <XWB2HL7A.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
RPCINFO | ;RPC Information
|
|
DIRECT(XWB2SPN,XWB2HNDL,XWB2RET,XWB2DEST,XWB2PRAM,XWB2PARY) | ;DIR RPC CALL
|
|
CALL(XWB2SPN,XWB2HNDL,XWB2RET,XWB2DEST,XWB2PRAM,XWB2PARY) | ;RPC CALL
|
|
D2 | ||
CALLXIT | ;Cleanup before exit.
|
|
RPCSEND | ;
|
|
NXTNODE | ;Get next node
|
|
BLDDIST(X) | ;Build distribution list -- HLL("LINKS") ARRAY.
|
|
XLATE(S,OF) | ;TRANSLATE FS and Encoding characters to Formating codes.
|
|
ECODE(%) | ;
|
FileNo | Call Tags |
---|---|
^ORD(101 - [#101] | FIND1^DIC |