DGENUPL2 ;ALB/CJM,RTK,TMK,ISA/KWP/RMM/CKN,EG,ERC,PWC,TDM,TEJ,KUM - PROCESS INCOMING (Z11 EVENT TYPE) HL7 MESSAGES ; 23 Nov 2019 1:07 PM
Source file <DGENUPL2.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 |
---|---|---|
Registration | 2 | DGENUPL1 DGENUPL7 |
Name | Comments | DBIA/ICR reference |
---|---|---|
PID | ;
|
|
ZPD | ;
|
|
ZIE | ;
|
|
ZIO | ;New segment - DG*5.3*653
|
|
ZEL(COUNT) | ;
|
|
ZEN | ;
|
|
ZMT | ;
|
|
ZCD | ;
|
|
SKIP | ;
|
|
ZSP | ;
|
|
ZMH | ;Purple Heart, OEFOIE, POW
|
|
ZRD | ;
|
|
OBX | ;
|
|
DCLOOKUP(DGCODE,DGNAME) | ;
; Description: Returns the ien of a Disability Condition (file #31) based on the DGCODE and DGNAME |
|
REGCHECK(DFN) | ;
; Description: passes patient through the registration consistency checker |
|
PEND(DFN,DGSTAT) | ;
|
Name | Field # of Occurrence |
---|---|
ADDERROR^DGENUPL | ZIE+3, ZEN+4, ZEN+15, ZEN+18, ZEN+23, ZEN+27, ZEN+38, ZEN+42, ZEN+51, ZEN+60 , ZMT+1, ZMT+4, ZCD+6, ZCD+9, ZCD+12, ZCD+18, ZCD+22, ZCD+26, SKIP+17, ZSP+3 , ZSP+7, ZSP+10, ZSP+20, ZSP+23, ZSP+26, ZSP+29, ZSP+32, ZSP+35, ZRD+13, ZRD+16 , ZRD+18 |
$$CONVERT^DGENUPL1 | ZIE+1, ZIE+4, ZIE+5, ZEN+2, ZEN+5, ZEN+6, ZEN+11, ZEN+12, ZEN+13, ZEN+16 , ZEN+20, ZEN+21, ZEN+25, ZEN+36, ZEN+40, ZEN+41, ZEN+44, ZEN+45, ZEN+46, ZEN+49 , ZEN+52, ZMT+2, ZCD+3, ZCD+4, ZCD+7, ZCD+10, ZCD+13, ZCD+14, ZCD+16, ZCD+20 , ZCD+24, SKIP+6, SKIP+9, SKIP+10, SKIP+11, SKIP+13, SKIP+14, SKIP+15, ZSP+1, ZSP+4 , ZSP+5, ZSP+8, ZSP+18, ZSP+21, ZSP+24, ZSP+27, ZSP+30, ZSP+33, ZRD+9, ZRD+10 , ZRD+11, ZRD+14 |
ZMH^DGENUPL3 | ZMH+1 |
OBX^DGENUPLA | OBX+1 |
ZEL^DGENUPLA | ZEL+1 |
ZIO^DGENUPLA | ZIO+1 |
ZPD^DGENUPLA | ZPD+1 |
^DGRPC | REGCHECK+8 |
$$FIND1^DIC | ZEN+47 |
CHK^DIE | ZEN+55 |
GETS^DIQ | PEND+7 |
FileNo | Call Tags |
---|---|
^DPT - [#2] | GETS^DIQ |
^DGEN(27.11 - [#27.11] | CHK^DIE |
^DG(408.43 - [#408.43] | FIND1^DIC |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(31 - [#31] | DCLOOKUP+12, DCLOOKUP+13, DCLOOKUP+15 |
^DIC(8 - [#8] | PEND+11 |
^DPT - [#2] | PEND+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
COND | ZRD+1~, ZRD+8*, ZRD+17 |
COUNT | ZEL~, ZEL+1, ZRD+1~, ZRD+7*, ZRD+8, ZRD+9, ZRD+10, ZRD+11, ZRD+14 |
D3 | SKIP+3~, SKIP+4*, SKIP+5, SKIP+6 |
DFN | REGCHECK~, PEND~, PEND+2, PEND+7, PEND+9, PEND+16, PEND+17, PEND+18 |
DGARR | PEND+1~ |
DGARR(2 | PEND+9, PEND+16, PEND+17, PEND+18 |
DGCD | REGCHECK+5~ |
>> DGCDIS("BY" | ZCD+3* |
>> DGCDIS("COND" | SKIP+11*, SKIP+16 |
>> DGCDIS("DATE" | ZCD+4* |
>> DGCDIS("DESCR" | SKIP+6*, SKIP+8, SKIP+16 |
>> DGCDIS("DIAG" | SKIP+9*, SKIP+16 |
>> DGCDIS("DTFACIRV" | ZCD+20* |
>> DGCDIS("DTVETNOT" | ZCD+24* |
>> DGCDIS("EXT" | SKIP+13* |
>> DGCDIS("FACDET" | ZCD+7* |
>> DGCDIS("METDET" | ZCD+13* |
>> DGCDIS("PERM" | SKIP+15* |
>> DGCDIS("PROC" | SKIP+10*, SKIP+16 |
>> DGCDIS("REVDTE" | ZCD+10* |
>> DGCDIS("SCORE" | SKIP+14* |
>> DGCDIS("VCD" | ZCD+14*, SKIP+16 |
>> DGCDIS("VETREQDT" | ZCD+16* |
DGCHK | REGCHECK+5~ |
DGCODE | DCLOOKUP~, DCLOOKUP+9, DCLOOKUP+12, DCLOOKUP+14, DCLOOKUP+15 |
DGDAY | REGCHECK+5~ |
DGEC | PEND+1~, PEND+9*, PEND+10, PEND+11*, PEND+12, PEND+13, PEND+14 |
DGEDCN | REGCHECK+5~, REGCHECK+7* |
>> DGELG("EFFDT" | ZSP+8*, ZSP+10, ZSP+12* |
>> DGELG("MTSTA" | ZMT+2* |
>> DGELG("P&T" | ZSP+18* |
>> DGELG("P&TDT" | ZSP+27* |
>> DGELG("POS" | ZSP+5* |
>> DGELG("RATEDIS" | ZRD+7, ZRD+8*, ZRD+9*, ZRD+10*, ZRD+11*, ZRD+14* |
>> DGELG("SC" | ZSP+1*, ZSP+16 |
>> DGELG("SCAWDATE" | ZSP+24* |
>> DGELG("SCPER" | ZSP+4*, ZSP+16* |
>> DGELG("UNEMPLOY" | ZSP+21* |
>> DGENR( | ZEN+66* |
>> DGENR("APP" | ZEN+25*, ZEN+29, ZEN+33*, ZEN+34*, ZEN+61* |
>> DGENR("DATE" | ZEN+2*, ZEN+33 |
>> DGENR("EFFDATE" | ZEN+21*, ZEN+34, ZEN+62* |
>> DGENR("END" | ZEN+36* |
>> DGENR("FACREC" | ZEN+13* |
>> DGENR("PRIORITY" | ZEN+20* |
>> DGENR("PTAPPLIED" | ZEN+45* |
>> DGENR("RCODE" | ZEN+44* |
>> DGENR("REASON" | ZEN+11* |
>> DGENR("REGDATE" | ZEN+49*, ZEN+60, ZEN+61, ZEN+62 |
>> DGENR("REGREA" | ZEN+46*, ZEN+47*, ZEN+48* |
>> DGENR("REGSRC" | ZEN+52*, ZEN+53, ZEN+55, ZEN+56* |
>> DGENR("REMARKS" | ZEN+12* |
>> DGENR("SOURCE" | ZEN+5*, ZEN+63* |
>> DGENR("STATUS" | ZEN+6*, ZEN+59 |
>> DGENR("SUBGRP" | ZEN+40* |
DGER | REGCHECK+5~ |
DGERR | PEND+1~, PEND+8 |
DGLST | REGCHECK+5~ |
DGNAME | DCLOOKUP~, DCLOOKUP+14 |
DGNCK | REGCHECK+5~ |
>> DGOAPP | ZEN+24*, ZEN+29*, ZEN+30* |
>> DGPAT("DENTC2DT" | ZSP+33* |
>> DGPAT("DENTC2IN" | ZSP+30* |
>> DGPAT("INELDATE" | ZIE+1* |
>> DGPAT("INELDEC" | ZIE+5* |
>> DGPAT("INELREA" | ZIE+4* |
>> DGPAT("PFSRC" | ZEN+41* |
>> DGPAT("PREFAC" | ZEN+16* |
>> DGPAT("SSN" | PID+1*, ZIE+3, ZEN+4, ZEN+15, ZEN+18, ZEN+23, ZEN+27, ZEN+38, ZEN+42, ZEN+51 , ZEN+60, ZMT+1, ZMT+4, ZCD+6, ZCD+9, ZCD+12, ZCD+18, ZCD+22, ZCD+26, SKIP+17 , ZSP+3, ZSP+7, ZSP+20, ZSP+23, ZSP+26, ZSP+29, ZSP+32, ZSP+35, ZRD+13, ZRD+16 , ZRD+18 |
DGRES | ZEN+1~, ZEN+54*, ZEN+55, ZEN+56 |
DGRPCOLD | REGCHECK+5~ |
DGSC | REGCHECK+5~ |
DGSTAT | PEND~, PEND+3, PEND+4, PEND+5*, PEND+6 |
DGTYPE | REGCHECK+5~ |
DGVT | REGCHECK+5~ |
DGX | PEND+1~, PEND+14, PEND+15*, PEND+16*, PEND+17*, PEND+18* |
DXCODE | ZRD+1~, ZRD+2*, ZRD+3*, ZRD+5, ZRD+8 |
>> ERRCOUNT | ZIE+3, ZEN+4, ZEN+15, ZEN+18, ZEN+23, ZEN+27, ZEN+38, ZEN+42, ZEN+51, ZEN+60 , ZMT+1, ZMT+4, ZCD+6, ZCD+9, ZCD+12, ZCD+18, ZCD+22, ZCD+26, SKIP+17, ZSP+3 , ZSP+7, ZSP+10, ZSP+20, ZSP+23, ZSP+26, ZSP+29, ZSP+32, ZSP+35, ZRD+13, ZRD+16 , ZRD+18 |
>> ERROR | ZIE+1, ZIE+2, ZEN+2, ZEN+3, ZEN+8*, ZEN+13, ZEN+14, ZEN+16, ZEN+17, ZEN+21 , ZEN+22, ZEN+25, ZEN+26, ZEN+36, ZEN+37, ZEN+49, ZEN+50, ZMT+1*, ZMT+2, ZMT+3 , ZCD+4, ZCD+5, ZCD+7, ZCD+8, ZCD+10, ZCD+11, ZCD+16, ZCD+17, ZCD+20, ZCD+21 , ZCD+24, ZCD+25, SKIP+17*, ZSP+1, ZSP+2, ZSP+5, ZSP+6, ZSP+8, ZSP+9, ZSP+18 , ZSP+19, ZSP+21, ZSP+22, ZSP+24, ZSP+25, ZSP+27, ZSP+28, ZSP+30, ZSP+31, ZSP+33 , ZSP+34, ZRD+11, ZRD+12, ZRD+14, ZRD+15, ZRD+19* |
FOUND | DCLOOKUP+10~, DCLOOKUP+11*, DCLOOKUP+12, DCLOOKUP+14*, DCLOOKUP+15 |
>> HLECH | ZCD+13, SKIP+13, SKIP+14, SKIP+15, ZRD+2, ZRD+4 |
I | SKIP+3~, SKIP+5*, SKIP+6 |
IEN | DCLOOKUP+10~, DCLOOKUP+11*, DCLOOKUP+12*, DCLOOKUP+13, DCLOOKUP+15*, DCLOOKUP+16 |
>> MSGID | ZIE+3, ZEN+4, ZEN+15, ZEN+18, ZEN+23, ZEN+27, ZEN+38, ZEN+42, ZEN+51, ZEN+60 , ZMT+1, ZMT+4, ZCD+6, ZCD+9, ZCD+12, ZCD+18, ZCD+22, ZCD+26, SKIP+17, ZSP+3 , ZSP+7, ZSP+10, ZSP+20, ZSP+23, ZSP+26, ZSP+29, ZSP+32, ZSP+35, ZRD+13, ZRD+16 , ZRD+18 |
NAME | ZRD+1~, ZRD+4*, ZRD+8 |
NODE | DCLOOKUP+10~, DCLOOKUP+13*, DCLOOKUP+14 |
PFSRC | ZEN+41~*, ZEN+42 |
>> SEG(1 | ZMT+1, ZCD+2, SKIP+9, SKIP+10, SKIP+11, SKIP+13, SKIP+14, SKIP+15 |
>> SEG(10 | ZEN+21, SKIP+11, ZSP+27 |
>> SEG(11 | ZEN+25, SKIP+14, ZSP+8 |
>> SEG(12 | ZEN+36, ZCD+14, ZSP+30, ZRD+10 |
>> SEG(13 | ZEN+40, SKIP+15, ZSP+33, ZRD+11 |
>> SEG(14 | ZEN+41, ZCD+16, ZRD+14 |
>> SEG(15 | ZEN+44, ZCD+20 |
>> SEG(16 | ZEN+45, ZCD+24 |
>> SEG(17 | ZEN+46, SKIP+5, SKIP+6 |
>> SEG(18 | ZEN+49 |
>> SEG(19 | PID+1, ZEN+52 |
>> SEG(2 | ZIE+1, ZEN+2, ZCD+10, ZSP+1, ZRD+2, ZRD+4 |
>> SEG(3 | ZIE+4, ZEN+5, ZMT+2, ZCD+3, ZSP+4, ZRD+9 |
>> SEG(4 | ZIE+5, ZEN+6, ZCD+7, ZCD+9, ZSP+5 |
>> SEG(5 | ZEN+11, ZCD+4 |
>> SEG(6 | ZEN+12, ZCD+13, ZSP+18 |
>> SEG(7 | ZEN+13, ZEN+15, SKIP+9, ZSP+21 |
>> SEG(8 | ZEN+16, ZEN+18, SKIP+10, ZSP+24 |
>> SEG(9 | ZEN+20, SKIP+13 |
SUB | ZEN+1~, ZEN+65*, ZEN+66* |
U | PEND+2, PEND+11 |
VA | REGCHECK+5~ |
X | REGCHECK+5~ |