Routine: FHINIT1

Package	Total	Call Graph
VA Fileman	6	WAIT^DICD YN^DICN DT^DICRW IXALL^DIK I^DITR EN^DIU2

Package	Total	Caller Graph
Dietetics	1	FHINIT

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"SHALL I WRITE OVER FILE SECURITY CODES" Line Location: ASK+0
Function Call: WRITE	Prompt: !!,"ARE YOU SURE EVERYTHING'S OK" Line Location: ASK+2
Function Call: WRITE	Prompt: "." Line Location: ASK+5
Function Call: WRITE	Prompt: !?6,"Answer YES to replace the current "_Y_"S with the incoming ones." Line Location: W+1

FileNo	Call Tags
^DIC - [#1]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DD(	IX
^DIC - [#1]	IX+2
^UTILITY(	ASK+4!, ASK+6, DATA, DATA+1, DATA+2!
^UTILITY("DIK"	ASK+4!

Name	Field # of Occurrence
^(	ASK+6!, DATA+1, IX!
^(0	DATA+1

Name	Field # of Occurrence
%	FHINIT1+4, FHINIT1+5, ASK, ASK+2, W+1, W+2, IX*, N~
D	FHINIT1+4!, ASK+6, DATA, DATA+1, IX, IX+1, IX+2
D0	FHINIT1+4!, DATA+1*
DA	FHINIT1+4!
DA(1	IX+1*
DDF	FHINIT1+4!, DATA+2!
DDF(1	DATA*, DATA+1, DATA+2
DDT	FHINIT1+4!, DATA+2!
DDT(0	DATA*
DFN	DATA+2!
DFR	FHINIT1+4!, DATA+2!
DFR(1	DATA+1*
DIC	FHINIT1+4!
>> DIDIU	ASK+3*
DIDUZ	FHINIT1+4!
DIF	FHINIT1+4!
>> DIFKEP	ASK+3
>> DIFKEP(	ASK+3
DIFQ	FHINIT1+5!, ASK!, ASK+1, ASK+2!, W+2!
DIFQ(	ASK+6, W+2*
DIFQ(0	ASK, W
>> DIFQR(	DATA+1
DIK	FHINIT1+4!, IX, IX+1, IX+2*
DIR	FHINIT1+4!
>> DIU	ASK+3*
>> DIU(0	ASK+3*
DIX	FHINIT1+4!
>> DKP	DATA+1*
DLAYGO	FHINIT1+4!
>> DMRG	DATA+1*
>> DN	ASK+5*
>> DSEC	FHINIT1+4, ASK
DTN	FHINIT1+4!, DATA+2!
DTO	FHINIT1+4!, DATA+1*, DATA+2!
DTO(0	DATA+1*
DZ	FHINIT1+4!
>> NO	FHINIT1+5*
>> R	ASK+5*
U	FHINIT1+4*, FHINIT1+5, ASK+4, ASK+6, DATA, DATA+1, DATA+2
X	ASK+1*, W+2, B36~
>> Y	W*, W+1
>> Z	DATA+1*

Name	Field # of Occurrence
$T(@X	W

Information