PSODRGN ;BIR/SJA-ORDER ENTRY DRUG SELECTION ;28-Mar-2016 12:58;DU
Source file <PSODRGN.m>
| Package | Total | Call Graph | 
|---|---|---|
| Outpatient Pharmacy | 3 | 10^PSOBKDED JUMP^PSODIR1 M1^PSOOREDX | 
| VA Fileman | 2 | $$GET1^DIQ ^DIR | 
| IHS Changes To Pharmacy | 1 | $$ERXONLY^APSPFNC6 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| TRADEX | ||
| TX | ||
| ETX | ||
| 6 | ;Called from PSOBKDED due to it's routine size. | |
| TRADE | ; | |
| KV | ||
| SELECTX | ||
| SELECT | ; | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^PSDRUG - [#50] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^PSDRUG - [#50] | SELECT+2, SELECT+5, SELECT+6, SELECT+21, SELECT+34 | 
| ^PSDRUG("ASP" | SELECT+5 | 
| ^PSRX - [#52] | SELECT+10 | 
| Name | Line Occurrences | 
|---|---|
| ETX | SELECT+19 | 
| KV | SELECT+23, SELECT+34, TX | 
| SELECT | SELECT+28, SELECT+29, SELECT+31 | 
| SELECTX | SELECT+24, SELECT+25, SELECT+26, SELECT+27 | 
| TRADE | SELECT+35 | 
| TRADEX | TRADE+4 | 
| Name | Field # of Occurrence | 
|---|---|
| ^("I" | SELECT+5 | 
| ^(0 | SELECT+6 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| CLOZPAT | SELECT+1! | 
| DA | SELECT+10, TRADE+1!, TRADEX+1! | 
| DIC | SELECT+2!, TRADE+1!, TRADE+2! | 
| DIE | TRADEX+1! | 
| DIR | SELECT+17!, SELECT+18!, TRADE+1!, TRADE+2!, KV!, 6+7! | 
| DIR("A" | SELECT+17*, SELECT+23*, 6+3*, 6+4*, 6+5*, 6+6* | 
| DIR("B" | TRADE+2*, 6+2* | 
| DIR(0 | SELECT+17*, SELECT+23*, TRADE+2*, 6+2* | 
| DIRUT | TRADE+3!, TRADE+4, TRADEX, TRADEX+1!, KV!, 6+7, 6+8 | 
| DR | TRADEX+1! | 
| DRG | SELECT+9~, SELECT+10*, SELECT+11 | 
| DT | SELECT+5, SELECT+12 | 
| DTOUT | SELECT+25, SELECT+27, SELECTX!, TRADE+4, TRADEX+1!, KV! | 
| DUOUT | SELECT+28!, SELECTX!, TRADE+4, TRADEX+1!, KV! | 
| >> I | 6+5* | 
| >> OR0 | SELECT+2 | 
| >> POERR | SELECT+2, SELECT+26 | 
| PSDC | SELECT+4*, SELECT+6*, SELECT+7, SELECT+8, SELECT+19, SELECT+20, SELECT+23, SELECTX!, ETX, TX! | 
| PSDC( | SELECT+7*, SELECT+34 | 
| PSI | SELECT+4*, SELECT+5*, SELECT+6, SELECT+7, SELECTX!, TX! | 
| PSOBDR | SELECT+19!, 6+9! | 
| PSOBDR("NAME" | SELECT+19*, 6+1, 6+4 | 
| PSODIR | SELECT+26! | 
| PSODIR("FIELD" | SELECT+26 | 
| PSODIR("FLD" | SELECT+26* | 
| >> PSODRG("QFLG" | SELECT+26*, SELECT+33* | 
| >> PSODRUG("DAW" | SELECT+2! | 
| >> PSODRUG("IEN" | SELECT+3, SELECT+21, SELECT+22! | 
| >> PSODRUG("NAME" | SELECT+3, SELECT+19, SELECT+22!, 6+1, 6+4 | 
| >> PSODRUG("NDC" | SELECT+2! | 
| >> PSODRUG("OI" | SELECT+5, SELECT+21 | 
| >> PSODRUG("TRAD | E NAME" , SELECT+2!, TRADE+5* | 
| >> PSOEDIT | SELECT+25, SELECT+27, SELECT+33, 6+1 | 
| >> PSONEW("DFLG" | SELECT+25*, SELECT+27*, TRADE+4* | 
| >> PSONEW("FIELD" | SELECT+26* | 
| >> PSONEW("FLD" | SELECT+26 | 
| >> PSONEW("OLD V | AL" , SELECT+3*, SELECT+33, SELECTX! | 
| >> PSORX("DFLG" | 6+7* | 
| >> PSORX("EDIT" | TRADE+4 | 
| >> PSORXED | SELECT+1, SELECT+24 | 
| >> PSORXED("DFLG" | SELECT+24*, TRADEX* | 
| >> PSOTRN | TRADE+2 | 
| PSOY | SELECT+34!* | 
| PSOY(0 | SELECT+34*, SELECT+35 | 
| >> SIG( | 6+5 | 
| U | SELECT+26 | 
| >> VALMBCK | ETX* | 
| >> VALMSG | ETX* | 
| X | SELECT+2!, SELECT+9~, SELECT+11*, SELECT+12, SELECT+24, SELECT+25, SELECT+26, SELECTX!, TRADE+1!, TRADE+3 , TRADEX+1!, TX! | 
| Y | SELECT+2!*, SELECT+3*, SELECT+29, SELECT+31*, SELECT+33, SELECT+34, SELECTX!, TRADE+1!, TRADE+3*, TRADE+5 , TRADEX+1!, TX!, 6+8 |