$!
$! COMMAND FILE TO CREATE THE RSX QUEUE DOCUMENTATION RUNOFF DOCUMENT
$!
$ SET NOON
$!
$ TYPE SYS$INPUT

	This command file creates the RSX MA_QUEUE DOCUMENTATION
	COMMUNICATIONS SOFTWARE document.

$!
$!
$! Create main document output MA_RSX_QUEUE.MEM
$!
$RUNOFF/RIGHT=5 MA_RSX_QUEUE.RNO/DEBUG=CONTENTS/NOSIMULATE
$! 
$! Create intermediate binary file for index and table of contents 
$!	MA_RSX_QUEUE.brn
$!
$RUNOFF/RIGHT=5/INTERMEDIATE MA_RSX_QUEUE.RNO
$!
$! Create table of contents MA_RSX_QUEUE.RNT 
$!	and then MA_RSX_QUEUE.MEC for appending and print
$!
$RUNOFF/CONTENTS MA_RSX_QUEUE.BRN
$RUNOFF/RIGHT=5 MA_RSX_QUEUE.RNT/NOSIMULATE
$!
$! Create index, binary file: MA_RSX_QUEUE.brn, 
$!	then MA_RSX_QUEUE.rnx, and then MA_RSX_QUEUE.mex
$!
$RUNOFF/INDEX MA_RSX_QUEUE.BRN
$RUNOFF/RIGHT=5 MA_RSX_QUEUE.RNX/NOSIMULATE
$!
$! CREATE TITLE PAGE
$!
$ TODAY = F$TIME()
$ TODAY = F$CVTIME(TODAY,"ABSOLUTE","DATE")
$ DELETE MA_RSX_QUEUE_TITLE.RNO;*
$ OPEN TITLE/WRITE MA_RSX_QUEUE_TITLE.RNO
$ WRITE TITLE ".PS 60,80"
$ WRITE TITLE ".RM 80"
$ WRITE TITLE ".NO FLAGS HYPHENATE"
$ WRITE TITLE ".FLAGS COMMENT"
$ WRITE TITLE ".FLAGS SUBSTITUTE `"
$ WRITE TITLE ".NO FLAGS ACCEPT"
$ WRITE TITLE ".LITERAL"
$ WRITE TITLE ""
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE ".END LITERAL
$ WRITE TITLE ".CENTER;MANUFACTURING AUTOMATION"
$ WRITE TITLE ".CENTER;RSX QUEUEING AND ROUTING "
$ WRITE TITLE ".CENTER;PROGRAMMER'S MANUAL "
$ WRITE TITLE ".CENTER;AND USER'S GUIDE"
$ WRITE TITLE " "
$ WRITE TITLE ".CENTER;Revision: 1.4"
$ WRITE TITLE " "
$ WRITE TITLE ".CENTER;",TODAY
$ WRITE TITLE ".LITERAL"
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE " "
$ WRITE TITLE ".END LITERAL"
$ WRITE TITLE ".NOFILL"
$ WRITE TITLE ".LEFT MARGIN 5"
$ WRITE TITLE "By: Earl Lakia
$ WRITE TITLE "    Staff Engineer"
$ WRITE TITLE "    Process Automation Dept."
$ WRITE TITLE "    Inland Steel Co."
$ WRITE TITLE "and: "
$ WRITE TITLE "    David Lueck "
$ WRITE TITLE "    Engineer"
$ WRITE TITLE "    Process Automation Dept."
$ WRITE TITLE "    Inland Steel Co. "
$ WRITE TITLE " "
$ WRITE TITLE ".FILL"
$ WRITE TITLE ".PAGE"
$ CLOSE TITLE
$ RUNOFF MA_RSX_QUEUE_TITLE.RNO
$!
$! CREATE A FILE THAT IS OF THE SAME FORMAT AS RUNOFF OUTPUTS
$! THAT SIMPLY HAS A PAGE EJECT IN IT.
$!
$ OPEN PAGE/WRITE PAGE.RNO
$ WRITE PAGE ".PAGE"
$ CLOSE PAGE
$ RUNOFF PAGE
$!
$! NOW CREATE THE ACTUAL RUNOFF DOCUMENT
$!
$COPY MA_RSX_QUEUE_TITLE.MEM,-
	MA_RSX_QUEUE.MEC,-
	PAGE.MEM,-
	MA_RSX_QUEUE.MEM,-
	PAGE.MEM,-
	MA_RSX_QUEUE.MEX -
	MA_RSX_QUEUE.LIS
$!
$! CLEAN UP
$!
$DELETE MA_RSX_QUEUE.MEC;*,-
	MA_RSX_QUEUE.MEM;*,-
	MA_RSX_QUEUE.MEX;*,-
	MA_RSX_QUEUE.BRN;*,-
	MA_RSX_QUEUE.RNX;*,-
	MA_RSX_QUEUE.RNT;*,-
	MA_RSX_QUEUE_TITLE.MEM;*,-
	PAGE.*;*
$!
$PURGE MA_RSX_QUEUE.*
$!
$type sys$input
	MA_RSX_QUEUE.LIS IS READY FOR WHAT EVER.