.;
.;	LB:[1,2]BERLON.SAT
.;
	.ENABLE SUBSTITUTION
	'IF'.IFNACT BRL
.;
.;	VERSION 85-09-23
.;	VERSION 87-04-15
.;	VERSION 87-11-21
;	VERSION 88-08-28
;
;	HANTERAR PROGRAM, SOM M\NSTRAR OCH SKAPAR DAGSL\NEPOSTER
;
		.XQT RUN $ICP/TASK=BRL/CMD="@LB:[1,2]BERLON"/EST=NO
		.EXIT
	'ENDIF'
;
;*********************************************************************
;
;	L\NEBER[KNING INITIERAD '<DATE>' '<TIME>'
;
;*********************************************************************
;
	INS BA:[166,300]BTB030/TASK=BTB030/PRI=2/SLV=YES/CKP=NO
	FIX BTB030
	INS BA:[166,300]BTB020/TASK=BTB020/PRI=3
	RUN BA:[166,300]BTB010/TASK=BTB010/PRI=2
;
	.WAIT BTB010
	.WAIT BTB020
	.WAIT BTB030
	UNF BTB030
	REM BTB020
	REM BTB030
;
;*********************************************************************
;
;	L\NEBER[KNING KLAR '<DATE>' '<TIME>'
;
;*********************************************************************
.EXIT