Routine: XQALMAKE

Package	Total	Call Graph
VA Fileman	2	^DIC ^DIR
Kernel	1	SETUP^XQALERT

Package

Total

Call Graph

VA Fileman

^DIC ^DIR

Kernel

SETUP^XQALERT

Package	Total	Caller Graph
Kernel	1	XQALFWD

Package

Total

Caller Graph

Kernel

XQALFWD

Name	Comments	DBIA/ICR reference
ASKROU
LONGTEXT	;
TEXT
SETIT	;
ASKOPT
EXIT	;
ENTRY	;
GETOPT	;
LOOP1
SETONE	;

Name	Field # of Occurrence
^DIC	GETOPT+1, SETONE+1
^DIR	TEXT+1, ASKOPT, ASKROU, SETIT+1, SETIT+5
SETUP^XQALERT	SETIT+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"ALERT GENERATOR" Line Location: ENTRY+1
Function Call: READ	Timeout: DTIME Line Location: TEXT+1
Function Call: READ	Prompt: "Enter ROUTINE name or ENTRY^ROUTINE name: " Formatting: ! Timeout: DTIME Variable: X Line Location: ASKROU+1
Function Call: WRITE	Prompt: !,"Routine '",X,"' not present" Line Location: ASKROU+1
Function Call: WRITE	Prompt: !!,"As currently entered, this alert will display the following text:",!!,XQAMSG Line Location: SETIT+2
Function Call: WRITE	Prompt: X Line Location: SETIT+3
Function Call: WRITE	Prompt: !!,"On selection of the alert, the user will run the routine ",XQAROU Condition for execution: $D(XQAROU) Line Location: SETIT+4
Function Call: WRITE	Prompt: !!,"On selection of the alert, the user will be taken to the",!,"the option ",XQAOPT Condition for execution: $D(XQAOPT) Line Location: SETIT+4
Function Call: WRITE	Prompt: !! Line Location: SETIT+4
Function Call: WRITE	Prompt: !!?20,"ALERT IS NOW SET",!! Line Location: SETIT+7
Function Call: READ	Timeout: DTIME Line Location: LOOP1+0
Function Call: READ	Prompt: "Enter another user or G.mailgroup: " Formatting: ! Timeout: DTIME Variable: X Line Location: LOOP1+1
Function Call: WRITE	Prompt: !,"Enter .EXIT to terminate input",! Line Location: LONGTEXT+1
Function Call: READ	Timeout: DTIME Variable: X Line Location: LONGTEXT+2
Function Call: WRITE	Prompt: ! Line Location: LONGTEXT+2
Routine Call	DIC Line Location: GETOPT+1 SETONE+1
Routine Call	DIR Line Location: TEXT+1 ASKOPT ASKROU SETIT+1 SETIT+5

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	ASKROU+1
^VA(200 - [#200]	SETIT+3

Name	Line Occurrences
ASKOPT	ASKOPT
ASKROU	ASKROU+1
ENTRY	SETIT+5, SETIT+8
EXIT	TEXT+1, TEXT+2, ASKROU+1
GETOPT	ASKOPT
LONGTEXT	SETIT+1
LOOP1	TEXT+2, LOOP1
SETIT	ASKOPT, ASKROU
SETONE	LOOP1, LOOP1+1
TEXT	TEXT+1

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> COUNT	LONGTEXT+2*
DIC	TEXT!, GETOPT+1!, EXIT+1!, SETONE+1
DIC("A"	GETOPT+1*
DIC(0	GETOPT+1, SETONE+1
DIR	TEXT!, TEXT+1!, ASKOPT!, ASKROU!, SETIT+1!, SETIT+5!, EXIT+1!
DIR("A"	TEXT+1, ASKOPT, ASKROU, SETIT+1, SETIT+5*
DIR("B"	TEXT+1, SETIT+5
DIR(0	TEXT+1, ASKOPT, ASKROU, SETIT+1, SETIT+5*
DTIME	TEXT+1, ASKROU+1, LOOP1, LOOP1+1, LONGTEXT+2
>> I	SETIT+3*
U	TEXT+1, ASKROU+1, SETIT+3, GETOPT+1, LOOP1, LOOP1+1, LOOP1+2, SETONE+1
X	TEXT+1, ASKROU+1, SETIT+3, EXIT+1!, LOOP1, LOOP1+1, LOOP1+2, SETONE+1, LONGTEXT+2*
XQA	TEXT!, TEXT+2, EXIT+1!, LOOP1!, LOOP1+2!
XQA(	SETIT+3, SETONE+1*
XQALDIC	EXIT+1!, SETONE+1*
XQALX	TEXT+1*, EXIT+1!
XQAMSG	TEXT!, TEXT+1*, SETIT+2, EXIT+1!
XQAOPT	TEXT!, SETIT+1, SETIT+4, GETOPT+1*, EXIT+1!
XQAROU	TEXT!, ASKROU+1*, SETIT+1, SETIT+4, EXIT+1!
>> XQATEXT(	LONGTEXT+2*
>> XQAX	SETIT+3*
Y	TEXT+1, ASKOPT, ASKROU, ASKROU+1, SETIT+1, SETIT+5, GETOPT+1*, EXIT+1!, LOOP1, SETONE+1

Customize PDF page

Package: Kernel

Routine: XQALMAKE

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: