COMPILE ROUTINE FIX_NOTIFICATION(Dummy)
ROWDEF(CHARSTR)


$INSERT QUOTE_SIGS_EQU

debug
StartOfWeek	= XLATE( 'CONFIG', 'QUOTE_SIGS', MastSchedNotifyBeg$, 'X' )
   
EndOfWeek	= XLATE( 'CONFIG', 'QUOTE_SIGS', MastSchedNotifyEnd$, 'X' )


OPEN 'NOTIFICATION' TO FileIn ELSE
	debug
	GOTO Bail
END


READ BegRec FROM FileIn,'MAST_SCHED_BEG' THEN
	
	BegRec<2> = StartOfWeek
	WRITE BegRec ON FileIn,'MAST_SCHED_BEG' ELSE Null
END



READ EndRec FROM FileIn,'MAST_SCHED_END' THEN
	
	EndRec<2> = EndOfWeek
	WRITE EndRec ON FileIn,'MAST_SCHED_END' ELSE Null
END











* * * * * * *
Bail:
* * * * * * *



END
