Re: JCL(?) question

[Jeff Crosby <jlcrosby@xxxxxxx>]

Howard Weatherly wrote:
> 
> Stephanie,
> 
> I believe that the line lost something in EBC>ASC translation however the ?F
> might have been &F, as such would be a replaceable parm, thats where the zeros
> are comming from most likely. What puzzles me though are the //<commands> in a
> 400 setting although I have never worked on a B10.

The ?F is correct, it is System/36 OCL (Operation Control Language). 
The statement:

// FILE NAME-OUTPUT,LABEL-XYADROUT,RETAIN-J,RECORDS-?F'A,XYINTRAP'?

is a file statement that is required in the OCL stream when a HLL (or,
as it appears in this case, a sort) program references a file.

NAME-OUTPUT refers to the HLL name of the file is OUTPUT

LABEL-XYADROUT refers to the name of the file in the database which is
XYADROUT.  This correlates to an OVRDBF CL command.

RETAIN-J refers to this being a job file, which correlates to storing
the file in lib QTEMP.

RECORDS-?F'A,XYINTRAP'? indicates the file is being created, and the
allocated file size (in records) is to be the same as the actual number
of records in file XYINTRAP.

-- 
-Jeff

jlcrosby@fwi.com
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---