PSSDSAPI ;BIR/RTR - Dose Check APIs routine ; Jun 09, 2008@16:00
Source file <PSSDSAPI.m>
| Package | Total | Call Graph |
|---|---|---|
| Pharmacy Data Management | 6 | (STN1,STNO1)^PSSDSAPB $$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
|
|
| STNO | ;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 |
| STN1^PSSDSAPB | STN+3, STN+5 |
| STNO1^PSSDSAPB | STNO+3, STNO+5 |
| $$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 |
| $$DCFSCH^PSSSCHMS | DAY+19, DAY1+2 |
| $$DOWAT^PSSSCHMS | DAY+10 |
| $$MULTSCH^PSSSCHMS | FRQ+20 |
| $$OLD51^PSSSCHMS | FRQZ+10, DAYOUT+2 |
| $$OLDSCH^PSSSCHMS | FRQ+13, DAY+13 |
| $$UP^XLFSTR | UNIT+4, UNITP+4, FRQ+19, 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 |
| ^PS(51.1 - [#51.1] | FRQ+20, DAY+3, DAY+15, DAY+17, DAY+21, DAY1+1, DAY1+4, STN+5 |
| ^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+15, FRQ+23 |
| $$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 |
| STNO | FRQZ+10 |
| 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~ |
| PSSDCFLG | STN+2~, STN+5, STN+7, STNO+2~, STNO+7 |
| PSSDECNO | FRQ+11~, STNO+8 |
| PSSDIVFG | DAY+1~, DAY+17, DAY+24*, DAY+26, STN+2~, STN+5, STN+6!, STNO+2~, STNO+5, STNO+6! |
| 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 |
| PSSDSCNT | DURLS+2~, DURLS+6*, DURLS+7 |
| >> PSSDSWHE | DS+1 |
| PSSFWAA | STN+2~ |
| PSSFWAAD | STN+2~ |
| PSSFWAAM | STN+2~ |
| PSSFWAMN | STN+2~ |
| PSSFWAWK | STN+2~ |
| PSSFWAXL | STN+2~ |
| PSSFWAXW | STN+2~ |
| PSSFWBA | STNO+2~ |
| PSSFWBAD | STNO+2~ |
| PSSFWBAM | STNO+2~ |
| PSSFWBMN | STNO+2~ |
| PSSFWBWK | STNO+2~ |
| PSSFWBXL | STNO+2~ |
| PSSFWBXW | STNO+2~ |
| 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+20, DAY+19, DAY1+2, DAYOUT1+3, 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, STNO+1*, STNO+5, STNO+9, STNO+10* , DURLS+11*, DURLS+18* |
| PSSFWFND | DAY+1~, DAY+6*, DAY+7 |
| PSSFWFR | FRQ~, FRQ+16, FRQ+20, 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* |
| PSSFWLP3 | STNO+2~, STNO+3*, STNO+5* |
| PSSFWLTH | DAY+1~, DAY+5*, DAY+7 |
| PSSFWMNT | NUMB+3~, NUMB+8* |
| PSSFWNUM | DAY+1~ |
| PSSFWPK | FRQ~, FRQ+20, FRQZ+4, FRQZ+8, FRQZ+10, DAY+28 |
| PSSFWPR1 | FRQ+11~, FRQ+14*, FRQ+17, 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*, STNO+9* , STNO+10* |
| PSSFWPR2 | FRQ+11~, FRQ+15*, FRQ+16, FRQ+17, FRQ+18 |
| PSSFWPR3 | FRQ+11~, FRQ+18*, FRQ+19, FRQ+22 |
| PSSFWPR4 | FRQ+11~, FRQ+19* |
| PSSFWPR5 | FRQ+11~, FRQ+21*, FRQ+24 |
| PSSFWPR6 | FRQ+11~, FRQ+23*, FRQ+25 |
| PSSFWPR7 | FRQ+11~, FRQ+17, FRQ+18, FRQ+22!, FRQ+25, 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!, STNO+1!, STNO+10* , 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*, STNO+1, STNO+5*, STNO+10 |
| PSSFWSCC | FRQ~, FRQ+12, FRQ+13*, FRQ+18, FRQ+19, FRQ+20, FRQ+21, FRQ+22*, FRQ+24*, 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+11~, FRQ+16, 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+11~, FRQZ+10*, DAYOUT+2*, DAYOUT+3, DAYOUT+4, STNO+3, STNO+5 |
| PSSOSN | FRQ+11~, FRQ+13*, 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+11~, FRQ+13*, FRQZ+1~, FRQZ+10*, DAY+1~, DAY+13*, DAY+24*, DAYOUT+1~, DAYOUT+2* |
| U | FRQ+13, FRQZ+10, DAY+11, DAY+13, DAY+20, DAY+24, DAY1+3, DAYOUT+2, DAYOUT1+4, 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 |