PSOERUT3 ;ALB/MFR - eRx Listman Allergy Utilities; 06/25/2022 5:14pm
Source file <PSOERUT3.m>
| Package | Total | Call Graph |
|---|---|---|
| Outpatient Pharmacy | 6 | ($$C2S,$$S2C,$$SORT)^PSOERUT ($$COMPARE,ADDLINE)^PSOERUT0 VARXDOSE^PSOERUT4 ALRGDATA^PSOERXU9 EN^PSOFSIG SIG^PSOHELP |
| VA FileMan | 2 | ($$GET1,GETS)^DIQ ^DIWP |
| Adverse Reaction Tracking | 1 | ^GMRADPT |
| DRG Grouper | 1 | ICDDESC^ICDXCODE |
| Kernel | 1 | $$UP^XLFSTR |
| Order Entry Results Reporting | 1 | ($$HAVEHDR,GET,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 |
|---|---|---|
| ALLERGY(MODE,NMSPC,ERXIEN,DFN) | ; Sets Allergy and Adverse Reaction information
; Input: MODE - Display Mode: "RS": Roll & Scroll | "LM": ListMan ; NMSPC - ListMan Temp Global Namespace (e.g., "PSOERXP1") ; ERXIEN - Pointer to ERX HOLDING QUEUE file (#52.49) ; DFN - Pointer to PATIENT File(#2) |
|
| ADDALLS | ; Add Alergies to the Screen (Reverses or Highlights Video for each Allergy)
|
|
| SETDIAGS(MODE,NMSPC,ERXIEN,CALLER) | ; Sets Diagnosis and Indication For Use information
; Input: MODE - Display Mode: "RS": Roll & Scroll | "LM": ListMan ; NMSPC - ListMan Temp Global Namespace (e.g., "PSOERXP1") ; ERXIEN - Pointer to ERX HOLDING QUEUE file (#52.49) ; CALLER - Functionality calling this API ("SE":Single eRx View/Display;"VD":Validate Drug;"VP":Validate Patient;"PEN":Pending Order) |
|
| GETDIAGS(ERXIEN,ICDARR) | ; Returns the diagnosis codes for the eRx order
; Input: (r) ERXIEN - Pointer to the ERX HOLDING QUEUE file (52.49) |
|
| SUGSIG(RXIEN,ERXIEN) | ; Returns the Suggested SIG retrieved from the VA Rx
; Input:ERXIEN - Pointer to ERX HOLDING QUEUE file (#52.49) ; RXIEN - Prescription IEN - Pointer to PRESCRIPTION file (#52) |
|
| VAPATINS(OI,DFN) | ; Returns the Pharmacy Orderable Patient Instructions, if any
; Input: OI - Pointer to the PHARMACY ORDERABLE ITEM file (#50.7) ; (o)DFN - Pointer to the PATIEN file (#2) |
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DIQ | ALLERGY+51, SETDIAGS+27, SETDIAGS+28, SUGSIG+7, SUGSIG+13, SUGSIG+14, SUGSIG+15, VAPATINS+7, VAPATINS+8 |
| GETS^DIQ | GETDIAGS+10 |
| ^DIWP | ALLERGY+64, ALLERGY+77, ALLERGY+82, ALLERGY+87, ALLERGY+93, ALLERGY+97 |
| ^GMRADPT | ALLERGY+12 |
| ICDDESC^ICDXCODE | GETDIAGS+15, GETDIAGS+25 |
| $$HAVEHDR^ORRDI1 | ALLERGY+31 |
| GET^ORRDI1 | ALLERGY+33 |
| HAVEHDR^ORRDI1 | ALLERGY+30 |
| $$C2S^PSOERUT | ALLERGY+64, ALLERGY+77, ALLERGY+82, ALLERGY+87, ALLERGY+93, ALLERGY+97 |
| $$S2C^PSOERUT | ALLERGY+65, ALLERGY+78, ALLERGY+83, ALLERGY+88, ALLERGY+94, ALLERGY+98 |
| $$SORT^PSOERUT | ALLERGY+44, ALLERGY+45, ALLERGY+46, ALLERGY+47, ALLERGY+48 |
| $$COMPARE^PSOERUT0 | SETDIAGS+23, SETDIAGS+34, SETDIAGS+36, SETDIAGS+39, SETDIAGS+41 |
| ADDLINE^PSOERUT0 | ALLERGY+103, ALLERGY+125, ADDALLS+22, SETDIAGS+47 |
| VARXDOSE^PSOERUT4 | SUGSIG+9 |
| ALRGDATA^PSOERXU9 | ALLERGY+53 |
| EN^PSOFSIG | SUGSIG+10 |
| SIG^PSOHELP | VAPATINS+11 |
| $$UP^XLFSTR | ALLERGY+28, ALLERGY+41, ALLERGY+56, ALLERGY+57, GETDIAGS+20, GETDIAGS+31 |
| FileNo | Call Tags |
|---|---|
| ^PSDRUG - [#50] | GET1^DIQ |
| ^PS(50.7 - [#50.7] | GET1^DIQ |
| ^PSRX - [#52] | GET1^DIQ |
| ^PS(52.49 - [#52.49] | GET1^DIQ |
| 52.493113 | GETS^DIQ |
| ^PS(55 - [#55] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PS(52.49 - [#52.49] | ALLERGY+8, GETDIAGS+7, GETDIAGS+8, SUGSIG+6 |
| ^PSRX - [#52] | SUGSIG+6 |
| ^UTILITY($J | ALLERGY+64!, ALLERGY+65, ALLERGY+75!, ALLERGY+77!, ALLERGY+78, ALLERGY+80!, ALLERGY+82!, ALLERGY+83, ALLERGY+85!, ALLERGY+87! , ALLERGY+88, ALLERGY+93!, ALLERGY+94, ALLERGY+97!, ALLERGY+98 |
| ^XTMP("ORRDI" | ALLERGY+32, ALLERGY+34, ALLERGY+35, ALLERGY+36 |
| Name | Line Occurrences |
|---|---|
| $$VAPATINS | SUGSIG+16 |
| GETDIAGS | SETDIAGS+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AGENT | ALLERGY+16~, ALLERGY+19*, ALLERGY+22*, ALLERGY+23, ALLERGY+28, ALLERGY+37*, ALLERGY+40, ALLERGY+41 |
| AGENTX | ALLERGY+16~, ALLERGY+23*, ALLERGY+24, ALLERGY+25, ALLERGY+26, ALLERGY+27 |
| ALL | ALLERGY+16~, ALLERGY+17*, ALLERGY+18, ALLERGY+35*, ALLERGY+36 |
| ALLLIST | ALLERGY+16~ |
| ALLLIST( | ALLERGY+18*, ALLERGY+20, ALLERGY+21, ALLERGY+22 |
| ALLLN | ALLERGY+6~, ALLERGY+104*, ALLERGY+105, ALLERGY+112, ALLERGY+118, ALLERGY+123, ALLERGY+124, ADDALLS+1~, ADDALLS+2*, ADDALLS+3 , ADDALLS+20, ADDALLS+21, SETDIAGS+6~, SETDIAGS+43*, SETDIAGS+44, SETDIAGS+45, SETDIAGS+46 |
| ALORAR | ALLERGY+16~, ALLERGY+19*, ALLERGY+21*, ALLERGY+22, ALLERGY+24, ALLERGY+25, ALLERGY+26, ALLERGY+27 |
| CALLER | SETDIAGS~, SETDIAGS+8*, SETDIAGS+26, SETDIAGS+31, SETDIAGS+32 |
| COUNT | GETDIAGS+5~, GETDIAGS+7*, GETDIAGS+17*, GETDIAGS+20*, GETDIAGS+27*, GETDIAGS+30*, GETDIAGS+31 |
| DFN | ALLERGY~, ALLERGY+10, ALLERGY+33, ALLERGY+34, ALLERGY+35, ALLERGY+36, ALLERGY+70, ALLERGY+120, ADDALLS+17, VAPATINS~ , VAPATINS+7 |
| DIAG | SETDIAGS+6~, SETDIAGS+13*, SETDIAGS+14 |
| DIAGDAT | GETDIAGS+5~, GETDIAGS+9~ |
| DIAGDAT( | GETDIAGS+11, GETDIAGS+12, GETDIAGS+13, GETDIAGS+21, GETDIAGS+22, GETDIAGS+23 |
| DIAGIEN | GETDIAGS+5~, GETDIAGS+8*, GETDIAGS+9 |
| DIAGS | SETDIAGS+6~, SETDIAGS+8 |
| DIAGS( | SETDIAGS+13, SETDIAGS+14 |
| DIAGS(0 | SETDIAGS+10 |
| DIAGZ | SETDIAGS+6~, SETDIAGS+14*, SETDIAGS+15, SETDIAGS+16, SETDIAGS+21 |
| DIENS | GETDIAGS+5~, GETDIAGS+9*, GETDIAGS+10, GETDIAGS+11, GETDIAGS+12, GETDIAGS+13, GETDIAGS+21, GETDIAGS+22, GETDIAGS+23 |
| >> DIWF | ALLERGY+64*, ALLERGY+77*, ALLERGY+82*, ALLERGY+87*, ALLERGY+93*, ALLERGY+97* |
| >> DIWL | ALLERGY+64*, ALLERGY+77*, ALLERGY+82*, ALLERGY+87*, ALLERGY+93*, ALLERGY+97* |
| >> DIWR | ALLERGY+64*, ALLERGY+77*, ALLERGY+82*, ALLERGY+87*, ALLERGY+93*, ALLERGY+97* |
| DRES | GETDIAGS+5~, GETDIAGS+15 |
| DRES( | GETDIAGS+18, GETDIAGS+19 |
| DRES(0 | GETDIAGS+16 |
| DRESDAT | GETDIAGS+5~, GETDIAGS+19*, GETDIAGS+20 |
| DRESL | GETDIAGS+5~, GETDIAGS+18*, GETDIAGS+19 |
| EALLDATA | ALLERGY+6~, ALLERGY+53 |
| EALLDATA( | ALLERGY+54, ALLERGY+55, ALLERGY+56, ALLERGY+57 |
| EALLLST | ALLERGY+7~, ALLERGY+54*, ALLERGY+56*, ALLERGY+58*, ALLERGY+63, ALLERGY+64, ALLERGY+66 |
| ENKA | ALLERGY+7~, ALLERGY+51*, ALLERGY+61, ALLERGY+66, ALLERGY+120, ADDALLS+17 |
| ERX1ALL | ALLERGY+7~, ALLERGY+108*, ALLERGY+109, ALLERGY+110, ALLERGY+111, ADDALLS+6*, ADDALLS+7, ADDALLS+8, ADDALLS+9 |
| ERXALLS | ALLERGY+7~, ALLERGY+105*, ALLERGY+107, ALLERGY+108, ALLERGY+110, ALLERGY+111, ALLERGY+121, ALLERGY+122, ADDALLS+3*, ADDALLS+5 , ADDALLS+6, ADDALLS+8, ADDALLS+9, ADDALLS+18, ADDALLS+19, SETDIAGS+44* |
| ERXIEN | ALLERGY~, ALLERGY+8, ALLERGY+51, ALLERGY+53, SETDIAGS~, SETDIAGS+8, SETDIAGS+27, SETDIAGS+28, GETDIAGS~, GETDIAGS+7 , GETDIAGS+8, GETDIAGS+9, SUGSIG~, SUGSIG+6, SUGSIG+15 |
| ERXLINES | ALLERGY+60!, SETDIAGS+6~ |
| ERXLINES( | ALLERGY+65*, ALLERGY+104, ALLERGY+105, ALLERGY+123, ADDALLS+2, ADDALLS+3, ADDALLS+20, SETDIAGS+11*, SETDIAGS+15*, SETDIAGS+18* , SETDIAGS+23*, SETDIAGS+43, SETDIAGS+44, SETDIAGS+45 |
| ERXLINES(1 | ALLERGY+62*, ALLERGY+67* |
| ERXLIST | ALLERGY+7~, ALLERGY+106, ADDALLS+4 |
| ERXLIST( | ALLERGY+57*, ALLERGY+115, ADDALLS+13 |
| FILE | ALLERGY+16~, ALLERGY+38*, ALLERGY+39 |
| FLD | VAPATINS+5~, VAPATINS+6*, VAPATINS+7*, VAPATINS+8 |
| >> GMRA | ALLERGY+12* |
| GMRAL | ALLERGY+6~, ALLERGY+13, ALLERGY+14, ALLERGY+15 |
| GMRAL( | ALLERGY+17, ALLERGY+18 |
| HDRLN | ALLERGY+7~, ALLERGY+71! |
| HDRLN( | ALLERGY+76*, ALLERGY+81*, ALLERGY+86*, ALLERGY+90*, ALLERGY+92*, ALLERGY+96*, ALLERGY+112, ALLERGY+118 |
| >> HIGHLN( | ALLERGY+111*, ALLERGY+117*, ALLERGY+121*, ADDALLS+9*, ADDALLS+15*, ADDALLS+18* |
| >> HIGUNDLN( | SETDIAGS+19* |
| I | ALLERGY+7~, ALLERGY+65*, ALLERGY+78*, ALLERGY+83*, ALLERGY+88*, ALLERGY+94*, ALLERGY+98*, ALLERGY+107*, ALLERGY+108, ALLERGY+113* , ALLERGY+114, ADDALLS+5*, ADDALLS+6, ADDALLS+11*, ADDALLS+12, SUGSIG+5!, SUGSIG+11* |
| ICDARR | GETDIAGS~ |
| ICDARR( | GETDIAGS+17*, GETDIAGS+20*, GETDIAGS+27*, GETDIAGS+31* |
| IEN | ALLERGY+6~ |
| INDCTN | SETDIAGS+6~, SETDIAGS+27*, SETDIAGS+33, SETDIAGS+34, SETDIAGS+35, SETDIAGS+36 |
| INDLBL | SETDIAGS+6~ |
| INDLNE | SETDIAGS+6~ |
| INS1 | VAPATINS+5~, VAPATINS+11* |
| LDAT | ALLERGY+6~ |
| >> LINE | ALLERGY+110, ALLERGY+111, ALLERGY+116, ALLERGY+117, ALLERGY+118, ALLERGY+121, ALLERGY+122, ADDALLS+8, ADDALLS+9, ADDALLS+14 , ADDALLS+15, ADDALLS+18, ADDALLS+19, SETDIAGS+9, SETDIAGS+29 |
| LMLINE | SETDIAGS+6~, SETDIAGS+9*, SETDIAGS+11*, SETDIAGS+15*, SETDIAGS+18*, SETDIAGS+19, SETDIAGS+23*, SETDIAGS+29*, SETDIAGS+31*, SETDIAGS+32 , SETDIAGS+34*, SETDIAGS+36*, SETDIAGS+38*, SETDIAGS+39*, SETDIAGS+41* |
| LN | ALLERGY+6~, ALLERGY+71*, ALLERGY+72*, ALLERGY+73*, ALLERGY+76*, ALLERGY+78*, ALLERGY+81*, ALLERGY+83*, ALLERGY+86*, ALLERGY+88* , ALLERGY+90*, ALLERGY+92*, ALLERGY+94*, ALLERGY+96*, ALLERGY+98* |
| MIEN | GETDIAGS+5~, GETDIAGS+7*, GETDIAGS+8, GETDIAGS+9 |
| MODE | ALLERGY~, ALLERGY+103, ALLERGY+125, ADDALLS+22, SETDIAGS~, SETDIAGS+23, SETDIAGS+32 |
| NMSPC | ALLERGY~, ALLERGY+103, ALLERGY+125, ADDALLS+22, SETDIAGS~, SETDIAGS+47 |
| NOVALLST | ALLERGY+6~, ALLERGY+9*, ALLERGY+25*, ALLERGY+45*, ALLERGY+79, ALLERGY+82 |
| NOVARLST | ALLERGY+6~, ALLERGY+9*, ALLERGY+27*, ALLERGY+47*, ALLERGY+89, ALLERGY+95, ALLERGY+97 |
| OI | VAPATINS~, VAPATINS+8 |
| OINDCTN | SETDIAGS+6~, SETDIAGS+28*, SETDIAGS+37, SETDIAGS+39, SETDIAGS+40, SETDIAGS+41 |
| OINDLBL | SETDIAGS+6~ |
| PDESC | GETDIAGS+5~, GETDIAGS+13*, GETDIAGS+17, GETDIAGS+20 |
| PDIAGQ | GETDIAGS+5~, GETDIAGS+11*, GETDIAGS+14, GETDIAGS+15, GETDIAGS+17, GETDIAGS+20 |
| PDIAGV | GETDIAGS+5~, GETDIAGS+12*, GETDIAGS+15, GETDIAGS+17, GETDIAGS+20 |
| PSODIR | VAPATINS+5~ |
| PSODIR("INS" | VAPATINS+11* |
| PSODRUG | SUGSIG+5! |
| PSODRUG("IEN" | SUGSIG+7* |
| PSODRUG("OI" | SUGSIG+7* |
| PSONOAL | ALLERGY+6~ |
| REMALLST | ALLERGY+6~, ALLERGY+9*, ALLERGY+40*, ALLERGY+48*, ALLERGY+84, ALLERGY+87 |
| >> REVLN( | ALLERGY+110*, ALLERGY+116*, ALLERGY+122*, ADDALLS+8*, ADDALLS+14*, ADDALLS+19* |
| RXIEN | SUGSIG~, SUGSIG+6, SUGSIG+7, SUGSIG+9, SUGSIG+13 |
| SDESC | GETDIAGS+6~, GETDIAGS+23*, GETDIAGS+27, GETDIAGS+31 |
| SDIAGQ | GETDIAGS+6~, GETDIAGS+21*, GETDIAGS+24, GETDIAGS+25, GETDIAGS+27, GETDIAGS+31 |
| SDIAGV | GETDIAGS+6~, GETDIAGS+22*, GETDIAGS+25, GETDIAGS+27, GETDIAGS+31 |
| SDRES | GETDIAGS+6~, GETDIAGS+25 |
| SDRES( | GETDIAGS+28, GETDIAGS+29 |
| SDRES(0 | GETDIAGS+26 |
| SDRESDAT | GETDIAGS+6~, GETDIAGS+29*, GETDIAGS+31 |
| SDRESL | GETDIAGS+6~, GETDIAGS+28*, GETDIAGS+29 |
| >> SEQ | ALLERGY+54*, ALLERGY+55, ALLERGY+56, ALLERGY+57 |
| SIG | SUGSIG+5!, SUGSIG+10! |
| SIG( | SUGSIG+11 |
| SUGSIG | SUGSIG+5!, SUGSIG+8*, SUGSIG+11*, SUGSIG+17*, SUGSIG+18 |
| TYPE | ALLERGY+6~ |
| >> UNDERLN( | ALLERGY+118*, SETDIAGS+32* |
| VA1ALL | ALLERGY+7~, ALLERGY+114*, ALLERGY+115, ALLERGY+116, ALLERGY+117, ADDALLS+12*, ADDALLS+13, ADDALLS+14, ADDALLS+15 |
| VAALLS | ALLERGY+7~, ALLERGY+105*, ALLERGY+113, ALLERGY+114, ALLERGY+116, ALLERGY+117, ALLERGY+118, ALLERGY+121, ALLERGY+122, ADDALLS+3* , ADDALLS+10, ADDALLS+11, ADDALLS+12, ADDALLS+14, ADDALLS+15, ADDALLS+18, ADDALLS+19, SETDIAGS+44* |
| VADOSE | SUGSIG+5!, SUGSIG+9, SUGSIG+10 |
| >> VADRGIEN | SUGSIG+13*, SUGSIG+14 |
| VALINES | ALLERGY+60!, SETDIAGS+6~ |
| VALINES( | ALLERGY+76*, ALLERGY+78*, ALLERGY+81*, ALLERGY+83*, ALLERGY+86*, ALLERGY+88*, ALLERGY+90*, ALLERGY+92*, ALLERGY+94*, ALLERGY+96* , ALLERGY+98*, ALLERGY+104, ALLERGY+105, ALLERGY+124, ADDALLS+2, ADDALLS+3, ADDALLS+21, SETDIAGS+31*, SETDIAGS+34*, SETDIAGS+36* , SETDIAGS+38*, SETDIAGS+39*, SETDIAGS+41*, SETDIAGS+43, SETDIAGS+44, SETDIAGS+46 |
| VALINES(1 | ALLERGY+72*, ALLERGY+73* |
| VALIST | ALLERGY+7~, ALLERGY+106, ADDALLS+4 |
| VALIST( | ALLERGY+28*, ALLERGY+41*, ALLERGY+109, ADDALLS+7 |
| VANKA | ALLERGY+6~, ALLERGY+9*, ALLERGY+14*, ALLERGY+73, ALLERGY+120, ADDALLS+17 |
| VANOASS | ALLERGY+6~, ALLERGY+9*, ALLERGY+13*, ALLERGY+72 |
| >> VAOIIEN | SUGSIG+14*, SUGSIG+16 |
| VAPATIEN | SUGSIG+5!, SUGSIG+15*, SUGSIG+16 |
| VAPATINS | SUGSIG+5!, SUGSIG+16*, SUGSIG+17, VAPATINS+5~, VAPATINS+8*, VAPATINS+10, VAPATINS+11*, VAPATINS+12 |
| VERALLST | ALLERGY+6~, ALLERGY+9*, ALLERGY+24*, ALLERGY+44*, ALLERGY+74, ALLERGY+77 |
| VERARLST | ALLERGY+6~, ALLERGY+9*, ALLERGY+26*, ALLERGY+46*, ALLERGY+89, ALLERGY+91, ALLERGY+93 |
| VERIF | ALLERGY+16~, ALLERGY+19*, ALLERGY+20*, ALLERGY+21, ALLERGY+22, ALLERGY+24, ALLERGY+25, ALLERGY+26, ALLERGY+27 |
| X | ALLERGY+6~, ALLERGY+64*, ALLERGY+77*, ALLERGY+82*, ALLERGY+87*, ALLERGY+93*, ALLERGY+97*, VAPATINS+5~, VAPATINS+11* |
| XE | ALLERGY+6~, ALLERGY+102*, ALLERGY+103, ALLERGY+123*, ALLERGY+125, ADDALLS+20*, ADDALLS+22, SETDIAGS+6~, SETDIAGS+16*, SETDIAGS+17 , SETDIAGS+18, SETDIAGS+19, SETDIAGS+20*, SETDIAGS+21*, SETDIAGS+22, SETDIAGS+23, SETDIAGS+24*, SETDIAGS+45*, SETDIAGS+47 |
| XEI | SETDIAGS+6~, SETDIAGS+9*, SETDIAGS+11*, SETDIAGS+15*, SETDIAGS+18*, SETDIAGS+23* |
| XV | ALLERGY+6~, ALLERGY+102*, ALLERGY+103, ALLERGY+124*, ALLERGY+125, ADDALLS+21*, ADDALLS+22, SETDIAGS+6~, SETDIAGS+46*, SETDIAGS+47 |
| XVI | SETDIAGS+6~, SETDIAGS+29*, SETDIAGS+31*, SETDIAGS+34*, SETDIAGS+36*, SETDIAGS+38*, SETDIAGS+39*, SETDIAGS+41* |
| Z | ALLERGY+16~, ALLERGY+18*, ALLERGY+36*, ALLERGY+37, ALLERGY+38 |
| Name | Field # of Occurrence |
|---|---|
| $T(GET^ORRDI1 | ALLERGY+33 |
| $T(HAVEHDR^ORRDI1 | ALLERGY+30 |
