Routine: ORY231

Entry Points

Name	Comments	DBIA/ICR reference
PRE	; initiate pre-init processes
MAGRPC1	; Register Imaging RPC if MAG3.07 present (DBIA 4526)
MAGRPC2	; Register Imaging RPCS if MAG3.037 installed (DBIA 4528/4530)
INSERT(OPTION,RPC)	; Call FM Updater with each RPC ; Input -- OPTION Option file (#19) Name field (#.01) ; RPC RPC sub-file (#19.05) RPC field (#.01) ; Output -- None
GNRPCS	;
VERSION	;;25.40
LINE(DATA)	; set text into array
SURGREG	; Register TIU SURGERY RPCs if TIU1.0112 present
MAIL	; send bulletin of installation time
POST	; initiate post-init processes

Name	Line Occurrences
GNRPCS	POST+3
INSERT	SURGREG+3, GNRPCS+3, MAGRPC1+1, MAGRPC2+1, MAGRPC2+2
LINE	MAIL+7, MAIL+8, MAIL+9
MAGRPC1	POST+4
MAGRPC2	POST+5
MAIL	POST+6
SURGREG	POST+2
VERSION	MAIL+3, MAIL+6

Name	Field # of Occurrence
COUNT	MAIL+1~, MAIL+2, LINE+1, LINE+2
DATA	LINE~, LINE+2
DIERR	INSERT+4~
DIFROM	MAIL+1~
DUZ	MAIL+4
ERR	INSERT+4~
FDA	INSERT+4~
FDA(	INSERT+6*
FDA(19	INSERT+5*
FDAIEN	INSERT+4~
I	MAIL+1~, MAIL+4, GNRPCS+1~, GNRPCS+3
MENU	SURGREG+1~, SURGREG+2, SURGREG+3, GNRPCS+1~, GNRPCS+2, GNRPCS+3
OPTION	INSERT~, INSERT+5
RPC	SURGREG+1~, SURGREG+3*, INSERT~, INSERT+6
START	MAIL+1~
TEXT	MAIL+1~
TEXT(	LINE+2*
>> X	MAIL+6*, MAIL+7
XMDUZ	MAIL+1~, MAIL+2*
XMSUB	MAIL+1~, MAIL+3*
XMTEXT	MAIL+1~, MAIL+2*
XMY	MAIL+1~
XMY(	MAIL+4*

Name	Field # of Occurrence
$T(VERSION	MAIL+3, MAIL+6