PSOERUT7 ;ALB/MFR - eRx Drug Validation (VD) Utilities; 06/25/2023 5:14pm
Source file <PSOERUT7.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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DOSEDUE(MODE,NPSPC,ERXIEN) | ; Sets Dosage & DUE 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) |
|
| SAMEDOSE(ERX,RX) | ; Returns if the eRx Dosage and VistA Rx Dosage are the same
; Input: ERX - Pointer to ERX HOLDING QUEUE file (#52.49) ; RX - Pointer to PRESCRIPTION file (#52) |
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DIQ | DOSEDUE+18, DOSEDUE+23, DOSEDUE+44, DOSEDUE+68 |
| WRAP^PSOERUT | DOSEDUE+45, DOSEDUE+73 |
| $$COMPARE^PSOERUT0 | DOSEDUE+14, DOSEDUE+17, DOSEDUE+19, DOSEDUE+22, DOSEDUE+24, DOSEDUE+27, DOSEDUE+29, DOSEDUE+32, DOSEDUE+42, DOSEDUE+47 , DOSEDUE+50, DOSEDUE+52, DOSEDUE+54, DOSEDUE+56, DOSEDUE+58, DOSEDUE+59, DOSEDUE+60, DOSEDUE+63, DOSEDUE+65, DOSEDUE+75 |
| ADDLINE^PSOERUT0 | DOSEDUE+82 |
| $$FREQ^PSOERUT4 | DOSEDUE+63 |
| ERXDOSE^PSOERUT4 | DOSEDUE+35, SAMEDOSE+5 |
| VARXDOSE^PSOERUT4 | SAMEDOSE+6 |
| $$PRESOLV^PSOERXA1 | DOSEDUE+18, DOSEDUE+23 |
| PDUEDATA^PSOERXU9 | DOSEDUE+6 |
| FileNo | Call Tags |
|---|---|
| ^PS(50.607 - [#50.607] | GET1^DIQ |
| ^PS(52.45 - [#52.45] | GET1^DIQ |
| ^PS(52.49 - [#52.49] | GET1^DIQ |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACK | DOSEDUE+4~, DOSEDUE+28*, DOSEDUE+29, DOSEDUE+30, DOSEDUE+31*, DOSEDUE+32 |
| ALLLN | DOSEDUE+4~, DOSEDUE+78*, DOSEDUE+79, DOSEDUE+80, DOSEDUE+81 |
| COAGENT | DOSEDUE+4~, DOSEDUE+13*, DOSEDUE+14, DOSEDUE+15, DOSEDUE+16*, DOSEDUE+17 |
| DISPUNTS | DOSEDUE+4~, DOSEDUE+53*, DOSEDUE+54, DOSEDUE+55, DOSEDUE+56 |
| DOSE | DOSEDUE+4~, DOSEDUE+40*, DOSEDUE+41, DOSEDUE+42, DOSEDUE+43, DOSEDUE+44, DOSEDUE+47, DOSEDUE+48, DOSEDUE+51, DOSEDUE+52 , DOSEDUE+53, DOSEDUE+57, DOSEDUE+58, DOSEDUE+59, DOSEDUE+60, DOSEDUE+61, DOSEDUE+62, DOSEDUE+64, DOSEDUE+65 |
| DOSEX | DOSEDUE+4~, DOSEDUE+43*, DOSEDUE+44*, DOSEDUE+45 |
| DUESEQ | DOSEDUE+4~, DOSEDUE+12*, DOSEDUE+13, DOSEDUE+18, DOSEDUE+23, DOSEDUE+28, DOSEDUE+33 |
| DUR | DOSEDUE+62~*, DOSEDUE+63 |
| EDOSE | SAMEDOSE+4~, SAMEDOSE+5 |
| ERX | SAMEDOSE~, SAMEDOSE+5 |
| ERXALLS | DOSEDUE+4~, DOSEDUE+79* |
| ERXDOSE | DOSEDUE+4~, DOSEDUE+35, DOSEDUE+37 |
| ERXDOSE("CONJUNCTION" | DOSEDUE+64, DOSEDUE+65 |
| ERXDOSE("DOSE | ORDERED" , DOSEDUE+41, DOSEDUE+43, DOSEDUE+51, DOSEDUE+53 |
| ERXDOSE("DOSE" | DOSEDUE+40, DOSEDUE+43 |
| ERXDOSE("DURATION" | DOSEDUE+61, DOSEDUE+62 |
| ERXDOSE("NOUN" | DOSEDUE+57, DOSEDUE+58 |
| ERXDOSE("ROUTE" | DOSEDUE+59 |
| ERXDOSE("SCHEDULE" | DOSEDUE+60 |
| ERXDOSE("UNITS" | DOSEDUE+44 |
| ERXDOSE("VERB" | DOSEDUE+42, DOSEDUE+52 |
| ERXIEN | DOSEDUE~, DOSEDUE+6, DOSEDUE+35, DOSEDUE+68 |
| ERXLINES | DOSEDUE+4~ |
| ERXLINES( | DOSEDUE+8*, DOSEDUE+10*, DOSEDUE+14*, DOSEDUE+17*, DOSEDUE+19*, DOSEDUE+22*, DOSEDUE+24*, DOSEDUE+27*, DOSEDUE+29*, DOSEDUE+32* , DOSEDUE+33*, DOSEDUE+78, DOSEDUE+79, DOSEDUE+80 |
| >> HIGHLN( | DOSEDUE+10* |
| I | DOSEDUE+4~, DOSEDUE+16*, DOSEDUE+21*, DOSEDUE+26*, DOSEDUE+31*, DOSEDUE+49*, DOSEDUE+50, DOSEDUE+74*, DOSEDUE+75 |
| >> LINE | DOSEDUE+7, DOSEDUE+36 |
| >> LMLINE | DOSEDUE+7*, DOSEDUE+8*, DOSEDUE+10*, DOSEDUE+14*, DOSEDUE+17*, DOSEDUE+19*, DOSEDUE+22*, DOSEDUE+24*, DOSEDUE+27*, DOSEDUE+29* , DOSEDUE+32*, DOSEDUE+33*, DOSEDUE+36*, DOSEDUE+38*, DOSEDUE+39, DOSEDUE+42*, DOSEDUE+46*, DOSEDUE+47, DOSEDUE+48, DOSEDUE+50* , DOSEDUE+52*, DOSEDUE+54*, DOSEDUE+56*, DOSEDUE+58*, DOSEDUE+59*, DOSEDUE+60*, DOSEDUE+63*, DOSEDUE+65*, DOSEDUE+70*, DOSEDUE+71* , DOSEDUE+72, DOSEDUE+75* |
| MODE | DOSEDUE~, DOSEDUE+14, DOSEDUE+17, DOSEDUE+19, DOSEDUE+22, DOSEDUE+24, DOSEDUE+27, DOSEDUE+29, DOSEDUE+32, DOSEDUE+38 , DOSEDUE+39, DOSEDUE+42, DOSEDUE+47, DOSEDUE+48, DOSEDUE+52, DOSEDUE+54, DOSEDUE+56, DOSEDUE+58, DOSEDUE+59, DOSEDUE+60 , DOSEDUE+63, DOSEDUE+65, DOSEDUE+69, DOSEDUE+70, DOSEDUE+71, DOSEDUE+72, DOSEDUE+75, DOSEDUE+82 |
| NEXTE | SAMEDOSE+4~, SAMEDOSE+8*, SAMEDOSE+9, SAMEDOSE+10 |
| NEXTV | SAMEDOSE+4~, SAMEDOSE+9*, SAMEDOSE+10 |
| >> NMSPC | DOSEDUE+82 |
| NPSPC | DOSEDUE~ |
| PDUE | DOSEDUE+4~, DOSEDUE+6, DOSEDUE+9, DOSEDUE+37 |
| PDUE( | DOSEDUE+12, DOSEDUE+13, DOSEDUE+18, DOSEDUE+23, DOSEDUE+28, DOSEDUE+33 |
| REASON | DOSEDUE+4~, DOSEDUE+18*, DOSEDUE+19, DOSEDUE+20, DOSEDUE+21*, DOSEDUE+22 |
| RESULT | DOSEDUE+4~, DOSEDUE+23*, DOSEDUE+24, DOSEDUE+25, DOSEDUE+26*, DOSEDUE+27 |
| RX | SAMEDOSE~, SAMEDOSE+6 |
| SAMEDOSE | SAMEDOSE+4~, SAMEDOSE+7*, SAMEDOSE+8, SAMEDOSE+10*, SAMEDOSE+11 |
| >> UNDERLN( | DOSEDUE+39*, DOSEDUE+48*, DOSEDUE+72* |
| >> VAALLS | DOSEDUE+79* |
| VALINES | DOSEDUE+4~ |
| VALINES( | DOSEDUE+38*, DOSEDUE+42*, DOSEDUE+47*, DOSEDUE+50*, DOSEDUE+52*, DOSEDUE+54*, DOSEDUE+56*, DOSEDUE+58*, DOSEDUE+59*, DOSEDUE+60* , DOSEDUE+63*, DOSEDUE+65*, DOSEDUE+70*, DOSEDUE+71*, DOSEDUE+75*, DOSEDUE+78, DOSEDUE+79, DOSEDUE+81 |
| VAPATINS | DOSEDUE+4~, DOSEDUE+68*, DOSEDUE+69, DOSEDUE+73 |
| VARR | DOSEDUE+73! |
| VARR( | DOSEDUE+74, DOSEDUE+75 |
| VDOSE | SAMEDOSE+4~, SAMEDOSE+6 |
| WRPDOSE | DOSEDUE+4~, DOSEDUE+45 |
| WRPDOSE( | DOSEDUE+49, DOSEDUE+50 |
| WRPDOSE(1 | DOSEDUE+47 |
| XE | DOSEDUE+4~, DOSEDUE+80*, DOSEDUE+82 |
| XEI | DOSEDUE+4~, DOSEDUE+7*, DOSEDUE+8*, DOSEDUE+10*, DOSEDUE+14*, DOSEDUE+17*, DOSEDUE+19*, DOSEDUE+22*, DOSEDUE+24*, DOSEDUE+27* , DOSEDUE+29*, DOSEDUE+32*, DOSEDUE+33* |
| XV | DOSEDUE+4~, DOSEDUE+81*, DOSEDUE+82 |
| XVI | DOSEDUE+4~, DOSEDUE+36*, DOSEDUE+38*, DOSEDUE+42*, DOSEDUE+46*, DOSEDUE+47, DOSEDUE+50*, DOSEDUE+52*, DOSEDUE+54*, DOSEDUE+56* , DOSEDUE+58*, DOSEDUE+59*, DOSEDUE+60*, DOSEDUE+63*, DOSEDUE+65*, DOSEDUE+70*, DOSEDUE+71*, DOSEDUE+75* |
