PSODGDGP ;BIR/SAB - drug drug interaction checker ;4/14/93
Source file <PSODGDGP.m>
| Package | Total | Call Graph |
|---|---|---|
| Outpatient Pharmacy | 6 | NOOR^PSOCAN4 HD^PSODDPR2 DC^PSOORFI2 DRGINT^PSOORRD2 ENQ^PSORXDL (,EN1)^PSORXI |
| VA FileMan | 3 | FILE^DICN IX^DIK ^DIR |
| Pharmacy Data Management | 2 | $$DS^PSSDSAPI PSOUL^PSSLOCK |
| Kernel | 1 | SIG^XUSESIG |
| List Manager | 1 | FULL^VALM1 |
| Order Entry Results Reporting | 1 | ($$HAVEHDR,HAVEHDR)^ORRDI1 |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| TECH | ;add tech entry to RX VERIFY file (#52.4); called from new order/copy/renew
|
|
| TECH2(PSOXIRXN,PSODFN,DUZ,PSOX) | ;
|
|
| T3 | ;
; The only time PSOX("NOPSDRPH) key is defined equal to 1 is for controlled substances and the user doesn't hold ; the PSDRPH key. |
|
| BLD | ||
| BLD2 | ;
|
|
| PHARM | ;pharmacist verification of drug interaction
|
|
| CRI | ;process new drug interactions entered by pharmacist
|
|
| CRITN | ;process multiple new drug interactions
|
|
| MESS | ||
| PPL | ||
| ULRX | ;
|
| Name | Field # of Occurrence |
|---|---|
| FILE^DICN | T3+24 |
| IX^DIK | T3+28 |
| ^DIR | PSODGDGP+20, PHARM+4, CRI+3, CRITN+5 |
| $$HAVEHDR^ORRDI1 | PSODGDGP+15 |
| HAVEHDR^ORRDI1 | PSODGDGP+14 |
| NOOR^PSOCAN4 | CRITN+8, CRITN+15, CRITN+19, CRITN+26 |
| HD^PSODDPR2 | PSODGDGP+17 |
| DC^PSOORFI2 | CRITN+17, CRITN+29 |
| DRGINT^PSOORRD2 | PSODGDGP+18 |
| ENQ^PSORXDL | CRITN+9, CRITN+21, CRITN+28, CRITN+32 |
| ^PSORXI | CRITN+11 |
| EN1^PSORXI | CRITN+22, CRITN+30 |
| $$DS^PSSDSAPI | TECH+1, T3+4 |
| PSOUL^PSSLOCK | ULRX+2 |
| FULL^VALM1 | CRITN+9, CRITN+11, CRITN+22, CRITN+30, CRITN+32 |
| SIG^XUSESIG | CRI+6 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^PS(52.4 - [#52.4] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PS(52.4 - [#52.4] | TECH+1*, TECH+4*, T3+24*, T3+28 |
| ^PSDRUG - [#50] | BLD2+2, MESS |
| ^PSRX - [#52] | TECH+3*, T3+13*, T3+14*, BLD2+2, CRITN+1, CRITN+3, CRITN+4, CRITN+11, MESS |
| ^TMP("PSODGI" | PSODGDGP+10, TECH+2, TECH+3, TECH+4, T3+14, BLD2+3, BLD2+4*, BLD2+5, BLD2+6* |
| ^TMP("PSODGS" | BLD2+8* |
| ^TMP("PSODOSF" | TECH+1, T3+4 |
| ^TMP("PSOSER" | PSODGDGP+10, TECH+3, TECH+4, T3+5, T3+13, BLD2+4*, BLD2+7* |
| ^TMP("PSOSERS" | BLD2+8* |
| ^TMP("PSOTDD" | BLD2+9* |
| ^TMP($J | PSODGDGP+18!*, PSODGDGP+19! |
| ^XTMP("ORRDI" | PSODGDGP+17 |
| ^XUSEC("PSORPH" | PSODGDGP+9, PSODGDGP+10, PSODGDGP+20, TECH2+2, BLD |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> CRIT | PSODGDGP+7*, PSODGDGP+9 |
| DA | T3+28!*, CRITN+9*, CRITN+18*, CRITN+22*, CRITN+25*, CRITN+30*, CRITN+32*, MESS |
| DD | T3+23!, T3+24! |
| >> DGI | PSODGDGP+7*, PSODGDGP+9, PSODGDGP+20, PHARM+5*, PHARM+6*, PHARM+8*, CRI+3*, CRITN+6* |
| >> DGS | PSODGDGP+7* |
| DIADD | T3+23! |
| DIC | T3+23!*, T3+24! |
| DIC(0 | T3+23* |
| DIK | T3+28!* |
| DINUM | T3+23!*, T3+24! |
| DIR | PSODGDGP+20!, PHARM+5!, PHARM+6!, PHARM+7!, PHARM+8!, CRI+1!, CRI+3!, CRITN+1!, CRITN+5! |
| DIR("?" | PSODGDGP+20*, PHARM+2*, PHARM+3*, CRI+3*, CRITN+3*, CRITN+4*, CRITN+5* |
| DIR("A" | PSODGDGP+20*, PHARM+4*, CRI+2*, CRITN+1*, CRITN+2* |
| DIR("B" | PHARM+4*, CRI+2* |
| DIR(0 | PSODGDGP+20*, PHARM+4*, CRI+2*, CRITN+2* |
| DIROUT | PHARM+5!, PHARM+6!, PHARM+7!, PHARM+8!, CRI+3!, CRI+7!, CRITN+10!, CRITN+13!, CRITN+23!, CRITN+33! , CRITN+34! |
| DIRUT | PHARM+5!, PHARM+6!, PHARM+7!, PHARM+8!, CRI+3!, CRI+7!, CRITN+8, CRITN+10!, CRITN+13!, CRITN+15 , CRITN+19, CRITN+23!, CRITN+26, CRITN+33!, CRITN+34! |
| DLAYGO | T3+23!*, T3+24! |
| DO | T3+23!, T3+24! |
| DRG | PSODGDGP+7~*, PSODGDGP+11!, CRITN+1, CRITN+2 |
| DTOUT | PSODGDGP+20!, PHARM+5!, PHARM+6!, PHARM+7!, PHARM+8!, CRI+3!, CRI+7!, CRITN+10!, CRITN+13!, CRITN+23! , CRITN+33!, CRITN+34! |
| DUOUT | PSODGDGP+20!, PHARM+5!, PHARM+6!, PHARM+7!, PHARM+8!, CRI+3!, CRI+7!, CRITN+10!, CRITN+13!, CRITN+23! , CRITN+33!, CRITN+34! |
| DUZ | PSODGDGP+9, PSODGDGP+10, PSODGDGP+20, TECH2~, TECH2+2, T3+24, BLD |
| ENT | PPL+2*, PPL+3*, PPL+4, PPL+5, PPL+6, PPL+7! |
| IOSL | PSODGDGP+17 |
| IT | PSODGDGP+11!, BLD2+4, BLD2+7, BLD2+8, BLD2+9, PHARM+2, PHARM+3, PHARM+4, PHARM+5, PHARM+6 , PHARM+7, PHARM+8, CRI+4, CRI+5 |
| LSI | PSODGDGP+7*, PSODGDGP+9, PSODGDGP+11!, BLD2+2* |
| NDF | PSODGDGP+11! |
| >> ON | BLD2+1, BLD2+2, BLD2+4, BLD2+5, BLD2+6, BLD2+8, PHARM+1, CRITN+1, CRITN+3, CRITN+4 , CRITN+9, CRITN+10, CRITN+11, CRITN+18, CRITN+25, CRITN+32, PPL+2 |
| >> OR0 | CRITN+14, CRITN+29 |
| PSHLDDRG | CRITN+6*, CRITN+12, CRITN+13! |
| PSODFN | PSODGDGP+17, PSODGDGP+18, PSODGDGP+19, TECH2~, T3+24 |
| PSODGRLX | PHARM+1*, ULRX+1, ULRX+2! |
| >> PSODLQT | PSODGDGP+8, PHARM+5*, PHARM+7* |
| >> PSODRUG("IEN" | CRITN+6, CRITN+11*, CRITN+12* |
| >> PSODRUG("NAME" | CRI+2, CRITN+1, CRITN+10 |
| >> PSODRUG("NDF" | PSODGDGP+13 |
| PSODWARN | T3+3~*, T3+4*, T3+5*, T3+12, T3+22, T3+25, T3+29, T3+30 |
| PSOHOLDA | CRITN+18*, CRITN+22, CRITN+23!, CRITN+25*, CRITN+30! |
| PSOICT | PSODGDGP+7*, PSODGDGP+11! |
| PSOINTSV | T3+3~*, T3+5*, T3+25 |
| PSOL | PPL+3*, PPL+4, PPL+5, PPL+6, PPL+7! |
| PSOL( | PPL+2*, PPL+3 |
| >> PSOLST( | CRITN+10 |
| >> PSONEW("STATUS" | PSODGDGP+9*, PSODGDGP+10* |
| >> PSOPAR | T3+15 |
| >> PSOQUIT | PHARM+5*, PHARM+7* |
| >> PSOREINS | PHARM+5 |
| PSOREMOT | PSODGDGP+7~*, PSODGDGP+17*, PSODGDGP+20 |
| >> PSORX("DFLG" | PSODGDGP+8, PSODGDGP+12, PHARM+5*, CRI+3*, CRI+6*, CRITN+6*, CRITN+8*, CRITN+16*, CRITN+20*, CRITN+27* , CRITN+28* |
| >> PSORX("INTERVENE" | PHARM+6*, PHARM+8*, CRI+3!, CRI+5*, CRI+6!, CRITN+8!, CRITN+16!, CRITN+20!, CRITN+27! |
| >> PSORX("PSOL" | PPL, PPL+2, PPL+4!, PPL+5*, PPL+6* |
| >> PSORX("VERIFY" | T3+12, T3+22, T3+29, T3+30 |
| >> PSORXED | PHARM+5, CRITN+7, CRITN+31 |
| >> PSOSD | CRITN+10*, CRITN+24*, CRITN+28*, CRITN+33* |
| >> PSOSD( | CRITN+10! |
| PSOSIGNIF | T3+3~*, T3+5*, T3+12, T3+30 |
| PSOSL | PPL*, PPL+2*, PPL+7! |
| PSOTLBL | T3+3~*, T3+12, T3+15*, T3+29*, T3+30*, T3+35*, T3+36 |
| PSOX | TECH2~ |
| PSOX("IRXN" | T3+28 |
| PSOX("LOGIN D | ATE" , T3+24 |
| PSOX("NOPSDRPH" | TECH2+1, T3+12, T3+22, T3+25, T3+35 |
| PSOX("STATUS" | T3+29 |
| PSOX("STOP DA | TE" , T3+24 |
| PSOX2 | PPL*, PPL+1, PPL+2, PPL+7! |
| PSOXIRXN | TECH+1, TECH+3, TECH+4, TECH2~, T3+13, T3+14, T3+23, T3+24, T3+28 |
| >> SER | PSODGDGP+7* |
| >> SERS | PSODGDGP+7* |
| >> STA | PSODGDGP+7* |
| >> VALMBCK | CRITN+12*, CRITN+24*, CRITN+25* |
| X | T3+23!* |
| X1 | CRI+3!, CRI+6, CRITN+1! |
| >> Y | PHARM+5, PHARM+6, PHARM+7, PHARM+8, CRI+3, CRITN+6, CRITN+18, CRITN+25 |
| >> ZONE | CRITN+10*, CRITN+33* |
| Name | Field # of Occurrence |
|---|---|
| $T(HAVEHDR^ORRDI1 | PSODGDGP+14 |