DGENUPLA ;ALB/CKN,TDM,PJR,RGL,EG,TMK,CKN,TDM,JAM,KUM - PROCESS INCOMING (Z11 EVENT TYPE) HL7 MESSAGES ;7/18/24 12:40PM
Source file <DGENUPLA.m>
Package | Total | Call Graph |
---|---|---|
Registration | 3 | ADDERROR^DGENUPL $$CONVERT^DGENUPL1 $$GETTIMST^DGOTHEL |
Kernel | 1 | $$FMDIFF^XLFDT |
VA FileMan | 1 | $$GET1^DIQ |
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 |
---|---|---|
Registration | 1 | DGENUPL2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
ZEL(COUNT) | ;
|
|
OBX | ;
|
|
ZIO | ;New segment - DG*5.3*653
|
|
ZPD | ;
|
|
SITECNV(STRING) | ; Convert claim folder loc (site # or site # and name) to
; pointer to file 4 |
|
CHK(SUB,STRING) | ;
|
Name | Field # of Occurrence |
---|---|
ADDERROR^DGENUPL | ZEL+4, ZEL+9, ZEL+15, ZEL+19, ZEL+23, ZEL+26, ZEL+29, ZEL+32, ZEL+36, ZEL+39 , ZEL+42, ZEL+47, ZEL+56, ZEL+59, ZEL+66, ZEL+69, ZEL+74, ZEL+77, ZEL+80, ZEL+84 , ZEL+87, ZEL+97, ZEL+104, ZEL+108, ZEL+113, ZEL+114, ZEL+123, OBX+10, OBX+13, ZIO+3 , ZIO+6, ZIO+10, ZIO+13, ZIO+16, ZIO+19, ZIO+41, ZIO+46, ZPD+4, ZPD+8, ZPD+13 , ZPD+17, ZPD+22, ZPD+25, ZPD+28, ZPD+31 |
$$CONVERT^DGENUPL1 | ZEL+2, ZEL+7, ZEL+10, ZEL+13, ZEL+16, ZEL+17, ZEL+20, ZEL+21, ZEL+24, ZEL+27 , ZEL+30, ZEL+33, ZEL+37, ZEL+40, ZEL+43, ZEL+49, ZEL+53, ZEL+54, ZEL+57, ZEL+61 , ZEL+64, ZEL+67, ZEL+70, ZEL+75, ZEL+78, ZEL+82, ZEL+85, ZEL+88, ZEL+89, ZEL+92 , ZEL+100, ZEL+106, ZEL+111, ZEL+112, ZEL+114, OBX+8, OBX+11, OBX+14, OBX+23, OBX+24 , OBX+25, OBX+27, OBX+28, ZIO+1, ZIO+4, ZIO+8, ZIO+11, ZIO+14, ZIO+17, ZPD+1 , ZPD+2, ZPD+5, ZPD+6, ZPD+9, ZPD+10, ZPD+15, ZPD+18, ZPD+20, ZPD+23, ZPD+26 , ZPD+29 |
$$GETTIMST^DGOTHEL | ZEL+121 |
$$GET1^DIQ | ZEL+117, ZEL+119, ZIO+23, ZIO+37, ZIO+39 |
$$FMDIFF^XLFDT | ZEL+121 |
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^DIC(8 - [#8] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(4 - [#4] | SITECNV+7, SITECNV+10, CHK+4, CHK+6 |
^TMP("DGCVE" | ZEL+72* |
Name | Line Occurrences |
---|---|
$$CHK | SITECNV+10 |
$$SITECNV | ZEL+11 |
Name | Field # of Occurrence |
---|---|
^(99 | CHK+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AOERR | ZEL+34~*, ZEL+63 |
CODE | ZEL+1~, ZEL+2*, ZEL+6, ZEL+117, ZEL+131 |
COUNT | ZEL~, ZEL+5, ZEL+110, ZEL+130 |
CS | OBX+1~, OBX+4*, OBX+16, OBX+21, OBX+26, OBX+28 |
>> DFN | ZEL+72, ZEL+117, ZEL+119, ZEL+121, ZIO+23, ZIO+37, ZIO+39 |
>> DGELG("A&A" | ZEL+21* |
>> DGELG("AO" | ZEL+33*, ZEL+63 |
>> DGELG("AOEXPLOC" | ZEL+61*, ZEL+63* |
>> DGELG("CLAIMLOC" | ZEL+11* |
>> DGELG("CLAIMNUM" | ZEL+10* |
>> DGELG("CLE" | ZEL+82* |
>> DGELG("CLEDT" | ZEL+85* |
>> DGELG("CLESOR" | ZEL+89* |
>> DGELG("CLEST" | ZEL+88* |
>> DGELG("CVELEDT" | ZEL+70* |
>> DGELG("DISLOD" | ZEL+75* |
>> DGELG("DISRET" | ZEL+7* |
>> DGELG("EC" | ZEL+40* |
>> DGELG("ELIG" | ZEL+6*, ZEL+131* |
>> DGELG("ELIGSTA" | ZEL+16* |
>> DGELG("ELIGSTADATE" | ZEL+17* |
>> DGELG("ELIGVERIF" | ZEL+20* |
>> DGELG("HB" | ZEL+24* |
>> DGELG("IR" | ZEL+37* |
>> DGELG("MEDASKDT" | ZPD+6* |
>> DGELG("MEDICAID" | ZPD+5* |
>> DGELG("OTH" | ZEL+111*, ZEL+113 |
>> DGELG("OTHTS" | ZEL+114*, ZEL+121 |
>> DGELG("OTHTYPE" | ZEL+112*, ZEL+113, ZEL+115*, ZEL+119 |
>> DGELG("POW" | ZPD+9* |
>> DGELG("RADEXPM" | ZEL+43*, ZEL+45 |
>> DGELG("RATEINC" | ZPD+1* |
>> DGELG("SHAD" | ZEL+78* |
>> DGELG("UESITE" | ZEL+67* |
>> DGELG("UEYEAR" | ZEL+64* |
>> DGELG("VACKAMT" | ZEL+49* |
>> DGELG("VADISAB" | ZEL+30* |
>> DGELG("VAPEN" | ZEL+27* |
>> DGMST("MSTDT" | ZEL+54* |
>> DGMST("MSTST" | ZEL+57* |
>> DGMST("MSTSTAT" | ZEL+53* |
>> DGNTR( | OBX+22* |
>> DGNTR("HDT" | OBX+23* |
>> DGNTR("HSIT" | OBX+26*, OBX+27* |
>> DGNTR("VDT" | OBX+24* |
>> DGNTR("VER" | OBX+28* |
>> DGNTR("VSIT" | OBX+25* |
>> DGPAT("AG/ALLY" | ZPD+15* |
>> DGPAT("APPREQ" | ZIO+1*, ZIO+37!, ZIO+39 |
>> DGPAT("APPREQDT" | ZIO+4*, ZIO+37!, ZIO+44 |
>> DGPAT("APPREQTS" | ZIO+8*, ZIO+37! |
>> DGPAT("DEATH" | ZPD+2* |
>> DGPAT("EMGRES" | ZPD+18* |
>> DGPAT("INDADT" | ZPD+23*, ZPD+25 |
>> DGPAT("INDEDT" | ZPD+29*, ZPD+31 |
>> DGPAT("INDID" | ZPD+20*, ZPD+22 |
>> DGPAT("INDSDT" | ZPD+26*, ZPD+28 |
>> DGPAT("IR" | ZEL+37* |
>> DGPAT("ORIGAPPREQ" | ZIO+11*, ZIO+22, ZIO+23! |
>> DGPAT("ORIGAPPREQDT" | ZIO+14*, ZIO+23! |
>> DGPAT("ORIGAPPREQTS" | ZIO+17*, ZIO+23! |
>> DGPAT("PGULF" | ZEL+100*, ZEL+101, ZEL+102 |
>> DGPAT("PGULFTS" | ZEL+106* |
>> DGPAT("RADEXPM" | ZEL+43* |
>> DGPAT("SPININJ" | ZPD+10*, ZPD+11 |
>> DGPAT("SSN" | ZEL+4, ZEL+9, ZEL+15, ZEL+19, ZEL+23, ZEL+26, ZEL+29, ZEL+32, ZEL+36, ZEL+39 , ZEL+42, ZEL+47, ZEL+56, ZEL+59, ZEL+66, ZEL+69, ZEL+74, ZEL+77, ZEL+80, ZEL+84 , ZEL+87, ZEL+97, ZEL+104, ZEL+108, ZEL+113, ZEL+114, ZEL+123, OBX+10, OBX+13, ZIO+3 , ZIO+6, ZIO+10, ZIO+13, ZIO+16, ZIO+19, ZIO+41, ZIO+46, ZPD+4, ZPD+8, ZPD+13 , ZPD+17 |
>> DGPAT("TERA" | ZEL+92*, ZEL+93, ZEL+94, ZEL+95! |
>> DGPAT("VETERAN" | ZEL+13* |
>> DGSEC("DATETIME" | OBX+11* |
>> DGSEC("LEVEL" | OBX+8* |
>> DGSEC("SOURCE" | OBX+14* |
DT | ZIO+44 |
END | SITECNV+5~ |
>> ERRCOUNT | ZEL+4, ZEL+9, ZEL+15, ZEL+19, ZEL+23, ZEL+26, ZEL+29, ZEL+32, ZEL+36, ZEL+39 , ZEL+42, ZEL+47, ZEL+56, ZEL+59, ZEL+66, ZEL+69, ZEL+74, ZEL+77, ZEL+80, ZEL+84 , ZEL+87, ZEL+97, ZEL+104, ZEL+108, ZEL+113, ZEL+114, ZEL+123, OBX+10, OBX+13, ZIO+3 , ZIO+6, ZIO+10, ZIO+13, ZIO+16, ZIO+19, ZIO+41, ZIO+46, ZPD+4, ZPD+8, ZPD+13 , ZPD+17, ZPD+22, ZPD+25, ZPD+28, ZPD+31 |
>> ERROR | ZEL+2, ZEL+3, ZEL+7, ZEL+8, ZEL+13, ZEL+14, ZEL+17, ZEL+18, ZEL+21, ZEL+22 , ZEL+24, ZEL+25, ZEL+27, ZEL+28, ZEL+30, ZEL+31, ZEL+33, ZEL+34, ZEL+35, ZEL+37 , ZEL+38, ZEL+40, ZEL+41, ZEL+45*, ZEL+46, ZEL+54, ZEL+55, ZEL+57, ZEL+58, ZEL+64 , ZEL+65, ZEL+67, ZEL+68, ZEL+70, ZEL+73, ZEL+75, ZEL+76, ZEL+78, ZEL+79, ZEL+82 , ZEL+83, ZEL+85, ZEL+86, ZEL+91*, ZEL+93*, ZEL+94*, ZEL+96, ZEL+99*, ZEL+101*, ZEL+102* , ZEL+103, ZEL+105*, ZEL+106, ZEL+107, ZEL+113*, ZEL+114, ZEL+123*, OBX+8, OBX+9, OBX+11 , OBX+12, OBX+23, OBX+24, OBX+25, OBX+27, ZIO+1, ZIO+2, ZIO+4, ZIO+5, ZIO+8 , ZIO+9, ZIO+11, ZIO+12, ZIO+14, ZIO+15, ZIO+17, ZIO+18, ZIO+40*, ZIO+45*, ZPD+2 , ZPD+3, ZPD+6, ZPD+7, ZPD+11*, ZPD+12, ZPD+15, ZPD+16, ZPD+20, ZPD+21, ZPD+23 , ZPD+24, ZPD+26, ZPD+27, ZPD+29, ZPD+30 |
HLECH | OBX+2~*, OBX+4, OBX+5, OBX+7 |
HLFS | OBX+3~* |
>> HLQ | ZEL+52 |
I | OBX+1~, OBX+20*, OBX+21 |
IEN | CHK+1~, CHK+4*, CHK+5, CHK+6 |
LEVEL | OBX+6~, OBX+7*, OBX+8 |
>> MSGID | ZEL+4, ZEL+9, ZEL+15, ZEL+19, ZEL+23, ZEL+26, ZEL+29, ZEL+32, ZEL+36, ZEL+39 , ZEL+42, ZEL+47, ZEL+56, ZEL+59, ZEL+66, ZEL+69, ZEL+74, ZEL+77, ZEL+80, ZEL+84 , ZEL+87, ZEL+97, ZEL+104, ZEL+108, ZEL+113, ZEL+114, ZEL+123, OBX+10, OBX+13, ZIO+3 , ZIO+6, ZIO+10, ZIO+13, ZIO+16, ZIO+19, ZIO+41, ZIO+46, ZPD+4, ZPD+8, ZPD+13 , ZPD+17, ZPD+22, ZPD+25, ZPD+28, ZPD+31 |
OBXPCE | OBX+1~, OBX+21* |
OBXTBL | OBX+1~ |
OBXTBL( | OBX+22 |
OBXTBL(1 | OBX+17* |
OBXTBL(2 | OBX+17* |
OBXTBL(3 | OBX+17* |
OBXTBL(4 | OBX+18* |
OBXTBL(5 | OBX+18* |
OBXTBL(6 | OBX+18* |
OBXTBL(7 | OBX+19* |
OBXTBL(8 | OBX+19* |
OBXTBL(9 | OBX+19* |
OBXVAL | OBX+1~, OBX+21*, OBX+22 |
RET | CHK+1~, CHK+3*, CHK+8*, CHK+9 |
RS | OBX+1~, OBX+4*, OBX+20, OBX+21 |
>> SEG( | ZEL+52* |
>> SEG(10 | ZEL+16, ZIO+17 |
>> SEG(11 | ZEL+17 |
>> SEG(12 | OBX+23, ZPD+5 |
>> SEG(13 | ZEL+20, ZPD+6 |
>> SEG(14 | ZEL+21, OBX+11, OBX+24 |
>> SEG(15 | ZEL+24, OBX+25 |
>> SEG(16 | ZEL+27, OBX+14, OBX+26 |
>> SEG(17 | ZEL+30, OBX+28, ZPD+9 |
>> SEG(18 | ZEL+33 |
>> SEG(19 | ZEL+37 |
>> SEG(2 | ZEL+2, ZEL+4 |
>> SEG(20 | ZEL+40 |
>> SEG(21 | ZEL+49 |
>> SEG(22 | ZEL+43 |
>> SEG(23 | ZEL+53 |
>> SEG(24 | ZEL+54 |
>> SEG(25 | ZEL+57 |
>> SEG(29 | ZEL+61 |
>> SEG(3 | OBX+5, OBX+16 |
>> SEG(30 | ZPD+10 |
>> SEG(34 | ZEL+64 |
>> SEG(35 | ZEL+67, ZPD+15 |
>> SEG(38 | ZEL+70 |
>> SEG(39 | ZEL+75 |
>> SEG(40 | ZEL+78, ZPD+18 |
>> SEG(41 | ZEL+82 |
>> SEG(42 | ZEL+85, ZPD+20 |
>> SEG(43 | ZEL+88, ZPD+23 |
>> SEG(44 | ZEL+89, ZPD+26 |
>> SEG(45 | ZEL+111, ZPD+29 |
>> SEG(46 | ZEL+112 |
>> SEG(47 | ZEL+114 |
>> SEG(48 | ZEL+92 |
>> SEG(49 | ZEL+100 |
>> SEG(5 | ZEL+7, OBX+7, OBX+20, OBX+21, ZIO+1 |
>> SEG(50 | ZEL+106 |
>> SEG(6 | ZEL+10, ZIO+4 |
>> SEG(7 | ZEL+11, ZIO+8 |
>> SEG(8 | ZEL+13, ZIO+11, ZPD+1 |
>> SEG(9 | ZIO+14, ZPD+2 |
SEQ | ZEL+1~, ZEL+52* |
SITE | SITECNV+2~, SITECNV+3*, SITECNV+7*, SITECNV+10*, SITECNV+12 |
SS | OBX+1~, OBX+4*, OBX+26 |
START | SITECNV+5~ |
STN | CHK+1~, CHK+6*, CHK+8 |
STRING | SITECNV~, SITECNV+4, SITECNV+7, SITECNV+10, CHK~, CHK+2, CHK+8 |
SUB | SITECNV+5~, SITECNV+9*, SITECNV+10*, CHK~, CHK+2, CHK+4, CHK+8 |
U | ZEL+113, CHK+6 |
X | CHK+1~, CHK+6*, CHK+8 |