Routine: XQSMDFM

Package	Total	Call Graph
VA Fileman	3	^DIC ^DIE ^DIR
Kernel	1	($$TYPE,ASKOPT,DELETE,NAMESP,NODEL)^XQSMD4

Entry Points

Name	Comments	DBIA/ICR reference
AGAIN	;
E	; Edit
D	; Delete
P	; Print
RULES	;
CRE8OPT(DR)	;
ACCESS(XQFNUM)	; See if user has file access
ASKFILE(XQTMPL)	;
I	; Inquire
ASKTMPL(XQADJ,XQFILE,XQTMPL,XQOPTNL)	;
SURE()	;
ASKTYPE(XQTYPE)	;

External References

Name	Field # of Occurrence
^DIC	D+5, ASKTMPL+7, ASKFILE+5, AGAIN+4
^DIE	AGAIN+3
^DIR	ASKTYPE+10, D+13, E+6, SURE+8
$$TYPE^XQSMD4	SURE+3
ASKOPT^XQSMD4	AGAIN+1
DELETE^XQSMD4	D+14
NAMESP^XQSMD4	RULES+2
NODEL^XQSMD4	D+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"The option types that may be built are P(rint), E(dit), and I(nquire)," Line Location: ASKTYPE+1
Function Call: WRITE	Prompt: !,"and you must have template(s) ready to be included in the option." Line Location: ASKTYPE+2
Function Call: WRITE	Prompt: !,"You may also enter D(elete) to delete an option." Line Location: ASKTYPE+3
Function Call: WRITE	Prompt: !,"This is an existing "_$$TYPE^XQSMD4(XQT)_" option." Line Location: SURE+3
Function Call: WRITE	Prompt: !,$C(7),"It is not included in your delegated options." Line Location: SURE+4
Function Call: WRITE	Prompt: !,"It may not be changed to a different type of option." Line Location: SURE+5
Routine Call	DIE Line Location: AGAIN+3
Routine Call	DIC Line Location: D+5 ASKTMPL+7 ASKFILE+5 AGAIN+4
Routine Call	DIR Line Location: ASKTYPE+10 D+13 E+6 SURE+8

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC - [#1]	ASKFILE+8, ACCESS+4
^DIC(19 - [#19]	SURE+2
^VA(200 - [#200]	D+8, SURE+4, ACCESS+5, ACCESS+9

Label References

Name	Line Occurrences
$$SURE	AGAIN+2
@(	RULES+4
AGAIN	AGAIN+2
ASKFILE	ASKTMPL+2
ASKTMPL	E+2, I+2, P+2, P+4
ASKTYPE	RULES+3
CRE8OPT	E+9, I+5, P+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	CRE8OPT+1~, AGAIN+3*
DA(1	AGAIN+4*
DIC	D+1~, D+4, ASKTMPL+1~, ASKTMPL+6, ASKFILE+1~, ASKFILE+2, CRE8OPT+1~, AGAIN+4
DIC("A"	D+2, ASKTMPL+3
DIC("S"	ASKTMPL+4, ASKFILE+4
DIC(0	D+3, ASKTMPL+5, ASKFILE+3, AGAIN+4
DIE	CRE8OPT+1~, AGAIN+3*
DIR	ASKTYPE+4~, D+9~, E+1~, SURE+1~
DIR("A"	ASKTYPE+5, D+10, E+4, SURE+6
DIR("B"	D+11, E+5, SURE+7*
DIR(0	ASKTYPE+6, ASKTYPE+7, ASKTYPE+8, ASKTYPE+9, D+12, E+3
DIRUT	ASKTYPE+4~, ASKTYPE+10, D+9~, E+1~, E+6
DLAYGO	CRE8OPT+1~, AGAIN+4*
DR	E+1~, E+8, E+9, I+1~, I+3, I+4, I+5, P+1~, P+5, P+6 , CRE8OPT~
DTOUT	ASKTMPL+1~, ASKTMPL+9
DUOUT	ASKTMPL+1~, ASKTMPL+9
DUZ	AGAIN+4, SURE+4, ACCESS+5, ACCESS+9
I	ACCESS+7~, ACCESS+10*
U	ASKFILE+7, ASKFILE+8, SURE+2, ACCESS+5, ACCESS+9
X	ASKTYPE+4~, D+1~, D+9~, E+1~, ASKTMPL+1~, ASKFILE+1~, CRE8OPT+1~, AGAIN+4*, SURE+1~
XQACC	ACCESS+7~, ACCESS+8, ACCESS+10, ACCESS+11
XQADJ	ASKTMPL~, ASKTMPL+3
XQFILE	ASKTMPL~, ASKTMPL+6
XQFMA	ACCESS+7~, ACCESS+9*, ACCESS+10
XQFNUM	ACCESS~, ACCESS+4, ACCESS+5
XQNMSP	RULES+1~, RULES+2
XQNODE	ACCESS+1~, ACCESS+2, ACCESS+3, ACCESS+4
XQOPT	D+1~, D+8, D+14, CRE8OPT+1~, AGAIN+1, AGAIN+2!
XQOPT("IEN"	D+6*, D+8, AGAIN+3, SURE+2, SURE+4
XQOPT("NAME"	D+7*, D+10, AGAIN+4
XQOPT("NEW"	AGAIN+2
XQOPTNL	ASKTMPL~, ASKTMPL+3, ASKTMPL+8
XQPIECE	ACCESS+1~, ACCESS+2, ACCESS+3, ACCESS+5
XQT	SURE+1~, SURE+2*, SURE+3, SURE+5
XQTMPL	ASKTMPL~, ASKTMPL+2, ASKTMPL+8!, ASKTMPL+9!, ASKFILE~
XQTMPL("FGLOB"	ASKFILE+8*
XQTMPL("FNAME"	ASKFILE+7*
XQTMPL("FNUM"	ASKTMPL+2, ASKTMPL+4, ASKFILE+6*, ASKFILE+8
XQTMPL("NAME"	ASKTMPL+10*
XQTMPLE	E+1~, E+2
XQTMPLE("ADD"	E+7*, E+8
XQTMPLE("FGLOB"	E+8
XQTMPLE("FNAME"	E+4
XQTMPLE("NAME"	E+8
XQTMPLP	I+1~, I+2, P+1~, P+4
XQTMPLP("FGLOB"	I+3, P+3*, P+5
XQTMPLP("FNAME"	P+3*
XQTMPLP("FNUM"	P+3*
XQTMPLP("NAME"	I+4, P+5
XQTMPLS	P+1~, P+2
XQTMPLS("FGLOB"	P+3
XQTMPLS("FNAME"	P+3
XQTMPLS("FNUM"	P+3
XQTMPLS("NAME"	P+5
XQTYPE	RULES+1~, RULES+3, RULES+4, ASKTYPE~, ASKTYPE+11*, AGAIN+1, SURE+5, ACCESS+2
XQYZ	ACCESS+1~, ACCESS+4*, ACCESS+10
Y	ASKTYPE+4~, ASKTYPE+11, D+1~, D+5, D+6, D+9~, D+13, E+1~, E+7, ASKTMPL+1~ , ASKTMPL+7, ASKFILE+1~, ASKFILE+5, ASKFILE+6, ASKFILE+7, SURE+1~, SURE+9
Y(0	D+7, ASKTMPL+10

Customize PDF page

Package: Kernel

Routine: XQSMDFM

Information

Source Information

Call Graph

Call Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: