©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
BPBSUPD1 ;IHS/CIA/PLS - Update Drug File from AWP data ;10-Aug-2005 21:57;SM
Source file <BPBSUPD1.m>
| Package | Total | Call Graph |
|---|---|---|
| Pharmacy Data Management | 4 | (ASKND,CK,COMMON1,DEA,MF,NOPE,USE)^PSSDEE OIKILL^PSSDEE1 ^PSSDEE2 DRG^PSSHUIDG |
| Kernel | 1 | $$PATCH^XPDUTL |
| VA Fileman | 1 | ^DIE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| HUIDG | ;
|
|
| SETDRARY(PSS) | ; Set the DR array with fields to edit
|
|
| PSSMAN(MANUAL,BPBSDRG) | ; EP
|
|
| COMMON |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^PSDRUG - [#50] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | HUIDG+3 |
| ^PSDRUG - [#50] | PSSMAN+9, PSSMAN+13, COMMON+6*, COMMON+7 |
| ^TMP($J | PSSMAN+7! |
| Name | Line Occurrences |
|---|---|
| COMMON | PSSMAN+11 |
| HUIDG | PSSMAN+12 |
| SETDRARY | COMMON+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BPBSDRG | PSSMAN~, PSSMAN+2, PSSMAN+8 |
| DA | PSSMAN+1~, PSSMAN+8*, COMMON+6, COMMON+7 |
| DIC | PSSMAN+1~ |
| >> DIE | COMMON* |
| >> DISPDRG | PSSMAN+8*, PSSMAN+9, PSSMAN+13, HUIDG+3 |
| DR | COMMON+2*, COMMON+4!, SETDRARY+5*, SETDRARY+12* |
| DR(1 | SETDRARY+6*, SETDRARY+7*, SETDRARY+13* |
| DR(2 | SETDRARY+8*, SETDRARY+9*, SETDRARY+10*, SETDRARY+14* |
| >> DTOUT | COMMON+4 |
| >> FLAG | PSSMAN+6* |
| >> FLG1 | PSSMAN+6* |
| >> FLG2 | PSSMAN+6* |
| FLG3 | PSSMAN+6*, PSSMAN+14! |
| >> FLG4 | PSSMAN+6* |
| >> FLG5 | PSSMAN+6* |
| >> FLG6 | PSSMAN+6* |
| >> FLG7 | PSSMAN+6* |
| >> FLGKY | PSSMAN+6* |
| >> FLGOI | PSSMAN+6* |
| MANUAL | PSSMAN~, PSSMAN+3*, COMMON+1 |
| P61 | SETDRARY+1~, SETDRARY+2*, SETDRARY+5 |
| PSDRUG | PSSMAN+1~ |
| PSS | SETDRARY~, SETDRARY+3*, SETDRARY+4 |
| PSSFLAG | PSSMAN+1~, PSSMAN+5* |
| PSSHUIDG | PSSMAN+10*, PSSMAN+11! |
| PSSNEW | PSSMAN+10*, PSSMAN+14!, HUIDG+3 |
| PSSXX | PSSMAN+1~, PSSMAN+5* |
| PSSZ | PSSMAN+1~, PSSMAN+5* |
| X | HUIDG+1~, HUIDG+2* |
| >> Y | COMMON+4, COMMON+5, COMMON+7 |