©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
AGMPIACK ; IHS/SD/TPF - MPI A28/A08 ACK PROCESSOR ; 12/15/2007
Source file <AGMPIACK.m>
| Package | Total | Call Graph |
|---|---|---|
| Patient Registration MPI | 2 | MSGCMPLT^AGMPIBGP NOTIF^AGMPIHLO |
| VA Fileman | 2 | ^DIE $$GET1^DIQ |
| Health Level Seven | 1 | ($$NEXTSEG,$$STARTMSG)^HLOPRS |
| Package | Total | Caller Graph |
|---|---|---|
| Patient Registration MPI | 2 | AGMPHLU AGMPIBGP |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PROC(HLMSGIEN) | ;EP -
; 06/7/2013 - DMB - TFS8067 - Use unique variables for the HLA and HLB IENs ; 9/01/2017 - GCD - CR 9578 - Added error trap so bad messages will get removed from the queue by the calling routine. |
|
| ADDICN(AGICN,DFN) | ;EP - ADD TO 'INTEGRATED CONTROL NUMBER' FIELD
|
|
| MSGERR(LOCALID,ACKIEN,HL778IEN,ERROR) | ;EP - ERROR OCURRED IN A28 ACK
|
|
| PARSE(DATA,MIEN,HLMSTATE) | ;EP
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | Classic Fileman Calls, GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | PROC+48 |
| ^HLA - [#777] | PROC+28, PROC+34 |
| ^HLB - [#778] | PROC+13, PROC+18, PROC+22, PROC+41* |
| Name | Line Occurrences |
|---|---|
| ADDICN | PROC+53 |
| MSGERR | PROC+11, PROC+16, PROC+21, PROC+25, PROC+31, PROC+37, PROC+43, PROC+47, PROC+50, ADDICN+9 |
| PARSE | PROC+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> ACKCODE | PROC+38*, PROC+39, PROC+42 |
| ACKIEN | PROC+6~, PROC+7*, PROC+10, PROC+11, PROC+16, PROC+21, PROC+24, PROC+25, PROC+31, PROC+37 , PROC+43, PROC+47, PROC+50, PROC+55, ADDICN+9, ADDICN+11, MSGERR~, MSGERR+1, MSGERR+4 |
| >> AGERROR | MSGERR+1*, MSGERR+2 |
| AGICN | ADDICN~ |
| CNT | PARSE+1~, PARSE+4*, PARSE+6*, PARSE+7 |
| DA | ADDICN+1!, ADDICN+3* |
| DATA | PROC+4~, PROC+5, PARSE~ |
| DATA( | PARSE+7* |
| DATA("HDR" | PARSE+3* |
| DATA(1 | PROC+8, PROC+18, PROC+26, PROC+38, PROC+44 |
| DATA(2 | PROC+42 |
| DFN | ADDICN~, ADDICN+3, ADDICN+7, ADDICN+9 |
| DIC | ADDICN+1! |
| DIE | ADDICN+1!, ADDICN+2* |
| DIR | ADDICN+1! |
| DR | ADDICN+1!, ADDICN+5* |
| ERROR | PROC+10*, PROC+11, PROC+15*, PROC+16, PROC+20*, PROC+21, PROC+24*, PROC+25, PROC+30*, PROC+31 , PROC+36*, PROC+37, PROC+42*, PROC+43, PROC+46*, PROC+47, PROC+49*, PROC+50, ADDICN+8*, ADDICN+9 , MSGERR~, MSGERR+1 |
| HL777IEN | PROC+4~, PROC+22*, PROC+23, PROC+28, PROC+34 |
| HL778IEN | PROC+4~, PROC+8*, PROC+9, PROC+13, PROC+16, PROC+18, PROC+21, PROC+22, PROC+25, PROC+31 , PROC+37, PROC+41, PROC+43, PROC+47, PROC+50, PROC+56, ADDICN+9, ADDICN+12, MSGERR~, MSGERR+1 |
| HLMSGIEN | PROC~, PROC+5, PROC+7 |
| HLMSTATE | PROC+4~, PROC+5, PARSE~, PARSE+2, PARSE+5 |
| HLMSTATE("HDR" | PROC+13, PROC+18, PROC+34, PARSE+3 |
| ICNEUID | PROC+4~, PROC+6~, PROC+44*, PROC+45, PROC+53 |
| >> IFERR | PROC+39*, PROC+40 |
| LOCALID | PROC+6~, PROC+34*, PROC+35, PROC+43, PROC+47, PROC+48, PROC+50, PROC+52, PROC+53, MSGERR~ , MSGERR+2 |
| MCIDACK | PROC+4~, PROC+18*, PROC+19, PROC+20 |
| MCIDORIG | PROC+4~, PROC+18*, PROC+19, PROC+20 |
| MIEN | PARSE~, PARSE+2 |
| MSGID | PROC+4~ |
| MSGSEG | PROC+4~, PROC+26* |
| NEXTSEG | PROC+4~ |
| NXT | PROC+6~ |
| PICN | PROC+6~, PROC+52*, PROC+53 |
| RETCODE | PROC+4~ |
| >> RGRSICN | ADDICN+4* |
| SEG | PARSE+1~, PARSE+5, PARSE+7 |
| SEGIEN | PROC+6~ |
| SEGMENT | PROC+6~ |
| SEGTYPE | PROC+6~, PROC+28*, PROC+29 |
| SENDER | PROC+4~, PROC+13*, PROC+14 |
| SETICN | PROC+6~ |
| U | PROC+22, PROC+41 |