©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
ALPBGEN1 ;SFVAMC/JC - Parse and File HL7 PMU messages ;05/10/07
Source file <ALPBGEN1.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 3 | (,IX)^DIC ^DIE IX1^DIK |
| Health Level Seven | 1 | INIT^HLFNC2 |
| Kernel | 1 | ($$HL7TFM,$$NOW)^XLFDT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PARSIT | ;PARSE MESSAGE ON RECEIVING SIDE
|
|
| UNESC(ST,PR) | ;Unescape string from message
|
|
| PSTF | ;Process STF segment
|
|
| FILE | ;Store File 200 data on backup system
|
|
| PERR | ;PROCESSING ERRORS
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| HL7 Protocol Name | Call Tags |
|---|---|
| PSB BCBU PMU_B01 RECV | PARSIT |
| PSB BCBU PMU_B02 RECV | PARSIT |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(19 - [#19] | FILE+9 |
| ^TMP("BCBU" | PERR+1* |
| Name | Line Occurrences |
|---|---|
| $$UNESC | PSTF+7, PSTF+9 |
| PERR | PSTF+11 |
| PSTF | PARSIT+16 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACLPVC | PARSIT+13~, FILE+19! |
| ALBPJ | PARSIT+13~, FILE+19! |
| ALERR | PSTF+11, FILE+19!, PERR+1, PERR+2! |
| ALERR("ACCESS" | PSTF+4* |
| ALERR("NAME" | PSTF+10* |
| ALERR("VERIFY" | PSTF+5* |
| ALPBAC | PARSIT+13~, PSTF+2*, PSTF+4, PSTF+7*, FILE+19! |
| ALPBDA | FILE+9*, FILE+18, FILE+19! |
| ALPBDIS | PSTF+12*, FILE+13, FILE+19! |
| ALPBERR | PARSIT+13~ |
| ALPBI | PARSIT+13~, FILE+19! |
| ALPBID | PARSIT+1~, PSTF+2* |
| ALPBKY | PARSIT+1~, PSTF+1* |
| ALPBMENU | PARSIT+1~, FILE+9*, FILE+16 |
| ALPBMT | PARSIT+1~, PARSIT+15* |
| ALPBNAM | PARSIT+13~, PSTF+10*, FILE+2, FILE+8, FILE+19! |
| ALPBSSN | PARSIT+13~, PSTF+2*, PSTF+3*, FILE+3, FILE+5, FILE+14, FILE+19!, PERR+1 |
| ALPBTRM | PARSIT+13~, PSTF+13*, FILE+17, FILE+19! |
| ALPBVC | PARSIT+1~, PSTF+2*, PSTF+5, PSTF+9*, FILE+15 |
| ALPBX | PARSIT+13~, FILE+19! |
| CS | PARSIT+1~, PARSIT+4*, PSTF+1, PSTF+10, UNESC+11*, UNESC+29 |
| >> D | FILE+5* |
| DA | FILE+1~, FILE+8!, FILE+9*, FILE+18!* |
| DATE | PARSIT+1~, PERR+1* |
| DIC | FILE+1~, FILE+5*, FILE+8*!, FILE+18! |
| DIC(0 | FILE+5*, FILE+8* |
| DIE | FILE+1~, FILE+10*, FILE+18 |
| DIK | PARSIT+1~, FILE+18* |
| DLAYGO | PARSIT+1~, FILE+8* |
| DR | FILE+1~, FILE+8!, FILE+10*, FILE+12*, FILE+13*, FILE+14*, FILE+15*, FILE+16*, FILE+17*, FILE+18! |
| DUZ | FILE+9* |
| EC | PARSIT+1~, PARSIT+3*, PARSIT+4, PARSIT+5, PARSIT+6, PARSIT+7, UNESC+10*, UNESC+11, UNESC+12, UNESC+13 , UNESC+14 |
| ECS | PARSIT+1~, PARSIT+10*, UNESC+17*, UNESC+28, UNESC+29 |
| EEC | PARSIT+1~, PARSIT+8*, UNESC+15*, UNESC+20, UNESC+21 |
| EFS | PARSIT+1~, PARSIT+9*, UNESC+16*, UNESC+24, UNESC+25 |
| ERS | PARSIT+1~, PARSIT+11*, UNESC+18*, UNESC+32, UNESC+33 |
| ESC | PARSIT+1~, PARSIT+6*, PARSIT+8, PARSIT+9, PARSIT+10, PARSIT+11, PARSIT+12, UNESC+13*, UNESC+15, UNESC+16 , UNESC+17, UNESC+18, UNESC+19, UNESC+21 |
| ESS | PARSIT+1~, PARSIT+12*, UNESC+19*, UNESC+36, UNESC+37 |
| FS | PARSIT+1~, PARSIT+2*, PSTF+1, PSTF+2, PSTF+10, PSTF+12, PSTF+13, UNESC+9*, UNESC+25 |
| HL | FILE+19!, UNESC+5, UNESC+6 |
| HL("ECH" | PARSIT+3, UNESC+8*, UNESC+10 |
| HL("FS" | PARSIT+2, UNESC+7*, UNESC+9 |
| >> HLNEXT | PARSIT+14 |
| >> HLNODE | PARSIT+15, PARSIT+16 |
| >> HLQUIT | PARSIT+14 |
| I | UNESC+20!*, UNESC+21*, UNESC+24!*, UNESC+25*, UNESC+28!*, UNESC+29*, UNESC+32!*, UNESC+33*, UNESC+36!*, UNESC+37* , UNESC+39! |
| J | UNESC+20!, UNESC+24!, UNESC+28!, UNESC+32!, UNESC+36!, UNESC+39! |
| K | UNESC+20!, UNESC+24!, UNESC+28!, UNESC+32!, UNESC+36!, UNESC+39! |
| K( | UNESC+20*, UNESC+21*, UNESC+24*, UNESC+25*, UNESC+28*, UNESC+29*, UNESC+32*, UNESC+33*, UNESC+36*, UNESC+37* |
| L | UNESC+20!, UNESC+21*, UNESC+22, UNESC+24!, UNESC+25*, UNESC+26, UNESC+28!, UNESC+29*, UNESC+30, UNESC+32! , UNESC+33*, UNESC+34, UNESC+36!, UNESC+37*, UNESC+38, UNESC+39! |
| PR | UNESC~, UNESC+5* |
| RS | PARSIT+1~, PARSIT+5*, PSTF+2, UNESC+12*, UNESC+33 |
| SS | PARSIT+1~, PARSIT+7*, UNESC+14*, UNESC+37 |
| ST | UNESC~, UNESC+4, UNESC+20*, UNESC+22*, UNESC+24*, UNESC+26*, UNESC+28*, UNESC+30*, UNESC+32*, UNESC+34* , UNESC+36*, UNESC+38*, UNESC+40 |
| STF | PARSIT+1~, PARSIT+16*, PSTF+1, PSTF+2, PSTF+10, PSTF+12, PSTF+13 |
| X | FILE+5*, FILE+8*, UNESC+20!*, UNESC+24!*, UNESC+28!*, UNESC+32!*, UNESC+36!*, UNESC+39! |
| Y | FILE+1~, FILE+5!, FILE+8, FILE+9 |