Routine: AUFLD

Package	Total	Call Graph
VA Fileman	2	^%DT ^DIC
Kernel	1	^%ZIS
Uncategorized	1	^%AUQUE

Entry Points

Name	Comments	DBIA/ICR reference
QUEEND
S1
L10
QUE1
L9A
L9B
HEADING
L21
L20
L23
L22
L25
L24
PRQ
UCI
END
L6	;I $D(MGIO) I MGIO=IO K MG,MGIO G S1
L7
L4
L5
L2
L1
L8
L9
QUIT
H2
H3
L5A
L5B
L5C
QUE
PRQ1

External References

Name	Field # of Occurrence
^%AUQUE	QUE
^%DT	UCI+1
^%ZIS	L1+1, L2
^DIC	S1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: S1+0
Function Call: WRITE	Prompt: !! Line Location: L1+1
Function Call: WRITE	Prompt: ! Line Location: L4+0
Function Call: WRITE	Prompt: ?5,D,?15,$P(^DD(DIC,D,0),"^",1) Line Location: L5+0
Function Call: WRITE	Prompt: "/",$P($P(^DD(DIC,D,9.01),"^",2),";",1) Line Location: L5+1
Function Call: WRITE	Prompt: ?45,"DFN,",Q1,?61,Q2,?74,$S(MF["D":"D",MF["P":"P",MF["F":"F",MF["S":"S",MF["W":"W",MF["N":"N",1:"?") Line Location: L5A+0
Function Call: WRITE	Prompt: ?45,"COMP" Line Location: L5B+0
Function Call: WRITE	Prompt: ! Line Location: L5C+0
Function Call: WRITE	Prompt: !,?5,D,?15,$P(^DD(DIC,D,0),"^",1)," (",+MF,")",! Line Location: L7+0
Function Call: WRITE	Prompt: ?7,DD,?17,$P(^DD(+MF,DD,0),"^",1) Line Location: L9+0
Function Call: WRITE	Prompt: ?47,"COMP" Condition for execution: DDD=" " Line Location: L9+0
Function Call: WRITE	Prompt: ?47,"DFN,",GG,",I,",DDD,?63,DDDD,?76,$S(MMF["D":"D",MMF["P":"P",MMF["F":"F",MMF["S":"S",MMF["W":"W",MMF["N":"N",1:"?") Line Location: L9+1
Function Call: WRITE	Prompt: ! Line Location: L9A+0
Function Call: WRITE	Prompt: ?5,D,?15,$P(^DD(DIC,D,0),"^",1)," (cont.)",! Line Location: L9A+0
Function Call: WRITE	Prompt: !,?7,DD,?17,$P(^DD(+MF,DD,0),"^",1)," (",+MMF,")",! Line Location: L20+0
Function Call: WRITE	Prompt: ?9,EE,?19,$P(^DD(+MMF,EE,0),"^",1) Line Location: L22+0
Function Call: WRITE	Prompt: ?49,"COMP" Condition for execution: EEE=" " Line Location: L22+0
Function Call: WRITE	Prompt: " (",+$P(^DD(+MMF,EE,0),"^",2),")",?49,"MUL" Condition for execution: EEEE=0 Line Location: L22+0
Function Call: WRITE	Prompt: ?49,"DFN,",GG,",1,",GGG,",I,",EEE,?67,EEEE,?78,$S(MMMF["D":"D",MMMF["P":"P",MMMF["F":"F",MMMF["S":"S",MMMF["W":"W",MMMF["N":"N",1:"?") Line Location: L22+1
Function Call: WRITE	Prompt: ! Line Location: L23+0
Function Call: WRITE	Prompt: ?5,D,?15,$P(^DD(DIC,D,0),"^",1)," (cont.)",!,?7,DD,?17,$P(^DD(+MF,DD,0),"^",1)," (cont.)",! Line Location: L23+0
Function Call: READ	Prompt: "Press RETURN..." Formatting: ! Timeout: 999 Variable: Y Line Location: HEADING+0
Function Call: WRITE	Prompt: # Line Location: HEADING+1
Function Call: WRITE	Prompt: #,!,TME,?80-$L(TITLE)\2,TITLE,!,?80-$L(^DD("SITE"))\2,^DD("SITE"),! Line Location: HEADING+3
Function Call: WRITE	Prompt: ?80-$L(MG("UCI"))\2,MG("UCI") Line Location: UCI+0
Function Call: WRITE	Prompt: !,?80-$L("as of "_Y)\2,"as of ",Y,!! Line Location: UCI+2
Function Call: WRITE	Prompt: ?80-$L("FILE: "_$P(^DIC(DIC,0),"^",1))\2,"FILE: ",$P(^DIC(DIC,0),"^",1),!,?80-$L("GLOBAL: "_^DIC(DIC,0,"GL"))\2,"GLOBAL: ",^DIC(DIC,0,"GL"),?70,"page ",PG,!,?80-$L("FILE #: "_DIC)\2,"FILE #: ",DIC,! Line Location: H2+0
Function Call: WRITE	Prompt: ?5,"FIELD #",?15,"FIELD NAME",?43,"SUBSCRIPT",?60,"PIECE #",?72,"TYPE",!,"=====1 2 3" Line Location: H3+0
Function Call: WRITE	Prompt: "=" Line Location: H3+0
Function Call: WRITE	Prompt: ! Line Location: H3+1
Routine Call	DIC Line Location: S1
Routine Call	%ZIS Line Location: L1+1 L2

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS("C"	END
^%ZOSF("UCI"	UCI
^%ZTSK - [#14.4]	PRQ, PRQ1!, QUE1*
^DD(	L5, L5+1, L7, L8, L9, L9A, L20, L21, L22, L23
^DD("DD"	UCI+2
^DD("SITE"	HEADING+3
^DIC - [#1]	H2

Label References

Name	Line Occurrences
H2	HEADING+1
HEADING	L2, L5C, L9A, L23
L10	L8
L2	PRQ1, QUE
L20	L8
L21	L24
L23	L22
L25	L21
L5	L5C, L10
L5B	L5A
L5C	L5A
L6	L5
L7	L5
L8	L9B, L25
L9A	L9
QUE	L1
QUIT	S1, QUE
S1	L5C, END, L9A, L23, QUEEND

Naked Globals

Name	Field # of Occurrence
^("DIC"	QUE1*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	QUIT!, UCI+1*
AU	QUIT!
AU("PRINT"	L2, QUE
AU("QUE"	QUE
C	QUIT!
D	L4, L5, L5+1, QUIT!, L7, L9A, L23
DD	QUIT!, L7, L8, L9, L20, L23
DDD	QUIT!, L8*, L9, L9+1
DDDD	QUIT!, L8*, L9+1
DIC	S1, L4, L5, L5+1, QUIT!, L7, L9A, L23, H2, PRQ
DIC(0	S1*
DT	UCI+1*, UCI+2
DUZ	QUE*
DUZ(2	PRQ1*
EE	QUIT!, L20, L21, L22
EEE	QUIT!, L21*, L22, L22+1
EEEE	QUIT!, L21*, L22, L22+1
G	QUIT!, L8*
GEE	QUIT!, L21*
GG	QUIT!, L7*, L9+1, L22+1
GGG	QUIT!, L20*, L22+1
HR	QUIT!, HEADING+2*
I	QUIT!, H3*
IO	L2, QUIT!
IOBS	QUIT!
IOF	END, QUIT!
IOM	QUIT!
ION	QUIT!
IOP	L1+1, L2, QUIT!
IOPAR	QUIT!
IOS	QUIT!
IOSL	L5C, END, QUIT!, L9A, L23, HEADING
IOST	QUIT!
IOT	QUIT!
MF	L5*, L5A, QUIT!, L7, L8, L9, L20, L23
MG	END!, QUIT!
MG("DIC"	S1*, QUE1
MG("PAT"	L4!*, L5+1
MG("UCI"	UCI*
MGIO	L2!*, END!, QUIT!
MIN	QUIT!, HEADING+2*
MMF	QUIT!, L8*, L9+1, L20, L21, L22
MMMF	QUIT!, L21*, L22+1
PG	L2, QUIT!, HEADING, HEADING+1, HEADING+2*, H2
POP	QUIT!
Q	L5*, QUIT!
Q1	L5*, L5A, QUIT!
Q2	L5*, L5A, QUIT!
SK1	L4, L5, QUIT!
SK2	L4, QUIT!, L9
SK3	L4, QUIT!, L22
TITLE	QUIT!, HEADING+2*, HEADING+3
TM	QUIT!, HEADING+2*
TME	QUIT!, HEADING+2*, HEADING+3
U	QUIT!, PRQ1*
USER	QUIT!, HEADING+2*
X	QUIT!, UCI+1*
Y	S1, L5C, QUIT!, L9A, L23, HEADING, UCI, UCI+1, UCI+2
ZTSK	PRQ, PRQ1, QUE1, QUEEND!

Customize PDF page

Package: Utilities

Routine: AUFLD

Information

Source Information

Call Graph

Call Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: