DGENUPL1 ;ALB/CJM,ISA,KWP,CKN,LBD,LMD,TDM,TGH,DJS,HM,JAM,KUM - PROCESS INCOMING (Z11 EVENT TYPE) HL7 MESSAGES ;30 Oct 2017 7:32PM
Source file <DGENUPL1.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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
PARSE(MSGIEN,MSGID,CURLINE,ERRCOUNT,DGPAT,DGELG,DGENR,DGCDIS,DGOEIF,DGSEC,DGNTR,DGMST,DGNMSE,DGHBP,DGOTH,DGZHF) | ;
|
|
CONVERT(VAL,DATATYPE,ERROR) | ;
|
|
MAP(VALUE) | ;
|
|
ACCEPT(MSGID) | ;
|
|
MVERRORS | ;
|
|
CHKNXT(DGNVAL,DGNSEG) | ; Check the SEG in the next segment manually
; DGNVAL = CURLINE or CURLINE+1 ; DGNSEG = SEG (3 character SEG) ; Returns 1 if there is a match or 0 if there is no match |
Name | Field # of Occurrence |
---|---|
$$HL7TODSC^DGENA5 | CONVERT+36 |
$$HL7TORSN^DGENA5 | CONVERT+33 |
$$HLTOLIMB^DGENA5 | CONVERT+31 |
ADDERROR^DGENUPL | PARSE+46, PARSE+107, PARSE+125 |
NXTSEG^DGENUPL | PARSE+40, PARSE+53, PARSE+67, PARSE+72, PARSE+76, PARSE+83, PARSE+87, PARSE+95, PARSE+99, PARSE+103 , PARSE+114, PARSE+123, PARSE+146, PARSE+150, PARSE+158 |
OBX^DGENUPL2 | PARSE+159 |
ZCD^DGENUPL2 | PARSE+116 |
ZEL^DGENUPL2 | PARSE+44, PARSE+55 |
ZMH^DGENUPL2 | PARSE+147 |
ZRD^DGENUPL2 | PARSE+152 |
ZSP^DGENUPL2 | PARSE+124 |
ZCE^DGENUPLB | PARSE+86 |
ZE2^DGENUPLB | PARSE+59 |
ZHF^DGENUPLB | PARSE+68 |
ZHP^DGENUPLB | PARSE+98 |
ZTE^DGENUPLB | PARSE+75 |
EN^DGNOZMH | PARSE+141 |
$$GET1^DIQ | PARSE+61 |
$$FMDATE^HLFNC | CONVERT+42, CONVERT+46 |
INIT^HLFNC2 | ACCEPT+10 |
MSH^HLFNC2 | ACCEPT+14 |
CREATE^HLTF | ACCEPT+11 |
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DG(27.18 - [#27.18] | PARSE+61, CONVERT+78 |
^DG(408.32 - [#408.32] | CONVERT+38 |
^DGHBP(25.11 - [#25.11] | CONVERT+83 |
^DIC(21 - [#21] | CONVERT+68 |
^DIC(35 - [#35] | CONVERT+73 |
^DIC(4 - [#4] | CONVERT+62, CONVERT+63 |
^DIC(8 - [#8] | MAP+11, MAP+12 |
^DIC(8.1 - [#8.1] | MAP+25 |
^TMP("HLS" | ACCEPT+15*, ACCEPT+20*, MVERRORS+5* |
^TMP("IVM" | MVERRORS+5, MVERRORS+6! |
^TMP($J | PARSE+34!*, PARSE+136, PARSE+137, PARSE+141!, PARSE+162!, CHKNXT+5 |
Name | Line Occurrences |
---|---|
$$CHKNXT | PARSE+66, PARSE+71, PARSE+82, PARSE+94, PARSE+114, PARSE+122, PARSE+145, PARSE+150, PARSE+155, PARSE+157 |
$$MAP | CONVERT+57 |
@( | PARSE+43, PARSE+105 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
COUNT | PARSE+31~, PARSE+53*, PARSE+55, PARSE+114*, PARSE+150*, MAP+7~, MAP+9*, MAP+14*, MAP+17, MAP+20 , MAP+23 |
CURLINE | PARSE~, PARSE+40, PARSE+50*, PARSE+53, PARSE+54*, PARSE+59*, PARSE+66, PARSE+67, PARSE+71, PARSE+72 , PARSE+74*, PARSE+76, PARSE+82, PARSE+83, PARSE+85*, PARSE+87, PARSE+94, PARSE+95, PARSE+97*, PARSE+99 , PARSE+103, PARSE+111*, PARSE+114, PARSE+115*, PARSE+122, PARSE+123, PARSE+128*, PARSE+135, PARSE+145, PARSE+146 , PARSE+150, PARSE+151*, PARSE+155, PARSE+157, PARSE+158 |
CURLN | PARSE+135~*, PARSE+136*, PARSE+137 |
DATATYPE | CONVERT~, CONVERT+30, CONVERT+32, CONVERT+35, CONVERT+37, CONVERT+40, CONVERT+44, CONVERT+48, CONVERT+52, CONVERT+56 , CONVERT+59, CONVERT+65, CONVERT+70, CONVERT+75, CONVERT+80 |
>> DFN | PARSE+61, PARSE+141 |
DGCCPC | PARSE+31~, PARSE+81* |
DGCDIS | PARSE~, PARSE+36! |
DGELG | PARSE~, PARSE+36! |
DGEN | PARSE+36! |
DGENR | PARSE~ |
DGHBP | PARSE~, PARSE+92! |
DGMST | PARSE~, PARSE+36! |
DGNMSE | PARSE~ |
DGNSEG | CHKNXT~, CHKNXT+5 |
DGNTR | PARSE~, PARSE+36! |
DGNVAL | CHKNXT~, CHKNXT+5 |
DGOEIF | PARSE~ |
DGOTH | PARSE~, PARSE+71!, PARSE+82! |
DGPAT | PARSE~, PARSE+36! |
DGPAT( | PARSE+63* |
DGPAT("SSN" | PARSE+46, PARSE+107, PARSE+125 |
DGRTN | PARSE+43~*, PARSE+105~* |
DGSEC | PARSE~ |
DGZHF | PARSE~ |
ECODE | MAP+7~, MAP+9*, MAP+11*, MAP+12, MAP+14, MAP+24*, MAP+26*, MAP+27 |
ECODE( | MAP+14*, MAP+26 |
ECODE(0 | MAP+17 |
ERRCOUNT | PARSE~, PARSE+46, PARSE+107, PARSE+125 |
ERROR | PARSE+31~, PARSE+38*, PARSE+39, PARSE+47*, PARSE+53, PARSE+58, PARSE+66, PARSE+71, PARSE+82, PARSE+94 , PARSE+96, PARSE+98, PARSE+102, PARSE+108*, PARSE+114, PARSE+122, PARSE+126*, PARSE+134, PARSE+144, PARSE+150 , PARSE+155, PARSE+163, CONVERT~, CONVERT+26*, CONVERT+39*, CONVERT+41*, CONVERT+43*, CONVERT+45*, CONVERT+47*, CONVERT+51* , CONVERT+55*, CONVERT+58*, CONVERT+64*, CONVERT+69*, CONVERT+74*, CONVERT+79*, CONVERT+84* |
HL | ACCEPT+9!, ACCEPT+10, ACCEPT+14 |
HLDT | ACCEPT+9!, ACCEPT+11 |
HLDT1 | ACCEPT+9!, ACCEPT+11 |
>> HLEID | ACCEPT+10 |
>> HLEVN | ACCEPT+12*, ACCEPT+13 |
>> HLFS | ACCEPT+18*, ACCEPT+20 |
HLMID | ACCEPT+9!, ACCEPT+11, ACCEPT+13 |
HLMTIEN | ACCEPT+9!, ACCEPT+11 |
>> HLRES | ACCEPT+14, ACCEPT+15 |
>> IVMRTN | PARSE+136, PARSE+137, CHKNXT+5 |
MHSTYP | PARSE+135~, PARSE+137*, PARSE+138 |
MID | ACCEPT+8~, ACCEPT+13*, ACCEPT+14 |
MSECNT | PARSE+135~*, PARSE+138*, PARSE+141, PARSE+142 |
MSGID | PARSE~, PARSE+46, PARSE+107, PARSE+125, ACCEPT~, ACCEPT+20 |
MSGIEN | PARSE~, PARSE+40, PARSE+53, PARSE+67, PARSE+72, PARSE+76, PARSE+83, PARSE+87, PARSE+95, PARSE+99 , PARSE+103, PARSE+114, PARSE+123, PARSE+146, PARSE+150, PARSE+158 |
NAME | MAP+7~, MAP+25*, MAP+26 |
NFLG | PARSE+31~, PARSE+38*, PARSE+40, PARSE+41*, PARSE+45* |
NODE | MAP+7~, MAP+12*, MAP+14 |
NONMSE | PARSE+135~*, PARSE+139*, PARSE+142 |
OLDVAL | CONVERT+60~, CONVERT+61*, CONVERT+62, CONVERT+63, CONVERT+66~, CONVERT+67*, CONVERT+68, CONVERT+71~, CONVERT+72*, CONVERT+73 , CONVERT+76~, CONVERT+77*, CONVERT+78, CONVERT+81~, CONVERT+82*, CONVERT+83 |
PSUB | PARSE+62~, PARSE+63* |
QFLG | PARSE+31~, PARSE+73*, PARSE+74*, PARSE+84*, PARSE+85*, PARSE+96*, PARSE+97*, PARSE+144*, PARSE+145* |
SEG | PARSE+31~, PARSE+39*, PARSE+40, PARSE+41, PARSE+42, PARSE+43, PARSE+44, PARSE+46, PARSE+53*, PARSE+66* , PARSE+67, PARSE+71*, PARSE+72, PARSE+76, PARSE+82*, PARSE+83, PARSE+87, PARSE+94*, PARSE+95, PARSE+99 , PARSE+102*, PARSE+103, PARSE+104, PARSE+105, PARSE+107, PARSE+114*, PARSE+122*, PARSE+123, PARSE+125, PARSE+134* , PARSE+145, PARSE+146, PARSE+150*, PARSE+155*, PARSE+157, PARSE+158 |
SEG("TYPE" | PARSE+41, PARSE+42, PARSE+53, PARSE+59, PARSE+60, PARSE+68, PARSE+74, PARSE+85, PARSE+97, PARSE+104 , PARSE+114, PARSE+124, PARSE+150 |
SEGNAM | PARSE+135~*, PARSE+137* |
SGMNT | PARSE+135~, PARSE+137* |
U | PARSE+137 |
VAL | CONVERT~, CONVERT+28, CONVERT+29*, CONVERT+31*, CONVERT+33*, CONVERT+36*, CONVERT+38*, CONVERT+39, CONVERT+41, CONVERT+42* , CONVERT+43, CONVERT+45, CONVERT+46*, CONVERT+47, CONVERT+49*, CONVERT+50*, CONVERT+53*, CONVERT+54*, CONVERT+57*, CONVERT+58 , CONVERT+61, CONVERT+62*, CONVERT+63*, CONVERT+64, CONVERT+67, CONVERT+68*, CONVERT+69, CONVERT+72, CONVERT+73*, CONVERT+74 , CONVERT+77, CONVERT+78*, CONVERT+79, CONVERT+82, CONVERT+83*, CONVERT+84, CONVERT+85 |
VALUE | MAP~, MAP+11, MAP+25 |