Routine: ZISHUNT

Information

ZISHUNT ;SFISC/AC - HUNT GROUP MANAGER (UNT);11/29/89 15:52 [ 04/02/2003 8:29 AM ]

Source file <ZISHUNT.m>

Package	Total	Call Graph
VA Fileman	3	^DIC YN^DICN ^DIE

Package	Total	Caller Graph
Kernel	6	XUHGADEV XUHGCHGNM XUHGDEL XUHGEDIT XUHGLST XUHGRDEV

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"You have selected for deletion the following Hunt Groups:",! Line Location: DEL+4
Function Call: WRITE	Prompt: !?20,$P(^(ZISI),"^",2) Line Location: DEL+5
Function Call: WRITE	Prompt: !!,"OK TO DELETE" Line Location: DEL+6
Function Call: WRITE	Prompt: *7," ??" Line Location: DEL+7
Function Call: WRITE	Prompt: !?20,$P(ZISY,"^",2)_" -- DELETED" Line Location: DEL+8
Function Call: WRITE	Prompt: !,DIC("A") Line Location: DIC+0
Function Call: WRITE	Prompt: *7," ??" Line Location: DIC+8
Function Call: WRITE	Prompt: !?2,*7," ARE YOU ADDING '"_X_"' AS A NEW HUNT GROUP" Line Location: E+0
Function Call: WRITE	Prompt: D Condition for execution: %'=1 *7," ??" G DIC:%'=1 Line Location: E+0
Function Call: WRITE	Prompt: *7,"<"_X_" DELETED>" Line Location: ADD+1
Routine Call	DIE Line Location: DEL+8 E+2
Routine Call	DIC Line Location: DIC+6 LST ADD+1

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS(1 - [#3.5]	DIC+7
^DD(3.5	DIC+8
^DISV(	DIC+5
^TMP($J	DEL+1!, DEL+5, DEL+7!, DEL+8, DEL+9!, D*

Name	Line Occurrences
@(	DIC+9
ADD	E
DIC	EDIT+1, DEL+2, DIC+2, DIC+3, DIC+5, DIC+7, DIC+8, E, E+3, D+2
END	DIC+1
LST	DIC+2, DIC+3

Name	Field # of Occurrence
>> %	DEL+6, DEL+7, DIC+2, E*
DA	DEL+8, E+2, END!
DIC	DIC+4, LST, E+2, END!
DIC("A"	EDIT+1, DEL+2, DIC, E+3, D, D+2*
DIC("DR"	ADD+1*
DIC("S"	DIC+4, LST
DIC(0	DIC+4, LST, ADD+1*
DIE	DEL+8, E+2, END!
>> DLAYGO	ADD+1*
DR	DEL+8, E+2, END!
DTIME	DIC
DUZ	DIC+5
U	DEL+6, DIC+2, E*
X	DIC, DIC+1, DIC+2, DIC+3, DIC+5*, DIC+7, DIC+8, E, ADD+1, END!
X1	DIC+7*, END!
Y	DIC+7, DIC+8, E, E+1, E+2, ADD+1, D, D+1, END!
>> ZISHG(0	EDIT+1, DEL+2, DIC+9, E+3, D+2, END!
ZISHGK	DEL+2, DEL+3, DEL+5, DEL+7!, DEL+8, DEL+9!, D
ZISI	DEL+5, DEL+7!, DEL+8, DEL+9!
ZISY	DEL+8*, DEL+9!