Routine: DG53P314

Information

DG53P314 ;ALB/RPM - Patch DG*5.3*314 Install Utility Routine ; 12/12/00 5:19pm

Source file <DG53P314.m>

Package	Total	Call Graph
VA FileMan	2	$$FIND1^DIC UPDATE^DIE
Kernel	1	(BMES,MES)^XPDUTL

Name	Comments	DBIA/ICR reference
ENV	;Main entry point for Environment check point.
PRE	;Main entry point for Pre-init items.
POST	;Main entry point for Post-init items.
PROGCHK(XPDABORT)	;checks for necessary programmer variables
POST1	;Add new entry to ELIGIBILITY CODE file (#8)
POST2	; Add new entry to ENROLLMENT STATUS file (#27.15)
POST3	;Add Purple Heart to the PERIOD OF SERVICE file (#21) eligibility
POST3Q	;
POSTEX	;

Name	Field # of Occurrence
$$FIND1^DIC	POST1+5, POST1+8, POST2+3, POST3+13, POST3+21
UPDATE^DIE	POST1+21, POST2+6, POST3+24
BMES^XPDUTL	PROGCHK+3, POST1+4, POST1+7, POST1+9, POST1+22, POST1+23, POST2+2, POST2+3, POST2+7, POST3+11 , POST3+15, POST3+16, POST3+25
MES^XPDUTL	PROGCHK+4, PROGCHK+5, PROGCHK+6, POST2+7, POST2+8

Name	Field # of Occurrence
DGCNT	POST3+5~, POST3+18, POST3+19
DGEC	POST1+2~, POST1+3*, POST1+5, POST1+8, POST1+11, POST1+16, POST1+18
DGERR	POST1+2~, POST1+22, POST1+23, POST3+9~, POST3+14, POST3+20~, POST3+22
DGFDA	POST1+2~, POST3+8~
DGFDA(	POST3+23*
DGFDA(8	POST1+11, POST1+12, POST1+13, POST1+14, POST1+15, POST1+16, POST1+17, POST1+18, POST1+19, POST1+20
DGPH	POST1+2~, POST1+5*, POST1+6
DGPHEC	POST3+3~, POST3+12*, POST3+13, POST3+23
DGPHIEN	POST3+4~, POST3+13*, POST3+14
DGPOS	POST3+6~, POST3+19*, POST3+21
DGPOSIEN	POST3+7~, POST3+21*, POST3+22, POST3+23
DT	PROGCHK+2
DUZ	PROGCHK+2
DUZ(0	PROGCHK+2
ERR	POST2+1~, POST2+7
ERR("DIERR"	POST2+7
FDA	POST2+1~
FDA(	POST2+4, POST2+5
U	PROGCHK+2
XPDABORT	ENV+2, ENV+3, ENV+4!, PROGCHK~, PROGCHK+7

Name	Field # of Occurrence
$T(POSTEX+DGCNT	POST3+19