IBM Mainframe Forum

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

What is the hexadecimal value of the control character?

Most are x'00' as I stated above but the first line is:
» Ø
80380000000
B9B00000000

Are all your WRITEs to the file WRITE AFTER?

yes they are

Are you using Compiler option ADV?

Yes I am

Why is your file declared as 132 charcaters when the JCL has it as 133 characters?

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....

How do you then populate the required asa characters if you leave no space for them?