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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSUPR6

Package: Pharmacy Benefits Management

Routine: PSUPR6


Information

PSUPR6 ;BIR/PDW - PBM Procurement Printer Controller ;25 AUG 1998

Source Information

Source file <PSUPR6.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Pharmacy Benefits Management 1 PSUPR0  

Entry Points

Name Comments DBIA/ICR reference
DIVISION ;EP loop by divisions
EN ;EP for printing reports
CATRPT ;
; Printing Device should be opened by PSUDBQUE by now & IO set
DRUGRPT ; Print Drug Summary
PG ;EP Page controller
REPORT ;EP Perform Prints Category & Drug for Division
PGHDR ; Write Page Header (SUBJECT of MAILMESSAGE)

External References

Name Field # of Occurrence
^DIR PG+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CATRPT+2
Function Call: WRITE
  • Prompt: !,X
  • Line Location: CATRPT+3
Function Call: WRITE
  • Prompt: !,?60,"PAGE: 1"
  • Line Location: CATRPT+3
Function Call: WRITE
  • Prompt: !!,@IOF
  • Line Location: CATRPT+4
Function Call: WRITE
  • Prompt: !,X
  • Line Location: DRUGRPT+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DRUGRPT+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PG+5
Function Call: WRITE
  • Prompt: !,^XTMP(PSUPRSUB,"REPORT2",PSUDIV,I)
  • Line Location: PGHDR+2
Function Call: WRITE
  • Prompt: !,?60,"PAGE: ",PSUPG("PG")
  • Line Location: PGHDR+3
Function Call: WRITE
  • Prompt: !,^(I)
  • Line Location: PGHDR+4
Routine Call
  • DIR
  • Line Location:
    • PG+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^XTMP( DIVISION+1, CATRPT+3, DRUGRPT+1, DRUGRPT+3, PGHDR+1, PGHDR+2, PGHDR+4

Label References

Name Line Occurrences
PG DRUGRPT+3
PGHDR DRUGRPT+2
REPORT DIVISION+1

Naked Globals

Name Field # of Occurrence
^( CATRPT+3, DRUGRPT+3, PGHDR+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR PG+4!
DIR(0 PG+4*
>> DIROUT PG+4
>> DROUT PG+4
>> DTOUT PG+4
>> DUOUT PG+4
>> I PGHDR+2*, PGHDR+4*
IO CATRPT+2, CATRPT+3, CATRPT+4, DRUGRPT+3, PG+5
IOF CATRPT+2, CATRPT+4, DRUGRPT+4, PG+5
IOSL DRUGRPT+3, PG+2
IOST PG+4
>> L CATRPT+3*, DRUGRPT+3*
>> PSUDIV DIVISION+1*, CATRPT+3, DRUGRPT+1, DRUGRPT+3, PGHDR+1, PGHDR+2, PGHDR+4
>> PSUJOB EN+3
>> PSUPG EN+2*
>> PSUPG("PG" DRUGRPT+2*, PG+3*, PGHDR+3
>> PSUPRJOB EN+3*, EN+4
>> PSUPRSUB EN+4*, DIVISION+1, CATRPT+3, DRUGRPT+1, DRUGRPT+3, PGHDR+1, PGHDR+2, PGHDR+4
PSUQUIT EN+1~, DRUGRPT+3, PG+1*, PG+4*
>> X CATRPT+3*, DRUGRPT+3*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All