BYIMRT ;IHS/CIM/THL - IMMUNIZATION DATA EXCHANGE;
Source file <BYIMRT.m>
Package | Total | Call Graph |
---|---|---|
IHS Immunizations Interface | 5 | ($$MSG,$$V04,EOJ)^BYIMIMM (SET1,START)^BYIMIMM1 (EXPBULL,LOGD)^BYIMIMM4 (PATH,PAUSE)^BYIMIMM6 REFUSAL^BYIMSEG1 |
VA Fileman | 4 | NOW^%DTC ^DIC FILE^DICN ^DIR |
IHS Generic Interface System | 1 | ^INHF |
Kernel | 1 | ($$LIST,$$OPEN,CLOSE)^%ZISH |
Package | Total | Caller Graph |
---|---|---|
IHS Immunizations Interface | 2 | BYIMIMM BYIMMU2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
VXQ(DFN) | ;EP;TO SEND VXQ MESSAGE
|
|
RXR(BYIMUIF) | ;EP;CLEAN OUT BLANK RXR AND '0' OBX segments
|
|
PAT | ;
|
|
HDR | ;QUERY RESPONSE DISPLAY HEADER
|
|
RTIN | ;EP;CHECK REAL-TIME INBOUND FILES
|
|
MID | ;DISPLAY MESSAGE RESPONSES
|
|
FILE(PATH,FILE,ACT,BYIMUIF,BYIMPAT,BYIMSTP) | ;SEND FILE
|
|
DELAY | ||
SFILE(BYIMUIF,BYIMPAT,BYIMSTP) | ;EP;TO SEND RT FILE VIA HL7 BRIDGE
|
|
MSH | ;DISPLAY RT MSH SEGMENT
|
|
MID1 | ;
|
|
RT | ;EP;FOR REAL TIME QUERIES
|
|
HDR2 | ;DISPLAY RELATED MESSAGE
|
|
HDR1 | ||
DISP(RTLDA) | ;DISPLAY RESPONSE FILE
|
|
VXU(DFN) | ;EP;TO SEND VXU MESSAGE
|
|
DVXU(X) | ;DISPLAY RT VXU MESSAGE
|
|
RTPAT | ;DISPLAY PATIENTS FOR RT QUERY
|
|
RTDEST | ;EP;CHECK DESTINATION GLOBAL FOR RT MESSAGES
|
|
PID(X) | ;DISPLAY RT PID SEGMENT
|
|
RTLOG(FILE,ACT,PATH,DFN,UIF,MID,STAT) | ;EP;
|
|
P1 | ;SELECT MULTIPE PATIENTS
|
|
UIF(BYIMUIF) | ;PROCESS UIF
|
|
NEWUIF | ;CREATE INTHU ENTRY
|
|
RESP | ;EP;REVIEW RT RESPONSE FILES
|
|
VXQX(BYIMPAT) | ;PEP;send query request for patient IEN - BYIMPAT
|
|
VXQV01(UIF) | ;EP;TO DISPLAY VXQ^V01 QUERY
|
|
ALL | ;EP;TO SPECIFY NEW ONLY OR ALL IMMUNIZATIONS
|
|
START | ;
|
|
CLEANVXU(BYIMUIF) | ;REMOVE INLHDEST REMNANT FOR RT MESSAGES
|
|
RT1 | ;REAL TIME
|
|
LOG(UIF,ACT,FILE) | ;LOG RT FILE
|
|
RTIMP(FILE) | ;EP;TO AUTOMATICALLY IMPORT REAL-TIME MESSAGES
|
|
RESP1 | ;REVIEW RESPONSES
|
|
F1 | ;WRTIE OUT EACH LINE
|
|
NON | ;EP;TO REVIEW NON-IMMUNIZATION IIS RESPONSES
|
|
RXA(X) | ;DISPLAY RT RXA SEGMENT
|
|
SEND | ;SEND RT QUERY
|
|
RSP | ;EP;IMMUNIZATION DATA EXCHANGE
|
Name | Field # of Occurrence |
---|---|
NOW^%DTC | SFILE+8, NEWUIF+2 |
$$LIST^%ZISH | RTIN+3 |
$$OPEN^%ZISH | RTIMP+7, FILE+7 |
CLOSE^%ZISH | FILE+16 |
$$MSG^BYIMIMM | VXQX+21 |
$$V04^BYIMIMM | VXU+4 |
EOJ^BYIMIMM | VXQX+20 |
SET1^BYIMIMM1 | RTIMP+22 |
START^BYIMIMM1 | START+8 |
EXPBULL^BYIMIMM4 | FILE+9 |
LOGD^BYIMIMM4 | VXU+11 |
PATH^BYIMIMM6 | RT1+1, RTIMP+5, VXQX+5, SFILE+7, RTIN+2 |
PAUSE^BYIMIMM6 | RT1+23, SEND+19, START+6, DISP+9, MID1+7, MID1+8, DVXU+19 |
REFUSAL^BYIMSEG1 | FILE+12 |
^DIC | P1+6, NON+9 |
FILE^DICN | RTLOG+15, NEWUIF+6 |
^DIR | RT1+10, SEND+8, RESP1+10, ALL+7 |
^INHF | VXQX+13 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^INTHU - [#4001] | Classic Fileman Calls |
^BYIMRT - [#90480.2] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNPAT("D" | UIF+17 |
^AUPNVSIT("AC" | VXU+2 |
^AUTTLOC("C" | UIF+13 |
^BYIMPARA - [#90480] | RTIMP+3, RTIMP+4 |
^BYIMRT - [#90480.2] | RTLOG+19*, RTLOG+22*, RTLOG+23*, RTLOG+24*, DISP+3, DISP+4, HDR1+3, HDR2+2, MID1+4, DVXU+3 |
^BYIMRT("ACT" | RTIN+7, DISP+6, MID+2 |
^BYIMTMP($J | RTIMP+21, LOG+2* |
^DIC(4 - [#4] | VXQV01+8 |
^DPT - [#2] | RTPAT+5, VXQ+1, VXU+5, VXQX+4, HDR1+4 |
^INLHDEST( | RTDEST+6, RTDEST+9, RTDEST+12, CLEANVXU+4, CLEANVXU+6, CLEANVXU+8! |
^INRHD("B" | RTDEST+2 |
^INTHU - [#4001] | FILE+15, RTDEST+13, UIF+2, UIF+4, RTLOG+22, VXQV01+3, VXQV01+4, VXQV01+5, RXR+3, RXR+4! , RXR+5! |
^INTHU("AT" | VXU+9, VXQX+16 |
^TMP($J | RT1+26, RT1+28!, PAT+1!, P1+3, P1+9*, SEND+11, SEND+14, SEND+17!, SEND+18!, RTPAT+4 , RESP1+2! |
Name | Line Occurrences |
---|---|
$$VXQX | VXQ+3 |
ALL | PAT+2 |
CLEANVXU | VXU+15 |
DELAY | VXQ+2, VXU+6 |
DISP | NON+12 |
DVXU | MID1+5 |
F1 | FILE+15 |
FILE | SFILE+11 |
HDR | DISP+1 |
HDR2 | MID1+1 |
LOG | RTIMP+18 |
MID | DISP+10 |
MID1 | MID+2 |
NON | RESP1+15 |
P1 | PAT+4 |
PAT | RT1+25 |
PID | DVXU+4 |
RESP | RT1+14 |
RESP1 | RESP+2 |
RT1 | RT+1 |
RTIMP | RTIN+8 |
RTIN | RT1+21, FILE+21 |
RTLOG | LOG+8, FILE+10, FILE+17 |
RTPAT | P1+10, SEND+2 |
RXA | DVXU+5 |
RXR | VXU+12 |
SEND | RT1+27 |
SFILE | VXU+14, VXQX+19, UIF+20 |
START | RESP1+14 |
UIF | RTDEST+14 |
VXQ | SEND+15 |
VXU | SEND+16 |
Name | Field # of Occurrence |
---|---|
^( | FILE+15, RTLOG+22, MID1+4, RXR+3, DVXU+3 |
^(0 | HDR2+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | SFILE+9, NEWUIF+3 |
ACT | LOG~, LOG+8, SFILE+10*, SFILE+11, FILE~, FILE+7, RTLOG~, RTLOG+9, RTLOG+14 |
AD | RXA+1~, RXA+3*, RXA+12 |
AUTOADD | RTIMP+2~, RTIMP+4* |
AUTOIMP | RTIMP+2~, RTIMP+3* |
>> BHLDEST | RSP+1*, RSP+3 |
BYIMALL | VXU+4, ALL+1!, ALL+10* |
>> BYIMBDG | FILE+18 |
>> BYIMDDA | RTDEST+2*, RTDEST+3, RTDEST+6, RTDEST+9, RTDEST+12 |
BYIMDEST | VXQX+7~, VXQX+12*, VXQX+13, RTDEST+1*, RTDEST+2 |
BYIMDT | RTDEST+7~, RTDEST+8*, RTDEST+9*, RTDEST+12 |
>> BYIMIN1 | F1+4 |
BYIMJ | RTIMP+9~, RTIMP+11* |
BYIMPAT | VXQX~, VXQX+4, VXQX+8, VXQX+9, VXQX+10, VXQX+19, SFILE~, SFILE+4, SFILE+9, SFILE+11 , FILE~, FILE+10, FILE+12, FILE+17 |
>> BYIMQT | RT1+3, VXQX+6, VXQX+12 |
BYIMQTX | RT1+2!, RT1+3*, SEND+1, VXQX+6*, VXQX+18 |
BYIMQUIT | RT+1, RT+2!, RT1+2!, RT1+12*, RT1+14!, RT1+24!, PAT+4, PAT+5!, P1+8*, RESP+1! , RESP+2, RESP1+1!, RESP1+11!, RESP1+12*, RESP1+15, RESP1+16!, NON+11*, RTIMP+1!, DISP+2~, DISP+11! , MID+2, MID+3!, MID1+2~, MID1+4, MID1+5*, MID1+7*, DVXU+3, DVXU+10, DVXU+12, DVXU+20* , DVXU+21, ALL+9* |
BYIMRTIN | RT1+19~, RT1+20*, FILE+19~, FILE+20*, RTIN+9 |
BYIMSTP | VXU+13*, VXU+14, VXQX+18*, VXQX+19, SFILE~, SFILE+5*, SFILE+9, SFILE+11, FILE~, UIF+19* , UIF+20 |
BYIMUIF | VXU+9*, VXU+10, VXU+12, VXU+14, VXU+15, VXQX+16*, VXQX+17, VXQX+19, SFILE~, SFILE+4 , SFILE+11, FILE~, FILE+10, FILE+12, FILE+15, FILE+17, RTDEST+10~, RTDEST+11*, RTDEST+12*, RTDEST+13 , RTDEST+14, UIF~, UIF+1, UIF+2, UIF+4, UIF+20, RXR~, RXR+3, RXR+4, RXR+5 , CLEANVXU~, CLEANVXU+1, CLEANVXU+8 |
>> BYIMVER | RT1+6, SFILE+9, RTDEST+1 |
BYIMX | RTIMP+9~ |
BYIMXX | RTIMP+19~, RTIMP+20*, RTIMP+21*, RTIMP+22 |
>> CVX | RXA+5*, RXA+6 |
DA | P1+1!, P1+7!, NON+3!, NON+10!, RTLOG+10!, RTLOG+16!, NEWUIF+1!, NEWUIF+7! |
DD | P1+1!, P1+7!, NON+3!, NON+10!, RTLOG+10!, RTLOG+16!, NEWUIF+1!, NEWUIF+7! |
DFN | SEND+13*, SEND+14*, SEND+15, SEND+16, SEND+17, RTPAT+1~, RTPAT+3*, RTPAT+4*, RTPAT+5, VXQ~ , VXQ+1, VXQ+3, VXU~, VXU+2, VXU+5, VXU+11, VXU+14, RESP1+3~, LOG+3~, LOG+4* , LOG+8, UIF+6~, UIF+15*, UIF+17*, UIF+18, UIF+20, RTLOG~, RTLOG+14 |
DIC | P1+1!, P1+2*, P1+7!, NON+3!, NON+4*, NON+10!, RTLOG+10!, RTLOG+12*, RTLOG+16!, NEWUIF+1! , NEWUIF+4*, NEWUIF+7! |
DIC("A" | P1+3*, NON+6* |
DIC("DR" | RTLOG+14* |
DIC("S" | NON+7* |
DIC(0 | P1+4*, NON+5*, RTLOG+13*, NEWUIF+5* |
DIE | P1+1!, P1+7!, NON+3!, NON+10!, RTLOG+10!, RTLOG+16!, NEWUIF+1!, NEWUIF+7! |
DIK | P1+1!, P1+7!, NON+3!, NON+10!, RTLOG+10!, RTLOG+16!, NEWUIF+1!, NEWUIF+7! |
DINUM | P1+1!, P1+7!, NON+3!, NON+10!, RTLOG+10!, RTLOG+16!, NEWUIF+1!, NEWUIF+7! |
DIR | RT1+7!, RT1+11!, SEND+3!, SEND+9!, RESP1+6!, RESP1+11!, RTIMP+2~, RTIN+1~, RTIN+3*, ALL+3! , ALL+8! |
DIR( | RTIN+6 |
DIR("A" | RT1+9*, SEND+5*, RESP1+8*, START+5*, ALL+5* |
DIR("B" | SEND+6*, ALL+6* |
DIR(0 | RT1+8*, SEND+4*, RESP1+7*, ALL+4* |
DISP | DVXU+1~, DVXU+6 |
DISP( | DVXU+10, DVXU+12, RXA+12* |
DLAYGO | P1+1!, P1+7!, NON+3!, NON+10!, RTLOG+10!, RTLOG+16!, NEWUIF+1!, NEWUIF+7! |
DO | P1+1!, P1+7!, NON+3!, NON+10!, RTLOG+10!, RTLOG+16!, NEWUIF+1!, NEWUIF+7! |
DR | P1+1!, P1+7!, NON+3!, NON+10!, RTLOG+10!, RTLOG+16!, NEWUIF+1!, NEWUIF+7! |
DUZ(2 | RTIMP+3, RTIMP+4 |
EXP | RXA+1~, RXA+11*, RXA+12 |
FILE | RTIMP~, RTIMP+7, RTIMP+18, LOG~, LOG+4, LOG+8, FILE~, FILE+7, FILE+9, FILE+10 , RTIN+1~, RTIN+6*, RTIN+7, RTIN+8, RTIN+9, RTLOG~, RTLOG+9, RTLOG+11, RTLOG+14, DISP+4* , DISP+6, MID+2 |
HDR | DVXU+1~ |
HDR( | DVXU+7, DVXU+23 |
HDR(1 | PID+5* |
HDR(2 | PID+6* |
HDR(3 | PID+12* |
HDR(4 | PID+13* |
HDR(5 | PID+20* |
HDR(6 | PID+27* |
HRN | UIF+6~, UIF+7*, UIF+8*, UIF+9*, UIF+10*, UIF+11, UIF+12*, UIF+14, UIF+17 |
IMM | RXA+1~, RXA+6*, RXA+12 |
IN | RTIN+4~, RTIN+5*, RTIN+6* |
INA | VXQX+7~, VXQX+13 |
INA("QNM" | VXQX+11* |
INDA | VXQX+7~, VXQX+8*, VXQX+11, VXQX+13 |
INDA(2 | VXQX+9* |
INDA(9000001 | VXQX+10* |
>> INDEST("RSPK11" | RSP+2* |
INH | VXQX+7~ |
>> INHF | VXU+7*, VXU+8, VXU+9, VXQX+15, VXQX+16, VXQX+21 |
IO | F1+9 |
IOF | RT1+5, RESP1+4, START+1, NON+1, HDR+1, MID1+7, DVXU+22 |
IOSL | MID1+7, DVXU+18 |
IOST | MID1+7, DVXU+18 |
>> IPATH | RTIMP+6, RTIMP+7, LOG+8, RTIN+3 |
>> J | DELAY+2*, DVXU+7*, DVXU+23* |
LOC | UIF+6~, UIF+11*, UIF+13 |
LOCDA | UIF+6~, UIF+13*, UIF+14, UIF+17 |
LOT | RXA+1~, RXA+9*, RXA+12 |
MID | LOG+5*, LOG+7*, LOG+8, SFILE+6*, FILE+10, FILE+17, F1+3*, RTLOG~, RTLOG+14, DISP+3* |
>> MIDDA | DISP+6*, DISP+7, HDR2+2, MID+1*, MID+2*, MID1+4, DVXU+3 |
>> MSH | VXQV01+3*, VXQV01+6, VXQV01+7 |
>> OPATH | SFILE+11, FILE+17 |
PATH | FILE~, FILE+7, FILE+9, FILE+10, RTLOG~, RTLOG+14 |
PRI | RTDEST+4~, RTDEST+5*, RTDEST+6*, RTDEST+9, RTDEST+12 |
>> QFILE | SFILE+9*, SFILE+11, FILE+17 |
>> QRD | VXQV01+4*, VXQV01+8 |
>> QRF | VXQV01+5* |
QUAN | RXA+1~, RXA+7*, RXA+12 |
>> READ | FILE+15*, F1+1, F1+2 |
RT | RT1+4~, RT1+13*, RT1+14, RT1+15, PAT+2, SEND+1, SEND+15, SEND+16, RESP1+3~, RESP1+13* , RESP1+14 |
RTLDA | RTLOG+18*, RTLOG+19, RTLOG+22, RTLOG+23, RTLOG+24, DISP~, DISP+3, DISP+4, HDR1+3 |
STAT | RTLOG~, RTLOG+14 |
TYPE | RXA+1~, RXA+8*, RXA+12 |
U | RTPAT+5, VXQ+1, VXU+5, RTIMP+3, RTIMP+4, UIF+9, RTLOG+23, RTLOG+24, DISP+3, DISP+4 , HDR1+4, HDR1+5, HDR1+7, HDR2+2, MID1+7, VXQV01+8, DVXU+14, DVXU+15, DVXU+16, DVXU+17 , DVXU+20, PID+8, RXA+5, RXA+6, RXA+8, RXA+12 |
UIF | RTIMP+9~, RTIMP+10*, RTIMP+18, LOG~, LOG+1, LOG+2, LOG+8, RTLOG~, RTLOG+14, RTLOG+22 , NEWUIF+8*, VXQV01~, VXQV01+2, VXQV01+3, VXQV01+4, VXQV01+5 |
VST | VXU+1~, VXU+2*, VXU+3, VXU+4 |
X | FILE+11~, FILE+13*, F1+1*, F1+3, F1+4*, F1+5*, F1+6*, F1+7*, F1+8*, F1+9 , F1+10*, UIF+6~, UIF+16*, UIF+17*, RTLOG+11*, RTLOG+20~, RTLOG+21*, RTLOG+22*, NEWUIF+3*, MID1+4* , MID1+5, MID1+6, MID1+7, RXR+1~, RXR+2*, RXR+3*, RXR+4, RXR+5, DVXU~, DVXU+3* , DVXU+4, DVXU+5, DVXU+20, MSH+1, MSH+2, MSH+3, PID~, PID+7, PID+9, PID+11 , RXA~, RXA+2, RXA+4, RXA+7, RXA+8, RXA+9, RXA+10, CLEANVXU+2~, CLEANVXU+3*, CLEANVXU+4* , CLEANVXU+6, CLEANVXU+8 |
X0 | HDR1+2~, HDR1+3*, HDR1+4, HDR1+5, HDR1+7 |
>> X1 | HDR1+5*, HDR1+6 |
XX | LOG+3~, LOG+6*, FILE+11~, FILE+14*, FILE+15*, UIF+3~, UIF+4*, UIF+5, UIF+8, UIF+9 , UIF+10, DISP+2~, DISP+5*, MID1+2~, MID1+3*, MID1+4*, DVXU+2*, DVXU+3*, DVXU+8~, DVXU+9* , DVXU+10*, DVXU+12, DVXU+13 |
Y | RT1+12, RT1+13, P1+8, P1+9, SEND+10, VXQ+3*, VXU+4*, VXU+7, RESP1+12, RESP1+13 , START+7, NON+11, NON+12, RTIMP+7*, RTIMP+8, FILE+7*, FILE+8, UIF+6~, RTLOG+17, RTLOG+18 , NEWUIF+8, RXR+1~, RXR+3*, RXR+4, RXR+5, MSH+2*, MSH+3, PID+1~, PID+2*, PID+3* , PID+4*, PID+5, PID+7*, PID+8*, PID+10*, PID+11*, PID+12, PID+14*, PID+15*, PID+16* , PID+17*, PID+18*, PID+19*, PID+20, PID+21*, PID+22*, PID+23*, PID+24*, PID+25*, PID+26* , PID+27, RXA+1~, RXA+2*, RXA+3, RXA+4*, RXA+5, RXA+6, RXA+10*, RXA+11, ALL+9 , ALL+10, CLEANVXU+2~, CLEANVXU+5*, CLEANVXU+6*, CLEANVXU+8 |
YY | DVXU+8~, DVXU+11*, DVXU+12*, DVXU+13 |
Z | UIF+6~, RTLOG+22*, RTLOG+23, RTLOG+24, DVXU+12*, DVXU+14, DVXU+15, DVXU+16, DVXU+17, PID+1~ , PID+9*, PID+10, RXA+1~, CLEANVXU+2~, CLEANVXU+7*, CLEANVXU+8* |
>> ZTQUEUED | SEND+11, VXQ+1, DELAY, VXU+5 |