Page 1 of 2

Print file needs to be FBA, not FBM - not sure if JCL or COB

PostPosted: Mon May 07, 2012 10:34 pm
by basmith11
I am trying to create a PRINT file with the standard 132 characters using RECFM=FBA in the JCL. It keeps coming out as RECFM=FBM. This also makes it use machine characters for the carriage control and screws up the printer. I get the special characters only on the first line of the new page.
I have been working on this so long I cannot see what is causing the differences. Any clues???
JCL: //EG0430PA DD DSN=HEGL.TEST.REPORT.EG0430.BAS.TEST,
// DISP=(NEW,CATLG,DELETE),
// UNIT=3390,
// SPACE=(TRK,(5,1),RLSE),
// DCB=(RECFM=FBA,LRECL=133,BLKSIZE=27930)
//*

PROGRAM: FD CNTPRTFL RECORDING MODE IS F
RECORD CONTAINS 132 CHARACTERS
LABEL RECORDS ARE OMITTED
DATA RECORD IS CNTPRT-REC.
01 CNTPRT-REC PIC X(132).


WRITE CNTPRT-REC FROM STDHEAD-REPORT-A-LINE-1 AFTER PAGE.

FILE:
Data Set Name . . . . : HEGL.TEST.REPORT.EG0430.BAS.TEST

General Data Current Allocation
Management class . . : NOMIGRAT Allocated tracks . : 2
Storage class . . . : STANDARD Allocated extents . : 1
Volume serial . . . : E2KT05
Device type . . . . : 3390
Data class . . . . . : MULTIVOL Current Utilization
Organization . . . : PS Used tracks . . . . : 2
Record format . . .: FBM Used extents . . . : 1
Record length . . . : 133
Block size . . . . : 27930
1st extent tracks . : 2
Secondary tracks . : 1
Data set name type : SMS Compressible : NO

REPORT:

HEGL.TEST.REPORT.EG0430.BAS.TEST
===>
***************************** Top of Data ******
» Ø This line has lots of x’00’ fields
RUN DATE : 5/07/2012 12:41

FOR PERIOD : 12/01/2011 - 1/31/2012

Re: Print file needs to be FBA, not FBM - not sure if JCL or

PostPosted: Mon May 07, 2012 10:57 pm
by Robert Sample
What is the hexadecimal value of the control character?

Re: Print file needs to be FBA, not FBM - not sure if JCL or

PostPosted: Mon May 07, 2012 11:47 pm
by basmith11
Most are x'00' as I stated above but the first line is:
» Ø
80380000000
B9B00000000

Re: Print file needs to be FBA, not FBM - not sure if JCL or

PostPosted: Tue May 08, 2012 12:08 am
by BillyBoyo
Are all your WRITEs to the file WRITE AFTER?

Re: Print file needs to be FBA, not FBM - not sure if JCL or

PostPosted: Tue May 08, 2012 12:12 am
by basmith11
yes they are

Re: Print file needs to be FBA, not FBM - not sure if JCL or

PostPosted: Tue May 08, 2012 12:27 am
by BillyBoyo
Are you using Compiler option ADV?

Re: Print file needs to be FBA, not FBM - not sure if JCL or

PostPosted: Tue May 08, 2012 12:29 am
by basmith11
Yes I am

Re: Print file needs to be FBA, not FBM - not sure if JCL or

PostPosted: Tue May 08, 2012 12:33 am
by NicC
Why is your file declared as 132 charcaters when the JCL has it as 133 characters?

Re: Print file needs to be FBA, not FBM - not sure if JCL or

PostPosted: Tue May 08, 2012 12:36 am
by basmith11
I believe that is the way to handle the carriage control when using FBA.

I have written many programs using the same format and I have never had this issue before. For the life of me I cannot figure out what is different. That is why I am asking for any assistance or questions that could jog something loose to help me find the answer.

Thanks....

Re: Print file needs to be FBA, not FBM - not sure if JCL or

PostPosted: Tue May 08, 2012 12:38 am
by NicC
How do you then populate the required asa characters if you leave no space for them?