©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
PSSPOI ;BIR/RLW-CREATE PHARMACY ORDERABLE ITEMS ; 09/01/98 7:10
Source file <PSSPOI.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 3 | C^%DTC FILE^DICN ^DIE |
| National Drug File | 1 | $$PSJDF^PSNAPIS |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| XREF | ; do next line to xref whole file after looping thru ^TMP to populate
|
|
| IVADD | ; populate IV Additives, Solutions
|
|
| IVSOL | ;
|
|
| LIVE | ; populate PHARMACY ORDERABLE ITEM file, tie dispense drug to it
; loop thru ^TMP global to build 50.7 |
|
| EN | ;
; variable prefixes: ADD=iv additive file SOL=iv solution file ; PD=primary drug file DD=dispense drug file ; NDF=national drug file DF=NDF dosage form ; SPD=pharmacy orderable item file SYN=synonym |
|
| DUPL | ; see if there's already an orderable item with the same name and dosage form
|
| FileNo | Call Tags |
|---|---|
| ^PSDRUG - [#50] | Classic Fileman Calls |
| ^PS(50.7 - [#50.7] | Classic Fileman Calls |
| ^PS(52.6 - [#52.6] | Classic Fileman Calls |
| ^PS(52.7 - [#52.7] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PS(50.3 - [#50.3] | LIVE+8, LIVE+9, LIVE+10, LIVE+11 |
| ^PS(50.606 - [#50.606] | LIVE+3, IVADD+6, IVSOL+6 |
| ^PS(50.7 - [#50.7] | LIVE+6, LIVE+7, LIVE+9*, LIVE+10*, LIVE+11*, IVADD+9, IVADD+16*, IVADD+17*, IVSOL+8, IVSOL+11 , IVSOL+12, IVSOL+13*, IVSOL+14, IVSOL+15*, IVSOL+21*, IVSOL+22*, DUPL+1* |
| ^PS(52.6 - [#52.6] | IVADD+3, IVADD+7, IVADD+8, IVADD+15 |
| ^PS(52.7 - [#52.7] | IVSOL+3, IVSOL+7, IVSOL+11, IVSOL+20 |
| ^PSDRUG - [#50] | IVADD+3, IVADD+4, IVSOL+3, IVSOL+4 |
| ^PSDRUG("B" | LIVE+12 |
| ^TMP("PSSD" | LIVE+3, LIVE+12 |
| Name | Field # of Occurrence |
|---|---|
| ^( | IVADD+15, IVSOL+11, IVSOL+20 |
| ^(0 | LIVE+10* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> AAA | IVADD+9*, IVADD+15*, IVSOL+8*, IVSOL+11*, IVSOL+20* |
| >> AAACT | IVADD+15*, IVADD+16, IVADD+17, IVSOL+12*, IVSOL+13*, IVSOL+14*, IVSOL+20*, IVSOL+21, IVSOL+22 |
| >> AAAFLAG | IVADD+9*, IVADD+10, IVSOL+8*, IVSOL+9, IVSOL+14, IVSOL+15, IVSOL+16 |
| >> AAAMATCH | IVSOL+8*, IVSOL+10, IVSOL+11, IVSOL+12, IVSOL+13, IVSOL+14, IVSOL+15 |
| ADDIEN | LIVE+2~, IVADD+3*, IVADD+7, IVADD+8, IVADD+13, IVADD+15 |
| ADDNAME | LIVE+2~, IVADD+7*, IVADD+9, IVADD+11 |
| >> ATOTAL | IVSOL+14*, IVSOL+15 |
| >> DA | LIVE+12*, IVADD+5*, IVADD+13*, IVSOL+5*, IVSOL+10*, IVSOL+19* |
| DD | LIVE+6!, IVADD+11!, IVSOL+17! |
| DDIEN | LIVE+2~, LIVE+12*, IVADD+3*, IVADD+4, IVSOL+3*, IVSOL+4 |
| DDNAME | LIVE+2~, LIVE+3*, LIVE+12* |
| DF | LIVE+2~, LIVE+3*, LIVE+6, LIVE+7, DUPL+1 |
| DFNAME | LIVE+2~, LIVE+3* |
| >> DFPTR | IVADD+6*, IVADD+9, IVADD+11, IVSOL+6*, IVSOL+8, IVSOL+17 |
| DIC | LIVE+6*!, IVADD+11*!, IVSOL+17!* |
| DIC("DR" | LIVE+6*, IVADD+11*, IVSOL+17* |
| DIC(0 | LIVE+6*, IVADD+11*, IVSOL+17* |
| DIE | LIVE+12*!, IVADD+13!*, IVSOL+10!*, IVSOL+19!* |
| DO | LIVE+6!, IVADD+11!, IVSOL+17! |
| >> DR | LIVE+12*, IVADD+13*, IVSOL+10*, IVSOL+19* |
| DT | IVADD+1 |
| >> I | LIVE+4*, LIVE+5, LIVE+11* |
| J | LIVE+2~, LIVE+10*, LIVE+11* |
| >> K | IVADD+5*, IVSOL+5* |
| NDF | LIVE+2~ |
| NDFVA | LIVE+2~ |
| >> NDND | IVADD+4*, IVADD+5, IVSOL+4*, IVSOL+5 |
| OLDDF | DUPL+1~* |
| PDIEN | LIVE+2~, LIVE+8*, LIVE+9, LIVE+10, LIVE+11 |
| PDNAME | LIVE+2~, LIVE+3*, LIVE+4, LIVE+5, LIVE+8 |
| PDNAMEDF | LIVE+2~, LIVE+3*, LIVE+12 |
| PDT | IVADD+8*, IVADD+18! |
| PIND | IVADD+1*, IVADD+8, IVADD+18! |
| PSMATCH | LIVE+2~ |
| SOLIEN | LIVE+2~, IVSOL+3*, IVSOL+7, IVSOL+10, IVSOL+11, IVSOL+19, IVSOL+20, DUPL+1 |
| SOLNAME | LIVE+2~, IVSOL+7*, IVSOL+8, IVSOL+17, DUPL+1 |
| SPD | LIVE+2~ |
| SPDFN | LIVE+2~ |
| >> SPDIEN | LIVE+6*, LIVE+7*, LIVE+9, LIVE+10, LIVE+11, LIVE+12, IVADD+11*, IVADD+12, IVADD+13, IVADD+16 , IVADD+17, IVSOL+17*, IVSOL+18, IVSOL+19, IVSOL+21, IVSOL+22, DUPL+1* |
| SPDNAME | LIVE+2~, LIVE+3*, LIVE+5*, LIVE+6, LIVE+7 |
| >> SYCT | IVSOL+12* |
| SYNIEN | LIVE+2~, LIVE+8*, LIVE+10*, LIVE+11* |
| SYNONYM | LIVE+2~, LIVE+10*, LIVE+11*, IVADD+15*, IVADD+16, IVSOL+11*, IVSOL+13, IVSOL+20*, IVSOL+21 |
| X | LIVE+2~, LIVE+6*, IVADD+1, IVADD+5*, IVADD+6, IVADD+11*, IVSOL+5*, IVSOL+6, IVSOL+17* |
| X1 | IVADD+1*! |
| X2 | IVADD+1*! |
| >> Y | LIVE+6*, LIVE+9*, IVADD+11, IVSOL+17 |