Routine: SDES880P

Package	Total	Call Graph
Kernel	3	^%ZTLOAD $$FMADD^XLFDT MES^XPDUTL
VA FileMan	3	NOW^%DTC (,FILE,UPDATE)^DIE $$GET1^DIQ

Entry Points

Name	Comments	DBIA/ICR reference
EN	; Update the VS GUI version in #409.98
TASK	;
FIXCAN	;
ACTIVEAPPTS(CLIN,CANSTART,CANENDTIME)	;
FIND	;FIND THE IEN FOR "VS GUI NATIONAL"
VERSION	;SET THE NEW VERSION UPDATE IN SDEC SETTING FILE #409.98 TO 1.7.57
NOFIND	;"VS GUI NATIONAL" NOT FOUND

Name	Field # of Occurrence
NOW^%DTC	TASK+8
^%ZTLOAD	TASK+8
^DIE	VERSION+1, VERSION+4
FILE^DIE	FIXCAN+14
UPDATE^DIE	FIXCAN+19
$$GET1^DIQ	FIXCAN+7, FIXCAN+8, FIXCAN+11, FIXCAN+15, FIXCAN+20, ACTIVEAPPTS+7
$$FMADD^XLFDT	FIXCAN+3
MES^XPDUTL	TASK+1, TASK+2, TASK+3, TASK+4, TASK+5, TASK+10, TASK+11, TASK+13, TASK+14, FIND+2 , FIND+3, NOFIND+1

Name	Line Occurrences (* Changed, ! Killed)
^SC - [#44]	FIXCAN+4, FIXCAN+5, FIXCAN+6, FIXCAN+12, ACTIVEAPPTS+5, ACTIVEAPPTS+6
^SDEC(409.98 - [#409.98]	FIND+4, VERSION+3
^XTMP("SDES880P"	FIXCAN+2!, FIXCAN+3, FIXCAN+11, FIXCAN+15, FIXCAN+20

Name	Field # of Occurrence
APPTDATE	ACTIVEAPPTS+1~, ACTIVEAPPTS+3, ACTIVEAPPTS+5, ACTIVEAPPTS+6, ACTIVEAPPTS+7
APPTENDDATE	ACTIVEAPPTS+1~, ACTIVEAPPTS+4*, ACTIVEAPPTS+5
APPTIEN	ACTIVEAPPTS+1~, ACTIVEAPPTS+6*, ACTIVEAPPTS+7
CANDT	FIXCAN+1~, FIXCAN+5*, FIXCAN+6, FIXCAN+7, FIXCAN+8, FIXCAN+9, FIXCAN+11, FIXCAN+12, FIXCAN+13, FIXCAN+15 , FIXCAN+16, FIXCAN+18, FIXCAN+20
CANENDTIME	FIXCAN+1~, FIXCAN+8*, FIXCAN+9, FIXCAN+13, FIXCAN+17, ACTIVEAPPTS~, ACTIVEAPPTS+4
CANSTART	FIXCAN+1~, FIXCAN+7*, ACTIVEAPPTS~, ACTIVEAPPTS+3, ACTIVEAPPTS+4
CLIN	FIXCAN+1~, FIXCAN+4*, FIXCAN+5, FIXCAN+6, FIXCAN+7, FIXCAN+8, FIXCAN+9, FIXCAN+11, FIXCAN+12, FIXCAN+13 , FIXCAN+15, FIXCAN+16, FIXCAN+17, FIXCAN+20, ACTIVEAPPTS~, ACTIVEAPPTS+5, ACTIVEAPPTS+6, ACTIVEAPPTS+7
DA	VERSION+1, VERSION+2!, VERSION+4, VERSION+5!
DIE	VERSION+1, VERSION+2!, VERSION+4, VERSION+5!
DR	VERSION+1, VERSION+2!, VERSION+4, VERSION+5!
DT	FIXCAN+3, VERSION+1, VERSION+4
FDA	FIXCAN+1~, FIXCAN+14!, FIXCAN+19!
FDA(	FIXCAN+13, FIXCAN+16, FIXCAN+17*
FDAIEN	FIXCAN+1~, FIXCAN+19!
FDAIEN(1	FIXCAN+18*
FIXCNT	FIXCAN+1~, FIXCAN+4, FIXCAN+10, FIXCAN+11, FIXCAN+15, FIXCAN+20
RECCNT	ACTIVEAPPTS+1~, ACTIVEAPPTS+2, ACTIVEAPPTS+8, ACTIVEAPPTS+9
SDECDA	FIND+1~, FIND+4*, VERSION+1
SDECDA1	FIND+1~, VERSION+3*, VERSION+4
U	FIXCAN+11, FIXCAN+15, FIXCAN+20
X	TASK+6~, TASK+8
ZTDESC	TASK+6~, TASK+7*
ZTDTH	TASK+6~, TASK+8*
ZTIO	TASK+6~, TASK+8*
ZTRTN	TASK+6~, TASK+8*
ZTSAVE	TASK+6~
ZTSAVE("*"	TASK+8*
ZTSK	TASK+6~, TASK+9, TASK+10, TASK+12