©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
DGENUPL4 ;ALB/CJM,RTK,ISA/KWP,ISD/GSN,PHH,RGL,PJR,BRM,TDM,TMK,EG,BAJ - PROCESS INCOMING (Z11 EVENT TYPE) HL7 MESSAGES ; 01/05/07
Source file <DGENUPL4.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 14 | ($$FINDCUR,$$GET)^DGENA $$GET^DGENCDA $$CHECK^DGENCDA1 $$UPD^DGENDBS ($$GET,$$NATCODE)^DGENELA $$CHECK^DGENELA1 $$GET^DGENOEIF ($$GET,$$INPAT)^DGENPTA $$CHECK^DGENPTA1 ADDERROR^DGENUPL (ADDMSG,NOTIFY,SCVET)^DGENUPL3 ($$CDCHECK,AO)^DGENUPL9 EP^DGENUPLB $$IFREG^DGREG |
| Kernel | 1 | $$FMTE^XLFDT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| UOBJECTS(DFN,DGPAT,DGELG,DGCDIS,DGOEIF,MSGID,ERRCOUNT,MSGS,OLDPAT,OLDELG,OLDCDIS,OLDOEIF) | ;
|
|
| ADD | ;
|
|
| CHECK() | ;
|
|
| MERGE | ;
|
| Name | Field # of Occurrence |
|---|---|
| $$FINDCUR^DGENA | CHECK+17 |
| $$GET^DGENA | CHECK+18 |
| $$GET^DGENCDA | UOBJECTS+32 |
| $$CHECK^DGENCDA1 | CHECK+24 |
| $$UPD^DGENDBS | ADD+21 |
| $$GET^DGENELA | UOBJECTS+32 |
| $$NATCODE^DGENELA | MERGE+52, MERGE+57, MERGE+58, MERGE+59, MERGE+63, MERGE+67 |
| $$CHECK^DGENELA1 | CHECK+24 |
| $$GET^DGENOEIF | UOBJECTS+32 |
| $$GET^DGENPTA | UOBJECTS+32 |
| $$INPAT^DGENPTA | CHECK+13 |
| $$CHECK^DGENPTA1 | CHECK+24 |
| ADDERROR^DGENUPL | UOBJECTS+33, CHECK+20, CHECK+27 |
| ADDMSG^DGENUPL3 | UOBJECTS+61, UOBJECTS+62, UOBJECTS+65, UOBJECTS+66, UOBJECTS+69, UOBJECTS+70, UOBJECTS+73, UOBJECTS+76, UOBJECTS+82, CHECK+20 |
| NOTIFY^DGENUPL3 | CHECK+20 |
| SCVET^DGENUPL3 | ADD+10 |
| $$CDCHECK^DGENUPL9 | UOBJECTS+37 |
| AO^DGENUPL9 | MERGE+69 |
| EP^DGENUPLB | UOBJECTS+83 |
| $$IFREG^DGREG | CHECK+10 |
| $$FMTE^XLFDT | UOBJECTS+61, UOBJECTS+62, UOBJECTS+66 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(391 - [#391] | ADD+14 |
| ^DGEN(27.17 - [#27.17] | MERGE+39 |
| ^DIC(21 - [#21] | ADD+15 |
| ^DIC(8 - [#8] | MERGE+63 |
| Name | Line Occurrences |
|---|---|
| $$CHECK | UOBJECTS+47 |
| ADD | UOBJECTS+44 |
| MERGE | UOBJECTS+41 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ALIVE | CHECK+2~, CHECK+7, CHECK+10*, CHECK+13*, CHECK+18*, CHECK+20 |
| CDEXT | MERGE+34~, MERGE+37*, MERGE+38, MERGE+39, MERGE+41 |
| CDPROC | MERGE+34~, MERGE+35*, MERGE+36, MERGE+39 |
| CURENR | CHECK+16~, CHECK+18 |
| CURENR("DATE" | CHECK+18 |
| CURENR("STATUS" | CHECK+18 |
| CURIEN | CHECK+16~, CHECK+17*, CHECK+18 |
| DATA | ADD+5~, ADD+21 |
| DATA( | ADD+18* |
| DFN | UOBJECTS~, UOBJECTS+32, ADD+21, CHECK+10, CHECK+13, CHECK+17 |
| DGCDIS | UOBJECTS~, UOBJECTS+53!* |
| DGCDIS( | MERGE+27, MERGE+28, MERGE+29, MERGE+31, MERGE+32 |
| DGCDIS("EXT" | MERGE+37 |
| DGCDIS("PROC" | MERGE+35 |
| DGCDIS("VCD" | UOBJECTS+79, UOBJECTS+82 |
| DGCDIS3 | UOBJECTS+28~, UOBJECTS+53, MERGE+11!*, CHECK+24 |
| DGCDIS3( | MERGE+28*, MERGE+32* |
| DGCDIS3("COND" | MERGE+11! |
| DGCDIS3("DIAG" | MERGE+11! |
| DGCDIS3("EXT" | MERGE+11!, MERGE+41* |
| DGCDIS3("PROC" | MERGE+11! |
| DGELG | UOBJECTS~, UOBJECTS+52!* |
| DGELG( | MERGE+44 |
| DGELG("ELIG" | MERGE+52, MERGE+57, MERGE+58, MERGE+66 |
| DGELG("MTSTA" | MERGE+14 |
| DGELG("POW" | UOBJECTS+69, UOBJECTS+70 |
| DGELG("RATEDIS" | MERGE+49 |
| DGELG("SC" | UOBJECTS+73 |
| DGELG3 | UOBJECTS+28~, UOBJECTS+52, MERGE+8*, CHECK+24 |
| DGELG3( | MERGE+44* |
| DGELG3("ELIG" | MERGE+52*, MERGE+59, MERGE+62, MERGE+63!, MERGE+67* |
| DGELG3("ELIGENTBY" | ADD+6* |
| DGELG3("ELIGSTA" | CHECK+23 |
| DGELG3("ELIGVERIF" | ADD+18 |
| DGELG3("MTSTA" | MERGE+14* |
| DGELG3("POS" | ADD+15* |
| DGELG3("POW" | MERGE+10* |
| DGELG3("RATEDIS" | ADD+7*, MERGE+48!, MERGE+49* |
| DGELG3("SC" | ADD+13 |
| DGENR | CHECK+2~ |
| DGOEIF | UOBJECTS~ |
| DGPAT | UOBJECTS~, UOBJECTS+51!*, CHECK+20 |
| DGPAT( | MERGE+18 |
| DGPAT("DEATH" | UOBJECTS+60, UOBJECTS+61, UOBJECTS+64 |
| DGPAT("INELDATE" | UOBJECTS+76, MERGE+23* |
| DGPAT("INELDEC" | MERGE+21* |
| DGPAT("INELREA" | MERGE+22* |
| DGPAT("SSN" | UOBJECTS+33, CHECK+20, CHECK+27 |
| DGPAT3 | UOBJECTS+28~, UOBJECTS+51, MERGE+8*, CHECK+24 |
| DGPAT3( | MERGE+18* |
| DGPAT3("DEATH" | CHECK+7, CHECK+18 |
| DGPAT3("INELDATE" | ADD+13 |
| DGPAT3("PATYPE" | ADD+14* |
| DGPAT3("POWI" | MERGE+10 |
| DGPAT3("VETERAN" | ADD+14* |
| DT | CHECK+13 |
| ERRCOUNT | UOBJECTS~, UOBJECTS+33, CHECK+20, CHECK+27 |
| ERRMSG | CHECK+2~, CHECK+4*, CHECK+24, CHECK+27 |
| >> ERROR | ADD+21 |
| HEC | MERGE+7~ |
| HEC( | MERGE+57*, MERGE+58*, MERGE+63 |
| LIEN | MERGE+34~, MERGE+39*, MERGE+40, MERGE+41 |
| LOC | MERGE+7~ |
| LOC( | MERGE+59*, MERGE+67 |
| MSGID | UOBJECTS~, UOBJECTS+33, CHECK+20, CHECK+27 |
| MSGS | UOBJECTS~, UOBJECTS+61, UOBJECTS+62, UOBJECTS+65, UOBJECTS+66, UOBJECTS+69, UOBJECTS+70, UOBJECTS+73, UOBJECTS+76, UOBJECTS+82 , CHECK+20 |
| NATCODE | MERGE+7~, MERGE+57*, MERGE+58*, MERGE+59* |
| OLDCDIS | UOBJECTS~, UOBJECTS+32, MERGE+11 |
| OLDCDIS("VCD" | UOBJECTS+79, UOBJECTS+82 |
| OLDELG | UOBJECTS~, UOBJECTS+32, MERGE+8 |
| OLDELG("POW" | UOBJECTS+69, UOBJECTS+70 |
| OLDELG("SC" | UOBJECTS+73 |
| OLDOEIF | UOBJECTS~, UOBJECTS+32 |
| OLDPAT | UOBJECTS~, UOBJECTS+32, MERGE+8 |
| OLDPAT("DEATH" | UOBJECTS+60, UOBJECTS+62, UOBJECTS+64, UOBJECTS+66, CHECK+7 |
| OLDPAT("INELDATE" | UOBJECTS+76 |
| SUB | ADD+5~, ADD+7*, MERGE+7~, MERGE+17*, MERGE+18*, MERGE+26*, MERGE+27*, MERGE+28, MERGE+29, MERGE+31 , MERGE+32, MERGE+33, MERGE+44*, MERGE+58*, MERGE+59*, MERGE+61*, MERGE+62*, MERGE+63, MERGE+65*, MERGE+66* , MERGE+67 |
| SUB2 | MERGE+7~, MERGE+30*, MERGE+31*, MERGE+32, MERGE+35, MERGE+37, MERGE+41 |
| SUCCESS | UOBJECTS+28~, UOBJECTS+29*, UOBJECTS+34*, UOBJECTS+37*, UOBJECTS+38, UOBJECTS+47*, UOBJECTS+48, UOBJECTS+55, UOBJECTS+84, CHECK+2~ , CHECK+3*, CHECK+7*, CHECK+23, CHECK+26*, CHECK+28 |
| TYPE | ADD+5~ |
| U | UOBJECTS+32 |