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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSSMRRI

Package: Pharmacy Data Management

Routine: PSSMRRI


Information

PSSMRRI ;ALB/DRP PRINT MRR ITEMS ;06/18/15

Source Information

Source file <PSSMRRI.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 2 (CLOSE,OPEN)^%ZISUTL  ($$FMTE,$$NOW)^XLFDT  
VA FileMan 1 ^DIR  

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: 1

Package Total Caller Graph
Pharmacy Data Management 1 PSS MRR ORDERABLE ITEMS RPT  

Entry Points

Name Comments DBIA/ICR reference
INIT ;
MAIN ;
ASKUSR ; Prompt user for inout values
HELP ;
Q23 ;
GET50P7 ;
PRNHDR ; Heading
PRNLN ;Write line on report
PAUSE

External References

Name Field # of Occurrence
CLOSE^%ZISUTL MAIN+8
OPEN^%ZISUTL MAIN+3
^DIR ASKUSR+4, ASKUSR+10
$$FMTE^XLFDT PRNHDR+4, PRNLN+4
$$NOW^XLFDT PRNHDR+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Nothing queued to print.",!
  • Line Location: MAIN+3
Function Call: WRITE
  • Prompt: !!,"Nothing queued to print.",!
  • Line Location: ASKUSR+4
Function Call: WRITE
  • Prompt: $C(7),!!?3,"This report is designed for 132 column output!",!
  • Line Location: ASKUSR+12
Function Call: WRITE
  • Prompt: !,"Enter 'A' to run report for all Orderable Items. Enter '1, 2 or 3'"
  • Line Location: Q23+1
Function Call: WRITE
  • Prompt: !,"to show only the selected values."
  • Line Location: Q23+2
Function Call: WRITE
  • Prompt: !," Select one of the following:"
  • Line Location: Q23+3
Function Call: WRITE
  • Prompt: !," A ALL"
  • Line Location: Q23+4
Function Call: WRITE
  • Prompt: !," 1 Removal at Next Administration"
  • Line Location: Q23+5
Function Call: WRITE
  • Prompt: !," 2 Removal Period Optional Prior to Next Administration"
  • Line Location: Q23+6
Function Call: WRITE
  • Prompt: !," 3 Removal Period Required Prior to Next Administration",!
  • Line Location: Q23+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRNHDR+3
Function Call: WRITE
  • Prompt: !,?57,$E($$FMTE^XLFDT($$NOW^XLFDT),1,18)
  • Line Location: PRNHDR+4
Function Call: WRITE
  • Prompt: !,?19,"Orderable Items Report on Medications Requiring Removal (MRR) Prompt for Removal in BCMA Value",?125,"Page ",PAGNO
  • Line Location: PRNHDR+5
Function Call: WRITE
  • Prompt: !,?5,"ORDERABLE ITEM OI INACTIVE MRR DISPENSE DRUG (DD) DD INACTIVE"
  • Line Location: PRNHDR+6
Function Call: WRITE
  • Prompt: !,?5,"NAME - DOSAGE FORM DATE VAL NAME DATE "
  • Line Location: PRNHDR+7
Function Call: WRITE
  • Prompt: !,?5,"------------------------------ ------------ --- ------------------------------ -----------"
  • Line Location: PRNHDR+8
Function Call: WRITE
  • Prompt: !,?5,$E(PSSDRGP_PSSSPCE,1,30)_" "_$E($$FMTE^XLFDT(PSSINACTP,5)_PSSSPCE,1,12)_" "_$E(PSSMRRP_PSSSPCE,1,3)_" "_$E(PSSDDRG_PSSSPCE,1,30)_" "_$E($$FMTE^XLFDT(PSSDSGI,5)_PSSSPCE,1,12)
  • Line Location: PRNLN+4
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue, '^' to exit"
  • Line Location: PAUSE+2
Function Call: READ
  • Variable: X
  • Timeout: $G(DTIME)
  • Line Location: PAUSE+3
Routine Call
  • DIR
  • Line Location:
    • ASKUSR+4
    • ASKUSR+10

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(50.606 - [#50.606] GET50P7+9
^PS(50.7 - [#50.7] GET50P7+2, GET50P7+4, GET50P7+6, GET50P7+7, GET50P7+8, GET50P7+10
^PSDRUG - [#50] GET50P7+11

Label References

Name Line Occurrences
ASKUSR MAIN+1, ASKUSR+10
GET50P7 MAIN+6
MAIN INIT+4
PAUSE PRNLN+5
PRNHDR MAIN+6, PRNLN+5
PRNLN GET50P7+12
Q23 HELP+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR ASKUSR+1!, ASKUSR+4!, ASKUSR+10!
DIR("?" ASKUSR+3*
DIR("??" ASKUSR+3*
DIR("A" ASKUSR+2*, ASKUSR+10*
DIR("B" ASKUSR+2*, ASKUSR+10*
DIR("L" HELP+3*
DIR(0 ASKUSR+2*, ASKUSR+10*
DTIME PAUSE+3
DTOUT INIT+5!, ASKUSR+4
DUOUT INIT+5!, ASKUSR+4
IO MAIN+5, PAUSE+4
IO(0 PAUSE+2
IOF PRNHDR+3
IOSL PRNLN+5
IOST MAIN+4
PAGNO INIT+1~, INIT+3*, PRNHDR+2*, PRNHDR+5
POP INIT+5!, MAIN+3
PSSDDIEN INIT+1~, GET50P7+9*, GET50P7+10*, GET50P7+11
PSSDDRG INIT+1~, GET50P7+11*, PRNLN+4
PSSDRG INIT+1~, GET50P7+1*, GET50P7+2*, GET50P7+4, GET50P7+6, GET50P7+9*, PRNLN+2, PRNLN+3
PSSDRGP PRNLN+1~, PRNLN+2*, PRNLN+3*, PRNLN+4
PSSDRGS INIT+1~, GET50P7+1*, PRNLN+2, PRNLN+3*
PSSDSG INIT+1~, GET50P7+3*, GET50P7+4*, GET50P7+6, GET50P7+9
PSSDSGF INIT+1~, GET50P7+9*
PSSDSGI INIT+1~, GET50P7+11*, PRNLN+4
PSSINACT INIT+1~, GET50P7+8*, PRNLN+3
PSSINACTP PRNLN+1~, PRNLN+2*, PRNLN+3*, PRNLN+4
PSSINACTS INIT+1~
PSSLN INIT+1~
PSSMRR INIT+1~, GET50P7+7*, GET50P7+8, PRNLN+3
PSSMRRP PRNLN+1~, PRNLN+2*, PRNLN+3*, PRNLN+4
PSSOIEN INIT+1~, GET50P7+5*, GET50P7+6*, GET50P7+7, GET50P7+8, GET50P7+10
PSSQ INIT+2~, INIT+3*, MAIN+1, ASKUSR+4*, GET50P7+2, GET50P7+4, GET50P7+6, GET50P7+10, PRNHDR+1, PAUSE+3*
PSSSPCE INIT+1~, INIT+3*, PRNLN+4
PSSVAL INIT+2~, ASKUSR+5*, ASKUSR+6, ASKUSR+7, ASKUSR+8, ASKUSR+9, ASKUSR+11*, GET50P7+8
TERM INIT+2~, MAIN+4*, PRNLN+5, PAUSE
U GET50P7+8, GET50P7+9
X ASKUSR+5, HELP+1, HELP+3*, PAUSE+1~, PAUSE+3*
Y INIT+5!, ASKUSR+4, ASKUSR+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All