APSPES1 ;IHS/MSC/PLS - SureScripts HL7 interface ;01-Apr-2014 11:28;DU
Source file <APSPES1.m>
Package | Total | Call Graph |
---|---|---|
IHS Changes To Pharmacy | 5 | ($$OPRV,$$PHMINFO,$$RXIEN,BULL,PARSE)^APSPES2 (AL1,BADORP,DG1,NOTIF,RXC,RXR)^APSPES4 $$PRVDEA^APSPES9 $$RXNORM^APSPFNC1 UPTLOG^APSPFNC2 |
Health Level Seven | 4 | ($$HLDATE,$$HLNAME,$$HLPHONE)^HLFNC ($$ADDSEG,$$NEWMSG,SET)^HLOAPI $$SENDONE^HLOAPI1 $$GET^HLOPRS |
IHS Changes To ADT | 1 | $$HRCNF^BDGF2 |
Order Entry Results Reporting | 1 | $$VALUE^ORCSAVE2 |
Registration | 1 | $$EN^VAFHLPID |
VA Fileman | 1 | $$GET1^DIQ |
Package | Total | Caller Graph |
---|---|---|
IHS Changes To Pharmacy | 7 | APSPELRX APSPES2 APSPES3 APSPES4 APSPES9 APSPESG APSPFNC2 |
Order Entry Results Reporting | 1 | ORWDPS2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
AACK | ; EP - Application ACK call back - called when AA, AE or AR is received.
|
|
ACKRES | ;
|
|
MSH(ARY) | ;EP
|
|
RXO(ADD) | ;EP
|
|
ERR | ;
|
|
GETSIG() | ;EP
|
|
DRGUNITS(DIEN) | ;EP
|
|
ORCRF(IORC) | ;EP
|
|
GDFMTXT(FORM) | ;EP
|
|
QTYTXT(DIEN) | ;EP
|
|
MSA | ;EP
|
|
AL1 | ;EP -
|
|
PID(DFN) | ;EP
|
|
QTYQUAL(DIEN) | ;EP
|
|
GROUTE(RIEN) | ;EP
|
|
GPHM(RXIEN) | ;EP
|
|
ADJDUR(VAL) | ;
|
|
NEWRX(RXIEN) | ;EP
|
|
ARSPRE | ;Refill request call back for ERROR
|
|
ORC7 | ;
|
|
RXC | ; Create RXC segment
|
|
ORCNW(OCC,ADD) | ;EP
|
|
GETPRC() | ;EP -
|
|
DG1 | ;EP -
|
|
SPI(USR) | ; EP -
|
|
GETRINST(PDIV) | ;EP
|
|
RXR | ;EP
|
|
CACK | ; EP - Commit ACK callback - called when CA, CE or CR is received.
|
|
FSEGIEN(SRC,SEG,START) | ;
|
|
PREPARY(SRC,SEG,RET,START) | ;
|
|
GDFORM(FORM,TYPE) | ;EP
|
|
SUBST(RXIEN) | ; EP -
|
|
ARSP | ; EP - callback for ORP/O10 event
|
|
SET(ARY,V,F,C,S,R) | ;EP
|
|
SUNITS() | ;EP
|
Name | Field # of Occurrence |
---|---|
$$OPRV^APSPES2 | ARSP+17 |
$$PHMINFO^APSPES2 | NEWRX+47 |
$$RXIEN^APSPES2 | AACK+3, ARSP+16 |
BULL^APSPES2 | AACK+11, CACK+9 |
PARSE^APSPES2 | ARSP+4 |
AL1^APSPES4 | AL1+1 |
BADORP^APSPES4 | ARSP+7, ARSP+22 |
DG1^APSPES4 | DG1+1 |
NOTIF^APSPES4 | NEWRX+8, NEWRX+37, ARSP+27 |
RXC^APSPES4 | RXC+1 |
RXR^APSPES4 | RXR+1 |
$$PRVDEA^APSPES9 | ORCNW+24 |
$$RXNORM^APSPFNC1 | RXO+36 |
UPTLOG^APSPFNC2 | NEWRX+13, NEWRX+42, NEWRX+48, AACK+18, ARSP+26, ARSP+31 |
$$HRCNF^BDGF2 | PID+6 |
$$GET1^DIQ | PID+20, ORCNW+11, ORCNW+14, ORCNW+15, ORCNW+17, ORCNW+21, ORCNW+26, ORCNW+27, ORCNW+32, ORCNW+33 , ORCNW+36, ORCNW+37, ORCNW+38, ORCNW+39, ORCNW+40, ORCNW+42, ORCNW+46, ORCNW+47, RXO+9, RXO+12 , RXO+15, RXO+46, RXO+47, RXO+49, RXO+51, RXO+52, RXO+53, RXO+54, RXO+55, RXO+56 , GETRINST+1, GROUTE+2, GDFORM+1, GDFMTXT+1, QTYQUAL+3, QTYQUAL+4, QTYTXT+3, QTYTXT+4, DRGUNITS+1, SPI+1 , SUBST+2 |
$$HLDATE^HLFNC | ORCNW+9, ORCNW+28 |
$$HLNAME^HLFNC | ORCNW+11, ORCNW+17, ORCNW+21 |
$$HLPHONE^HLFNC | ORCNW+27, ORCNW+33, RXO+56 |
$$ADDSEG^HLOAPI | PID+23, ORCNW+52, ORCRF+7, RXO+59, MSA+7, MSA+13 |
$$NEWMSG^HLOAPI | NEWRX+7 |
SET^HLOAPI | SET+1 |
$$SENDONE^HLOAPI1 | NEWRX+36 |
$$GET^HLOPRS | ARSP+9, ARSP+10, ARSP+11, ARSP+15 |
$$VALUE^ORCSAVE2 | ORCNW+43 |
$$EN^VAFHLPID | PID+4 |
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
^DIC(4 - [#4] | GET1^DIQ |
^SC - [#44] | GET1^DIQ |
^DIC(49 - [#49] | GET1^DIQ |
^DIC(5 - [#5] | GET1^DIQ |
^PSDRUG - [#50] | GET1^DIQ |
^PS(50.606 - [#50.606] | GET1^DIQ |
^PS(50.7 - [#50.7] | GET1^DIQ |
^PS(51.2 - [#51.2] | GET1^DIQ |
^PSRX - [#52] | GET1^DIQ |
^PS(59 - [#59] | GET1^DIQ |
^AUPNPAT - [#9000001] | GET1^DIQ |
^APSPNCP(9009033.7 - [#9009033.7] | GET1^DIQ |
^APSPOPHM - [#9009033.9] | GET1^DIQ |
^APSPRREQ - [#9009033.91] | GET1^DIQ |
^AUTTLOC - [#9999999.06] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^HLB - [#778] | AACK+4, AACK+6, CACK+2, CACK+4, ORCNW+49 |
^HLB("B" | ORCNW+48 |
^PSDRUG - [#50] | RXO+8, RXO+31, RXO+32 |
^PSRX - [#52] | NEWRX+20, NEWRX+21, ORC7+2, ORC7+3, GPHM+1, GETSIG+3, GETSIG+4, GETPRC+3, GETPRC+4 |
Name | Line Occurrences |
---|---|
$$ADJDUR | ORC7+9 |
$$DRGUNITS | ORC7+5 |
$$FSEGIEN | ARSP+5, ARSP+13, PREPARY+2 |
$$GDFMTXT | RXO+17 |
$$GDFORM | RXO+14, GDFMTXT+1 |
$$GETPRC | RXO+19 |
$$GETRINST | ORCNW+30 |
$$GETSIG | RXO+20 |
$$GPHM | RXO+44 |
$$QTYQUAL | RXO+24 |
$$QTYTXT | RXO+25 |
$$SPI | ORCNW+20 |
$$SUBST | RXO+21 |
$$SUNITS | RXO+29 |
AL1 | NEWRX+25 |
ARSP | ARSPRE+1 |
DG1 | NEWRX+25 |
ORC7 | ORCNW+8 |
ORCNW | NEWRX+25 |
PID | NEWRX+25 |
RXC | NEWRX+25 |
RXO | NEWRX+25 |
RXR | NEWRX+25 |
SET | PID+5, PID+6, PID+7, PID+10, PID+11, PID+12, PID+15, PID+22, ORCNW+3, ORCNW+4 , ORCNW+5, ORCNW+6, ORCNW+7, ORCNW+9, ORCNW+10, ORCNW+13, ORCNW+16, ORCNW+19, ORCNW+20, ORCNW+23 , ORCNW+24, ORCNW+25, ORCNW+26, ORCNW+27, ORCNW+28, ORCNW+29, ORCNW+32, ORCNW+33, ORCNW+34, ORCNW+35 , ORCNW+36, ORCNW+37, ORCNW+38, ORCNW+39, ORCNW+40, ORCNW+50, ORCNW+51, ORC7+6, ORC7+8, ORC7+9 , ORC7+10, ORC7+11, ORC7+14, ORCRF+2, ORCRF+3, ORCRF+4, ORCRF+5, ORCRF+6, RXO+3, RXO+6 , RXO+10, RXO+11, RXO+16, RXO+17, RXO+18, RXO+19, RXO+20, RXO+21, RXO+22, RXO+24 , RXO+25, RXO+26, RXO+27, RXO+28, RXO+29, RXO+33, RXO+40, RXO+42, RXO+43, RXO+46 , RXO+47, RXO+48, RXO+49, RXO+50, RXO+51, RXO+52, RXO+53, RXO+54, RXO+55, RXO+56 , RXO+57, RXO+58, MSA+2, MSA+3, MSA+4, MSA+5, MSA+6, MSA+12 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AACK | AACK+1~, AACK+4*, AACK+5, AACK+9, ARSP+1~, ARSP+10*, ARSP+12, ARSP+21 |
ADD | ORCNW~, ORCNW+2*, ORCNW+29, ORCNW+52, RXO~, RXO+59 |
APP | RXO+1~ |
APPARMS | NEWRX+1~, NEWRX+36 |
APPARMS("ACCE | PT ACK RESPONSE" , NEWRX+30*, PT ACK TYPE" , NEWRX+28* |
APPARMS("APP | ACK TYPE" , NEWRX+31* |
APPARMS("FAIL | URE RESPONSE" , NEWRX+33* |
APPARMS("QUEUE" | NEWRX+32* |
APPARMS("SEND | ING APPLICATION" , NEWRX+27* |
ARY | NEWRX+1~, NEWRX+13, NEWRX+42, NEWRX+48, AACK+1~, AACK+18, ARSP+1~, ARSP+26, ARSP+31, MSH~ , PID+5, PID+6, PID+7, PID+10, PID+11, PID+12, PID+15, PID+22, PID+23, ORCNW+3 , ORCNW+4, ORCNW+5, ORCNW+6, ORCNW+7, ORCNW+9, ORCNW+10, ORCNW+13, ORCNW+16, ORCNW+19, ORCNW+20 , ORCNW+23, ORCNW+24, ORCNW+25, ORCNW+26, ORCNW+27, ORCNW+28, ORCNW+29, ORCNW+32, ORCNW+33, ORCNW+34 , ORCNW+35, ORCNW+36, ORCNW+37, ORCNW+38, ORCNW+39, ORCNW+40, ORCNW+50, ORCNW+51, ORCNW+52, ORC7+6 , ORC7+8, ORC7+9, ORC7+10, ORC7+11, ORC7+14, ORCRF+2, ORCRF+3, ORCRF+4, ORCRF+5, ORCRF+6 , ORCRF+7, RXO+3, RXO+6, RXO+10, RXO+11, RXO+16, RXO+17, RXO+18, RXO+19, RXO+20 , RXO+21, RXO+22, RXO+24, RXO+25, RXO+26, RXO+27, RXO+28, RXO+29, RXO+33, RXO+40 , RXO+42, RXO+43, RXO+46, RXO+47, RXO+48, RXO+49, RXO+50, RXO+51, RXO+52, RXO+53 , RXO+54, RXO+55, RXO+56, RXO+57, RXO+58, RXO+59, MSA+2, MSA+3, MSA+4, MSA+5 , MSA+6, MSA+7, MSA+12, MSA+13, SET~, SET+1 |
ARY("COM" | NEWRX+11*, NEWRX+40*, NEWRX+47*, AACK+17*, ARSP+25*, ARSP+30* |
ARY("REASON" | NEWRX+9*, NEWRX+38*, NEWRX+44*, AACK+14*, ARSP+18* |
ARY("RX REF" | NEWRX+10*, NEWRX+39*, NEWRX+45*, AACK+15*, ARSP+19* |
ARY("TYPE" | NEWRX+12*, NEWRX+41*, NEWRX+46*, AACK+16*, ARSP+24*, ARSP+29* |
ARY("USER" | ARSP+20* |
C | SET~, SET+1 |
CACK | CACK+1~, CACK+2*, CACK+3, CACK+7 |
CMP | ORC7+1~, ORC7+2*, ORC7+4*, ORC7+6, ORC7+8, ORC7+9, ORC7+10, ORC7+11, ORC7+14 |
CONJ | ORC7+1~, ORC7+12*, ORC7+13*, ORC7+14 |
D | ORC7+1~, ORC7+3*, ORC7+8, ORC7+9, ORC7+11, ORC7+12, ADJDUR+1~, ADJDUR+4*, ADJDUR+5 |
DATA | AACK+1~, ARSP+1~, ARSP+4, ARSP+5, ARSP+13 |
DATA( | ARSP+8, ARSP+14 |
DFN | NEWRX+2~, NEWRX+22*, NEWRX+25, PID~, PID+1, PID+4, PID+6, PID+20 |
DIEN | RXO+1~, RXO+5*, RXO+31, RXO+32, QTYQUAL~, QTYQUAL+3, QTYTXT~, QTYTXT+3, DRGUNITS~, DRGUNITS+1 |
DNAME | RXO+1~, RXO+8*, RXO+9*, RXO+10 |
DRG | RXO+1~, RXO+23*, RXO+24, RXO+25 |
DSF | RXO+1~, RXO+12*, RXO+14, RXO+17 |
DU | ORC7+1~, ORC7+5*, ORC7+6 |
DUZ(2 | PID+6, ORCNW+31 |
ERR | NEWRX+1~, NEWRX+7, NEWRX+36 |
ERRTXT | ARSP+2~, ARSP+15*, ARSP+25, ARSP+27 |
F | SET~, SET+1 |
FLD | PID+2~, PID+8*, PID+9, PID+13*, PID+14 |
FORM | GDFORM~, GDFORM+1, GDFMTXT~, GDFMTXT+1 |
FOUND | RXO+1~ |
FRM | RXO+1~, RXO+13*, RXO+15*, RXO+16 |
HL1 | NEWRX+2~ |
HL1("ECH" | NEWRX+16* |
HL1("FS" | NEWRX+17* |
HL1("Q" | NEWRX+18* |
HL1("VER" | NEWRX+19* |
HLB7 | ORCNW+1~, ORCNW+45*, ORCNW+49*, ORCNW+51 |
HLECH | NEWRX+1~, NEWRX+15*, NEWRX+16, PID+9, PID+14, ORCNW+11, ORCNW+12, ORCNW+17, ORCNW+18, ORCNW+21 , ORCNW+22 |
HLFS | NEWRX+1~, NEWRX+14*, NEWRX+17, PID+8, PID+11, PID+12, PID+13, PID+17 |
>> HLMSGIEN | AACK+2, AACK+3, AACK+6, CACK+2, CACK+4, ARSP+4 |
HLMSTATE | ARSP+1~, ARSP+4 |
HLO | ORCNW+1~, ORCNW+47*, ORCNW+48 |
HLOIEN | ORCNW+1~, ORCNW+48*, ORCNW+49 |
HLPM | NEWRX+1~, NEWRX+7 |
HLPM("ENCODIN | G CHARACTERS" , NEWRX+15 |
HLPM("EVENT" | NEWRX+5* |
HLPM("FIELD S | EPARATOR" , NEWRX+14 |
HLPM("MESSAGE | TYPE" , NEWRX+4* |
HLPM("VERSION" | NEWRX+6*, NEWRX+19 |
HLQ | PID+2~, PID+3* |
>> HLSMGIEN | AACK+4 |
HLST | NEWRX+1~, NEWRX+7, NEWRX+36, PID+23, ORCNW+52, ORCRF+7, RXO+59, MSA+7, MSA+13 |
IEN | PREPARY+1~, PREPARY+2*, PREPARY+3, PREPARY+4, PREPARY+5 |
IMMNPI | ORCNW+1~, ORCNW+15*, ORCNW+16 |
IMMSUP | ORCNW+1~, ORCNW+14*, ORCNW+15, ORCNW+17 |
INST | ORCNW+1~, ORCNW+30*, ORCNW+31*, ORCNW+32, ORCNW+33, ORCNW+36, ORCNW+37, ORCNW+38, ORCNW+39, ORCNW+40 |
IORC | ORCRF~ |
LN | NEWRX+2~, NEWRX+3* |
LP | PID+2~, PID+9*, PID+10, PID+14*, PID+15, ORCNW+1~, ORCNW+12*, ORCNW+13, ORCNW+18*, ORCNW+19 , ORCNW+22*, ORCNW+23, ORC7+1~, ORC7+2*, ORC7+3, PREPARY+1~, PREPARY+4*, PREPARY+5, FSEGIEN+1~, FSEGIEN+2* , FSEGIEN+3*, FSEGIEN+4*, FSEGIEN+5, GETSIG+1~, GETSIG+3*, GETSIG+4, GETPRC+1~, GETPRC+3*, GETPRC+4 |
MSA | ARSP+1~, MSA+1~, MSA+7* |
MSG | AACK+11, CACK+9, ARSP+1~ |
MSG(1 | AACK+6*, CACK+4* |
MSG(2 | AACK+7*, CACK+5* |
MSG(3 | AACK+8*, CACK+6* |
MSG(4 | AACK+9*, CACK+7* |
MSGIEN | ARSP+2~, ARSP+3*, ARSP+9*, ARSP+16, ARSP+17 |
MSH | MSA+11~, MSA+13* |
N | ADJDUR+1~, ADJDUR+3*, ADJDUR+5 |
NDC | RXO+1~, RXO+4*, RXO+6, RXO+11, RXO+35, RXO+36 |
NIEN | RXO+1~ |
NM | ORCNW+1~, ORCNW+11*, ORCNW+12, ORCNW+17*, ORCNW+18, ORCNW+21*, ORCNW+22 |
NOSSNR | PID+19~, PID+20*, PID+21 |
OCC | ORCNW~, ORCNW+4 |
OPRV | ARSP+1~, ARSP+17*, ARSP+20 |
ORC | ORCNW+1~, ORCNW+52*, ORCRF+1~, ORCRF+7* |
ORDER | ORCNW+1~, ORCNW+42*, ORCNW+43 |
PDIV | GETRINST~, GETRINST+1 |
PHM | RXO+1~, RXO+44*, RXO+45, RXO+46, RXO+47, RXO+49, RXO+51, RXO+52, RXO+53, RXO+54 , RXO+55, RXO+56, RXO+59* |
PID | PID+2~, PID+4*, PID+8, PID+11, PID+12, PID+13, PID+17 |
R | SET~, SET+1 |
RES | FSEGIEN+1~, FSEGIEN+2*, FSEGIEN+4, FSEGIEN+5*, FSEGIEN+6 |
RET | NEWRX+13, NEWRX+42, NEWRX+48, AACK+1~, AACK+18, ARSP+1~, ARSP+26, ARSP+31, QTYQUAL+1~, QTYQUAL+2* , QTYQUAL+4*, QTYQUAL+5, QTYTXT+1~, QTYTXT+2*, QTYTXT+4*, QTYTXT+5, PREPARY~, GETSIG+1~, GETSIG+2*, GETSIG+4* , GETSIG+5, GETPRC+1~, GETPRC+2*, GETPRC+4*, GETPRC+5 |
RET( | PREPARY+5* |
RIEN | GROUTE~, GROUTE+2 |
RRIEN | ORCNW+1~, ORCNW+43*, ORCNW+44, ORCNW+46, ORCNW+47 |
RX0 | NEWRX+2~, NEWRX+20*, NEWRX+22, ORCNW+7, ORCNW+9, ORCNW+10, ORCNW+11, ORCNW+14, ORCNW+20, ORCNW+21 , ORCNW+24, ORCNW+25, ORCNW+26, ORCNW+27, ORC7+5, RXO+5, RXO+8, RXO+9, RXO+22, RXO+23 , RXO+27 |
RX2 | NEWRX+2~, NEWRX+21*, ORCNW+28, ORCNW+30, RXO+4 |
RXIEN | NEWRX~, NEWRX+8, NEWRX+13, NEWRX+20, NEWRX+21, NEWRX+37, NEWRX+42, NEWRX+47, NEWRX+48, AACK+1~ , AACK+3*, AACK+13, AACK+18, ARSP+1~, ARSP+16*, ARSP+23, ARSP+26, ARSP+27, ARSP+28, ARSP+31 , ORCNW+5, ORCNW+42, ORC7+2, ORC7+3, RXO+12, RXO+21, RXO+44, GPHM~, GPHM+1, GETSIG+3 , GETSIG+4, GETPRC+3, GETPRC+4, SUBST~, SUBST+2 |
RXNORM | RXO+1~, RXO+36*, RXO+37, RXO+38, RXO+39*, RXO+40 |
RXROUTE | GROUTE+1~, GROUTE+2*, GROUTE+3 |
S | SET~, SET+1 |
SEG | PREPARY~, PREPARY+2, FSEGIEN~, FSEGIEN+5 |
SEGERR | ARSP+2~, ARSP+14*, ARSP+15 |
SEGIEN | ARSP+2~, ARSP+5*, ARSP+6, ARSP+8, ARSP+13*, ARSP+14 |
SEGMSA | ARSP+2~, ARSP+8*, ARSP+9, ARSP+10, ARSP+11 |
SGM | PID+2~ |
SRC | PREPARY~, PREPARY+2, FSEGIEN~ |
SRC( | PREPARY+4, PREPARY+5, FSEGIEN+4, FSEGIEN+5 |
SSN | PID+2~, PID+17*, PID+18, PID+21*, PID+22 |
SSNUM | ORCNW+1~, ORCNW+46*, ORCNW+50 |
START | PREPARY~, PREPARY+2, FSEGIEN~, FSEGIEN+3 |
TTY | RXO+1~, RXO+38*, RXO+41*, RXO+42 |
TXT | ARSP+2~, ARSP+3*, ARSP+11*, ARSP+30 |
TYP | RXO+1~, RXO+2*, RXO+31*, RXO+32*, RXO+33 |
TYPE | GDFORM~, GDFORM+1 |
U | NEWRX+22, AACK+5, ORCNW+7, ORCNW+9, ORCNW+10, ORCNW+11, ORCNW+14, ORCNW+20, ORCNW+21, ORCNW+24 , ORCNW+25, ORCNW+26, ORCNW+27, ORCNW+28, ORCNW+30, ORCNW+49, ORC7+5, ORC7+8, ORC7+9, ORC7+11 , ORC7+12, RXO+4, RXO+5, RXO+8, RXO+9, RXO+22, RXO+23, RXO+27, RXO+31, RXO+32 , RXO+38, RXO+39, GPHM+1 |
USR | SPI~, SPI+1 |
V | SET~, SET+1 |
VAL | PID+2~, PID+9*, PID+10, PID+14*, PID+15, ORCNW+1~, ORCNW+12*, ORCNW+13, ORCNW+18*, ORCNW+19 , ORCNW+22*, ORCNW+23, ADJDUR~, ADJDUR+2, ADJDUR+3, ADJDUR+4, SUBST+1~, SUBST+2*, SUBST+3 |
WHO | NEWRX+36, AACK+11, CACK+9, ARSP+1~ |
WHO("FACILITY | LINK NAME" , NEWRX+35* |
WHO("G.APSP E | PRESCRIBING" , AACK+10*, CACK+8* |
WHO("RECEIVIN | G APPLICATION" , NEWRX+34* |
X | ACKRES+1~*, PID+2~, PID+23*, RXO+1~, RXO+14*, RXO+15, QTYQUAL+1~, QTYQUAL+3*, QTYQUAL+4, QTYTXT+1~ , QTYTXT+3*, QTYTXT+4 |