$!
$	SET NOON
$!
$	SET DEF SYSMAN_UTIL:
$!
$	IF P1 .EQS. "WEED" THEN RUN SYSMAN_UTIL:WEEDFILE
$!
$	@SYS_AGENDA:UAFLIS
$!
$	SET DEF LIFE_DISTR:
$!
$	ASSIGN/USER/NOLOG	SYS_AGENDA:MANAGER.LIS		LIFEUSRS
$	ASSIGN/USER/NOLOG	LIFE_DISTR:FWRDMAIL.COM		MODMAIL
$!
$	RUN LIFE_DISTR:FORWARD
$!
$	SET FILE/VERS=2 LIFE_DISTR:FWRDMAIL.COM;*
$
$!	@LIFE_DISTR:FWRDMAIL
$!
$	SETUSER SYSMAN
$!
$	EXIT