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

Package: IHS Changes To ADT

Routine: ADGCEN20


Information

ADGCEN20 ; IHS/ADC/PDW/ENM - CENSUS AID-LIST BY TX (PRINT) ; [ 03/25/1999 11:48 AM ]

Source Information

Source file <ADGCEN20.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
IHS Changes To ADT 1 TIME^ADGUTIL  
Kernel 1 ^%ZISC  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Changes To ADT 1 ADGCEN2  

Entry Points

Name Comments DBIA/ICR reference
A1
END1
HEAD ;***> subrtn to print heading
END
NEWPG ;***> subrtn for end of page control

External References

Name Field # of Occurrence
^%ZISC END1+3
TIME^ADGUTIL HEAD+3
^DIR END, NEWPG+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$E(DGDT,4,5)_"/"_$E(DGDT,6,7)_"/"_$E(DGDT,2,3)
  • Line Location: A1+7
Function Call: WRITE
  • Prompt: ?17,$P(DGSTR,U,3-DGAGE),?27,$P(DGSTR,U,5-DGAGE)
  • Line Location: A1+8
Function Call: WRITE
  • Prompt: ?37,$P(DGSTR,U,6-DGAGE),?48,$P(DGSTR,U,4-DGAGE)
  • Line Location: A1+9
Function Call: WRITE
  • Prompt: ?58,$P(DGSTR,U,7-DGAGE),?69,$P(DGSTR,U,2-DGAGE)
  • Line Location: A1+10
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !,DGDUZ,?80-$L(DGSITE)/2,DGSITE
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: ?80-$L(DGX)/2,DGX
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: !,Y
  • Line Location: HEAD+4
Function Call: WRITE
  • Prompt: ?80-$L(DGTL)/2,DGTL,?70,"Page: ",DGPAGE
  • Line Location: HEAD+5
Function Call: WRITE
  • Prompt: !,DGLIN
  • Line Location: HEAD+6
Function Call: WRITE
  • Prompt: !,"Date",?15,"Admits",?25,"Trans In",?35,"Trans Out"
  • Line Location: HEAD+7
Function Call: WRITE
  • Prompt: ?46,"Disch",?55,"Deaths",?65,"Remaining"
  • Line Location: HEAD+8
Function Call: WRITE
  • Prompt: !,DGLIN,!
  • Line Location: HEAD+9
Routine Call
  • DIR
  • Line Location:
    • END
    • NEWPG+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ADGTX - [#9009011.5] A1, A1+2, A1+6
^DD("DD" HEAD+4
^DIC(4 - [#4] ADGCEN20+4
^DIC(45.7 - [#45.7] ADGCEN20+5
^VA(200 - [#200] ADGCEN20+4

Label References

Name Line Occurrences
A1 A1+12
END A1, A1+2
END1 A1+11
HEAD ADGCEN20+9, NEWPG+1, NEWPG+3
NEWPG A1+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DGAGE ADGCEN20+6, A1+2, A1+6, A1+8, A1+9, A1+10, END1+1!
DGBDT ADGCEN20+9, END1+1!
DGDT ADGCEN20+9*, A1*, A1+2, A1+4, A1+6, A1+7, END1+1!
DGDUZ ADGCEN20+4*, END1+2!, HEAD+2
DGEDT A1, END1+1!
DGLIN END1+1!, HEAD+6*, HEAD+9*
DGPAGE ADGCEN20+4*, END1+1!, HEAD+1, HEAD+2*, HEAD+5
DGSITE ADGCEN20+4*, END1+1!, HEAD+2
DGSRV ADGCEN20+5, A1, A1+2, A1+6, END1+1!
DGSTOP A1+11, END1+2!, NEWPG+1*, NEWPG+2*, NEWPG+3
DGSTR A1+6*, A1+8, A1+9, A1+10, END1+2!
DGTL ADGCEN20+5*, END1+2!, HEAD+5
DGTYP ADGCEN20+6*, END1+2!, HEAD+3
DGX END1+1!, HEAD+3*
DIR END!, END1+2!, NEWPG+2!
DIR(0 END*, NEWPG+2*
DT HEAD+4
DUZ ADGCEN20+4
DUZ(2 ADGCEN20+4
IOF HEAD+1
IOSL A1+11
IOST END, NEWPG+1, HEAD+1
U ADGCEN20+4, ADGCEN20+5, A1+8, A1+9, A1+10, A1+11, NEWPG+3
X END1+2!, NEWPG+2
Y END1+2!, HEAD+4*
>> ZTQUEUED END1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All