Routine: DITMGMRI

Information

DITMGMRI ;SFISC/EDE(OHPRD)-INITIALIZTION FOR ^DITMGMRG ;11/18/94 15:45

Package	Total	Caller Graph
VA Fileman	1	DITMGMRG

Name	Comments	DBIA/ICR reference
EXCSF	; EXCLUDE/INCLUDE SUBFILES FOR ONE FILE/SUBFILE (CALLED RECURSIVELY)
INCLPK	; INCLUDE FILES/SUBFILES FOR PACKAGE
INIT	;
EXCLPK	; EXCLUDE FILES/SUBFILES FROM PACKAGES
EXCSF2	; RECURSION FOR SUBFILES WITHIN SUBFILES
EXCLFL	; EXCLUDE SUBFILES FOR EXCLUDED FILES

Name	Line Occurrences (* Changed, ! Killed)
^DD(	EXCSF+1
^DIC - [#1]	INIT+6
^DIC(9.4 - [#9.4]	EXCLPK+3, INCLPK+3

Name	Field # of Occurrence
^("GL"	INIT+7

Name	Field # of Occurrence
DITMGEFL	EXCLFL+3*, EXCLFL+4!
DITMGEPK	EXCLPK+3, EXCLPK+4!, INCLPK+3, INCLPK+4!
>> DITMGMF	INIT+13*
>> DITMGMFG	INIT+7*, INIT+11, INIT+12
>> DITMGMFL	INIT+8*
DITMGMQF	INIT+1!, INIT+4, INIT+5, INIT+6, INIT+9, INIT+10, INIT+11, INIT+12*
>> DITMGMRG(	EXCSF+1*
>> DITMGMRG("EXCLUDE"	INIT+15, EXCLFL+3, EXCLPK+3*
>> DITMGMRG("FILE"	INIT+4, INIT+5, INIT+6, INIT+8, EXCLPK+3
>> DITMGMRG("FR"	INIT+9, INIT+10, INIT+11, INIT+13
>> DITMGMRG("NOTALK"	INIT+2, INIT+3
>> DITMGMRG("PACKAGE"	INIT+16, INIT+17, INCLPK+3*
>> DITMGMRG("QFLG"	INIT+1!
>> DITMGMRG("TO"	INIT+9, INIT+10, INIT+12, INIT+14
>> DITMGMRG("TOP	FILE" , EXCLPK+3
>> DITMGMT	INIT+14*
F	EXCLFL+1~, EXCLFL+3, EXCLPK+1~, EXCLPK+3, INCLPK+1~, INCLPK+3, EXCSF+1, EXCSF2+2~, EXCSF2+3
S	EXCLFL+1~, EXCLPK+1~, INCLPK+1~, EXCSF+1*, EXCSF2+1, EXCSF2+2~
V	EXCLFL+1~, EXCLFL+2, EXCLPK+1~, EXCLPK+2, INCLPK+1~, INCLPK+2*, EXCSF+1
X	EXCLFL+1~, EXCLPK+1~, INCLPK+1~, EXCSF2+1*, EXCSF2+3
>> ZTQUEUED	INIT+2
>> ZTSK	INIT+3