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

Package: Registration

Routine: DGSCHAD2


Information

DGSCHAD2 ;ALB/MRL - SCHEDULED ADMISSIONS STATISTICS ; 06 MAY 87

Source Information

Source file <DGSCHAD2.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 3 ^%DT  C^%DTC  DT^DICRW  
Registration 2 DIV^DGUTL  (CLOSE,ZIS)^DGUTQ  
Kernel 1 ^%ZIS  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Registration 2 DG SCHED ADMIT STATS  DGSCHAD3  

Entry Points

Name Comments DBIA/ICR reference
SET
OLD
DTOT
F
H
S1
Q
S
W
W1

External References

Name Field # of Occurrence
^%DT F, F+1
C^%DTC S+2
^%ZIS S
DIV^DGUTL S+2
CLOSE^DGUTQ Q
ZIS^DGUTQ F+2
DT^DICRW S, OLD

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,"*** Margin width for this report is 132 ***"
  • Line Location: F+2
Function Call: WRITE
  • Prompt: !
  • Line Location: S+5
Function Call: WRITE
  • Prompt: !
  • Line Location: S+5
Function Call: WRITE
  • Prompt: !
  • Line Location: DTOT+0
Function Call: WRITE
  • Prompt: !,X
  • Line Location: S1+0
Function Call: WRITE
  • Prompt: !,X1
  • Line Location: S1+0
Function Call: WRITE
  • Prompt: DGL,!,$S(DGW=1:"SUB-",1:"DIVISION "),"TOTAL"
  • Line Location: W1+0
Function Call: WRITE
  • Prompt: ?35,$J(+$P(DGD,"^",1),9),?47,$J(+$P(DGD,"^",2),9),?72,$J(+$P(DGD,"^",11),5),?82,$J(+$P(DGD,"^",12),5),?93,$J(+$P(DGD,"^",13),5),?108,$J(+$P(DGD,"^",14),5),?123,$J(+$P(DGD,"^",15),5)
  • Line Location: W1+1
Function Call: WRITE
  • Prompt: @IOF,!,DGDIV_", "_DGHD,?112,DGPR,!!?75," C A N C E L L A T I O N R E A S O N"
  • Line Location: H+0
Function Call: WRITE
  • Prompt: !?70,X,!?35,"TOTAL",?47,"TOTAL",?70,"|",?93,"REFUSED",?108,"NO BEDS"
  • Line Location: H+0
Function Call: WRITE
  • Prompt: !,"WARD/TREATING SPECIALTY",?35,"SCHEDULED",?47,"CANCELLED",?70,"| EXPIRED",?82,"OVERDUE",?93,"ADMISSION",?108,"AVAILABLE",?123,"OTHER",!
  • Line Location: H+1
Function Call: WRITE
  • Prompt: "="
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !!,"OLDEST SCHEDULED ADMISSION ON FILE IS FOR ",Y,"."
  • Line Location: OLD+0
Function Call: WRITE
  • Prompt: !!,"NO SCHEDULED ADMISSIONS ON FILE!!",*7
  • Line Location: OLD+1
Routine Call
  • %ZIS
  • Line Location:
    • S

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" F+1, S, S+1, OLD
^DG(40.8 - [#40.8] SET
^DGS(41.1 - [#41.1] S+3, OLD
^DIC(42 - [#42] SET+1
^DIC(45.7 - [#45.7] SET+1
^UTILITY($J S!, S+4, S+5, DTOT, S1, SET+2, SET+4*, SET+5*, SET+6*, Q!

Label References

Name Line Occurrences
DTOT S+5
H S+5, W
OLD DGSCHAD2+2
Q DGSCHAD2+2, F, F+1, F+2, S+4, S+6
S1 S+5
SET S+3
W S1
W1 S+5, DTOT

Naked Globals

Name Field # of Occurrence
^( S1, SET+2*
^(0 S+3, SET, SET+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT F*!, F+1*!, Q!
%DT("A" F*, F+1*
%DT("B" F*, F+1*
%DT(0 F+1*
DGD S+3*, S+5*, DTOT*, S1*, SET, SET+1, SET+3, W1+1, Q!
DGDIV S+2*, S+5*, DTOT, S1, SET, H, Q!
DGDIV1 SET*, SET+2, SET+4, SET+5, SET+6, Q!
DGERR DGSCHAD2+2, OLD*, OLD+1*, Q!
DGFR F*, F+1, S+1, S+2*, S+3*, Q!
DGHD S+1*, H, Q!
DGHOW S+5*, S1, SET*, SET+2, SET+4, SET+5, Q!
DGHOW1 S+5*, S1*, SET+1*, SET+2, SET+4, W1+1, Q!
DGL W1*, H+1*, Q!
DGOLD F, OLD*, Q!
DGOLD1 F+1, OLD*, Q!
DGPGM F+2*, Q!
DGPR S*, H, Q!
DGST SET+4*, SET+5*, SET+6*, Q!
DGTO F+1*, S+1, S+2*, S+3, Q!
DGVAR F+2*, Q!
DGW S*, S+5*, DTOT*, W1, W1+1*, Q!
DT F+1, S, OLD
I S+3*, S+5*, Q!
I1 S+3*, S+5*, Q!
I2 S1*, Q!
IO F+2
IOF S, H
IOP S*!
IOSL W
>> POP F+2
U S*
X S+2, S1*, SET+3*, SET+4, SET+5, SET+6, H*, Q!
X1 S+2*, S1*, SET+3*, SET+4, SET+5, SET+6, Q!
X2 S+2*, SET+3*, SET+4, SET+5, SET+6, Q!
Y F, F+1*, S*, S+1*, OLD*, Q!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All