PSSDSAPI ;BIR/RTR-Dose Check APIs routine ;06/09/08
Source file <PSSDSAPI.m>
Package | Total | Call Graph |
---|---|---|
Pharmacy Data Management | 5 | $$DRT^PSSDSAPD $$EXMT^PSSDSAPI $$FRCON^PSSDSAPK ($$PRNMI,$$PRNSCHD)^PSSDSUTL ($$ADDAT,$$CHKIPDUR,$$CONVSCH,$$DCF51,$$DCFSCH,$$DOWAT,$$MULTSCH,$$OLD51,$$OLDSCH)^PSSSCHMS |
General Medical Record - Vitals | 1 | EN6^GMRVUTL |
Kernel | 1 | $$UP^XLFSTR |
National Drug File | 1 | ($$DFSU,$$OVRIDE,OVRIDE)^PSNAPIS |
Toolkit | 1 | $$SCREEN^XTID |
VA FileMan | 1 | $$GET1^DIQ |
Name | Comments | DBIA/ICR reference |
---|---|---|
EXMT(PSSVLIEN) | ;Test if Drug should have Dose Call performed on it
|
|
SUP(PSSSPLIN) | ;Screen for Drug Interaction and Duplicate Therapy
|
|
MRT(PSSRS1) | ;Return Standard Medication Route and First DataBank Route
|
|
MRTX | ;
|
|
UNIT(PSSVUTUN) | ;Find First DataBank Unit, can't do DIC Lookup because of exact match check
|
|
UNITP | ;
|
|
UNITX | ;
|
|
FRQ(PSSFWSCC,PSSFWFR,PSSFWPK,PSSFWDRL,PSSDRG) | ;Return Daily Frequency for Daily Dose Check
|
|
FRQZ() | ;
|
|
DAY | ;Day of week schedule
|
|
DAY1 | ;Process schedule for the second piece of DOW@SCHEDULE
|
|
DAYOUT | ;Day of week for Outpatient orders
|
|
DAYOUT1 | ;Cont. DOW for Outpatient orders
|
|
NUMB | ;Frequency passed in as a number
|
|
STN | ;Standard Logic
|
|
STN1 | ;Standard Logic continue
|
|
STNO | ;Standard Logic part 2, using File 51, For Outpatient Orders only
|
|
STNO1 | ;Standard Logic part 2, using File 51, For Outpatient Orders only
|
|
DS() | ; Return 1 if Dose Checks are enabled, return 0 if Dose Checks are not enabled, 2.0 message to OR & 2.1 message to IP & OP
|
|
DS1() | ; called from $$DS to break line length
|
|
DS2() | ; called from $$DS to break line length
|
|
IV(PSSADFOI) | ;Return Additive Frequency default to CPRS, Forum DBIA 5425
|
|
BSA(PSSBSADF) | ;
|
|
UNITD(PSSVUTUN) | ;Find First DataBank Unit, can't do DIC Lookup because of exact match check
|
|
UNITDP | ;
|
|
UNITDX | ;
|
|
DURLS | ;If Duration is less that 24 hours, make Frequency adjustments if applicable
|
|
DLTM(PSSNVTOI) | ;Check if all drugs for a Non-VA Med order are exempt, if so, kill Input exceptions and Quit
|
|
EMSY() | ;Return 1 if there are matched supplies, no active drugs, regardless of Package use
|
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | MRT+2, MRT+8, IV+9 |
EN6^GMRVUTL | BSA+5, BSA+8 |
$$DFSU^PSNAPIS | EXMT+10 |
$$OVRIDE^PSNAPIS | EXMT+9 |
OVRIDE^PSNAPIS | EXMT+9 |
$$DRT^PSSDSAPD | DURLS+5 |
$$EXMT^PSSDSAPI | DLTM+6 |
$$FRCON^PSSDSAPK | DURLS+16 |
$$PRNMI^PSSDSUTL | STNO+5 |
$$PRNSCHD^PSSDSUTL | STN+5 |
$$ADDAT^PSSSCHMS | DAY+4 |
$$CHKIPDUR^PSSSCHMS | DURLS+6 |
$$CONVSCH^PSSSCHMS | DAY+24 |
$$DCF51^PSSSCHMS | DAYOUT1+3, STNO1+2 |
$$DCFSCH^PSSSCHMS | DAY+19, DAY1+2, STN1+2, STN1+8 |
$$DOWAT^PSSSCHMS | DAY+10 |
$$MULTSCH^PSSSCHMS | FRQ+21 |
$$OLD51^PSSSCHMS | FRQZ+10, DAYOUT+2 |
$$OLDSCH^PSSSCHMS | FRQ+14, DAY+13 |
$$UP^XLFSTR | UNIT+4, UNITP+4, FRQ+20, FRQZ+2, UNITD+4, UNITDP+4 |
$$SCREEN^XTID | MRT+7, UNITP+1, UNITP+2, UNITP+3, UNITDP+1, UNITDP+2, UNITDP+3 |
FileNo | Call Tags |
---|---|
^PS(51.2 - [#51.2] | GET1^DIQ |
^PS(52.6 - [#52.6] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PS(50.606 - [#50.606] | EXMT+12, EXMT+13, EXMT+14 |
^PS(50.7 - [#50.7] | EXMT+11 |
^PS(51 - [#51] | FRQZ+8, DAY+3, DAYOUT+4, DAYOUT1+6, STNO+5, STNO1+4 |
^PS(51.1 - [#51.1] | FRQ+21, DAY+3, DAY+15, DAY+17, DAY+21, DAY1+1, DAY1+4, STN+5, STN1+7, STN1+11 |
^PS(51.2 - [#51.2] | MRT+3, MRT+4 |
^PS(51.23 - [#51.23] | MRT+6, MRT+15 |
^PS(51.24 - [#51.24] | UNITP+1, UNITP+2, UNITP+3, UNITDP+1, UNITDP+2, UNITDP+3 |
^PS(52.6 - [#52.6] | IV+5, IV+6 |
^PS(59.7 - [#59.7] | DS+1 |
^PSDRUG - [#50] | EXMT+4, EXMT+6, EXMT+11, SUP+4, DLTM+4, DLTM+5, EMSY+4 |
^PSDRUG("ASP" | DLTM+3, EMSY+3 |
Name | Line Occurrences |
---|---|
$$DS1 | DS+1 |
$$DS2 | DS+1 |
$$FRQZ | FRQ+16, FRQ+24 |
$$SUP | EMSY+5 |
DAY | FRQZ+5 |
DAY1 | DAY+14, DAY+15 |
DAYOUT | DAY+28 |
DAYOUT1 | DAYOUT+3, DAYOUT+4 |
DURLS | STN+8, STNO+9, STNO+10 |
MRTX | MRT+1, MRT+2, MRT+14 |
STN | FRQZ+6 |
STN1 | STN+3, STN+5 |
STNO | FRQZ+10 |
STNO1 | STNO+3, STNO+5 |
UNITDP | UNITDP+4 |
UNITDX | UNITD+3, UNITDP+1, UNITDP+2, UNITDP+3 |
UNITP | UNITP+4 |
UNITX | UNIT+3, UNITP+1, UNITP+2, UNITP+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%Y | BSA+2~ |
DFN | BSA+2~, BSA+3*, BSA+7* |
DT | IV+7, DLTM+5, EMSY+4 |
GMRVSTR | BSA+2~, BSA+5*, BSA+8* |
PSSADFCT | IV+2~, IV+3*, IV+10* |
PSSADFER | IV+2~ |
PSSADFHD | IV+2~, IV+9*, IV+10, IV+11 |
PSSADFIN | IV+2~, IV+6*, IV+7 |
PSSADFLP | IV+2~, IV+5*, IV+6, IV+8 |
PSSADFNN | IV+2~, IV+8*, IV+9 |
PSSADFOI | IV~, IV+4, IV+5 |
PSSADFRS | IV+2~, IV+3*, IV+4, IV+10*, IV+11, IV+12*, IV+13 |
PSSADFXX | IV+2~, IV+3*, IV+5, IV+9*, IV+11*, IV+12 |
PSSBSAB2 | BSA+2~, BSA+4*, BSA+11*, BSA+12 |
PSSBSADF | BSA~, BSA+1, BSA+3, BSA+7 |
PSSBSAH1 | BSA+2~, BSA+9* |
PSSBSAH2 | BSA+2~, BSA+4*, BSA+9*, BSA+11 |
PSSBSAH3 | BSA+2~, BSA+4*, BSA+9*, BSA+12 |
PSSBSAW1 | BSA+2~, BSA+6* |
PSSBSAW2 | BSA+2~, BSA+4*, BSA+6*, BSA+11, BSA+12 |
PSSDCF | DAY+1~, DAY+9, DAY+10*, DAY+11, DAY+19*, DAY+20, DAY1+2*, DAY1+3, DAYOUT1+3*, DAYOUT1+4 , STN+2~, STN1+2*, STN1+4, STN1+8*, STN1+10, STNO1+2*, STNO1+3 |
PSSDCFLG | STN+2~, STN+5, STN+7, STN1+10*, STNO+2~, STNO+7, STNO1+3* |
PSSDECNO | FRQ+12~, STNO+8, STNO1+10* |
PSSDIVFG | DAY+1~, DAY+17, DAY+24*, DAY+26, STN+2~, STN+5, STN+6!, STN1+19*, STNO+2~, STNO+5 , STNO+6!, STNO1+12* |
PSSDK1 | DURLS+2~, DURLS+5*, DURLS+8 |
PSSDK2 | DURLS+2~, DURLS+8*, DURLS+10, DURLS+17 |
PSSDK3 | DURLS+2~, DURLS+16*, DURLS+17 |
PSSDK4 | DURLS+2~, DURLS+3*, DURLS+9, DURLS+10, DURLS+15, DURLS+16 |
PSSDK5 | DURLS+2~, DURLS+10*, DURLS+11, DURLS+13, DURLS+17*, DURLS+18, DURLS+19 |
PSSDK6 | DURLS+2~, DURLS+13*, DURLS+14, DURLS+19*, DURLS+20 |
PSSDRG | FRQ~, DAY+10, DAY+19, DAY1+2, DAYOUT1+3, STN1+2, STN1+8, STNO1+2 |
PSSDSCNT | DURLS+2~, DURLS+6*, DURLS+7 |
>> PSSDSWHE | DS+1 |
PSSFWAA | STN+2~, STN1+1!, STN1+11*, STN1+12, STN1+13, STN1+15, STN1+17, STN1+20, STN1+25, STN1+26 |
PSSFWAAD | STN+2~, STN1+1!, STN1+13*, STN1+14, STN1+16 |
PSSFWAAM | STN+2~, STN1+17*, STN1+18, STN1+21, STN1+22, STN1+23, STN1+24 |
PSSFWAMN | STN+2~, STN1+22* |
PSSFWAWK | STN+2~, STN1+23* |
PSSFWAXL | STN+2~, STN1+26* |
PSSFWAXW | STN+2~, STN1+25* |
PSSFWBA | STNO+2~, STNO1+1!, STNO1+4*, STNO1+5, STNO1+6, STNO1+8, STNO1+11, STNO1+17, STNO1+18 |
PSSFWBAD | STNO+2~, STNO1+1!, STNO1+6*, STNO1+7, STNO1+10 |
PSSFWBAM | STNO+2~, STNO1+11*, STNO1+12, STNO1+13, STNO1+14, STNO1+15, STNO1+16 |
PSSFWBMN | STNO+2~, STNO1+14* |
PSSFWBWK | STNO+2~, STNO1+15* |
PSSFWBXL | STNO+2~, STNO1+18* |
PSSFWBXW | STNO+2~, STNO1+17* |
PSSFWCNT | DAY+1~, DAY+9, DAY+12* |
PSSFWDIS | NUMB+3~, NUMB+4*, NUMB+5 |
PSSFWDIV | DAY+1~, DAY+18!, DAY+23*, DAY+24, DAY+25 |
PSSFWDRL | FRQ~, FRQ+21, DAY+19, DAY1+2, DAYOUT1+3, STN1+2, STN1+8, STNO1+2, DURLS+4, DURLS+5 |
PSSFWEEK | NUMB+3~, NUMB+9* |
PSSFWFLG | FRQZ+1~, FRQZ+6, FRQZ+8*, FRQZ+9, FRQZ+10, DAY+24*, NUMB+2*, NUMB+4*, NUMB+8*, NUMB+9* , NUMB+10*, NUMB+11*, NUMB+12*, STN+1*, STN+5, STN+8, STN1+10*, STN1+14*, STN1+15*, STN1+19* , STN1+22*, STN1+23*, STN1+24*, STN1+25*, STN1+26*, STNO+1*, STNO+5, STNO+9, STNO+10*, STNO1+3* , STNO1+7*, STNO1+8*, STNO1+10*, STNO1+12*, STNO1+14*, STNO1+15*, STNO1+16*, STNO1+17*, STNO1+18*, DURLS+11* , DURLS+18* |
PSSFWFND | DAY+1~, DAY+6*, DAY+7 |
PSSFWFR | FRQ~, FRQ+17, FRQ+21, FRQZ+5, NUMB+4, NUMB+6, NUMB+11, NUMB+12 |
PSSFWGRT | NUMB+3~, NUMB+6*, NUMB+7, NUMB+8, NUMB+9, NUMB+10 |
PSSFWKZ1 | DAY+1~, DAY1+4*, DAY1+5, DAY1+6 |
PSSFWKZ2 | DAY+1~, DAY1+6*, DAY1+7, DAY1+8 |
PSSFWKZ3 | DAY+1~, DAY1+8* |
PSSFWKZ4 | DAY+1~, DAY1+8* |
PSSFWKZ5 | DAY+1~, DAY1+5*, DAY1+8*, DAY1+9 |
PSSFWKZ6 | DAYOUT+1~, DAYOUT+3*, DAYOUT+4*, DAYOUT1+3, DAYOUT1+6 |
PSSFWKZ7 | DAYOUT+1~, DAYOUT1+1!, DAYOUT1+6*, DAYOUT1+7, DAYOUT1+8 |
PSSFWKZ8 | DAYOUT+1~, DAYOUT1+1!, DAYOUT1+8*, DAYOUT1+9 |
PSSFWLP | DAY+1~, DAY+12* |
PSSFWLP1 | DAY+1~, DAY+14*, DAY+15*, DAY+17*, DAY+19, DAY+21, DAY1+1, DAY1+2, DAY1+4 |
PSSFWLP2 | STN+2~, STN+3*, STN+5*, STN1+2, STN1+6, STN1+7*, STN1+8, STN1+9*, STN1+11 |
PSSFWLP3 | STNO+2~, STNO+3*, STNO+5*, STNO1+2, STNO1+4 |
PSSFWLTH | DAY+1~, DAY+5*, DAY+7 |
PSSFWMNT | NUMB+3~, NUMB+8* |
PSSFWNUM | DAY+1~ |
PSSFWPK | FRQ~, FRQ+21, FRQZ+4, FRQZ+8, FRQZ+10, DAY+28 |
PSSFWPR1 | FRQ+12~, FRQ+15*, FRQ+18, DAY+9*, DAY+11*, DAY+16*, DAY+20*, DAY+25*, DAY+29*, DAY1+3* , DAYOUT1+4*, DAYOUT1+9*, NUMB+4*, NUMB+8*, NUMB+9*, NUMB+10*, NUMB+11*, NUMB+12*, STN+8*, STN1+10* , STNO+9*, STNO+10*, STNO1+3* |
PSSFWPR2 | FRQ+12~, FRQ+16*, FRQ+17, FRQ+18, FRQ+19 |
PSSFWPR3 | FRQ+12~, FRQ+19*, FRQ+20, FRQ+23 |
PSSFWPR4 | FRQ+12~, FRQ+20* |
PSSFWPR5 | FRQ+12~, FRQ+22*, FRQ+25 |
PSSFWPR6 | FRQ+12~, FRQ+24*, FRQ+26 |
PSSFWPR7 | FRQ+12~, FRQ+18, FRQ+19, FRQ+23!, FRQ+26, STN1+10*, STNO1+3*, DURLS+3* |
PSSFWQZ | DAY+1~, DAY+18!, DAY+21*, DAY+22, DAY+23, DAY+24 |
PSSFWRGH | DAY+1~, DAY+7*, DAY+8, DAY+13*, DAY+15, DAY+17, DAY+29, DAYOUT+2*, DAYOUT+4 |
PSSFWRST | FRQZ+1~, FRQZ+3!, FRQZ+5, FRQZ+6, FRQZ+9, FRQZ+10, DAY+2!, DAY+9*, DAY+11*, DAY+13 , DAY+14, DAY+15, DAY+16, DAY+17, DAY+20*, DAY+24*, DAY+25*, DAY+27, DAY+28, DAY+29* , DAY+30*, DAY+31*, DAY1+3*, DAY1+9*, DAYOUT+2, DAYOUT+3, DAYOUT+4, DAYOUT1+4*, DAYOUT1+8*, DAYOUT1+9* , NUMB+2!, NUMB+4*, NUMB+8*, NUMB+9*, NUMB+10*, NUMB+11*, NUMB+12*, STN+1!, STN1+10*, STN1+14* , STN1+15*, STN1+19*, STN1+20*, STN1+22*, STN1+23*, STN1+24*, STN1+25*, STN1+26*, STNO+1!, STNO+10* , STNO1+3*, STNO1+7*, STNO1+8*, STNO1+12*, STNO1+14*, STNO1+15*, STNO1+16*, STNO1+17*, STNO1+18*, DURLS+3 , DURLS+7*, DURLS+11!, DURLS+14*, DURLS+18!, DURLS+20* |
PSSFWSC | FRQZ+1~, FRQZ+2*, DAY+3, DAY+4*, DAY+5, DAY+6, DAY+7, DAY+10, DAY+30, DAY+31 , STN+1, STN+5*, STN1+4, STN1+7, STNO+1, STNO+5*, STNO+10 |
PSSFWSCC | FRQ~, FRQ+13, FRQ+14*, FRQ+19, FRQ+20, FRQ+21, FRQ+22, FRQ+23*, FRQ+25*, FRQZ+2 , FRQZ+8, FRQZ+10* |
PSSFWTMP | DAY+1~, DAY+8*, DAY+9, DAY+12 |
PSSFWXMN | NUMB+3~, NUMB+12* |
PSSFWXWK | NUMB+3~, NUMB+11* |
PSSKST1 | EMSY+1~, EMSY+3*, EMSY+4, EMSY+5 |
PSSKST2 | EMSY+1~, EMSY+4* |
PSSKST3 | EMSY+1~ |
PSSKST4 | EMSY+1~, EMSY+4*, EMSY+6, EMSY+7 |
PSSKST5 | EMSY+1~, EMSY+5*, EMSY+6, EMSY+7 |
PSSKST6 | EMSY+1~, EMSY+2*, EMSY+7*, EMSY+8 |
PSSKST9 | EMSY+1~, EMSY+2*, EMSY+3, EMSY+6*, EMSY+8 |
PSSMLTFG | FRQ+12~, FRQ+17, DAY+3* |
>> PSSNBOI | EMSY+3 |
>> PSSNBRS | EMSY+8* |
PSSNVT1 | DLTM+1~, DLTM+3*, DLTM+4, DLTM+5, DLTM+6 |
PSSNVTFL | DLTM+1~, DLTM+2*, DLTM+3, DLTM+6*, DLTM+7 |
PSSNVTIN | DLTM+1~, DLTM+5* |
PSSNVTOI | DLTM~, DLTM+3 |
PSSOMEDN | FRQ+12~, FRQZ+10*, DAYOUT+2*, DAYOUT+3, DAYOUT+4, STNO+3, STNO+5 |
PSSOSN | FRQ+12~, FRQ+14*, DAY+13*, DAY+14, DAY+15, DAY1+1, STN+3, STN+5 |
PSSPKGU | MRT+1~, MRT+8* |
PSSRS1 | MRT~, MRT+1, MRT+2 |
PSSRS2 | MRT+1~*, MRT+2*, MRT+15*, MRTX+1 |
PSSRS3 | MRT+1~, MRT+4*, MRT+5, MRT+6, MRT+7, MRT+8 |
PSSRS4 | MRT+1~, MRT+2*, MRT+12*, MRT+13*, MRT+14 |
PSSRS4SM | MRT+1~, MRT+2*, MRT+12*, MRT+13*, MRT+15 |
PSSRTARR | MRT+1~, MRT+11 |
PSSRTARR( | MRT+8* |
PSSRTARR(0 | MRT+13 |
PSSRTARR(1 | MRT+12 |
PSSRTIEN | MRT+1~, MRT+2*, MRT+3*, MRT+4, MRT+8 |
PSSRTNAM | MRT+1~, MRT+2*, MRT+3 |
PSSSPLIN | SUP~, SUP+4 |
PSSSPLZR | SUP+3~, SUP+4*, SUP+5 |
PSSVLDF | EXMT+3~, EXMT+8!, EXMT+10*, EXMT+11*, EXMT+12, EXMT+13, EXMT+14 |
PSSVLDOV | EXMT+3~, EXMT+8*, EXMT+9*, EXMT+12, EXMT+13, EXMT+14 |
PSSVLIEN | EXMT~, EXMT+4, EXMT+6, EXMT+11 |
PSSVLND | EXMT+3~, EXMT+6*, EXMT+7 |
PSSVLND1 | EXMT+3~, EXMT+7*, EXMT+9, EXMT+10 |
PSSVLND3 | EXMT+3~, EXMT+7*, EXMT+9, EXMT+10 |
PSSVLNDF | EXMT+3~, EXMT+10* |
PSSVLZR | EXMT+3~, EXMT+4*, EXMT+5 |
PSSVUTAA | UNIT+2~, UNIT+4*, UNITP+1, UNITP+2, UNITP+3, UNITP+4*, UNITD+2~, UNITD+4*, UNITDP+1, UNITDP+2 , UNITDP+3, UNITDP+4* |
PSSVUTFL | UNIT+2~, UNIT+3*, UNITP+4*, UNITD+2~, UNITD+3*, UNITDP+4* |
PSSVUTUN | UNIT~, UNIT+3, UNIT+4, UNITP+4, UNITD~, UNITD+3, UNITD+4, UNITDP+4 |
PSSVUTX | UNIT+2~, UNITP+1*, UNITP+2*, UNITP+3*, UNITD+2~, UNITDP+1*, UNITDP+2*, UNITDP+3* |
PSSVUTZ | UNIT+2~, UNIT+3*, UNITP+1!*, UNITP+2!*, UNITP+3!*, UNITX+1, UNITD+2~, UNITD+3*, UNITDP+1!*, UNITDP+2!* , UNITDP+3!*, UNITDP+4!, UNITDX+1 |
PSSX | FRQ+12~, FRQ+14*, FRQZ+1~, FRQZ+10*, DAY+1~, DAY+13*, DAY+24*, DAYOUT+1~, DAYOUT+2*, STN1+5~ , STN1+6*, STN1+9 |
U | FRQ+14, FRQZ+10, DAY+11, DAY+13, DAY+20, DAY+24, DAY1+3, DAYOUT+2, DAYOUT1+4, STN1+10 , STNO1+3, DURLS+7 |
VA | BSA+2~ |
VADM | BSA+2~ |
VAERR | BSA+2~ |
VAHOW | BSA+2~ |
VAPTYP | BSA+2~ |
VAROOT | BSA+2~ |
X | BSA+2~, BSA+5!, BSA+6, BSA+8!, BSA+9 |
X1 | BSA+2~ |
X2 | BSA+2~ |
Name | Field # of Occurrence |
---|---|
$T(OVRIDE^PSNAPIS | EXMT+9 |