Yeah, but that's why they came out with FSS for AFP printing decades
ago-bumps it to 32k!
In a message dated 3/4/2016 4:28:16 P.M. Central Standard Time,
[email protected] writes:
On Fri, 4 Mar 2016 14:55:03 -0600, Ed Gould wrote:
>
>FWIW I think that jes2 sysout is limited to 255 (or around that number).
>
It ain't worth much. Output from:
awk 'BEGIN { for ( I = 10; I <=1000; I+=10 ) { printf( "%0"I"d\n", I ) }
}' >longdata
with JCL:
//LONGOUT JOB 505303JOB,'Paul Gilmartin',
// MSGLEVEL=(1,1),REGION=0M
//*
//* Doc: long SYSOUT records.
//*
// EXPORT SYMLIST=*
//*
//USERC OUTPUT JESDS=ALL,DEFAULT=YES,
//* DEST=&SYSNAME..&SYSUID,
// CLASS=R,PAGEDEF=V0648Z,CHARS=GT12
//*
//*.+....|....+....|....+....|....+....|....+....|....+....|....+....|....+.
...|
//STEP EXEC PGM=IEBGENER,
// CCSID=1047
//SYSPRINT DD SYSOUT=(,)
//SYSIN DD *
//SYSUT2 DD SYSOUT=(,)
//SYSUT1 DD FILEDATA=TEXT,RECFM=VB,LRECL=1111,BLKSIZE=2222,
// PATH='*****/tmp/longdata'
Writes to SYSUT2:
----------------------------------------------------------------------------
---------
SDSF OUTPUT DISPLAY LONGOUT JOB04871 DSID 104 LINE 93 COLS 926- 1057
COMMAND INPUT ===> SCROLL ===> CSR
000930
0000000000000940
00000000000000000000000950
000000000000000000000000000000000960
0000000000000000000000000000000000000000000970
00000000000000000000000000000000000000000000000000000980
000000000000000000000000000000000000000000000000000000000000000990
0000000000000000000000000000000000000000000000000000000000000000000000001000
******************************** BOTTOM OF DATA
**************************************
Your memory is too good.
-- gil
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
