Routine: FHADR3A

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

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

Customize PDF page

Package: Dietetics

Routine: FHADR3A

Information

Source Information

Call Graph

Call Graph Total: 2

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: