Routine: IVM279P

Information

IVM279P ;ALB/BRM - IVM*2*79 PRE-INSTALL ; 7/30/03 10:17am

Source file <IVM279P.m>

Package	Total	Call Graph
Kernel	3	^%ZTLOAD $$FMTE^XLFDT (BMES,MES)^XPDUTL
VA FileMan	3	$$FIND1^DIC UPDATE^DIE DT^DILF

Name	Comments	DBIA/ICR reference
PRE	; pre-install entry point ; add 3 new entries to the 301.92 file
ADDRDT(DATA)	; setup fda array for Address Change Dt/Tm entry
ADDRSRC(DATA)	; setup fda array for Address Change Source entry
ADDRSIT(DATA)	; setup fda array for Address Change Dt/Tm entry
UPDATE(DATA)	;
POST	; post-install process to task one-time clean-up
QUETSK(ZTDTH)	;

Name	Field # of Occurrence
^%ZTLOAD	QUETSK+4
$$FIND1^DIC	UPDATE+1
UPDATE^DIE	UPDATE+3
DT^DILF	POST+9
$$FMTE^XLFDT	POST+12
BMES^XPDUTL	PRE+4, UPDATE+1, UPDATE+4, UPDATE+5, POST+3, POST+4, POST+6, POST+11, POST+12
MES^XPDUTL	PRE+8, UPDATE+4, POST+5, POST+7, POST+8, POST+13

FileNo	Call Tags
^IVM(301.92 - [#301.92]	FIND1^DIC

Name	Field # of Occurrence
DATA	PRE+2~, PRE+3*, PRE+5, PRE+6, PRE+7, ADDRDT~, ADDRSRC~, ADDRSIT~, UPDATE~, UPDATE+6!
DATA(	ADDRDT+1, ADDRDT+2, ADDRDT+3, ADDRSRC+1, ADDRSRC+2, ADDRSRC+3, ADDRSIT+1, ADDRSIT+2, ADDRSIT+3*, UPDATE+1 , UPDATE+2, UPDATE+4, UPDATE+5
DATA(10	ADDRDT+4, ADDRSRC+4, ADDRSIT+4*
DATA(20	ADDRDT+4, ADDRSRC+4, ADDRSIT+4*
ERR	PRE+2~, UPDATE+4, QUETSK+1~
ERR("DIERR"	UPDATE+4
FDA	PRE+2~
FDA(	UPDATE+2*
>> FLDNUM	UPDATE+2*
IVMDT	POST+2~, POST+9*, POST+10, POST+12
IVMTSK	POST+2~, POST+10*, POST+11, POST+12
POP	QUETSK+1~
X	QUETSK+1~
ZTDESC	QUETSK+1~, QUETSK+3*
ZTDTH	QUETSK~, QUETSK+2
ZTIO	QUETSK+1~, QUETSK+3*
ZTRTN	QUETSK+1~, QUETSK+3*
ZTSAVE	QUETSK+1~
ZTSK	QUETSK+1~, QUETSK+5
ZUSR	QUETSK+1~