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

Package: Outpatient Pharmacy

Routine: PSOMGREP


Information

PSOMGREP ;BHAM ISC/JMB - DAILY MANAGEMENT REPORT ; 3/30/93

Source Information

Source file <PSOMGREP.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Outpatient Pharmacy 4 (EN,ENQ)^PSOMGRP1  EN^PSOMGRP2  EN^PSOMGRP3  EN^PSOMGRP4  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 3 (,DD)^%DT  ^DIC  ^DIR  

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Outpatient Pharmacy 5 PSO MGMT REPORT IV  PSO MGMT REPORT RX COSTS  PSO MGMT REPORT RX COUNTS  PSO MGMT REPORT TYPE OF RX  PSO MGMT REPORTS ALL DAILY  

Entry Points

Name Comments DBIA/ICR reference
DISP
SDT
END
PRTDV
PAP
BEG
IV
QUE
EDT

External References

Name Field # of Occurrence
^%DT SDT, EDT
DD^%DT BEG, IV+2
^%ZIS QUE, QUE+1
^%ZISC END
^%ZTLOAD QUE+3
^DIC PRTDV+2
^DIR PRTDV+1
EN^PSOMGRP1 QUE+4
ENQ^PSOMGRP1 QUE+4
EN^PSOMGRP2 QUE+4
EN^PSOMGRP3 QUE+4
EN^PSOMGRP4 QUE+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?13,$C(7),$C(7),"**There is no prescription data available to print.**",!?8,"Use the Date Range Compile data option to make the data available."
  • Line Location: DISP+1
Function Call: WRITE
  • Prompt: !!?18,$C(7),$C(7),"**There is no IV data available to print.**"
  • Line Location: DISP+3
Function Call: WRITE
  • Prompt: !!,"There is no prescription and IV data available to print."
  • Line Location: DISP+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRTDV+0
Function Call: WRITE
  • Prompt: !
  • Line Location: PRTDV+2
Function Call: WRITE
  • Prompt: !!,"PLEASE PRINT ON WIDE PAPER, I.E., 132 COLUMNS."
  • Line Location: PAP+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: SDT+0
Function Call: WRITE
  • Prompt: !!,$C(7),"Data available to print starts with "_PSDT_".",!
  • Line Location: SDT+1
Function Call: WRITE
  • Prompt: !!,$C(7),"Data available to print starts with "_PIVSDT_".",!
  • Line Location: SDT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EDT+0
Function Call: WRITE
  • Prompt: $C(7)," INVALID ENDING DATE ???"
  • Line Location: EDT+0
Function Call: WRITE
  • Prompt: !!?5,$C(7),$C(7),"**There is no prescription data between "_SDATE_" and "_EDATE_".**",!?7,"Use the Date Range Compile data option to make the data available."
  • Line Location: EDT+2
Function Call: WRITE
  • Prompt: !,$C(7),$C(7),"Report not Queued!"
  • Line Location: QUE+1
Routine Call
  • DIC
  • Line Location:
    • PRTDV+2
Routine Call
  • DIR
  • Line Location:
    • PRTDV+1
Routine Call
  • %ZIS
  • Line Location:
    • QUE
    • QUE+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" EDT+1
^PS(50.8 - [#50.8] IV, IV+1
^PS(59 - [#59] DISP+6
^PS(59.12 - [#59.12] BEG, EDT+1

Label References

Name Line Occurrences
DISP IV, IV+2
EDT EDT
END BEG, DISP+1, DISP+3, DISP+4, PRTDV+2, SDT, EDT, EDT+2, QUE+1, QUE+3
IV BEG
PAP DISP+5
PRTDV PRTDV+2, SDT+3
SDT SDT+1, SDT+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% END+1!
%DT SDT*, QUE!, QUE+3!, END+1!
%DT("A" SDT*, EDT*
%DT(0 SDT*
%ZIS QUE!*
%ZIS("B" QUE*
ANS DISP+5*, PRTDV*, PRTDV+1*, PRTDV+2, END+1!
BEG END+1!
CNT END+1!
DIC PRTDV+2*!
DIC("A" PRTDV+2*
DIC(0 PRTDV+2*
DIR PRTDV+1!, END+1!
DIR("?" PRTDV*
DIR("??" PRTDV+1*
DIR("A" PRTDV*
DIR(0 PRTDV*
DIRUT PRTDV+1, END+1!
DIV DISP+6*, PRTDV*, PRTDV+2*, END+1!
DT SDT
DTOUT PRTDV+2, END+1!
DUOUT PRTDV+2, END+1!
DV DISP+6*, PRTDV, END+1!
DVCNT DISP+6*, PRTDV, PRTDV+2, QUE!, QUE+2!
DVMN END+1!
EDATE EDT+1*, EDT+2, END+1!
EDT EDT*, EDT+1, END+1!
END END+1!
FND EDT+1*, END+1!
G QUE+2*, QUE+3!, END+1!
I END+1!
IEN IV+1*, END+1!
IO QUE+1
IO("Q" QUE+2, QUE+3!
ION QUE
IOP QUE!, QUE+1*!
IVE END+1!
IVS IV+1*, END+1!
IVSDT IV+1*, IV+2, DISP+2, DISP+3!, DISP+4, SDT+2
K END+1!
M1 END+1!
M2 END+1!
M3 END+1!
OK IV*, DISP!
OUT PRTDV+1!*, PRTDV+2, END+1!
PDATE END+1!
PG END+1!
PIVSDT IV+2*, DISP+2, SDT+2, END+1!
POP QUE+1, END+1!
PRT END+1!
PRV END+1!
PSDT BEG*, DISP, SDT+1, END+1!
PSOION QUE!*, QUE+1!, END+1!
RUN BEG, DISP, DISP+1, DISP+3, DISP+5, SDT+1, SDT+2, EDT+1, QUE+2, QUE+4
, END+1!
S1 END+1!
S2 END+1!
S3 END+1!
SDATE EDT+1*, EDT+2, END+1!
SDT BEG*, DISP, DISP+1!, DISP+4, SDT+1, SDT+3*, EDT, EDT+1, END+1!
T1 END+1!
T2 END+1!
T3 END+1!
X SDT, EDT, QUE+3!, END+1!
Y BEG*, IV+2*, PRTDV+1, PRTDV+2, SDT+1, SDT+2, SDT+3, EDT, EDT+1*, QUE+3!
, END+1!
ZTDESC QUE+2*, END+1!
>> ZTQUEUED END
>> ZTREQ END*
ZTRTN QUE+2*, END+1!
ZTSAVE END+1!
ZTSAVE( QUE+2*
ZTSK QUE!, QUE+3, END+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All