Routine: DIFG6

Information

DIFG6 ;SFISC/DG(OHPRD)-UPDATE FILES ;2/3/93 12:23 PM

Source file <DIFG6.m>

Name	Comments	DBIA/ICR reference
START	;
SETVAR	;SET UP VARIABLES FOR DI* CALLS FOR A GIVEN ENTRY IN ^UTILITY("DIFG",$J,...)
X3
PROCESS	;DETERMINE WHICH DI* ROUTINE(S) TO CALL FOR A GIVEN ENTRY
X1
ADDCONT	;CONTINUATION OF MODE="A" PROCESSING UPON RETURN FROM ^DIC
BUILDDR	;SET DR (BUILD DR ARRAY IF APPROPRIATE)
RESET	;RESETS MODE INDICATOR IN FILEGRAM FROM "A" TO "M"
X2
EOJ