Routine: XUHUI

Information

XUHUI ;SFISC/SO-Main Field Event Trigger Routine ;1:05 PM 7 Nov 2002 [ 07/29/2004 9:01 AM ]

Package	Total	Call Graph
VA Fileman	3	$$FIND1^DIC CLEAN^DILF $$GET1^DIQ
Kernel	2	^%ZTLOAD EN^XQOR

Name	Comments	DBIA/ICR reference
HUI(XUHUIOP,XUHUINM,XUHUIA,XUHUIXR)	;This is the HUI Entry Point
TASK	;Creat a task
DEQUE	;From: TaskMan
OPKG(XUHUIOP,XUHUINM,XUHUIA,XUHUIXR)	;All Other Package Entry Point	ICR #3589 Status: Active Usage: Supported
CLEAN	;Kill of XUHUI variables
GETVAR	; Get the variables that are to be passed via Taskman
HUIKEY(XUHUIOP,XUHUINM,XUHUIA,XUHUIXR)	;HUI Key check Entry Point
PCHK1	;
PCHK2	;

Name	Line Occurrences (* Changed, ! Killed)
^DIC(19.1 - [#19.1]	PCHK2+1
^XUSEC("PROVIDER"	PCHK1+1

Name	Field # of Occurrence
>> DA	GETVAR+5, PCHK1+1, PCHK2+1
>> DIC	DEQUE+2*
>> DIERR	TASK+8, TASK+11
>> DIFILE	GETVAR+1
>> DIFLD	GETVAR+2, GETVAR+3
DISABLE	TASK+5~, TASK+10*, TASK+13
ESC	HUI+7~, HUI+8, TASK+2~, TASK+3, TASK+4, TASK+8, TASK+11, TASK+13, HUIKEY+6~, HUIKEY+7 , PCHK1+1, PCHK2+1
IEN	TASK+5~, TASK+7*, TASK+10
>> X	GETVAR+6, DEQUE+1*
>> X1	GETVAR+7
>> X2	GETVAR+8
XUHUIA	HUI~, TASK+16*, TASK+27, HUIKEY~, OPKG~
XUHUIDA	GETVAR+5*, CLEAN+1!
XUHUIFIL	GETVAR+1*, CLEAN+1!
XUHUIFLD	GETVAR+2, GETVAR+3, CLEAN+1!
XUHUINM	HUI~, TASK+7, DEQUE+1, HUIKEY~, OPKG~
XUHUIOP	HUI~, TASK+4, TASK+24*, DEQUE+2, HUIKEY~, OPKG~
XUHUIX	GETVAR+6*, CLEAN+1!
XUHUIX1	GETVAR+7*, CLEAN+1!
XUHUIX2	GETVAR+8*, CLEAN+1!
XUHUIXR	HUI~, GETVAR+4*, HUIKEY~, OPKG~
ZTDESC	TASK+15~, TASK+27*
ZTDTH	TASK+15~, TASK+26*
ZTIO	TASK+15~, TASK+26*
ZTREQ	TASK+15~, TASK+26*
ZTRTN	TASK+15~, TASK+26*
ZTSAVE	TASK+15~
ZTSAVE("XUHUIA"	TASK+17*
ZTSAVE("XUHUIDA*"	TASK+21*
ZTSAVE("XUHUIFIL"	TASK+18*
ZTSAVE("XUHUIFLD"	TASK+19*
ZTSAVE("XUHUINM"	TASK+23*
ZTSAVE("XUHUIOP"	TASK+25*
ZTSAVE("XUHUIX*"	TASK+22*
ZTSAVE("XUHUIXR"	TASK+20*
ZTSK	TASK+15~