Routine: SDECINI1

Information

SDECINI1 ;ALB/SAT - VISTA SCHEDULING RPCS ;JAN 15, 2016

Name	Comments	DBIA/ICR reference
RESAB
SDWLCL
SDWLCL1(SDCL,SDDATA)
INDEX	;initialize new xrefs
AC409831()	;create and build NEW style AC for all SDEC RESOURCE entries in file 44
AG44()	;create and build NEW style AG for all HOSPITAL LOCATION entries in file 44
AVADPR44(SDCL)	;rebuild AVADPR for given Hospital Location in file 44
AC4035()	;create and build NEW style AC for all RECALL REMINDERS entries in file 403.5
AC40356()	;create and build NEW style AC for all RECALL REMINDERS REMOVED entries in file 403.56
E4093(SDWL)	;rebuild E for given SD WAIT LIST in file 409.3
AF4093()	;create and build NEW style AF for all SD WAIT LIST entries in file 409.3
AE4093(SDWL)	;rebuild AE for given SD WAIT LIST in file 409.3
AC4093()	;create and build NEW style AC for all SD WAIT LIST entries in file 409.3
AD4093()	;create and build NEW style AD for all SD WAIT LIST entries in file 409.3
E40985()	;create NEW style E and AC for SDEC APPT REQUEST file 409.85
AD833()	;create and build NEW style AD for all SDEC RESOURCE USER entries in file 409.833
I123()	;create and build NEW style AG for all REQUEST/CONSULTATION entries in file 123

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Updating SD WL CLINIC LOCATION file 409.32 with clinics from file 44..." Line Location: SDWLCL+2
Function Call: WRITE	Prompt: !,"SDWLCL: Unable to store clinic "_SDCL_" in SD WL CLINIC LOCATION." Line Location: SDWLCL+30
Function Call: WRITE	Prompt: !!,"Build new 'AVADPR' and 'AG' indexes for HOSPITAL LOCATION file 44" Line Location: INDEX+6
Function Call: WRITE	Prompt: !,Y Line Location: INDEX+7
Function Call: WRITE	Prompt: !!,"Build new 'AC' index for RECALL REMINDERS file 403.5" Line Location: INDEX+13
Function Call: WRITE	Prompt: !,Y Line Location: INDEX+14
Function Call: WRITE	Prompt: !!,"Build new 'AC' index for RECALL REMINDERS REMOVED file 403.56" Line Location: INDEX+19
Function Call: WRITE	Prompt: !,Y Line Location: INDEX+20
Function Call: WRITE	Prompt: !!,"Build new 'E','AC','AD', and 'AE' indexes for SD WAIT LIST file 409.3" Line Location: INDEX+26
Function Call: WRITE	Prompt: !,Y Line Location: INDEX+27
Function Call: WRITE	Prompt: !!,"Build new 'AD' index for SDEC RESOURCE USER file 409.833" Line Location: INDEX+38
Function Call: WRITE	Prompt: !,Y Line Location: INDEX+39
Function Call: WRITE	Prompt: !!,"Build new 'E' and 'AC' index for SDEC APPT REQUEST file 409.85" Line Location: INDEX+44
Function Call: WRITE	Prompt: !,Y Line Location: INDEX+45