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

Package: Dietetics

Routine: FHADR3A


Information

FHADR3A ; HISC/NCA - Facility Workload ;6/18/93 11:30

Source Information

Source file <FHADR3A.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Dietetics 1 (HDR,Q2)^FHADRPT  
VA Fileman 1 (C,COMMA)^%DTC  

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Dietetics 6 FHADR2  FHADR4  FHADR5  FHADR6  FHADR61  FHADRPT  

Entry Points

Name Comments DBIA/ICR reference
EN2 ; Calculate Inpats Days of Care and Outpats treated in
; Hosp & Sat Clinics
HDR2 ; Print Heading for Workload Statistics
HDR1 ; Print heading for Facility Workload

External References

Name Field # of Occurrence
C^%DTC EN2+18
COMMA^%DTC EN2+46, EN2+47, EN2+49, EN2+50, EN2+52, EN2+53, EN2+55, EN2+56, EN2+58, EN2+59
, EN2+62, EN2+63, EN2+66, EN2+67, EN2+71, EN2+72, EN2+74, EN2+75
HDR^FHADRPT EN2+68, HDR1+1, HDR2+1
Q2^FHADRPT EN2+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?15,"Hospital ",?61
  • Line Location: EN2+45
Function Call: WRITE
  • Prompt: X
  • Line Location: EN2+46
Function Call: WRITE
  • Prompt: ?112,X
  • Line Location: EN2+47
Function Call: WRITE
  • Prompt: !,?15,"Nursing Home ",?61
  • Line Location: EN2+48
Function Call: WRITE
  • Prompt: X
  • Line Location: EN2+49
Function Call: WRITE
  • Prompt: ?112,X
  • Line Location: EN2+50
Function Call: WRITE
  • Prompt: !,?15,"Domicillary ",?61
  • Line Location: EN2+51
Function Call: WRITE
  • Prompt: X
  • Line Location: EN2+52
Function Call: WRITE
  • Prompt: ?112,X
  • Line Location: EN2+53
Function Call: WRITE
  • Prompt: !,?15,"Total Inpatient Days ",?61
  • Line Location: EN2+54
Function Call: WRITE
  • Prompt: X
  • Line Location: EN2+55
Function Call: WRITE
  • Prompt: ?112,X
  • Line Location: EN2+56
Function Call: WRITE
  • Prompt: !!!,?13,"OUTPATIENTS TREATED",!?15,"Hospital Clinic ",?61
  • Line Location: EN2+57
Function Call: WRITE
  • Prompt: X
  • Line Location: EN2+58
Function Call: WRITE
  • Prompt: ?112,X
  • Line Location: EN2+59
Function Call: WRITE
  • Prompt: X
  • Line Location: EN2+62
Function Call: WRITE
  • Prompt: ?112,X
  • Line Location: EN2+63
Function Call: WRITE
  • Prompt: !,?15,"Total Outpatients Treated ",?61
  • Line Location: EN2+65
Function Call: WRITE
  • Prompt: X
  • Line Location: EN2+66
Function Call: WRITE
  • Prompt: ?112,X
  • Line Location: EN2+67
Function Call: WRITE
  • Prompt: !!!!?13,"SERVED MEALS SUMMARY",!!?65,"1st Qtr 2nd Qtr 3rd Qtr 4th Qtr Yearly"
  • Line Location: EN2+69
Function Call: WRITE
  • Prompt: !!?15,"Total Served Meals",?61
  • Line Location: EN2+70
Function Call: WRITE
  • Prompt: X
  • Line Location: EN2+71
Function Call: WRITE
  • Prompt: ?112,X
  • Line Location: EN2+72
Function Call: WRITE
  • Prompt: !,?15,"Average Daily Meals",?61
  • Line Location: EN2+73
Function Call: WRITE
  • Prompt: X
  • Line Location: EN2+74
Function Call: WRITE
  • Prompt: ?112,X
  • Line Location: EN2+75
Function Call: WRITE
  • Prompt: !!!?13,"S E C T I O N II F A C I L I T Y W O R K L O A D S T A T I S T I C S"
  • Line Location: HDR1+2
Function Call: WRITE
  • Prompt: !!!!,?13,"INPATIENT DAYS OF CARE"
  • Line Location: HDR1+3
Function Call: WRITE
  • Prompt: ?65,"1st Qtr 2nd Qtr 3rd Qtr 4th Qtr YTD Total"
  • Line Location: HDR1+3
