©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
BHLP03I ; cmi/anchorage/maw - BHL File Inbound PO3 Segment ;
Source file <BHLP03I.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 2 | NOW^%DTC FILE^DICN |
| DRG Grouper | 1 | $$CPT^ICPTCOD |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| HCPC | ;PROCESS HCPC INFO
|
|
| PROCESS | ;-- get the variables and file the data
|
|
| EOJ | ;-- clean up the variables
|
|
| PTLK | ;-- lookup the patient
|
|
| M1 | ||
| MAIN | ;EP;-- this is the main routine driver
|
| FileNo | Call Tags |
|---|---|
| ^AUPNSUP - [#9000021] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("UPPERCASE" | PTLK+7 |
| ^AUPNPAT("D" | PTLK+13 |
| ^BCMTCA( | HCPC+6 |
| ^BCMTCA("B" | HCPC+5 |
| ^DPT - [#2] | PTLK+14 |
| ^DPT("B" | PTLK+17, PTLK+18 |
| ^ICPT("B" | HCPC+1, HCPC+2 |
| ^PSDRUG - [#50] | PROCESS+15, PROCESS+17 |
| ^PSDRUG("FSN" | PROCESS+16 |
| ^PSDRUG("NDC" | PROCESS+14 |
| Name | Line Occurrences |
|---|---|
| HCPC | PROCESS+18 |
| M1 | MAIN+1 |
| PROCESS | M1+2 |
| PTLK | M1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | PROCESS+26 |
| BHLAMT | EOJ+2!, PROCESS+1~, PROCESS+9*, PROCESS+15*, PROCESS+17*, PROCESS+28 |
| BHLDA | EOJ+1!, PROCESS+1~ |
| BHLDES | EOJ+1!, PROCESS+1~, PROCESS+6*, PROCESS+12*, PROCESS+20*, PROCESS+21, PROCESS+25, PROCESS+27 |
| BHLFSN | PROCESS+1~, PROCESS+16*, PROCESS+17, PROCESS+26 |
| BHLHCPC | PROCESS+1~, PROCESS+11*, PROCESS+30, HCPC+1, HCPC+2, HCPC+9* |
| BHLHCPCX | PROCESS+1~, PROCESS+29, HCPC+1, HCPC+2*, HCPC+10* |
| >> BHLLOC | PTLK+2* |
| BHLNDC | PROCESS+1~, PROCESS+13*, PROCESS+14*, PROCESS+15, PROCESS+26 |
| BHLPBY | EOJ+1! |
| BHLPT | EOJ+2!, M1+1, PTLK+10*, PTLK+14*, PTLK+16, PTLK+17*, PTLK+18*, PROCESS+21, PROCESS+26 |
| >> BHLPTCHT | PTLK+3*, PTLK+11, PTLK+13 |
| >> BHLPTDA | PTLK+12*, PTLK+13*, PTLK+14 |
| >> BHLPTN2 | PTLK+9*, PTLK+17, PTLK+18 |
| >> BHLPTNAM | PTLK+8*, PTLK+14 |
| BHLQTY | EOJ+1!, PROCESS+1~, PROCESS+7*, PROCESS+28 |
| BHLQUIT | PTLK+13, PTLK+14*, PTLK+15! |
| >> BHLR | PTLK+1*, PROCESS+2* |
| BHLTAMT | PROCESS+1~, PROCESS+8* |
| BHLTCD | EOJ+1!, PROCESS+1~, PROCESS+10*, PROCESS+13, PROCESS+16, PROCESS+26, HCPC+3, HCPC+5 |
| BHLTDT | EOJ+1!, PROCESS+1~, PROCESS+3*, PROCESS+26 |
| >> BHLTMP | PTLK+2, PTLK+3, PTLK+5, PROCESS+3, PROCESS+4, PROCESS+5, PROCESS+6, PROCESS+7, PROCESS+8, PROCESS+9 , PROCESS+10, PROCESS+12 |
| BHLTPDT | EOJ+1!, PROCESS+1~, PROCESS+4*, PROCESS+27 |
| BHLTYP | EOJ+1!, PROCESS+1~, PROCESS+5* |
| DD | EOJ+2!, PROCESS+19! |
| DIC | EOJ+2!, PROCESS+19!, PROCESS+23*, PROCESS+32! |
| DIC("DR" | PROCESS+26*, PROCESS+27*, PROCESS+28*, PROCESS+29*, PROCESS+30* |
| DIC(0 | PROCESS+24* |
| DO | EOJ+2!, PROCESS+19! |
| DR | PROCESS+19! |
| U | PTLK+6, PROCESS+10, PROCESS+12, PROCESS+15, PROCESS+17, HCPC+6, HCPC+9 |
| X | PTLK+4~, PTLK+5*, PTLK+6*, PROCESS+25*, HCPC+4~, HCPC+5*, HCPC+6*, HCPC+7, HCPC+9, HCPC+10 |
| Y | EOJ+2!, PTLK+4~, PTLK+8, PTLK+9 |