Routine: GMRCYP42

Information

GMRCYP42 ;ISP/TDP - PRE/POST INSTALL FOR GMRC*3*42; 3/9/2005

Source file <GMRCYP42.m>

Package	Total	Call Graph
VA Fileman	3	$$FIND1^DIC FILE^DICN ^DIE
Kernel	2	($$FMTE,$$NOW)^XLFDT ($$PATCH,BMES,MES)^XPDUTL

Name	Comments	DBIA/ICR reference
PRE	; load service into REQUEST SERVICES (#123.5) file
ENV	;env check for service name conflict
EDIT(SVIEN)	; edit existing REQUEST SERVICE
ADD	; add new REQUEST SERVICE
MSG(TEXT,FLG)	;write install message if exact or partial match
CHK1235(SERVNM)	;check service name against exact or possible conflicts
WARNING(TXT)	;format warning statement for pre-install in case of conflicts
POST	; load services into SUB-SERVICE SPECIALTY of ALL SERVICES
SUB(SVIEN)	; add as sub of ALL SERVICES

Name	Field # of Occurrence
$$FIND1^DIC	PRE+4, POST+4
FILE^DICN	ADD+14, SUB+8
^DIE	EDIT+13
$$FMTE^XLFDT	WARNING+1
$$NOW^XLFDT	WARNING+1
$$PATCH^XPDUTL	ENV+2
BMES^XPDUTL	ENV+9, ENV+11, PRE+2, PRE+7, ADD+16, POST+2, POST+5, SUB+10
MES^XPDUTL	ENV+10, ENV+13, PRE+3, ADD+17, ADD+18, POST+3, SUB+11, SUB+12, SUB+13

FileNo	Call Tags
^GMR(123.5 - [#123.5]	Classic Fileman Calls, FIND1^DIC

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("UPPERCASE"	CHK1235+3
^GMR(123.5 - [#123.5]	ENV+5, ENV+6, ENV+7, SUB+1
^TMP("GMRCYP42"	ENV+3!, ENV+8, ENV+12, ENV+13, ENV+14!, MSG+3, MSG+5*

Name	Field # of Occurrence
DA	EDIT+1~, EDIT+3*, SUB+2~
DA(1	SUB+4*, SUB+5
DEFAULT	ADD+1~, ADD+10, ADD+13, EDIT+1~, EDIT+9, EDIT+12
DIC	ADD+1~, ADD+3, SUB+2~, SUB+5
DIC("DR"	ADD+13*
DIC(0	ADD+4, SUB+6
DIE	EDIT+1~, EDIT+4*
DO	ADD+2!, EDIT+2!, SUB+3!
DR	EDIT+1~, EDIT+12*
DXI	ADD+1~, ADD+9, ADD+13, EDIT+1~, EDIT+8, EDIT+12
DXP	ADD+1~, ADD+8, ADD+13, EDIT+1~, EDIT+7, EDIT+12
FLG	MSG~, MSG+2
GMRCMSG	ENV+1~, ENV+10
GMRCSVC	ENV+1~, ENV+4, ENV+5, ENV+6, ENV+7
I	ENV+1~, ENV+12*, ENV+13, PRE+1~
INTERNAL	ADD+1~, ADD+6, ADD+13, EDIT+1~, EDIT+5, EDIT+12
MATCH	MSG+1~, MSG+2*, MSG+4
MSG	MSG+1~, MSG+4*, MSG+5
NEXT	MSG+1~, MSG+3*, MSG+5
OERR	ADD+1~, ADD+12, ADD+13, EDIT+1~, EDIT+11, EDIT+12
PRINT	ADD+1~, ADD+7, ADD+13, EDIT+1~, EDIT+6, EDIT+12
PROTOCOL	ADD+1~, ADD+11, ADD+13, EDIT+1~, EDIT+10, EDIT+12
SERVNM	CHK1235~, CHK1235+2, CHK1235+4, CHK1235+5, CHK1235+6
SVC	PRE+1~, PRE+4, PRE+5, PRE+6, POST+1~, POST+4
SVIEN	EDIT~, EDIT+3, SUB~, SUB+1, SUB+7
TEXT	MSG~, MSG+4
TXT	WARNING~
TXT(1	WARNING+1*
TXT(10	WARNING+10*
TXT(11	WARNING+11*
TXT(12	WARNING+12*
TXT(13	WARNING+13*
TXT(14	WARNING+14*
TXT(2	WARNING+2*
TXT(3	WARNING+3*
TXT(4	WARNING+4*
TXT(5	WARNING+5*
TXT(8	WARNING+8*
TXT(9	WARNING+9*
U	ENV+7
X	CHK1235+1~, CHK1235+2, ADD+1~, ADD+5, EDIT+1~, SUB+2~, SUB+7*
Y	CHK1235+1~, CHK1235+4, CHK1235+5, CHK1235+6, ADD+15, ADD+19!, EDIT+14!, SUB+9