Function Call: WRITE
  • Prompt: !!!!!!?13,"S E C T I O N III D I E T E T I C W O R K L O A D S T A T I S T I C S"
  • Line Location: HDR2+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(117 - [#117] EN2+9
^FH(117.3 - [#117.3] EN2+28*, EN2+29, EN2+34, EN2+35

Label References

Name Line Occurrences
HDR1 EN2+44
HDR2 EN2+68

Naked Globals

Name Field # of Occurrence
^( EN2+35
^(1 EN2+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AMS EN2+2!*, EN2+74*
>> CT EN2+60*, EN2+61
>> CTR EN2+34*
>> D1 EN2+8*, EN2+9, EN2+18, EN2+19*
>> EDT EN2+5, EN2+8
>> FHYR EN2+4
>> FIN EN2+44*, EN2+46*, EN2+47*, EN2+49*, EN2+50*, EN2+52*, EN2+53*, EN2+58*, EN2+59*, EN2+66*
, EN2+67*, EN2+71*, EN2+72, EN2+73*, EN2+74*, EN2+75
>> FTO EN2+44*, EN2+47*, EN2+50*, EN2+53*, EN2+56
>> I EN2+46*, EN2+49*, EN2+52*, EN2+55*, EN2+58*, EN2+66*, EN2+71*, EN2+74*
>> J EN2+62*
>> K EN2+2*, EN2+3*, EN2+6*, EN2+11*, EN2+12*, EN2+60*
>> L EN2+11*, EN2+12*
>> L1 EN2+8*
>> LIN EN2+68, HDR1+1, HDR2+1
N EN2+6!, EN2+76!
N( EN2+6*, EN2+11*, EN2+12*
N(1 EN2+13, EN2+15
N(10 EN2+14*, EN2+16
N(11 EN2+14
N(12 EN2+14
N(13 EN2+14
N(14 EN2+14
N(15 EN2+14
N(16 EN2+14
N(17 EN2+16*, EN2+22, EN2+28
N(18 EN2+16*, EN2+21, EN2+25
N(19 EN2+17*, EN2+21, EN2+24
N(2 EN2+13, EN2+15
N(20 EN2+17*, EN2+21, EN2+23
N(21 EN2+21*, EN2+26
N(22 EN2+15*, EN2+16
N(23 EN2+15*, EN2+17
N(24 EN2+15*, EN2+17
N(3 EN2+13*, EN2+14
N(4 EN2+13, EN2+15
N(5 EN2+13, EN2+15
N(6 EN2+13*, EN2+14
N(7 EN2+13, EN2+15
N(8 EN2+13, EN2+15
N(9 EN2+13*, EN2+14
>> NUM EN2+33*, EN2+34, EN2+35*
>> PRE EN2+4*, EN2+28, EN2+29, EN2+34, EN2+35
>> QR EN2+4*
>> QTR EN2+4*, EN2+22, EN2+23, EN2+24, EN2+25, EN2+26, EN2+27, EN2+30, EN2+32, EN2+38
, EN2+41
>> S EN2+6*, EN2+10*, EN2+27
>> SAT EN2+36*, EN2+37, EN2+38, EN2+39
>> SDT EN2+5, EN2+8
>> STR EN2+29*, EN2+30, EN2+31, EN2+32, EN2+33
>> STR1 EN2+7*, EN2+35*, EN2+36, EN2+38, EN2+39, EN2+40, EN2+41
T1 EN2+2!, EN2+76!
T1( EN2+2*, EN2+22*, EN2+23*, EN2+24*, EN2+25*, EN2+26*, EN2+46, EN2+49, EN2+52, EN2+55
, EN2+71, EN2+74
T1(5 EN2+30*, EN2+31*, EN2+40*, EN2+58
T1(6 EN2+32*, EN2+41*, EN2+66
T2 EN2+2!, EN2+76!
T2( EN2+37*, EN2+38*, EN2+39*, EN2+60, EN2+62, EN2+63
TD EN2+2!, EN2+76!
TD( EN2+3*, EN2+27*, EN2+74
>> X EN2+8, EN2+19, EN2+46*, EN2+47*, EN2+49*, EN2+50*, EN2+52*, EN2+53*, EN2+55*, EN2+56*
, EN2+58*, EN2+59*, EN2+62*, EN2+63*, EN2+66*, EN2+67*, EN2+71*, EN2+72*, EN2+74*, EN2+75*
>> X1 EN2+18*
>> X2 EN2+18*, EN2+46*, EN2+47*, EN2+49*, EN2+50*, EN2+52*, EN2+53*, EN2+55*, EN2+56*, EN2+58*
, EN2+59*, EN2+62*, EN2+63*, EN2+66*, EN2+67*, EN2+71*, EN2+72*, EN2+74*, EN2+75*
>> Y0 EN2+9*, EN2+10, EN2+11
>> Y1 EN2+9*, EN2+12
>> YD EN2+44*, EN2+74*, EN2+75
>> Z EN2+60*, EN2+61, EN2+62, EN2+63
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All