PSSDIUTL ;HP/MJE - Drug Interaction Utility ;09/22/11 5:00pm
Source file <PSSDIUTL.m>
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 |
Package | Total | Caller Graph |
---|---|---|
Outpatient Pharmacy | 2 | PSODDPRE PSOUTL |
Inpatient Medications | 1 | PSJUTL1 |
Pharmacy Data Management | 1 | PSS CHECK DRUG INTERACTION |
Name | Comments | DBIA/ICR reference |
---|---|---|
CHKFDB | ;ping FDB
|
|
SELECT | ;
|
|
SELECTX | ||
GCN(PSSIENID) | ;Return 0 for not matched, 1 for matched with no GCNSEQNO, 1^1 for matched with a GCNSEQNO
|
|
PKGFLG(PKF2) | ;
|
|
TRADE | ;
|
|
TRADEX | ||
FDBCALL | ||
RMON | ||
EXIT | ;
|
|
PROC | ;
|
|
DGCKTHER | ||
DGCKMON | ||
THER | ;
|
|
DUP | ;
|
|
MON | ;
|
|
OUT | ;print monograph
|
|
BLD | ;
|
|
ONEMONO | ||
NEWPG | ;new page form feed
|
|
FORMAT | ; WATCH OUT WITH CHANGES HERE!!!
|
|
PROF | ;
|
|
CON |
Name | Field # of Occurrence |
---|---|
^%ZIS | MON+5 |
^%ZISC | MON+10, MON+11 |
^%ZTLOAD | MON+10 |
MIX^DIC1 | SELECT+13 |
^DIR | CHKFDB+12, SELECT+23, TRADE+2, FDBCALL+12, FDBCALL+15, PROC+3, PROC+9, DGCKTHER+1, THER+9, THER+47 , THER+52, DUP+3, DUP+10, MON+1, BLD+11, BLD+13, NEWPG+3, PROF+15, CON+6 |
$$PROD0^PSNAPIS | GCN+4, FDBCALL+5 |
EXC^PSODDPR5 | PROC+2 |
$$OSTAT^PSSCKOS | DUP+12 |
$$POSTAT^PSSCKOS | DUP+12 |
$$THOSTAT^PSSCKOS | THER+13, THER+32 |
DELDISC^PSSDIUTX | PROC+5 |
IN^PSSHRQ2 | CHKFDB+5, FDBCALL+9 |
$$GETVUID^XTID | FDBCALL+3 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PSDRUG - [#50] | SELECT+2, GCN+2, FDBCALL+3, FDBCALL+5 |
^TMP($J | CHKFDB+3!, CHKFDB+4*, CHKFDB+6, CHKFDB+8, CHKFDB+13!, CHKFDB+15!, FDBCALL*, FDBCALL+7*, FDBCALL+8*, FDBCALL+11 , FDBCALL+12, FDBCALL+13, FDBCALL+14, EXIT+1!, PROC+2, PROC+3, PROC+4, PROC+5, PROC+7, PROC+8 , PROC+9, DGCKTHER, DGCKTHER+1, DGCKMON, THER+2, THER+4, THER+5, THER+6, THER+7, THER+12 , THER+13, THER+30, THER+31, THER+32, THER+33, THER+34, DUP+4, DUP+5, DUP+6, DUP+7 , BLD+1!, BLD+2, BLD+3, BLD+5*, BLD+6, BLD+9, BLD+12, ONEMONO*, ONEMONO+1!, PROF+1 , PROF+3, PROF+5, PROF+11, PROF+13, CON, CON+2, CON+4 |
^UTILITY($J | PROC+2! |
Name | Line Occurrences |
---|---|
BLD | MON+4 |
CON | OUT+2 |
DGCKMON | DGCKMON |
DGCKTHER | PROC+4 |
DUP | PROC+8 |
EXIT | FDBCALL+12, FDBCALL+13 |
FDBCALL | SELECT+6 |
FORMAT | PROF+5 |
MON | RMON, DGCKMON, MON+6, MON+12 |
NEWPG | FORMAT+11, PROF+4, PROF+12, CON+3 |
ONEMONO | BLD+6 |
OUT | MON+11 |
PROC | FDBCALL+11 |
PROF | OUT+2 |
RMON | FDBCALL+14, RMON |
SELECT | SELECT+7, SELECT+8, SELECT+15, SELECT+16, SELECT+20, SELECT+23, SELECT+24 |
SELECTX | SELECT+9, SELECT+10, SELECT+14 |
THER | DGCKTHER |
TRADE | SELECT+19 |
TRADEX | TRADE+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%ZIS | MON+5!* |
BASE | CHKFDB+1~, CHKFDB+2*, CHKFDB+3, CHKFDB+4, CHKFDB+5, CHKFDB+6, CHKFDB+8, CHKFDB+13! |
BBSIG | THER+16~, THER+17*, THER+18, THER+19, THER+37~, THER+38*, THER+39, THER+40, DUP+17~, DUP+18* , DUP+19, DUP+20, DUP+29!, FORMAT+1~, FORMAT+5*, FORMAT+6, FORMAT+7, FORMAT+13! |
BLIM | THER+16~, THER+18, THER+19*, THER+37~, THER+39, THER+40*, DUP+17~, DUP+19, DUP+20*, DUP+29! , FORMAT+1~, FORMAT+6, FORMAT+7*, FORMAT+13! |
BSIG | THER+16!, THER+37!, DUP+17!, DUP+29!, FORMAT+1!, FORMAT+13! |
BSIG( | THER+18*, THER+20*, THER+24, THER+25, THER+39*, THER+41*, THER+45, THER+48, DUP+19*, DUP+21* , DUP+25, DUP+26, FORMAT+6*, FORMAT+8*, FORMAT+10, FORMAT+12 |
BSIG(1 | THER+21*, THER+42*, DUP+22*, FORMAT+9* |
BSIG(2 | THER+21!, THER+42!, DUP+22!, FORMAT+9! |
BVAR | THER+16~, THER+17*, THER+18*, THER+19*, THER+20, THER+37~, THER+38*, THER+39*, THER+40*, THER+41 , DUP+17~, DUP+18*, DUP+19*, DUP+20*, DUP+21, DUP+29!, FORMAT+1~, FORMAT+5*, FORMAT+6*, FORMAT+7* , FORMAT+8, FORMAT+13! |
BVAR1 | THER+16~, THER+17*, THER+18, THER+19*, THER+37~, THER+38*, THER+39, THER+40*, DUP+17~, DUP+18* , DUP+19, DUP+20*, DUP+29!, FORMAT+1~, FORMAT+5*, FORMAT+6, FORMAT+7*, FORMAT+13! |
CLI | PROC+6~, DUP+6*, DUP+16, DUP+18, DUP+23, DUP+28, OUT+1~ |
CLOZPAT | SELECT+1! |
CT | PROC+6~*, PROC+8*, DUP+4, DUP+5, DUP+6, DUP+7, DUP+12, OUT+1~, BLD+1!*, BLD+3* , BLD+5, PROF+1*, PROF+3, PROF+5, PROF+11, PROF+13, CON*, CON+2, CON+4 |
D | SELECT+11*, SELECT+13! |
DA | TRADE+1!, TRADEX+1! |
DIC | SELECT+2!, SELECT+11*, SELECT+13!, SELECTX!, TRADE+1!, TRADE+2!, EXIT+1! |
DIC("S" | SELECT+12* |
DIC("T" | SELECT+11* |
DIC(0 | SELECT+11* |
DIE | TRADEX+1! |
DIEN | FDBCALL+2*, FDBCALL+3, FDBCALL+4, FDBCALL+5, FDBCALL+7, EXIT+1! |
DIR | CHKFDB+12!, SELECT+23!, TRADE+1!, TRADE+2!, FDBCALL+12!, FDBCALL+15!, PROC+3!, PROC+9!, DGCKTHER+1!, THER+9! , THER+47!, THER+52!, DUP+3!, DUP+10!, MON+1!, MON+3!, MON+6!, BLD+7!, BLD+11!, BLD+13! , NEWPG+1~, PROF+15!, CON+6! |
DIR("?" | CHKFDB+11*, MON+1* |
DIR("A" | CHKFDB+7*, CHKFDB+8*, CHKFDB+9*, CHKFDB+10*, CHKFDB+11*, SELECT+23*, FDBCALL+12*, FDBCALL+15*, PROC+3*, PROC+9* , DGCKTHER+1*, THER+9*, THER+47*, THER+52*, DUP+3*, DUP+10*, MON+1*, BLD+11*, BLD+13*, NEWPG+2* , CON+6* |
DIR("B" | TRADE+2*, MON+1* |
DIR(0 | CHKFDB+7*, SELECT+23*, TRADE+2*, FDBCALL+12*, FDBCALL+15*, PROC+3*, PROC+9*, DGCKTHER+1*, THER+9*, THER+47* , THER+52*, DUP+3*, DUP+10*, MON+1*, BLD+11*, BLD+13*, NEWPG+2*, PROF+15*, CON+6* |
DIRUT | CHKFDB+12!, TRADE+3!, TRADE+4, TRADEX, TRADEX+1!, MON+3!, MON+6! |
DNM | FDBCALL+2*, FDBCALL+7, EXIT+1! |
DR | TRADEX+1! |
DRG | PROC+6~*, PROC+7*, PROC+8, DUP+4, DUP+5, DUP+6, DUP+7, DUP+12, OUT+1~, BLD+1!* , BLD+2*, BLD+3, BLD+5, BLD+7*, BLD+9*, BLD+12, ONEMONO*, NEWPG+4, PROF+1*, PROF+2 , PROF+3, PROF+5, PROF+10, PROF+11, PROF+13, CON*, CON+1, CON+2, CON+4 |
DRGI | PROC+6~, OUT+1~ |
DRGLST | CHKFDB+3!, CHKFDB+14*, SELECT+6, SELECT+7, SELECT+23, SELECT+24*, SELECTX!, EXIT+1! |
DRGLST( | SELECT+21, SELECT+24*, FDBCALL+1, FDBCALL+2 |
DRGLSTF | SELECT+22*, SELECT+23! |
DRGLSTI | SELECT+21*, SELECT+22, SELECT+23! |
DRGN | DUP+1~*, DUP+12*, DUP+13 |
DRUG | CHKFDB+14~ |
DTIME | SELECT+4 |
DTOUT | SELECT+4*, SELECT+10, SELECT+14, SELECTX!, TRADE+4, TRADEX+1!, MON+2, MON+3!, MON+6!, BLD+14 , NEWPG+3, FORMAT+10, FORMAT+11, PROF+1, PROF+3, PROF+4, PROF+7, PROF+8!, PROF+11, PROF+12 , PROF+15!, CON, CON+2, CON+3, CON+6! |
DUOUT | CHKFDB+12!, SELECT+15!, SELECTX!, TRADE+4, TRADEX+1!, MON+1, MON+3!, MON+6!, BLD+14, NEWPG+3 , FORMAT+10, FORMAT+11, PROF+1, PROF+3, PROF+4, PROF+7, PROF+8!, PROF+11, PROF+12, PROF+15! , CON, CON+2, CON+3, CON+5, CON+6! |
>> G | ONEMONO* |
>> I | FDBCALL+1*, FDBCALL+2, THER+23*, THER+24*, THER+25, THER+44*, THER+45*, THER+48, DUP+24*, DUP+25* , DUP+26, PROF+1*, CON* |
ID | CHKFDB+14~, FDBCALL+3!*, FDBCALL+4, FDBCALL+7!, EXIT+1! |
III | THER+16~, THER+17*, THER+18*, THER+20, THER+37~, THER+38*, THER+39*, THER+41, DUP+17~, DUP+18* , DUP+19*, DUP+21, DUP+29!, FORMAT+1~, FORMAT+5*, FORMAT+6*, FORMAT+8, FORMAT+13! |
>> IND | BLD+7*, BLD+9*, BLD+12 |
INT | PROC+6~, OUT+1~ |
IO | PROF+2, PROF+10, CON+1 |
IO("Q" | MON+7 |
IOF | CHKFDB+12, FDBCALL+15, PROC+2, PROC+3, DGCKTHER, DGCKTHER+1, THER+9, THER+47, DUP+3, BLD+11 , NEWPG+4, PROF+2, PROF+10, CON+1 |
IOP | MON+5! |
IOSL | THER+8, THER+46, THER+51, DUP+2, DUP+9, BLD+10, FORMAT+11, PROF+4, PROF+6, PROF+12 , CON+3 |
IOST | THER+8, THER+46, THER+51, DUP+2, DUP+9, BLD+10, FORMAT+11, PROF+4, PROF+6, PROF+12 , PROF+15, CON+3, CON+6 |
IT | SELECT+2! |
LIST | FDBCALL*, FDBCALL+7, FDBCALL+8, FDBCALL+9, FDBCALL+11, FDBCALL+12, FDBCALL+13, EXIT+1!, PROC+2, PROC+3 , PROC+4, PROC+5, PROC+7, PROC+8, PROC+9, DGCKTHER+1, DGCKMON, THER+2, THER+4, THER+5 , THER+6, THER+7, THER+12, THER+13, THER+30, THER+31, THER+32, THER+33, THER+34, DUP+4 , DUP+5, DUP+6, DUP+7, BLD+2, BLD+3, BLD+5, PROF+3, PROF+5, PROF+11, PROF+13 , CON+2, CON+4 |
MON | CHKFDB+14~, RMON, EXIT+1!, DGCKMON, DUP+4* |
MONT | MON+4*, MON+6!, OUT+2, NEWPG+4, PROF+9 |
NDF | CHKFDB+14~ |
NNN | THER+16~, THER+18*, THER+37~, THER+39*, DUP+17~, DUP+19*, DUP+29!, FORMAT+1~, FORMAT+6*, FORMAT+13! |
NUM | CHKFDB+14~*, SELECT+4, SELECT+23*, SELECT+24* |
ON | CHKFDB+14~, FDBCALL+2*, FDBCALL+7, PROC+6~*, PROC+8*, DUP+4, DUP+5, DUP+6, DUP+7, DUP+12 , OUT+1~, BLD+1!*, BLD+2*, BLD+3, BLD+5, PROF+1*, PROF+3, PROF+5, PROF+11, PROF+13 , CON*, CON+2, CON+4 |
>> OR0 | SELECT+2 |
ORTYP | CHKFDB+14~, EXIT+1! |
P1 | FDBCALL+3!, FDBCALL+5* |
P2 | FDBCALL+3!, FDBCALL+5* |
PDRG | PROC+6~, DUP+5*, DUP+12, OUT+1~, NEWPG+4, PROF+1*, PROF+2, PROF+10, CON*, CON+1 |
PDRGN | DUP+1~*, DUP+12*, DUP+13 |
PKF2 | SELECT+13!, PKGFLG~, PKGFLG+1, PKGFLG+2, PKGFLG+3, PKGFLG+4 |
>> POERR | SELECT+2 |
POP | MON+5!, MON+6 |
>> PSODGCK | PROC+1, PROC+4, DGCKTHER+1, DGCKMON |
>> PSODRG("QFLG" | SELECT+17* |
>> PSODRUG("BAD" | SELECT+2! |
>> PSODRUG("DAW" | SELECT+2! |
>> PSODRUG("IEN" | SELECT+3, SELECT+5, FDBCALL+4*, EXIT+1! |
>> PSODRUG("NAME" | SELECT+3 |
>> PSODRUG("NDC" | SELECT+2! |
>> PSODRUG("TRAD | E NAME" , SELECT+2!, TRADE+5* |
>> PSOEDIT | SELECT+17 |
>> PSONEW("DFLG" | TRADE+4* |
>> PSONEW("OLD V | AL" , SELECT+3*, SELECT+17, SELECTX! |
PSONULN | CHKFDB+14~*, EXIT+1!, PROC+1~*, DUP+8*, DUP+11, DUP+14*, PROF+2, PROF+10, PROF+14, CON+1 , CON+5 |
PSONULN2 | CHKFDB+14~*, FDBCALL+15, PROC+1~*, PROC+5, PROC+9, DGCKTHER |
>> PSORX("EDIT" | TRADE+4 |
>> PSORXED | SELECT+1, SELECT+9 |
>> PSORXED("DFLG" | SELECT+9*, TRADEX* |
>> PSOTRN | TRADE+2 |
PSOY | SELECT+18!* |
PSOY(0 | SELECT+18*, SELECT+19 |
PSSDGCK | CHKFDB+14*, EXIT+1! |
PSSGCNID | GCN+1~, GCN+4*, GCN+5 |
PSSGCNPT | GCN+1~, GCN+2*, GCN+3, GCN+4 |
PSSIENID | GCN~, GCN+2, GCN+5, GCN+6 |
PSSNDFID | GCN+1~, GCN+2*, GCN+3, GCN+4, GCN+5, GCN+6 |
QX | OUT+1~, PROF+3*, PROF+5, PROF+11*, PROF+13, CON+2*, CON+4 |
RNG | OUT+1~, BLD+1!, BLD+4*, BLD+5, BLD+13 |
SEL | MON+3!, MON+4*, MON+6!, BLD+1!, BLD+14* |
>> SEQN | FDBCALL+6*, FDBCALL+7 |
SEV | PROC+6~, DUP+7*, DUP+8, DUP+13, DUP+14, DUP+15, OUT+1~, PROF+1*, PROF+3, PROF+5 , PROF+11, PROF+13, CON*, CON+2 |
SEVH | PROC+6~*, DUP+8, DUP+14, DUP+15* |
STX | PROC+6~, OUT+1~ |
>> SV | PROC+6*, PROC+7*, PROC+8, DUP+4, DUP+5, DUP+6, DUP+7, DUP+12, BLD+1*, BLD+2* , BLD+3, BLD+5 |
>> TALWNUM | THER+1*, THER+5*, THER+8, THER+11, THER+28 |
TCLSTR | THER+1*, THER+3*, THER+6*, THER+7*, THER+15, THER+17, THER+22, THER+27, THER+29*, THER+34!* , THER+36, THER+38, THER+43, THER+50 |
>> TCTR | THER+1*, THER+12*, THER+13, THER+31*, THER+32 |
TEXTSTR | CHKFDB+14~*, FORMAT+2, FORMAT+3, FORMAT+4, FORMAT+5, FORMAT+13*, PROF+5* |
>> THR | THER+1*, THER+2*, THER+4, THER+5, THER+6, THER+7, THER+12, THER+13, THER+30, THER+31 , THER+32, THER+33, THER+34 |
>> THR1 | THER+1*, THER+3*, THER+4*, THER+5, THER+6, THER+7 |
>> THR2 | THER+1*, THER+29*, THER+30*, THER+33, THER+34 |
>> THSW | THER+1*, THER+10* |
THSW2 | FDBCALL+10*, PROC+1~*, DUP+11* |
TLN | THER+1~* |
TLN2 | THER+1~*, THER+10 |
U | THER+13, THER+32 |
X | CHKFDB+12!, SELECT+2!, SELECT+4*, SELECT+5*, SELECT+6, SELECT+7, SELECT+8, SELECT+9, SELECT+10, SELECTX! , TRADE+1!, TRADE+3, TRADEX+1!, FDBCALL+5*, FDBCALL+6, RMON, EXIT+1!, DGCKMON, MON+2, BLD+1! , BLD+14 |
XX | FORMAT+1!, FORMAT+10*, FORMAT+12 |
Y | CHKFDB+12!, SELECT+2!*, SELECT+3*, SELECT+4, SELECT+5, SELECT+16, SELECT+17, SELECT+18, SELECT+20, SELECT+22 , SELECT+23!, SELECT+24, SELECTX!, TRADE+1!, TRADE+3*, TRADE+5, TRADEX+1!, EXIT+1!, MON+3, MON+4! , MON+12, BLD+1!, BLD+6*, ONEMONO |
Y(0 | SELECT+18 |
ZNT | THER+16~, THER+18*, THER+19, THER+37~, THER+39*, THER+40, DUP+17~, DUP+19*, DUP+20, DUP+29! , FORMAT+1~, FORMAT+6*, FORMAT+7, FORMAT+13! |
>> ZTDESC | MON+8* |
>> ZTQUEUED | MON+10 |
>> ZTREQ | MON+10* |
>> ZTRTN | MON+8* |
>> ZTSAVE("LIST" | MON+9* |
>> ZTSAVE("MONT" | MON+8* |
>> ZTSAVE("PSONULN" | MON+9* |
>> ZTSAVE("^TMP($J,""PSOMONP""," | MON+9* |
>> ZTSAVE("^TMP($J,LIST,""OUT"",""DRUGDRUG""," | MON+9* |
Name | Field # of Occurrence |
---|---|
$T( | CHKFDB+2 |