Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Local Variables  | All
Print Page as PDF
Routine: PSOERUT7

Package: Outpatient Pharmacy

Routine: PSOERUT7


Information

PSOERUT7 ;ALB/MFR - eRx Drug Validation (VD) Utilities; 06/25/2023 5:14pm

Source Information

Source file <PSOERUT7.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Outpatient Pharmacy 5 WRAP^PSOERUT  ($$COMPARE,ADDLINE)^PSOERUT0  ($$FREQ,ERXDOSE,VARXDOSE)^PSOERUT4  $$PRESOLV^PSOERXA1  PDUEDATA^PSOERXU9  
VA FileMan 1 $$GET1^DIQ  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Outpatient Pharmacy 2 PSOERUT  PSOERUT2  

Entry Points

Name Comments DBIA/ICR reference
DOSEDUE(MODE,NPSPC,ERXIEN,SDERXFLG) ; 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)
; (o)SDERXFLG - Single eRx View/Display Flag - 1: Single eRx View/Display side-by-side | 0: Existing Functionality
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)

External References

Name Field # of Occurrence
$$GET1^DIQ DOSEDUE+19, DOSEDUE+24, DOSEDUE+45, DOSEDUE+69
WRAP^PSOERUT DOSEDUE+46, DOSEDUE+74
$$COMPARE^PSOERUT0 DOSEDUE+15, DOSEDUE+18, DOSEDUE+20, DOSEDUE+23, DOSEDUE+25, DOSEDUE+28, DOSEDUE+30, DOSEDUE+33, DOSEDUE+43, DOSEDUE+48
, DOSEDUE+51, DOSEDUE+53, DOSEDUE+55, DOSEDUE+57, DOSEDUE+59, DOSEDUE+60, DOSEDUE+61, DOSEDUE+64, DOSEDUE+66, DOSEDUE+76
ADDLINE^PSOERUT0 DOSEDUE+83
$$FREQ^PSOERUT4 DOSEDUE+64
ERXDOSE^PSOERUT4 DOSEDUE+36, SAMEDOSE+5
VARXDOSE^PSOERUT4 SAMEDOSE+6
$$PRESOLV^PSOERXA1 DOSEDUE+19, DOSEDUE+24
PDUEDATA^PSOERXU9 DOSEDUE+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(50.607 - [#50.607] GET1^DIQ
^PS(52.45 - [#52.45] GET1^DIQ
^PS(52.49 - [#52.49] GET1^DIQ

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACK DOSEDUE+5~, DOSEDUE+29*, DOSEDUE+30, DOSEDUE+31, DOSEDUE+32*, DOSEDUE+33
>> ALLLN DOSEDUE+79*, DOSEDUE+80, DOSEDUE+81, DOSEDUE+82
COAGENT DOSEDUE+5~, DOSEDUE+14*, DOSEDUE+15, DOSEDUE+16, DOSEDUE+17*, DOSEDUE+18
DISPUNTS DOSEDUE+5~, DOSEDUE+54*, DOSEDUE+55, DOSEDUE+56, DOSEDUE+57
DOSE DOSEDUE+5~, DOSEDUE+41*, DOSEDUE+42, DOSEDUE+43, DOSEDUE+44, DOSEDUE+45, DOSEDUE+48, DOSEDUE+49, DOSEDUE+52, DOSEDUE+53
, DOSEDUE+54, DOSEDUE+58, DOSEDUE+59, DOSEDUE+60, DOSEDUE+61, DOSEDUE+62, DOSEDUE+63, DOSEDUE+65, DOSEDUE+66
DOSEX DOSEDUE+5~, DOSEDUE+44*, DOSEDUE+45*, DOSEDUE+46
DUESEQ DOSEDUE+5~, DOSEDUE+13*, DOSEDUE+14, DOSEDUE+19, DOSEDUE+24, DOSEDUE+29, DOSEDUE+34
DUR DOSEDUE+63~*, DOSEDUE+64
EDOSE SAMEDOSE+4~, SAMEDOSE+5
ERX SAMEDOSE~, SAMEDOSE+5
>> ERXALLS DOSEDUE+80*
ERXDOSE DOSEDUE+5~, DOSEDUE+36, DOSEDUE+38
ERXDOSE("CONJUNCTION" DOSEDUE+65, DOSEDUE+66
ERXDOSE("DOSE ORDERED" , DOSEDUE+42, DOSEDUE+44, DOSEDUE+52, DOSEDUE+54
ERXDOSE("DOSE" DOSEDUE+41, DOSEDUE+44
ERXDOSE("DURATION" DOSEDUE+62, DOSEDUE+63
ERXDOSE("NOUN" DOSEDUE+58, DOSEDUE+59
ERXDOSE("ROUTE" DOSEDUE+60
ERXDOSE("SCHEDULE" DOSEDUE+61
ERXDOSE("UNITS" DOSEDUE+45
ERXDOSE("VERB" DOSEDUE+43, DOSEDUE+53
ERXIEN DOSEDUE~, DOSEDUE+7, DOSEDUE+36, DOSEDUE+69
ERXLINES DOSEDUE+5~
ERXLINES( DOSEDUE+9*, DOSEDUE+11*, DOSEDUE+15*, DOSEDUE+18*, DOSEDUE+20*, DOSEDUE+23*, DOSEDUE+25*, DOSEDUE+28*, DOSEDUE+30*, DOSEDUE+33*
, DOSEDUE+34*, DOSEDUE+79, DOSEDUE+80, DOSEDUE+81
>> HIGHLN( DOSEDUE+11*
I DOSEDUE+5~, DOSEDUE+17*, DOSEDUE+22*, DOSEDUE+27*, DOSEDUE+32*, DOSEDUE+50*, DOSEDUE+51, DOSEDUE+75*, DOSEDUE+76
>> LINE DOSEDUE+8, DOSEDUE+37
>> LMLINE DOSEDUE+8*, DOSEDUE+9*, DOSEDUE+11*, DOSEDUE+15*, DOSEDUE+18*, DOSEDUE+20*, DOSEDUE+23*, DOSEDUE+25*, DOSEDUE+28*, DOSEDUE+30*
, DOSEDUE+33*, DOSEDUE+34*, DOSEDUE+37*, DOSEDUE+39*, DOSEDUE+40, DOSEDUE+43*, DOSEDUE+47*, DOSEDUE+48, DOSEDUE+49, DOSEDUE+51*
, DOSEDUE+53*, DOSEDUE+55*, DOSEDUE+57*, DOSEDUE+59*, DOSEDUE+60*, DOSEDUE+61*, DOSEDUE+64*, DOSEDUE+66*, DOSEDUE+71*, DOSEDUE+72*
, DOSEDUE+73, DOSEDUE+76*
MODE DOSEDUE~, DOSEDUE+15, DOSEDUE+18, DOSEDUE+20, DOSEDUE+23, DOSEDUE+25, DOSEDUE+28, DOSEDUE+30, DOSEDUE+33, DOSEDUE+39
, DOSEDUE+40, DOSEDUE+43, DOSEDUE+48, DOSEDUE+49, DOSEDUE+53, DOSEDUE+55, DOSEDUE+57, DOSEDUE+59, DOSEDUE+60, DOSEDUE+61
, DOSEDUE+64, DOSEDUE+66, DOSEDUE+70, DOSEDUE+71, DOSEDUE+72, DOSEDUE+73, DOSEDUE+76, DOSEDUE+83
NEXTE SAMEDOSE+4~, SAMEDOSE+8*, SAMEDOSE+9, SAMEDOSE+10
NEXTV SAMEDOSE+4~, SAMEDOSE+9*, SAMEDOSE+10
>> NMSPC DOSEDUE+83
NPSPC DOSEDUE~
PDUE DOSEDUE+5~, DOSEDUE+7, DOSEDUE+10, DOSEDUE+38
PDUE( DOSEDUE+13, DOSEDUE+14, DOSEDUE+19, DOSEDUE+24, DOSEDUE+29, DOSEDUE+34
REASON DOSEDUE+5~, DOSEDUE+19*, DOSEDUE+20, DOSEDUE+21, DOSEDUE+22*, DOSEDUE+23
RESULT DOSEDUE+5~, DOSEDUE+24*, DOSEDUE+25, DOSEDUE+26, DOSEDUE+27*, DOSEDUE+28
RX SAMEDOSE~, SAMEDOSE+6
SAMEDOSE SAMEDOSE+4~, SAMEDOSE+7*, SAMEDOSE+8, SAMEDOSE+10*, SAMEDOSE+11
SDERXFLG DOSEDUE~, DOSEDUE+39, DOSEDUE+40, DOSEDUE+48, DOSEDUE+49, DOSEDUE+71, DOSEDUE+72, DOSEDUE+73
>> UNDERLN( DOSEDUE+40*, DOSEDUE+49*, DOSEDUE+73*
>> VAALLS DOSEDUE+80*
VALINES DOSEDUE+5~
VALINES( DOSEDUE+39*, DOSEDUE+43*, DOSEDUE+48*, DOSEDUE+51*, DOSEDUE+53*, DOSEDUE+55*, DOSEDUE+57*, DOSEDUE+59*, DOSEDUE+60*, DOSEDUE+61*
, DOSEDUE+64*, DOSEDUE+66*, DOSEDUE+71*, DOSEDUE+72*, DOSEDUE+76*, DOSEDUE+79, DOSEDUE+80, DOSEDUE+82
VAPATINS DOSEDUE+5~, DOSEDUE+69*, DOSEDUE+70, DOSEDUE+74
VARR DOSEDUE+74!
VARR( DOSEDUE+75, DOSEDUE+76
VDOSE SAMEDOSE+4~, SAMEDOSE+6
WRPDOSE DOSEDUE+5~, DOSEDUE+46
WRPDOSE( DOSEDUE+50, DOSEDUE+51
WRPDOSE(1 DOSEDUE+48
XE DOSEDUE+5~, DOSEDUE+81*, DOSEDUE+83
XEI DOSEDUE+5~, DOSEDUE+8*, DOSEDUE+9*, DOSEDUE+11*, DOSEDUE+15*, DOSEDUE+18*, DOSEDUE+20*, DOSEDUE+23*, DOSEDUE+25*, DOSEDUE+28*
, DOSEDUE+30*, DOSEDUE+33*, DOSEDUE+34*
XV DOSEDUE+5~, DOSEDUE+82*, DOSEDUE+83
XVI DOSEDUE+5~, DOSEDUE+37*, DOSEDUE+39*, DOSEDUE+43*, DOSEDUE+47*, DOSEDUE+48, DOSEDUE+51*, DOSEDUE+53*, DOSEDUE+55*, DOSEDUE+57*
, DOSEDUE+59*, DOSEDUE+60*, DOSEDUE+61*, DOSEDUE+64*, DOSEDUE+66*, DOSEDUE+71*, DOSEDUE+72*, DOSEDUE+76*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Local Variables  | All