I think your looking for the file command,

FILE JOB1;DEV=LP

is how the report file gets created on the printer device. If you
wanted to create it on the disk device instead you would use something
like,

FILE JOB1;DEV=DISC;DISC=50000;CCTL

where DISC=50000 is setting the limit, and CCTL is setting aside a
byte at the begining of the record to hold carrage control
information.

Karsten



sathish selvaraj <[log in to unmask]> wrote in message news:<[log in to unmask]>...
> My JOB statement is of the kind
> !JOB JOB1;DEV=LP,1;HIPRI
> ...
> !srun JOB1
> ...
> I have a job say JOB1 which calls a COBOL program JOB1. In my COBOL program
> JOB1, i have a select statement of the kind ..
>
> SELECT REPORT-FILE ASSIGN TO "JOB1"
>
> FD REPORT-FILE
> ...
>
> I would like to know, where the file creation of file JOB1 is taking place
> and what the select and assign to statement do.
>
> The file JOB1 is a spool file which will goto printer LP. Pls correct me in
> case i am wrong.
>
> Thanks
> Jay
>
>
> _________________________________________________________________
> Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp
>
> * To join/leave the list, search archives, change list settings, *
> * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *