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 |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSARDCRP

Package: Drug Accountability

Routine: PSARDCRP


Information

PSARDCRP ;BIRM/JMC - Return Drug Credit Report User Input Parameter ;06/04/08

Source Information

Source file <PSARDCRP.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Drug Accountability 3 ^PSARDCRD  ^PSARDCRS  ($$CHKEY,$$DTRNG,$$EXCEL,$$PHLOC,$$STASEL)^PSARDCUT  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
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
Drug Accountability 1 PSA RET DRG REPORT  

Entry Points

Name Comments DBIA/ICR reference
DEVICE ; - Select Device
EXIT
DETSUM() ; Detailed or Summary report type selection.

External References

Name Field # of Occurrence
^%ZIS DEVICE+1
^%ZISC EXIT
^%ZTLOAD DEVICE+7
^DIR DEVICE+2, DEVICE+8, DEVICE+13, DETSUM+2
^PSARDCRD DEVICE+11
^PSARDCRS DEVICE+10
$$CHKEY^PSARDCUT PSARDCRP+3
$$DTRNG^PSARDCUT PSARDCRP+10
$$EXCEL^PSARDCUT PSARDCRP+21
$$PHLOC^PSARDCUT PSARDCRP+7
$$STASEL^PSARDCUT PSARDCRP+14

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PSARDCRP+10
Function Call: WRITE
  • Prompt: !
  • Line Location: PSARDCRP+14
Function Call: WRITE
  • Prompt: !
  • Line Location: PSARDCRP+18
Function Call: WRITE
  • Prompt: !
  • Line Location: PSARDCRP+21
Function Call: WRITE
  • Prompt: !
  • Line Location: DEVICE+1
Function Call: WRITE
  • Prompt: !!,"No device selected. Exiting...",!!
  • Line Location: DEVICE+2
Function Call: WRITE
  • Prompt: !
  • Line Location: DEVICE+2
Function Call: WRITE
  • Prompt: !,"Report is Queued to print as Task #: ",ZTSK,!!
  • Line Location: DEVICE+8
Function Call: WRITE
  • Prompt: !
  • Line Location: DEVICE+8
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+1
Routine Call
  • DIR
  • Line Location:
    • DEVICE+2
    • DEVICE+8
    • DEVICE+13
    • DETSUM+2

Label References

Name Line Occurrences
$$DETSUM PSARDCRP+18
EXIT DEVICE+1, DEVICE+3, DEVICE+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEVICE+1!*, EXIT+1!
DIR PSARDCRP+4~, DEVICE+2!, DEVICE+8!, DEVICE+13!, DETSUM+1!, DETSUM+2!
DIR("?" DETSUM+2*
DIR("A" DETSUM+1*
DIR("B" DETSUM+1*
DIR(0 DEVICE+2*, DEVICE+8*, DEVICE+13*, DETSUM+1*
DIRUT PSARDCRP+4~, PSARDCRP+7, PSARDCRP+10, PSARDCRP+14, PSARDCRP+18, PSARDCRP+21, DEVICE+12, DETSUM+3
DTOUT PSARDCRP+4~
DUOUT PSARDCRP+4~, DEVICE+12
G DEVICE+4~, DEVICE+6*
IO EXIT
IO("Q" DEVICE+3, EXIT+1!
IO(0 EXIT
IOP DEVICE+1!
IOST DEVICE+13
POP DEVICE+1!
PSABASTS PSARDCRP+4~, PSARDCRP+14*, PSARDCRP+15*
PSADTRNG PSARDCRP+4~, PSARDCRP+10*, PSARDCRP+11
PSAEXCEL PSARDCRP+5~, PSARDCRP+21*
PSAPHLOC PSARDCRP+4~, PSARDCRP+7*
PSARDRBD PSARDCRP+4~, PSARDCRP+11*
PSARDRED PSARDCRP+4~, PSARDCRP+11*
PSARDRT PSARDCRP+5~
>> PSARDRTP PSARDCRP+18*, DEVICE+5, DEVICE+10, DEVICE+11
X EXIT+1!
Y EXIT+1!, DETSUM+4
>> ZTDESC DEVICE+5*
ZTDTH DEVICE+4!, EXIT+1!
ZTIO DEVICE+4!, EXIT+1!
>> ZTRTN DEVICE+5*
ZTSAVE DEVICE+4!, EXIT+1!
ZTSAVE( DEVICE+6*
ZTSK DEVICE+1!, DEVICE+4!, DEVICE+8, EXIT+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables  | All