PSODDPR7 ; BIR/OG ; Enhanced order checks - IMO Utilities ;Nov 17, 2021@14:00
Source file <PSODDPR7.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 3 | DD^%DT $$GET1^DIQ ^DIWP |
Inpatient Medications | 2 | PSJ^PSJ53P1 IN^PSJBLDOC |
Outpatient Pharmacy | 2 | HD^PSODDPR2 CLASSES^PSODDPR3 |
Pharmacy Data Management | 1 | (PSS431,PSS436)^PSS55 |
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 | 4 | PSODDPR2 PSODDPR4 PSODDPR8 PSODDPRE |
Name | Comments | DBIA/ICR reference |
---|---|---|
DUP | ;
|
|
CLINIC | ;
|
|
GETDATA | ;
|
|
WRITE | ;
|
|
WRITE2 | ;
|
|
IMO(DFN) | ;Inpatient Meds ordered in outpatient pharmacy (IMO) - determine IMO drugs to be added to the profile drugs submitted to FDB.
; In: DFN - Patient IED ; Output: ^TMP( file of inpatient meds drugs; example of each type of order: ; ^TMP(540771229,"PSOPEPS","IN","PROFILE","C2;6;PROFILE;6")="16579^4010153^65^SIMVASTATIN 40MG TAB^10711^I" ; ^TMP(540771229,"PSOPEPS","IN","PROFILE","C4;1597;PROFILE;7")="11664^4006819^1848^CIMETIDINE 300MG/5ML SOL (OZ)^10746^I" |
|
IV55 | ;
|
|
IV531 | ;
|
|
MYWRITE(X,DIWL,DIWR) | ;Continue writing on the same line
|
|
NOCAN | ;shows duplicate therapeutic when cancel duplicate class parameter is set to 'no'
|
|
DUPCL | ;
|
|
DUPCP |
Name | Field # of Occurrence |
---|---|
DD^%DT | GETDATA+29 |
$$GET1^DIQ | WRITE+11, WRITE+12 |
^DIWP | MYWRITE+4 |
PSJ^PSJ53P1 | PSODDPR7+24, GETDATA+25 |
IN^PSJBLDOC | IMO+10 |
HD^PSODDPR2 | WRITE+1, WRITE2+1, IV55+1, IV55+14, IV55+20, IV531+1, IV531+11, IV531+22, NOCAN+13, DUPCP , DUPCP+3, DUPCP+7, DUPCP+14, DUPCP+16, DUPCP+20, DUPCP+38, DUPCP+45 |
CLASSES^PSODDPR3 | DUPCP+39 |
PSS431^PSS55 | PSODDPR7+23, GETDATA+14 |
PSS436^PSS55 | PSODDPR7+22, GETDATA+1 |
Name | Line Occurrences |
---|---|
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 |
|
FileNo | Call Tags |
---|---|
^PS(50.7 - [#50.7] | GET1^DIQ |
^PS(53.1 - [#53.1] | GET1^DIQ |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADD | PSODDPR7+14~, DUP+3~, IV55+2*, IV55+4*, IV55+5, IV55+6, IV55+8, IV55+9, IV531+2*, IV531+3* , IV531+4, IV531+6 |
ADDNAM | PSODDPR7+14~, DUP+3~, IV55+5*, IV55+6, IV55+10, IV55+11, IV531+5*, IV531+6, IV531+7, IV531+8 |
ADDS | PSODDPR7+14~, DUP+3~, IV55+10*, IV55+11*, IV55+15, IV531+7*, IV531+8*, IV531+12 |
AFLG | PSODDPR7+14~, DUP+3~, IV55+2*, IV55+10, IV55+11, IV55+12*, IV55+15, IV531+2*, IV531+7, IV531+8 , IV531+9*, IV531+12 |
BOTTLE | PSODDPR7+14~, DUP+3~, IV55+7*, IV55+8*, IV55+10, IV55+11, IV531+4*, IV531+5*, IV531+7, IV531+8 |
CLINTYP | NOCAN+2~, DUPCP+27*, DUPCP+28*, DUPCP+29 |
CT | NOCAN+2~, NOCAN+3*, NOCAN+4*, NOCAN+5, NOCAN+15~, NOCAN+16*, DUPCL+1 |
DDTH | NOCAN+1!, NOCAN+16! |
DDTH( | DUPCP+32* |
DFN | IMO~, IMO+10 |
DIWF | NOCAN+1!* |
DIWL | MYWRITE~, MYWRITE+2*, MYWRITE+5, NOCAN+1* |
DIWR | MYWRITE~, MYWRITE+3*, NOCAN+1* |
DN | MYWRITE+1~ |
DNM | PSODDPR7+15~, DUPCP+8* |
DOCPL | NOCAN+1!, NOCAN+15! |
DOCPL( | DUPCL+9*, DUPCP |
DOSAGE | PSODDPR7+14~, DUP+3~, CLINIC+5*, GETDATA+5*, GETDATA+18*, GETDATA+30*, WRITE+17 |
>> DRG | PSODDPR7+20 |
DRGDRG | PSODDPR7+15~, PSODDPR7+21*, DUP+4~, DUP+5*, CLINIC+4*, GETDATA+2, GETDATA+15, GETDATA+26, DUPCP+27* |
DRGNAME | PSODDPR7+14~, DUP+3~, DUP+6*, CLINIC+4*, GETDATA+2*, GETDATA+15*, GETDATA+26*, WRITE+6, IV55+6, IV531+6 , DUPCP+26~* |
DUPCPF | NOCAN+2~, DUPCP+27* |
DUPRX0 | PSODDPR7+15~, DUPCP+9*, DUPCP+11, DUPCP+12, DUPCP+19*, DUPCP+22, DUPCP+23 |
DURATION | DUP+4~, GETDATA+35* |
FILENODE | PSODDPR7+14~, PSODDPR7+21*, PSODDPR7+22, PSODDPR7+23, PSODDPR7+24, PSODDPR7+28*, DUP+3~, CLINIC+2*, CLINIC+4*, GETDATA+1 , GETDATA+14, GETDATA+24, WRITE+15 |
INFUSE | PSODDPR7+14~, DUP+3~, CLINIC+5*, GETDATA+11*, GETDATA+21*, IV55+21, IV55+23, IV531+18, IV531+19 |
IOSL | WRITE2+1, NOCAN+13, DUPCP, DUPCP+3, DUPCP+7, DUPCP+14, DUPCP+16, DUPCP+20, DUPCP+38 |
IVDATA | PSODDPR7+14~, DUP+3~, IV531+4*, IV531+5, IV531+15*, IV531+16 |
>> LIST | IMO+10, NOCAN+4, NOCAN+5, NOCAN+16, DUPCL+1, DUPCP+15, DUPCP+26, DUPCP+41, DUPCP+42, DUPCP+43 |
NVAQ | DUPCP+19~ |
>> ON | PSODDPR7+13, NOCAN+5*, NOCAN+6, NOCAN+7, NOCAN+8, NOCAN+9, NOCAN+10, NOCAN+11, NOCAN+12, DUPCL+1* , DUPCL+2, DUPCL+3, DUPCL+4, DUPCL+5, DUPCL+6, DUPCL+7, DUPCL+8, DUPCL+9, DUPCP*, DUPCP+2 , DUPCP+3, DUPCP+5, DUPCP+6, DUPCP+8, DUPCP+13, DUPCP+15, DUPCP+17, DUPCP+18, DUPCP+19, DUPCP+24 , DUPCP+26, DUPCP+27, DUPCP+28, DUPCP+29, DUPCP+30, DUPCP+32, DUPCP+33, DUPCP+34, DUPCP+35, DUPCP+36 |
ORDDATE | PSODDPR7+15~, DUP+4~, CLINIC+5*, GETDATA+9*, GETDATA+29*, WRITE+18 |
ORDID | PSODDPR7+14~, PSODDPR7+21*, PSODDPR7+22, PSODDPR7+23, PSODDPR7+24, PSODDPR7+28*, DUP+3~, CLINIC+2*, GETDATA+1, GETDATA+3 , GETDATA+4, GETDATA+5, GETDATA+6, GETDATA+7, GETDATA+8, GETDATA+9, GETDATA+10, GETDATA+11, GETDATA+14, GETDATA+16 , GETDATA+17, GETDATA+18, GETDATA+19, GETDATA+20, GETDATA+21, GETDATA+25, GETDATA+26, GETDATA+27, GETDATA+28, GETDATA+29 , GETDATA+30, GETDATA+31, GETDATA+32, GETDATA+33, GETDATA+34, GETDATA+35, WRITE+7, WRITE+8, WRITE+11, WRITE+15 , IV55+4, IV55+5, IV55+6, IV55+8, IV55+9, IV55+16, IV55+18, IV55+19, IV531+3, IV531+4 , IV531+6, IV531+13, IV531+15, DUPCP+27* |
ORT | NOCAN+15~, DUPCL+8*, DUPCL+9, DUPCP* |
PDRG | PSODDPR7+15~, IMO+10, NOCAN+5*, DUPCL+1* |
PSOCDRG | PSODDPR7+15~, PSODDPR7+17*, PSODDPR7+20*, PSODDPR7+26 |
PSOCLIN | PSODDPR7+14~, DUP+4~ |
PSOCLIN( | PSODDPR7+26*, PSODDPR7+27, PSODDPR7+30, CLINIC+4 |
PSOCLINI | PSODDPR7+14~, PSODDPR7+21*, PSODDPR7+28*, DUP+4~, CLINIC+2*, CLINIC+3, CLINIC+4 |
>> PSOCLNS( | PSODDPR7+18, PSODDPR7+20 |
PSOCNT | MYWRITE+1~, MYWRITE+5* |
PSOCON | PSODDPR7+14~, PSODDPR7+17*, PSODDPR7+20*, PSODDPR7+21, PSODDPR7+26, PSODDPR7+28*, PSODDPR7+30*, DUP+3~, DUP+6*, CLINIC+2 , CLINIC+4, GETDATA+2, GETDATA+15, DUPCP+27* |
>> PSODCTH( | NOCAN+6 |
>> PSODFN | PSODDPR7+22, PSODDPR7+23, GETDATA+1, GETDATA+14, DUPCP+18, DUPCP+19 |
>> PSODLQT | WRITE+1, IV55+1, IV55+14, IV55+20, IV531+1, IV531+11, IV531+22, NOCAN+13, NOCAN+14, DUPCP , DUPCP+3, DUPCP+7, DUPCP+14, DUPCP+16, DUPCP+20, DUPCP+38, DUPCP+45 |
>> PSODRUG("IEN" | NOCAN+18, DUPCP+37 |
>> PSODRUG("NAME" | NOCAN+13 |
PSODRUGX | WRITE+5~, WRITE+6*, WRITE+12*, WRITE+13 |
>> PSODUPC( | WRITE+2*, WRITE+16*, WRITE+17*, WRITE+18*, WRITE+19*, WRITE+20*, WRITE+21*, WRITE+22*, IV55+13*, IV55+22* , IV55+24*, IV531+10*, IV531+17*, IV531+20* |
>> PSODUPF | WRITE+2, WRITE+13, WRITE+16, WRITE+17, WRITE+18, WRITE+19, WRITE+20, WRITE+21, WRITE+22, WRITE2+1 , IV55+1, IV55+13, IV55+14, IV55+15, IV55+20, IV55+21, IV55+22, IV55+23, IV55+24, IV531+1 , IV531+10, IV531+11, IV531+12, IV531+17, IV531+18, IV531+19, IV531+20, IV531+22 |
PSODUPT | NOCAN+2~, DUPCP+1*, DUPCP+2*, DUPCP+6*, DUPCP+13*, DUPCP+17*, DUPCP+24*, DUPCP+33, DUPCP+34, DUPCP+35 , DUPCP+36 |
PSOIENX | WRITE+10~, WRITE+11*, WRITE+12 |
>> PSONULN | NOCAN+13 |
RDIRX | PSODDPR7+15~, DUPCP+16* |
RXDAT | DUPCP+13~, DUPCP+15*, DUPCP+16 |
RXREC | PSODDPR7+15~, NOCAN+5*, NOCAN+8, NOCAN+9, NOCAN+10, NOCAN+11, NOCAN+12, DUPCL+1*, DUPCL+3, DUPCL+4 , DUPCL+5, DUPCL+6, DUPCL+7, DUPCP+8*, DUPCP+9 |
SCHEDULE | PSODDPR7+14~, DUP+3~, CLINIC+5*, GETDATA+4*, GETDATA+17*, GETDATA+28*, WRITE+16 |
SFLG | PSODDPR7+14~, DUP+3~, IV55+21, IV55+23, IV55+25*, IV531+2*, IV531+18, IV531+19, IV531+21* |
SOL | PSODDPR7+14~, DUP+3~, IV55+2*, IV55+16*, IV55+18, IV55+19, IV531+2*, IV531+13*, IV531+15 |
SOLNAM | PSODDPR7+14~, DUP+3~ |
SOLUTION | PSODDPR7+14~, DUP+3~, IV55+17*, IV55+18*, IV55+21, IV55+23, IV531+14*, IV531+15*, IV531+16*, IV531+18 , IV531+19 |
SORT | PSODDPR7+14~, PSODDPR7+16*, PSODDPR7+22, PSODDPR7+23, PSODDPR7+24, PSODDPR7+29, DUP+3~, DUP+5*, CLINIC+1, CLINIC+7 , GETDATA+1, GETDATA+3, GETDATA+4, GETDATA+5, GETDATA+6, GETDATA+7, GETDATA+8, GETDATA+9, GETDATA+10, GETDATA+11 , GETDATA+14, GETDATA+16, GETDATA+17, GETDATA+18, GETDATA+19, GETDATA+20, GETDATA+21, GETDATA+25, GETDATA+26, GETDATA+27 , GETDATA+28, GETDATA+29, GETDATA+30, GETDATA+31, GETDATA+32, GETDATA+33, GETDATA+34, GETDATA+35, WRITE+15, IV55+4 , IV55+5, IV55+6, IV55+8, IV55+9, IV55+16, IV55+18, IV55+19, IV531+3, IV531+4, IV531+6 , IV531+13, IV531+15, DUPCP+27* |
SORT2 | PSODDPR7+14~, PSODDPR7+28*, PSODDPR7+30*, DUP+4~, CLINIC+4 |
ST | NOCAN+15~, DUPCP+3*, DUPCP+5 |
STA | NOCAN+15~, DUPCP+4*, DUPCP+5 |
STARTDT | PSODDPR7+14~, DUP+3~, CLINIC+5*, GETDATA+6*, GETDATA+7*, GETDATA+10*, GETDATA+19*, GETDATA+31*, GETDATA+32*, WRITE+18 , WRITE+19 |
STARTDTF | PSODDPR7+15~, DUP+4~, CLINIC+5*, GETDATA+7*, GETDATA+32*, WRITE+19 |
STAT | NOCAN+15~, DUPCP+5* |
STATUS | PSODDPR7+14~, PSODDPR7+17*, PSODDPR7+22*, PSODDPR7+23*, PSODDPR7+24*, PSODDPR7+25*, PSODDPR7+26, DUP+3~, CLINIC+5*, GETDATA+3* , GETDATA+16*, GETDATA+27*, WRITE+13 |
STOPDT | PSODDPR7+14~, DUP+3~, CLINIC+5*, GETDATA+8*, GETDATA+10, GETDATA+20*, GETDATA+33*, GETDATA+34*, WRITE+21 |
STOPDTF | PSODDPR7+15~, DUP+4~, CLINIC+5*, GETDATA+10*, GETDATA+34*, WRITE+21 |
STRENGTH | PSODDPR7+14~, DUP+3~, IV55+7*, IV55+9*, IV55+10, IV55+11, IV531+4*, IV531+5*, IV531+6, IV531+7 , IV531+8 |
SUB | NOCAN+2~, NOCAN+3*, NOCAN+4*, NOCAN+5, NOCAN+16*, DUPCL+1 |
>> SV | PSODDPR7+18, PSODDPR7+20, PSODDPR7+26, PSODDPR7+27, PSODDPR7+30, CLINIC+4 |
TCT | NOCAN+3! |
TCTI | NOCAN+3! |
TCTL | NOCAN+3! |
TCTP | NOCAN+3! |
U | WRITE+7 |
VOLUME | PSODDPR7+14~, DUP+3~, IV55+17*, IV55+19*, IV55+21, IV55+23, IV531+14*, IV531+15*, IV531+16*, IV531+18 , IV531+19 |
X | MYWRITE~, DUPCP+40~, DUPCP+42*, DUPCP+43*, DUPCP+44 |
Y | GETDATA+29*! |
>> ZCT | DUP+2, DUP+6, WRITE+2, WRITE+16, WRITE+17, WRITE+18, WRITE+19, WRITE+20, WRITE+21, WRITE+22 , IV55+13, IV55+22, IV55+24, IV531+10, IV531+17, IV531+20, DUPCP+27*, DUPCP+40*, DUPCP+41*, DUPCP+42 , DUPCP+43 |
ZHDR | NOCAN+3!, NOCAN+13*, NOCAN+14 |
>> ZPSODCTH | NOCAN+18, DUPCP+37 |
>> ZPSODCTH( | DUPCP+29*, DUPCP+30, DUPCP+33*, DUPCP+34*, DUPCP+35*, DUPCP+36* |
>> ZVA | PSODDPR7+18, PSODDPR7+20, PSODDPR7+26, PSODDPR7+27, PSODDPR7+30, CLINIC+4 |
ZZCT | DUPCP+40~*, DUPCP+41*, DUPCP+42, DUPCP+43, DUPCP+44 |
ZZOC | NOCAN+2~, NOCAN+3* |
ZZOCTD | NOCAN+2~*, DUPCP+29*, DUPCP+30, DUPCP+33*, DUPCP+34*, DUPCP+35*, DUPCP+36* |
ZZQ | NOCAN+3! |