GMTSMCMA ; WAS/DCB\KER - Medicine 2.2 interface routine ; 02/11/2003 [11/14/03 9:12am]
Source file <GMTSMCMA.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Health Summary | 2 | GMTSMCPS GMTSMCZZ |
Order Entry Results Reporting | 1 | ORDV08 |
Name | Comments | DBIA/ICR reference |
---|---|---|
HSUM(PATID,BDATE,EDATE,OCC,WH,ATYPE) | ; Health Summary API
|
|
SLIT(ARRY) | ; Reformat Array
|
|
SLITTER | ; This will slit the message in a usable form
|
|
SMSH(VALUE) | ; Slit the message header
|
|
SPID(VALUE) | ; Slit the PID
|
|
SOBR(VALUE) | ; Slit the OBR
|
|
SOBX(VALUE) | ; Slit the OBX
|
|
OTHER(VALUE) | ; Set the next sub node if the lines continue
|
|
MSH(MSTR,SAP,SNF,RAP,RNF,MST,PCI,VID) | ; MSH Messaging Line
|
|
QRD(WSF,WDDC,QFC,QLR,QRL) | ; QRD Messaging Line
|
|
CONVERT(FILETYPE,RST) | ; Convert FileMan to HL7
|
|
CONVERTA(FILETYPE,RST) | ; Convert HL7 to FileMan
|
|
REMOVE(MESS1,MESS2) | ; Remove messages from the server basket
|
|
SETREF(MCOUNT,COUNT,XDES) | ; Set Count
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD("DD" | CONVERTA+3 |
^DIC(4 - [#4] | HSUM+10 |
^TMP("MCAR" | HSUM+27! |
^TMP("MCAR1" | HSUM+25, HSUM+30! |
Name | Line Occurrences |
---|---|
$$CONVERT | HSUM+14, MSH+3, QRD+3 |
$$CONVERTA | SOBR+2, SOBR+6, SOBR+8, SOBR+10, SOBX+6 |
$$MSH | HSUM+12 |
$$QRD | HSUM+16 |
REMOVE | HSUM+24, HSUM+30 |
SETREF | SMSH+7, SOBR+5, SOBR+7, SOBR+9, SOBR+11, SOBX+9 |
SLIT | HSUM+27, HSUM+29 |
SLITTER | SLIT+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | MSH+1~, MSH+3, QRD+1~, QRD+3 |
%I | MSH+1~, QRD+1~ |
ARRAY | HSUM+1~, HSUM+5*, HSUM+12, HSUM+16 |
ARRY | HSUM+17, HSUM+21*, HSUM+24*, HSUM+27, HSUM+30, SLIT~, SLIT+2 |
ATYPE | HSUM~, HSUM+13*, HSUM+15, HSUM+26 |
BASE | SLIT+1~, SLIT+3*, SMSH+6, SOBR+4, SOBR+7, SOBR+9, SOBR+11, SOBX+8, OTHER+3, OTHER+4* , SETREF+1 |
BDATE | HSUM~, HSUM+14, HSUM+26 |
BUILDER | HSUM+2~, SLIT+1~, SLIT+2*, SLIT+4, SLITTER+2 |
COUNT | SLIT+1~, SLIT+3*, SMSH+4*, SMSH+6, SMSH+7, SOBR+3*, SOBR+4, SOBR+5, SOBR+7*, SOBR+9* , SOBR+11*, SOBX+2*, SOBX+8, SOBX+9, OTHER+3, OTHER+4, SETREF~, SETREF+1 |
DUZ(2 | HSUM+10 |
EDATE | HSUM~, HSUM+14, HSUM+26 |
FILETYPE | CONVERT~, CONVERT+3, CONVERT+4, CONVERTA~, CONVERTA+3, CONVERTA+4 |
FLDTYPE | SOBX+1~, SOBX+4*, SOBX+5, SOBX+6 |
GMTSG | HSUM+3~, HSUM+4*, HSUM+17, HSUM+25, HSUM+27, HSUM+29, HSUM+30, SLIT+2 |
HLECH | HSUM+1~, HSUM+7* |
LINE | SLITTER+1~, SLITTER+4*, SLITTER+5 |
LOC | HSUM+2~, HSUM+10*, HSUM+11 |
LOOP | HSUM+1~, HSUM+2~, HSUM+8*, SLIT+1~, SLIT+3*, SLIT+4*, SLITTER+2, SMSH+1~, SMSH+3*, REMOVE+1~ , REMOVE+2* |
MCOUNT | SLIT+1~, SLIT+3*, SMSH+4*, SMSH+6, SMSH+7, SOBR+4, SOBR+5, SOBR+7, SOBR+9, SOBR+11 , SOBX+8, SOBX+9, OTHER+3, OTHER+4, SETREF~, SETREF+1 |
MESS1 | HSUM+2~, HSUM+22*, HSUM+24, HSUM+30, REMOVE~, REMOVE+1*, REMOVE+2 |
MESS2 | HSUM+2~, REMOVE~, REMOVE+1*, REMOVE+2 |
MESSAGE | HSUM+1~, HSUM+9* |
MSH | HSUM+1~, MSH+1~, MSH+2*, MSH+3*, MSH+4*, MSH+5*, MSH+6 |
MST | HSUM+1~, HSUM+11*, HSUM+12, MSH~, MSH+4 |
MSTR | HSUM+1~, HSUM+7*, HSUM+8, HSUM+12, SMSH+2*, SMSH+3, MSH~, MSH+2 |
MWDDC | HSUM+2~ |
OCC | HSUM~, HSUM+15, HSUM+26 |
ORD | HSUM+1~, QRD+3* |
PATID | HSUM~, HSUM+15, HSUM+26 |
PCI | HSUM+1~, HSUM+11*, HSUM+12, MSH~, MSH+5 |
PROC | SMSH+1~, SMSH+5*, SMSH+6 |
QFC | HSUM+15*, HSUM+16, QRD~, QRD+4 |
QID | HSUM+2~ |
QLR | HSUM+15*, HSUM+16, QRD~, QRD+5 |
QRD | QRD+1~, QRD+2*, QRD+4*, QRD+5*, QRD+6*, QRD+7 |
QRL | HSUM+2~, HSUM+14*, HSUM+16, QRD~, QRD+6 |
RAP | HSUM+1~, HSUM+9*, HSUM+11*, HSUM+12, MSH~, MSH+4 |
REC | HSUM+2~, HSUM+10* |
RNF | HSUM+1~, HSUM+11*, HSUM+12, MSH~, MSH+4 |
ROUT | SLITTER+1~, SLITTER+3*, SLITTER+4 |
ROY | SLITTER+1~, SLITTER+2*, SLITTER+3 |
RST | CONVERT~, CONVERT+2, CONVERT+3, CONVERT+4, CONVERTA~, CONVERTA+2, CONVERTA+3, CONVERTA+4 |
SAP | HSUM+1~, HSUM+9*, HSUM+11*, HSUM+12, HSUM+26, MSH~, MSH+2 |
SNF | HSUM+1~, HSUM+11*, HSUM+12, MSH~, MSH+2 |
ST | HSUM+1~ |
ST( | HSUM+8*, SMSH+3* |
ST(1 | SMSH+5, SOBR+2, SOBR+6, SOBR+8, SOBR+10, SOBX+3, SOBX+6, SOBX+7, OTHER+2, MSH+2 , MSH+3, MSH+4, MSH+5, QRD+3, QRD+4, QRD+5, QRD+6 |
ST(2 | HSUM+14, HSUM+15, SOBX+3, SOBX+4 |
ST(3 | SOBX+4 |
SUB | HSUM+2~, SLIT+3*, SMSH+2*, SPID+1*, SOBR+3*, SOBX+3*, OTHER+2*, OTHER+3 |
TEMP | SOBR+1~, SOBR+2*, SOBR+3, SOBR+4, SOBR+6*, SOBR+7, SOBR+8*, SOBR+9, SOBR+10*, SOBR+11 , SOBX+1~, SOBX+3*, SOBX+4*, SOBX+7, OTHER+1~, OTHER+2*, OTHER+3, CONVERT+1~, CONVERT+2*, CONVERT+3* , CONVERT+4*, CONVERT+5, CONVERTA+1~, CONVERTA+2*, CONVERTA+3*, CONVERTA+4*, CONVERTA+5 |
TMP | HSUM+2~ |
U | HSUM+10, SMSH+5, SMSH+6, SOBR+4, SOBR+7, SOBR+9, SOBR+11, SOBX+8, OTHER+3, OTHER+4 |
UNITS | SOBX+1~, SOBX+7*, SOBX+8, OTHER+1~, OTHER+2*, OTHER+4 |
VAL | SOBX+1~, SOBX+6*, SOBX+8 |
VALUE | SLITTER+1~, SLITTER+2*, SMSH~, SMSH+2, SMSH+5, SPID~, SOBR~, SOBR+2, SOBR+6, SOBR+8 , SOBR+10, SOBX~, SOBX+3, SOBX+6, OTHER~, OTHER+2 |
VID | HSUM+1~, HSUM+9*, HSUM+12, MSH~, MSH+5 |
WDC | HSUM+2~ |
WDDC | HSUM+15*, HSUM+16, QRD~, QRD+6 |
WH | HSUM~, HSUM+15 |
WSF | HSUM+2~, HSUM+15*, HSUM+16, QRD~, QRD+6 |
XDATE | SOBR+1~, SOBR+3* |
XDES | SOBX+1~, SOBX+3*, SOBX+5*, SOBX+8, SOBX+9, SETREF~, SETREF+1 |
XDEST | HSUM+2~ |
XMDUN | HSUM+3~, HSUM+18* |
XMDUZ | HSUM+3~, HSUM+20* |
XMSER | REMOVE+1~, REMOVE+2* |
XMSUB | HSUM+3~, HSUM+18* |
XMTEXT | HSUM+3~, HSUM+6* |
XMY | HSUM+3~ |
XMY("G.MC MES | SAGING SERVER" , HSUM+19* |
XMZ | HSUM+3~, HSUM+21, HSUM+22, REMOVE+2* |
Y | MSH+1~, QRD+1~, CONVERTA+1~, CONVERTA+3* |
Name | Field # of Occurrence |
---|---|
$T(HL1^MCORMN | HSUM+4 |