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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BEXRQUE

Package: IHS Pharmacy Auto Refill System

Routine: BEXRQUE


Information

BEXRQUE ;IHS/CMI/DAY - BEX - Refill Queue Report ; 05 Oct 2015 10:51 AM

Source Information

Source file <BEXRQUE.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA Fileman 3 ^DIC  $$GET1^DIQ  ^DIR  
IHS VA Utilities 2 ^XBDBQUE  EN^XBVK  
IHS Patient 1 $$HRN^AUPNPAT  
IHS Pharmacy Auto Refill System 1 ($$CHECK,CHANGE,HOLD)^BEXSITE  

Entry Points

Name Comments DBIA/ICR reference
EOJ ;EP - End of Job Processing
LIST ;EP - Entry Point from XBDBQUE
DETAIL ;EP - Write Detail for each Record and Add up totals
HEADER ;EP - Write the Header

External References

Name Field # of Occurrence
$$HRN^AUPNPAT DETAIL+28, DETAIL+29
$$CHECK^BEXSITE EOJ+8
CHANGE^BEXSITE BEXRQUE+21, EOJ+13
HOLD^BEXSITE BEXRQUE+18
^DIC BEXRQUE+36
$$GET1^DIQ LIST+59, HEADER+7, DETAIL+20, DETAIL+33, DETAIL+50, DETAIL+55, DETAIL+58
^DIR BEXRQUE+51, BEXRQUE+64, EOJ+4, LIST+90, DETAIL+67
^XBDBQUE BEXRQUE+76
EN^XBVK EOJ+19

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: #
  • Line Location: BEXRQUE+8
Function Call: WRITE
  • Prompt: !,"Refill Queue Report"
  • Line Location: BEXRQUE+10
Function Call: WRITE
  • Prompt: !
  • Line Location: BEXRQUE+11
Function Call: WRITE
  • Prompt: !,"This option prints a list of entries in the Refill Queue."
  • Line Location: BEXRQUE+12
Function Call: WRITE
  • Prompt: !
  • Line Location: BEXRQUE+13
Function Call: WRITE
  • Prompt: !,"Press Enter to select ALL Outpatient Sites, or"
  • Line Location: BEXRQUE+30
Function Call: WRITE
  • Prompt: !
  • Line Location: BEXRQUE+46
Function Call: WRITE
  • Prompt: !
  • Line Location: BEXRQUE+60
Function Call: WRITE
  • Prompt: !
  • Line Location: BEXRQUE+72
Function Call: WRITE
  • Prompt: !
  • Line Location: EOJ+4
Function Call: WRITE
  • Prompt: #
  • Line Location: LIST+5
Function Call: WRITE
  • Prompt: #
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !,"REPORT: Refill Queue Report"
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: " for "
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: $$GET1^DIQ(59,$O(BEXOPSIT(0)),.01)
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: "all Divisions"
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: "selected Divisions"
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: !,"DATE RUN: "
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: Y
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: !,"PARAMETERS: "
  • Line Location: HEADER+11
Function Call: WRITE
  • Prompt: "Both Processed and Unprocessed Entries"
  • Line Location: HEADER+14
Function Call: WRITE
  • Prompt: "Unprocessed Entries"
  • Line Location: HEADER+15
Function Call: WRITE
  • Prompt: ", Window Only"
  • Line Location: HEADER+16
Function Call: WRITE
  • Prompt: ", Local Mail Only"
  • Line Location: HEADER+17
Function Call: WRITE
  • Prompt: ", Mail (CMOP) Only"
  • Line Location: HEADER+18
Function Call: WRITE
  • Prompt: ", Alpha within W/L/M"
  • Line Location: HEADER+19
Function Call: WRITE
  • Prompt: ", Internal Sort"
  • Line Location: HEADER+20
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+22
Function Call: WRITE
  • Prompt: "-------------------------------------------------------------------------------"
  • Line Location: HEADER+23
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+24
Function Call: WRITE
  • Prompt: "Name"
  • Line Location: HEADER+25
Function Call: WRITE
  • Prompt: ?21,"Chart"
  • Line Location: HEADER+26
Function Call: WRITE
  • Prompt: ?30,"RX #"
  • Line Location: HEADER+27
Function Call: WRITE
  • Prompt: ?37,"M/W"
  • Line Location: HEADER+28
Function Call: WRITE
  • Prompt: ?42,"LFill"
  • Line Location: HEADER+29
