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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables |  All
Print Page as PDF
Routine: BDGCEN10

Package: IHS Changes To ADT

Routine: BDGCEN10


Information

BDGCEN10 ; IHS/ANMC/LJF - CENSUS AID-LIST BY WARD&SRV ; [ 08/20/2004 11:41 AM ]

Source Information

Source file <BDGCEN10.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 2 ($$FMTE,$$NOW)^XLFDT  $$REPEAT^XLFSTR  
IHS Changes To ADT 1 $$TIME^BDGF  
VA Fileman 1 $$GET1^DIQ  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Changes To ADT 1 BDGCEN1  

Entry Points

Name Comments DBIA/ICR reference
HEAD ;EP; -- subrtn to print heading
; DGPAGE is set in calling routine

External References

Name Field # of Occurrence
$$TIME^BDGF HEAD+9
$$GET1^DIQ HEAD+3, HEAD+4, HEAD+8
$$FMTE^XLFDT BDGCEN10+13, HEAD+13
$$NOW^XLFDT HEAD+9
$$REPEAT^XLFSTR HEAD+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"NO CENSUS DATA FOR THIS SERVICE FOR ",$$FMTE^XLFDT(DGDT),!!
  • Line Location: BDGCEN10+13
Function Call: WRITE
  • Prompt: !,$E(DGDT,4,5)_"/"_$E(DGDT,6,7)_"/"_$E(DGDT,2,3)
  • Line Location: BDGCEN10+16
Function Call: WRITE
  • Prompt: ?17,$P(DGSTR,U,3+ADJ),?27,$P(DGSTR,U,5+ADJ)
  • Line Location: BDGCEN10+17
Function Call: WRITE
  • Prompt: ?37,$P(DGSTR,U,6+ADJ),?48,$P(DGSTR,U,4+ADJ)
  • Line Location: BDGCEN10+18
Function Call: WRITE
  • Prompt: ?58,$P(DGSTR,U,7+ADJ),?69,$P(DGSTR,U,2+ADJ)
  • Line Location: BDGCEN10+19
Function Call: WRITE
  • Prompt: !,$$GET1^DIQ(200,DUZ,2),?80-$L(SITE)/2,SITE
  • Line Location: HEAD+8
Function Call: WRITE
  • Prompt: !,$$TIME^BDGF($$NOW^XLFDT)
  • Line Location: HEAD+9
Function Call: WRITE
  • Prompt: ?80-$L(X)/2,X
  • Line Location: HEAD+12
Function Call: WRITE
  • Prompt: !,$$FMTE^XLFDT(DT),?80-$L(TITLE)/2,TITLE,?70,"Page: ",DGPAGE
  • Line Location: HEAD+13
Function Call: WRITE
  • Prompt: !,LINE,!,"Date",?15,"Admits",?25,"Trans In",?35,"Trans Out"
  • Line Location: HEAD+14
Function Call: WRITE
  • Prompt: ?46,"Disch",?55,"Deaths",?65,"Remaining",!,LINE,!
  • Line Location: HEAD+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^DIC(4 - [#4] GET1^DIQ
^DIC(42 - [#42] GET1^DIQ
^DIC(45.7 - [#45.7] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BDGCWD - [#9009016.2] BDGCEN10+10, BDGCEN10+12, BDGCEN10+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADJ BDGCEN10+3~, BDGCEN10+6*, BDGCEN10+17, BDGCEN10+18, BDGCEN10+19
>> BDGAGE BDGCEN10+6, HEAD+11
>> BDGBD BDGCEN10+9
>> BDGED BDGCEN10+10
>> BDGTX BDGCEN10+12, BDGCEN10+15, HEAD+4
>> BDGWD BDGCEN10+10, BDGCEN10+12, BDGCEN10+15, HEAD+4
DGDT BDGCEN10+3~, BDGCEN10+9*, BDGCEN10+10*, BDGCEN10+12, BDGCEN10+13, BDGCEN10+15, BDGCEN10+16
>> DGPAGE HEAD+7*, HEAD+13
DGSTR BDGCEN10+3~, BDGCEN10+15*, BDGCEN10+17, BDGCEN10+18, BDGCEN10+19
DT HEAD+13
DUZ HEAD+8
DUZ(2 HEAD+3
IOF HEAD+7
LINE HEAD+2~, HEAD+3*, HEAD+14, HEAD+15
SERV HEAD+2~, HEAD+4*, HEAD+5
SITE HEAD+2~, HEAD+3*, HEAD+8
TITLE HEAD+2~, HEAD+5*, HEAD+13
U BDGCEN10+17, BDGCEN10+18, BDGCEN10+19
WARD HEAD+2~, HEAD+4*, HEAD+5
X HEAD+2~, HEAD+11*, HEAD+12
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables |  All