Routine: DIDX

Information

DIDX ;SFISC/XAK - BRIEF DD ; Jun 22, 2022@09:04:42

Source Information

Source file <DIDX.m>

Call Graph

Call Graph Total: 4

Package	Total	Call Graph
VA FileMan	4	YN^DICN (ND,W)^DID1 (,W)^DIDH W1^DIDH1

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 2

Package	Total	Caller Graph
VA FileMan	2	DID DID1

Entry Points

Name	Comments	DBIA/ICR reference
L
A
B
TYPE
T	;
H	;
RD	;
END
W1
HD
VP	;Variable Pointer
VP0
VP1
VP2
Q
VP3	;p23
RT
AH

External References

Name	Field # of Occurrence
YN^DICN	AH
ND^DID1	VP1+3, RT, RT+1
W^DID1	VP2+1, VP3+1, RT, RT+1
^DIDH	HD
W^DIDH	VP3+2
W1^DIDH1	VP1+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: A+4
Function Call: WRITE	Prompt: !!?Z+Z-2,$P(N,U,1),?30,S,F(Z),",",D1,S,S Line Location: B+1
Function Call: WRITE	Prompt: ?M,$J(+X,8) Line Location: B+2
Function Call: WRITE	Prompt: " WORD-PROCESSING" Line Location: B+2
Function Call: WRITE	Prompt: ?M,S,S Line Location: B+3
Function Call: WRITE	Prompt: I Line Location: B+3
Function Call: WRITE	Prompt: S:W="p" Line Location: B+3
Function Call: WRITE	Prompt: S:W="m" Line Location: B+3
Function Call: WRITE	Prompt: D Line Location: B+3
Function Call: WRITE	Prompt: ! Line Location: H+1
Function Call: WRITE	Prompt: ?(Z*2),^(.1)," ",?M Line Location: H+1
Function Call: WRITE	Prompt: W Line Location: H+2
Function Call: WRITE	Prompt: ?M," "_W,! Line Location: H+2
Function Call: WRITE	Prompt: W Line Location: H+3
Function Call: WRITE	Prompt: ?M Line Location: H+3
Function Call: WRITE	Prompt: !,?$S(IOM-$L(W)-5<M:IOM-5-$L(W),1:M),S Condition for execution: $X+$L(W)+3>IOM Line Location: W1+0
Function Call: WRITE	Prompt: $E(W,1,IOM-$X-1),S Line Location: W1+0
Function Call: WRITE	Prompt: G Line Location: W1+0
Function Call: WRITE	Prompt: ?50,W Line Location: VP+1
Function Call: WRITE	Prompt: W Line Location: VP0+2
Function Call: WRITE	Prompt: !?(Z+Z+12),W Line Location: VP0+2
Function Call: WRITE	Prompt: !?(DDLF-$L(DIVP))+1,DIVP Line Location: VP1+1
Function Call: WRITE	Prompt: !?DDLF,DIVP Line Location: VP1+2
Function Call: WRITE	Prompt: ?(DDLF+5),$P(DIDV,U,3),?(DDLF+10),$P(DIDV,U,4),?(DDLF+23),$P(DIDV,U,6) Line Location: VP1+3
Function Call: WRITE	Prompt: ! Line Location: Q+0
Function Call: WRITE	Prompt: Q Line Location: Q+0
Function Call: WRITE	Prompt: !?(Z+Z+12)," SCREEN EXPLANATION"_$S($D(DINM):" ON FILE "_$P(%,U),1:"")_":" Line Location: VP3+2
Function Call: WRITE	Prompt: D Line Location: VP3+2
Function Call: WRITE	Prompt: ! Line Location: RT+2
Function Call: WRITE	Prompt: !?(Z+Z+12),^(.1)," ",?M Line Location: RT+2
Function Call: WRITE	Prompt: !,"ALPHABETICALLY BY LABEL" Line Location: AH+0
Function Call: WRITE	Prompt: !?5,"Enter YES to list the fields ALPHABETICALLY BY LABEL.",!?5,"Enter NO to list the fields by NUMBER." Line Location: AH+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	A, A+1, A+3, B+1, B+2, H+1, H+3, VP0, VP1, VP2 , RT+2
^DD("KEY" - [#.31]	RT+1
^DI(	TYPE
^DIC - [#1]	TYPE+2, VP1

Label References

Name	Line Occurrences
A	A, END
AH	AH+1
B	DIDX+8
END	B
HD	B+1, W1+1, VP1+3
L	RD+1
Q	VP0+2
RT	VP0+1
VP0	B+3
VP1	VP1+3
VP2	VP1
VP3	VP2
W1	B+3, TYPE, TYPE+5, H+3, RD+1, W1

Naked Globals

Name	Field # of Occurrence
^(	A+1, H+1, VP1, VP2, RT+2
^(0	B+2, TYPE, TYPE+3, VP2
^(1	VP3+1
^(2	VP3+2
^(3	H+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	VP2, VP3+1, VP3+2, AH, AH+1
>> %Y	W1*
>> BY	AH*
>> D0	DIDX+8
>> D1	DIDX+8, A, A+1, A+3, A+4, B, B+1, H+1, H+3, VP+1 , VP0, VP1, VP2
>> DC	HD*
>> DDL1	DIDX+8, RD+1
>> DDL2	DIDX+8, RD+1, VP1+3*
>> DDL3	VP1+3*
>> DDLF	VP1+1*, VP1+2, VP1+3
>> DDRG	DIDX+8*, VP0+1
>> DID	B
DID1	VP0+1*, Q!
DID2	VP0+1, VP1, Q!
DIDV	VP1, VP1+1, VP1+3, VP2+1, Q!
DIDV(	VP1*, VP2+1
DIDVI	VP2*, Q!
>> DIDX	A, AH*
>> DIGR	B
DIMU	VP0+1, VP1+3, VP2, Q!
>> DINM	DIDX+8*, VP3+1, VP3+2
>> DIVP	VP1+1*, VP1+2
>> DJ(	L, A, A+1, A+3*, VP+1, RT+1, RT+2
>> F(	A, A+1, A+3, B+1, H+1, H+3, RD+1*, VP0, VP1, VP2 , RT+1, RT+2
>> I	H+2*
IOM	W1, RT, RT+1
IOSL	B+1, W1+1, VP1+3
>> M	B+1, B+2, B+3, H+1, H+2, H+3, END, W1, VP0+2, VP1+3 , VP2, VP2+1, RT, RT+1, RT+2
>> N	B+1, B+2, TYPE+2, H+2
NM	TYPE+2~*, TYPE+3
>> S	B+1, B+3, W1
U	B+1, B+2, TYPE, TYPE+2, TYPE+3, H+2, END, VP0+2, VP1+1, VP1+3 , VP2, VP2+1, VP3+1, VP3+2, RT, RT+1
>> W	B+3, TYPE, TYPE+3, TYPE+4, T+1, H+2, H+3, RD+1, W1, VP+1 , VP0, VP0+2, VP1+3, VP2+1, Q, VP3+1, VP3+2, RT, RT+1
>> X	B+2, B+3, TYPE, TYPE+1, TYPE+2, H+2, RD+1, END, RT
Y	TYPE+2~, TYPE+3, H+2
>> Z	L, A, A+1, A+3, A+4, B+1, H+1, H+3, RD+1, END , VP+1, VP0, VP0+2, VP1, VP1+1, VP2, VP3+1, VP3+2, RT+1, RT+2

Customize PDF page

Package: VA FileMan