Function Call: WRITE
  • Prompt: ?49,"Drug"
  • Line Location: HEADER+30
Function Call: WRITE
  • Prompt: ?74,"DEA"
  • Line Location: HEADER+31
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+33
Function Call: WRITE
  • Prompt: "-------------------------------------------------------------------------------"
  • Line Location: HEADER+34
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+35
Function Call: WRITE
  • Prompt: Y
  • Line Location: DETAIL+22
Function Call: WRITE
  • Prompt: ?20,$J(Y,6)
  • Line Location: DETAIL+30
Function Call: WRITE
  • Prompt: ?28,$J(+BEXRXNUM,8)
  • Line Location: DETAIL+35
Function Call: WRITE
  • Prompt: Y
  • Line Location: DETAIL+36
Function Call: WRITE
  • Prompt: ?39,"W"
  • Line Location: DETAIL+39
Function Call: WRITE
  • Prompt: ?39,"L"
  • Line Location: DETAIL+40
Function Call: WRITE
  • Prompt: ?39,"M"
  • Line Location: DETAIL+41
Function Call: WRITE
  • Prompt: ?42,Y
  • Line Location: DETAIL+47
Function Call: WRITE
  • Prompt: ?49,Y
  • Line Location: DETAIL+52
Function Call: WRITE
  • Prompt: ?74,Y
  • Line Location: DETAIL+62
Function Call: WRITE
  • Prompt: !
  • Line Location: DETAIL+64
Routine Call
  • DIC
  • Line Location:
    • BEXRQUE+36
Routine Call
  • DIR
  • Line Location:
    • BEXRQUE+51
    • BEXRQUE+64
    • EOJ+4
    • LIST+90
    • DETAIL+67

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^PSDRUG - [#50] GET1^DIQ
^PSRX - [#52] GET1^DIQ
^PS(59 - [#59] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS("C" EOJ+3
^BEXUTL($J EOJ+18!, LIST+8!, LIST+63*, LIST+68, LIST+71, LIST+74, LIST+77, LIST+79, LIST+80
^DD("DD" HEADER+10
^PS(59 - [#59] DETAIL+27
^PSRX - [#52] LIST+29, LIST+31, LIST+32, LIST+40, DETAIL+45
^VEXHRX(19080 LIST+19, LIST+22, LIST+36

Label References

Name Line Occurrences
DETAIL LIST+82
EOJ BEXRQUE+53
HEADER LIST+6, LIST+92, DETAIL+69

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BEX EOJ+17!
>> BEXDRIEN DETAIL+55*, DETAIL+57, DETAIL+58
>> BEXEXIT BEXRQUE+28*, BEXRQUE+38*, BEXRQUE+44, EOJ+4, LIST+15*, LIST+19, LIST+22, LIST+68, LIST+71, LIST+74
, LIST+77, LIST+87, LIST+90*, LIST+91, LIST+95, DETAIL+68*
>> BEXFILL LIST+40*, LIST+41, LIST+42
>> BEXIEN LIST+21*, LIST+22*, LIST+24, LIST+25, LIST+36
>> BEXINST DETAIL+27*, DETAIL+28
>> BEXMAIL LIST+36*, LIST+37*, LIST+45, LIST+46, LIST+47, LIST+48, LIST+49, LIST+50, LIST+53, LIST+54
, LIST+55, LIST+63, LIST+80*, DETAIL+13, DETAIL+14, DETAIL+15, DETAIL+39, DETAIL+40, DETAIL+41
>> BEXOPIEN LIST+28*, LIST+29*, LIST+32*, LIST+33, LIST+34, LIST+63, LIST+67*, LIST+68*, LIST+71, LIST+74
, LIST+77, LIST+79, LIST+80, DETAIL+26, DETAIL+27
BEXOPSIT BEXRQUE+25!, BEXRQUE+26*, BEXRQUE+41*, LIST+33, LIST+34, HEADER+7, HEADER+8, HEADER+9
BEXOPSIT( BEXRQUE+42*, LIST+34
BEXOPSIT(0 HEADER+7
>> BEXPAT LIST+59*, LIST+60*, LIST+61*, LIST+63, LIST+73*, LIST+74*, LIST+77, LIST+79, LIST+80
>> BEXPTIEN LIST+24*, LIST+59, LIST+61, LIST+63, LIST+79*, DETAIL+20, DETAIL+28, DETAIL+29
>> BEXQUIT BEXRQUE+27*, BEXRQUE+31, BEXRQUE+38*, BEXRQUE+39*, LIST+14*, LIST+19, LIST+22
>> BEXRFIEN LIST+30*, LIST+31*, LIST+32
>> BEXRTYPE BEXRQUE+58*, LIST+41, LIST+42, HEADER+14, HEADER+15
>> BEXRXIEN LIST+25*, LIST+29, LIST+31, LIST+32, LIST+40, LIST+63, LIST+76*, LIST+77*, LIST+79, LIST+80
, DETAIL+33, DETAIL+45, DETAIL+50, DETAIL+55
>> BEXRXNUM DETAIL+33*, DETAIL+35, DETAIL+36
>> BEXSAME BEXRQUE+54*, BEXRQUE+55*, LIST+56, LIST+61, HEADER+19, HEADER+20
>> BEXSITE LIST+18*, LIST+19*, LIST+22, LIST+36
>> BEXSORT LIST+53*, LIST+54*, LIST+55*, LIST+56*, LIST+63, LIST+70*, LIST+71*, LIST+74, LIST+77, LIST+79
, LIST+80
BEXSUM LIST+11!, LIST+12*
BEXTOT LIST+9!, LIST+10*, LIST+97, LIST+101, DETAIL+4*
BEXTOT("L" LIST+99, DETAIL+8*, DETAIL+14*
BEXTOT("M" LIST+100, DETAIL+7*, DETAIL+15*
BEXTOT("W" LIST+98, DETAIL+9*, DETAIL+13*
>> BEXWIND BEXRQUE+67*, LIST+45, LIST+46, LIST+47, LIST+48, LIST+49, LIST+50, HEADER+16, HEADER+17, HEADER+18
DA BEXRQUE+32!, BEXRQUE+37!, EOJ+20!
DD BEXRQUE+32!, BEXRQUE+37!, EOJ+20!
DIC BEXRQUE+32!, BEXRQUE+35*, BEXRQUE+37!, EOJ+20!
DIC("A" BEXRQUE+34*
DIC(0 BEXRQUE+33*
DIE BEXRQUE+32!, BEXRQUE+37!, EOJ+20!
DIR BEXRQUE+32!, BEXRQUE+37!, BEXRQUE+47!, BEXRQUE+52!, BEXRQUE+61!, BEXRQUE+65!, BEXRQUE+66!, EOJ+4!, EOJ+20!, LIST+90!
, DETAIL+67!
DIR("A" BEXRQUE+48*, BEXRQUE+63*
DIR("B" BEXRQUE+50*
DIR(0 BEXRQUE+49*, BEXRQUE+62*, EOJ+4*, LIST+90*, DETAIL+67*
DIRUT BEXRQUE+47!, BEXRQUE+53!, BEXRQUE+61!, BEXRQUE+65!
DO BEXRQUE+32!, BEXRQUE+37!
DR BEXRQUE+32!, BEXRQUE+37!, EOJ+20!
DT LIST+41, LIST+42, HEADER+10
DUOUT BEXRQUE+32!, BEXRQUE+38!
DUZ(2 DETAIL+29
IO LIST+4, HEADER+3, DETAIL+3
IOSL LIST+89, DETAIL+66
IOST EOJ+4, LIST+90, DETAIL+67
U LIST+29, LIST+32, LIST+36, LIST+40, LIST+63, LIST+79, LIST+80, DETAIL+27, DETAIL+45
>> X BEXRQUE+39, LIST+90, DETAIL+58*, DETAIL+59, DETAIL+60, DETAIL+61, DETAIL+68
>> XBNS BEXRQUE+75*
>> XBRP BEXRQUE+73*
>> XBRX BEXRQUE+74*
>> Y BEXRQUE+40, BEXRQUE+42, BEXRQUE+54, BEXRQUE+55, BEXRQUE+67, HEADER+10*, DETAIL+20*, DETAIL+21*, DETAIL+22, DETAIL+25*
, DETAIL+28*, DETAIL+29*, DETAIL+30, DETAIL+36*, DETAIL+45*, DETAIL+46*, DETAIL+47, DETAIL+50*, DETAIL+51*, DETAIL+52
, DETAIL+56*, DETAIL+59*, DETAIL+60*, DETAIL+61*, DETAIL+62
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All