.;[1,7]RESTACC			B. Z. Lederman
.;		Stop and re-start accounting
.;
	.ENABLE SUBSTITUTION
	.ENABLE ESCAPE
.;
	.DISABLE QUIET
	STOP/ACCOUNTING SCHEDULED_SHUTDOWN
	.WAIT SYSLOG
	.ENABLE QUIET
.;
.;	make a record of the last accounting data file
.;
	SRD [1,6]LASTFIL.ACC=[1,6]ACNTRN.SYS/FU
	.IFDF $QUIET .ENABLE QUIET
.;
	@STARTACC
.;
.NOW:
.ASK [<TRUE>:10S] ACCDAT Do you want to summarize the data now
.IFF <ESCAPE> .GOTO NOQUES
	.DISABLE QUIET
;
;	Summarizing the data now saves the relevant information just
;  collected, and purges out old files. It will take a few minutes.
;
	.IFDF $QUIET .ENABLE QUIET
	.GOTO NOW
.NOQUES:
.IFF ACCDAT .GOTO ENDACC
	@[1,6]PROCESS
.ENDACC:
