DGENUPLA ;ALB/CKN,TDM,PJR,RGL,EG,TMK,CKN,TDM - PROCESS INCOMING (Z11 EVENT TYPE) HL7 MESSAGES ; 7/28/09 2:41pm
Source file <DGENUPLA.m>
Package | Total | Call Graph |
---|---|---|
Registration | 2 | ADDERROR^DGENUPL $$CONVERT^DGENUPL1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
CHK(SUB,STRING) | ;
|
|
SITECNV(STRING) | ; Convert claim folder loc (site # or site # and name) to
; ptr to file 4 |
|
OBX | ;
|
|
ZIO | ;New segment - DG*5.3*653
|
|
ZPD | ;
|
|
ZEL(COUNT) | ;
|
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+46, ZEL+55, ZEL+58, ZEL+65, ZEL+68, ZEL+71, ZEL+74, ZEL+77, OBX+10 , OBX+13, ZIO+3, ZIO+6, ZPD+4, ZPD+8, ZPD+13, ZPD+17 |
$$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+48, ZEL+52, ZEL+53, ZEL+56, ZEL+60 , ZEL+63, ZEL+66, ZEL+69, ZEL+72, ZEL+75, OBX+8, OBX+11, OBX+14, OBX+23, OBX+24 , OBX+25, OBX+27, OBX+28, ZIO+1, ZIO+4, ZPD+1, ZPD+2, ZPD+5, ZPD+6, ZPD+9 , ZPD+10, ZPD+15, ZPD+18 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(4 - [#4] | SITECNV+7, SITECNV+10, CHK+4, CHK+6 |
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+62 |
CODE | ZEL+1~, ZEL+2*, ZEL+6, ZEL+80 |
COUNT | ZEL~, ZEL+5, ZEL+79 |
CS | OBX+1~, OBX+4*, OBX+16, OBX+21, OBX+26, OBX+28 |
>> DGELG("A&A" | ZEL+21* |
>> DGELG("AO" | ZEL+33*, ZEL+62 |
>> DGELG("AOEXPLOC" | ZEL+60*, ZEL+62* |
>> DGELG("CLAIMLOC" | ZEL+11* |
>> DGELG("CLAIMNUM" | ZEL+10* |
>> DGELG("CVELEDT" | ZEL+69* |
>> DGELG("DISLOD" | ZEL+72* |
>> DGELG("DISRET" | ZEL+7* |
>> DGELG("EC" | ZEL+40* |
>> DGELG("ELIG" | ZEL+6*, ZEL+80* |
>> 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("POW" | ZPD+9* |
>> DGELG("RADEXPM" | ZEL+43*, ZEL+44 |
>> DGELG("RATEINC" | ZPD+1* |
>> DGELG("SHAD" | ZEL+75* |
>> DGELG("UESITE" | ZEL+66* |
>> DGELG("UEYEAR" | ZEL+63* |
>> DGELG("VACKAMT" | ZEL+48* |
>> DGELG("VADISAB" | ZEL+30* |
>> DGELG("VAPEN" | ZEL+27* |
>> DGMST("MSTDT" | ZEL+53* |
>> DGMST("MSTST" | ZEL+56* |
>> DGMST("MSTSTAT" | ZEL+52* |
>> 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* |
>> DGPAT("APPREQDT" | ZIO+4* |
>> DGPAT("DEATH" | ZPD+2* |
>> DGPAT("EMGRES" | ZPD+18* |
>> DGPAT("IR" | ZEL+37* |
>> 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+46, ZEL+55, ZEL+58, ZEL+65, ZEL+68, ZEL+71, ZEL+74, ZEL+77, OBX+10 , OBX+13, ZIO+3, ZIO+6, ZPD+4, ZPD+8, ZPD+13, ZPD+17 |
>> DGPAT("VETERAN" | ZEL+13* |
>> DGSEC("DATETIME" | OBX+11* |
>> DGSEC("LEVEL" | OBX+8* |
>> DGSEC("SOURCE" | OBX+14* |
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+46, ZEL+55, ZEL+58, ZEL+65, ZEL+68, ZEL+71, ZEL+74, ZEL+77, OBX+10 , OBX+13, ZIO+3, ZIO+6, ZPD+4, ZPD+8, ZPD+13, ZPD+17 |
>> 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+44*, ZEL+45, ZEL+53, ZEL+54, ZEL+56, ZEL+57, ZEL+63 , ZEL+64, ZEL+66, ZEL+67, ZEL+69, ZEL+70, ZEL+72, ZEL+73, ZEL+75, ZEL+76, OBX+8 , OBX+9, OBX+11, OBX+12, OBX+23, OBX+24, OBX+25, OBX+27, ZIO+1, ZIO+2, ZIO+4 , ZIO+5, ZPD+2, ZPD+3, ZPD+6, ZPD+7, ZPD+11*, ZPD+12, ZPD+15, ZPD+16 |
HLECH | OBX+2~*, OBX+4, OBX+5, OBX+7 |
HLFS | OBX+3~* |
>> HLQ | ZEL+51 |
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+46, ZEL+55, ZEL+58, ZEL+65, ZEL+68, ZEL+71, ZEL+74, ZEL+77, OBX+10 , OBX+13, ZIO+3, ZIO+6, ZPD+4, ZPD+8, ZPD+13, ZPD+17 |
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+51* |
>> SEG(10 | ZEL+16 |
>> 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+48 |
>> SEG(22 | ZEL+43 |
>> SEG(23 | ZEL+52 |
>> SEG(24 | ZEL+53 |
>> SEG(25 | ZEL+56 |
>> SEG(29 | ZEL+60 |
>> SEG(3 | OBX+5, OBX+16 |
>> SEG(30 | ZPD+10 |
>> SEG(34 | ZEL+63 |
>> SEG(35 | ZEL+66, ZPD+15 |
>> SEG(38 | ZEL+69 |
>> SEG(39 | ZEL+72 |
>> SEG(40 | ZEL+75, ZPD+18 |
>> SEG(5 | ZEL+7, OBX+7, OBX+20, OBX+21, ZIO+1 |
>> SEG(6 | ZEL+10, ZIO+4 |
>> SEG(7 | ZEL+11 |
>> SEG(8 | ZEL+13, ZPD+1 |
>> SEG(9 | ZPD+2 |
SEQ | ZEL+1~, ZEL+51* |
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 | CHK+6 |
X | CHK+1~, CHK+6*, CHK+8 |