©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
ALPBHL1 ;OIFO-DALLAS MW,SED,KC - BCBU main HL7 message processor ;01/01/03
Source file <ALPBHL1.m>
| Package | Total | Call Graph |
|---|---|---|
| Barcode Medication Administration | 4 | (AL1,NTE,ORC,PV1,RXC,RXE,RXR)^ALPBHL1U (DELORD,DELPT)^ALPBUTL (ERRBLD,ERRLOG)^ALPBUTL1 (CLORD,DELALG,GETORC,GETPID)^ALPBUTL2 |
| VA Fileman | 2 | FILE^DICN (FILE,UPDATE)^DIE |
| Kernel | 1 | $$NOW^XLFDT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CLEAN | ||
| PM | ; process the message segments...
|
| Name | Field # of Occurrence |
|---|---|
| AL1^ALPBHL1U | PM+7 |
| NTE^ALPBHL1U | PM+52 |
| ORC^ALPBHL1U | PM+12 |
| PV1^ALPBHL1U | PM+17 |
| RXC^ALPBHL1U | PM+22 |
| RXE^ALPBHL1U | PM+32 |
| RXR^ALPBHL1U | PM+37 |
| DELORD^ALPBUTL | ALPBHL1+108 |
| DELPT^ALPBUTL | ALPBHL1+62 |
| ERRBLD^ALPBUTL1 | ALPBHL1+33, ALPBHL1+54, ALPBHL1+95 |
| ERRLOG^ALPBUTL1 | ALPBHL1+34, ALPBHL1+55, ALPBHL1+71, ALPBHL1+96, ALPBHL1+127, PM+8, PM+13, PM+18, PM+23, PM+33 , PM+38, PM+53 |
| CLORD^ALPBUTL2 | ALPBHL1+117 |
| DELALG^ALPBUTL2 | ALPBHL1+76 |
| GETORC^ALPBUTL2 | ALPBHL1+83 |
| GETPID^ALPBUTL2 | ALPBHL1+23 |
| FILE^DICN | ALPBHL1+49 |
| FILE^DIE | ALPBHL1+70, PM+61, PM+68 |
| UPDATE^DIE | ALPBHL1+126 |
| $$NOW^XLFDT | PM+58 |
| HL7 Protocol Name | Call Tags |
|---|---|
| PSB BCBU ORM RECV |
| FileNo | Call Tags |
|---|---|
| ^ALPB(53.7 - [#53.7] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ALPB(53.7 - [#53.7] | ALPBHL1+41, ALPBHL1+106, ALPBHL1+107, ALPBHL1+113, ALPBHL1+120, PM+59 |
| ^ALPB(53.71 - [#53.71] | PM+65 |
| Name | Line Occurrences |
|---|---|
| CLEAN | ALPBHL1+36, ALPBHL1+57, ALPBHL1+63, ALPBHL1+98 |
| PM | ALPBHL1+80 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> ALBPFERR | PM+37 |
| ALPBCS | ALPBHL1+4*, ALPBHL1+23, ALPBHL1+83, PM+7, PM+12, PM+17, PM+22, PM+29, PM+32, PM+37 , PM+52, CLEAN! |
| ALPBDATA | ALPBHL1+23, ALPBHL1+29!, ALPBHL1+83, ALPBHL1+90!, PM+3*, PM+4, PM+7, PM+8, PM+12, PM+13 , PM+17, PM+18, PM+22, PM+23, PM+27, PM+29*, PM+31*, PM+32, PM+33, PM+37 , PM+38, PM+44, PM+53, PM+55!, CLEAN! |
| ALPBDATA(0 | ALPBHL1+84 |
| ALPBDATA(1 | ALPBHL1+24, ALPBHL1+85 |
| ALPBDATA(2 | ALPBHL1+25, ALPBHL1+86 |
| ALPBDATA(3 | ALPBHL1+26, ALPBHL1+87 |
| ALPBDATA(4 | ALPBHL1+27, ALPBHL1+89 |
| ALPBDATA(5 | ALPBHL1+28 |
| ALPBECH | ALPBHL1+3*, ALPBHL1+4, ALPBHL1+23, PM+32, CLEAN! |
| ALPBFERR | ALPBHL1+33, ALPBHL1+34, ALPBHL1+35!, ALPBHL1+54, ALPBHL1+55, ALPBHL1+56!, ALPBHL1+71, ALPBHL1+72!, ALPBHL1+95, ALPBHL1+96 , ALPBHL1+97!, ALPBHL1+127, ALPBHL1+128!, PM+7, PM+8, PM+9!, PM+12, PM+13, PM+14!, PM+17 , PM+18, PM+19!, PM+22, PM+23, PM+24!, PM+32, PM+33, PM+34!, PM+38, PM+39! , PM+52, PM+53, PM+54!, PM+62!, PM+69! |
| ALPBFERR("DIERR" | ALPBHL1+71, ALPBHL1+127, PM+8, PM+13, PM+18, PM+23, PM+33, PM+38, PM+53 |
| ALPBFILE | ALPBHL1+72!, ALPBHL1+128!, PM+62!, PM+69! |
| ALPBFILE( | ALPBHL1+66*, ALPBHL1+67*, ALPBHL1+68*, ALPBHL1+69*, ALPBHL1+121*, ALPBHL1+123*, ALPBHL1+124*, ALPBHL1+125*, PM+60*, PM+67* |
| ALPBFS | ALPBHL1+5*, ALPBHL1+10, ALPBHL1+23, ALPBHL1+61, ALPBHL1+83, PM+4, PM+7, PM+12, PM+17, PM+22 , PM+29, PM+32, PM+37, PM+52, CLEAN! |
| ALPBHREC | ALPBHL1+6*, ALPBHL1+34, ALPBHL1+55, ALPBHL1+71, ALPBHL1+96, ALPBHL1+127, PM+8, PM+13, PM+18, PM+23 , PM+33, PM+38, PM+53, CLEAN! |
| ALPBI | ALPBHL1+105*, ALPBHL1+106*, ALPBHL1+107, ALPBHL1+108, ALPBHL1+109! |
| ALPBIEN | ALPBHL1+40*, ALPBHL1+41*, ALPBHL1+43, ALPBHL1+51*, ALPBHL1+53, ALPBHL1+62, ALPBHL1+66, ALPBHL1+67, ALPBHL1+68, ALPBHL1+69 , ALPBHL1+71, ALPBHL1+76, ALPBHL1+106, ALPBHL1+107, ALPBHL1+108, ALPBHL1+113, ALPBHL1+117, ALPBHL1+120, ALPBHL1+121, ALPBHL1+123 , ALPBHL1+124, ALPBHL1+125, ALPBHL1+127, PM+7, PM+8, PM+12, PM+13, PM+17, PM+18, PM+22 , PM+23, PM+32, PM+33, PM+37, PM+38, PM+52, PM+53, PM+59, PM+60, CLEAN! |
| ALPBLUPD | PM+58*, PM+60, PM+67, PM+70! |
| ALPBMLOG | ALPBHL1+84*, ALPBHL1+117, PM+12, CLEAN! |
| ALPBMTXT | CLEAN! |
| ALPBMTXT( | ALPBHL1+12*, ALPBHL1+14*, ALPBHL1+17*, PM+2, PM+3, PM+31, PM+48, PM+50 |
| ALPBMTXT("AL1" | ALPBHL1+13*, ALPBHL1+76 |
| ALPBMTXT("ORC" | ALPBHL1+80, ALPBHL1+83, ALPBHL1+96, ALPBHL1+99! |
| ALPBMTXT("PID" | ALPBHL1+21, ALPBHL1+34, ALPBHL1+37! |
| ALPBMTXT("PV1" | ALPBHL1+61 |
| ALPBMTXT("RXO" | PM+29 |
| ALPBNTE | PM+52, PM+54! |
| ALPBNTE( | PM+50* |
| ALPBNTE(1 | PM+44* |
| ALPBOIEN | ALPBHL1+112!, ALPBHL1+113*, ALPBHL1+117, ALPBHL1+119, ALPBHL1+120*, ALPBHL1+121, ALPBHL1+123, ALPBHL1+124, ALPBHL1+125, PM+8 , PM+12, PM+13, PM+18, PM+22, PM+23, PM+32, PM+33, PM+37, PM+38, PM+52 , PM+53, CLEAN+1! |
| ALPBORDC | ALPBHL1+87*, ALPBHL1+103, ALPBHL1+106, ALPBHL1+123, CLEAN+1! |
| ALPBORDN | ALPBHL1+85*, ALPBHL1+94, ALPBHL1+113, ALPBHL1+121, CLEAN+1! |
| ALPBORDT | ALPBHL1+86*, ALPBHL1+124, CLEAN+1! |
| ALPBOTYP | ALPBHL1+89*, ALPBHL1+125, CLEAN+1! |
| ALPBPARM | PM+65*, PM+66, PM+67, PM+70! |
| ALPBPDFN | ALPBHL1+24*, ALPBHL1+41, ALPBHL1+46, ALPBHL1+55, CLEAN+1! |
| ALPBPDOB | ALPBHL1+27*, ALPBHL1+68, CLEAN+1! |
| ALPBPNAM | ALPBHL1+25*, ALPBHL1+48, ALPBHL1+55, ALPBHL1+66, CLEAN+2! |
| ALPBPSEX | ALPBHL1+28*, ALPBHL1+69, CLEAN+2! |
| ALPBPSSN | ALPBHL1+26*, ALPBHL1+32, ALPBHL1+55, ALPBHL1+67, CLEAN+2! |
| ALPBSEG | ALPBHL1+10*, ALPBHL1+12, ALPBHL1+13, ALPBHL1+18!, PM+4*, PM+6, PM+11, PM+16, PM+21, PM+26 , PM+36, PM+41, PM+55!, CLEAN+2! |
| ALPBX | ALPBHL1+21*, ALPBHL1+22, ALPBHL1+23, ALPBHL1+30!, PM+45*, PM+49*, PM+50, PM+51! |
| DIC | ALPBHL1+44*, ALPBHL1+50! |
| DIC(0 | ALPBHL1+45* |
| DINUM | ALPBHL1+46*, ALPBHL1+50! |
| DLAYGO | ALPBHL1+47*, ALPBHL1+50! |
| >> HL("ECH" | ALPBHL1+3 |
| >> HL("FS" | ALPBHL1+5 |
| >> HL("MID" | ALPBHL1+6 |
| >> HLMTIEN | ALPBHL1+6 |
| >> HLNEXT | ALPBHL1+9 |
| >> HLNODE | ALPBHL1+10, ALPBHL1+12, ALPBHL1+14 |
| >> HLNODE( | ALPBHL1+17 |
| >> HLQUIT | ALPBHL1+9 |
| >> I | ALPBHL1+9*, ALPBHL1+14, ALPBHL1+17, PM+1*, PM+2*, PM+3, PM+31, PM+48, PM+50 |
| J | ALPBHL1+16*, ALPBHL1+17*, PM+31*, PM+47*, PM+48*, PM+50, PM+51! |
| >> X | ALPBHL1+48* |
| >> Y | ALPBHL1+51 |