©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
BDWALPMR ; IHS/CMI/LAB - BDW Populate Various DW1 HL7 Segments ; [ 04/05/2007 2:56 PM ]
Source file <BDWALPMR.m>
| Package | Total | Call Graph |
|---|---|---|
| Data Warehouse Export System | 2 | $$UID^BDWAID (IMC,PRB,REF,WH)^BDWUTIL2 |
| Package | Total | Caller Graph |
|---|---|---|
| IHS Generic Interface System | 1 | IS00031 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| WH | ;EP
|
|
| ZRF | ;EP - populate the dw1 ZRF segment
|
|
| ZPB | ;EP - populate the dw1 ZPB segment
|
|
| MAIN | ;EP - this is the main routine driver
|
|
| ZMC | ;EP - populate the dw1 ZMC
|
| Name | Line Occurrences |
|---|---|
| WH | MAIN+5 |
| ZMC | MAIN+5 |
| ZPB | MAIN+5 |
| ZRF | MAIN+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BDWCNT | ZPB+2*, ZPB+6*, ZPB+7, ZPB+8, ZPB+9, ZPB+10, ZPB+11, ZPB+12, ZPB+13, ZPB+14 , ZPB+15, ZPB+16, ZPB+17, ZPB+18, ZPB+19!, ZRF+2*, ZRF+6*, ZRF+7, ZRF+8, ZRF+9 , ZRF+10, ZRF+11, ZRF+12, ZRF+13, ZRF+14, ZRF+15!, ZMC+2*, ZMC+6*, ZMC+7, ZMC+8 , ZMC+9, ZMC+10, ZMC+11, ZMC+12, ZMC+13!, WH+2*, WH+6*, WH+7, WH+8, WH+9 , WH+10, WH+11, WH+12, WH+13 |
| BDWDA | ZPB+4*, ZPB+5, ZPB+19!, ZRF+4*, ZRF+5, ZRF+15!, ZMC+4*, ZMC+5, ZMC+13!, WH+4* , WH+5, WH+14! |
| BDWDATA | ZPB+5*, ZPB+9, ZPB+10, ZPB+11, ZPB+12, ZPB+13, ZPB+14, ZPB+15, ZPB+16, ZPB+17 , ZPB+19!, ZRF+5*, ZRF+9, ZRF+10, ZRF+11, ZRF+12, ZRF+13, ZRF+15!, ZMC+5*, ZMC+9 , ZMC+10, ZMC+11, ZMC+13!, WH+5*, WH+10, WH+11, WH+12, WH+14! |
| BDWREGID | MAIN+4*, MAIN+6!, ZPB+18, ZRF+14, ZMC+12, WH+13 |
| >> DFN | MAIN+3*, MAIN+4 |
| IMC | ZMC+1!, ZMC+3, ZMC+13! |
| IMC( | ZMC+4, ZMC+5 |
| >> INA("BDW1WH1" | WH+8* |
| >> INA("BDW1WH14" | WH+12* |
| >> INA("BDW1WH15" | WH+13* |
| >> INA("BDW1WH2" | WH+9* |
| >> INA("BDW1WH3" | WH+10* |
| >> INA("BDW1WH5" | WH+11* |
| >> INA("BDW1ZMC1" | ZMC+8* |
| >> INA("BDW1ZMC2" | ZMC+9* |
| >> INA("BDW1ZMC3" | ZMC+10* |
| >> INA("BDW1ZMC4" | ZMC+11* |
| >> INA("BDW1ZMC5" | ZMC+12* |
| >> INA("BDW1ZPB1" | ZPB+8* |
| >> INA("BDW1ZPB10" | ZPB+17* |
| >> INA("BDW1ZPB11" | ZPB+18* |
| >> INA("BDW1ZPB2" | ZPB+9* |
| >> INA("BDW1ZPB3" | ZPB+10* |
| >> INA("BDW1ZPB4" | ZPB+11* |
| >> INA("BDW1ZPB5" | ZPB+12* |
| >> INA("BDW1ZPB6" | ZPB+13* |
| >> INA("BDW1ZPB7" | ZPB+14* |
| >> INA("BDW1ZPB8" | ZPB+15* |
| >> INA("BDW1ZPB9" | ZPB+16* |
| >> INA("BDW1ZRF1" | ZRF+8* |
| >> INA("BDW1ZRF2" | ZRF+9* |
| >> INA("BDW1ZRF3" | ZRF+10* |
| >> INA("BDW1ZRF4" | ZRF+11* |
| >> INA("BDW1ZRF5" | ZRF+12* |
| >> INA("BDW1ZRF6" | ZRF+13* |
| >> INA("BDW1ZRF7" | ZRF+14* |
| >> INDA | MAIN+3, ZPB+3, ZRF+3, ZMC+3, WH+3 |
| >> INDA("WHP" | WH+7* |
| >> INDA("ZMC" | ZMC+7* |
| >> INDA("ZPB" | ZPB+7* |
| >> INDA("ZRF" | ZRF+7* |
| >> INQUE | MAIN+1* |
| PRB | ZPB+1!, ZPB+3, ZPB+19! |
| PRB( | ZPB+4, ZPB+5 |
| REF | ZRF+1!, ZRF+3, ZRF+15! |
| REF( | ZRF+4, ZRF+5 |
| U | ZPB+9, ZPB+10, ZPB+11, ZPB+12, ZPB+13, ZPB+14, ZPB+15, ZPB+16, ZPB+17, ZRF+9 , ZRF+10, ZRF+11, ZRF+12, ZRF+13, ZMC+9, ZMC+10, ZMC+11, WH+10, WH+11, WH+12 |
| WH | WH+1!, WH+3, WH+14! |
| WH( | WH+4, WH+5 |