View previous topic :: View next topic
|
Author |
Message |
SOMASEKHAR REDDY Currently Banned New User
Joined: 21 Nov 2007 Posts: 14 Location: BAGALORE
|
|
|
|
In my input file 1st byte is space I want to copy from 2nd byte onwards when I have submitted the below job I get a U0016 abend.....
Input file RECFM is VBA LRECL is 1015.
Code: |
//STEP0080 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=wwwx2.TEST.MFLOADI,
// DISP=SHR
//SORTOUT DD DSN=wwwx2.TEST.MFLOADI1,
// DISP=(,CATLG,DELETE),...
//SYSIN DD *
SORT FIELDS=COPY
INREC FIELDS=(1:2,1014)
|
please find below spool description
Spool
Code: |
SYNCSORT LICENSED FOR CPU SERIAL NUMBER 2F792, MODEL 2097 712
SYSIN :
SORT FIELDS=COPY
INREC FIELDS=(1:1,2040)
WER901I **WARNING** SYNCSORT 1.3.2.1 WILL EXPIRE IN 31 DAYS
WER276B SYSDIAG= 377358, 1047533, 1047533, 3042900
WER164B 6,896K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 1,004K BYTES USED
WER146B 20K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I SORTIN : RECFM=VBA ; LRECL= 1019; BLKSIZE= 27966
WER230A INREC FIELD OUTSIDE RANGE
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE |
|
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6248 Location: Mumbai, India
|
|
|
|
Code: |
WER230A INREC FIELD OUTSIDE RANGE |
Your input-file is VBA and this error message has some clue! |
|
Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004 Posts: 4652 Location: Raleigh, NC, USA
|
|
|
|
The WER230A message has been discussed to death here. Have you followed any of the other topics recommendations? |
|
Back to top |
|
|
SOMASEKHAR REDDY Currently Banned New User
Joined: 21 Nov 2007 Posts: 14 Location: BAGALORE
|
|
|
|
SORRY PREVIOUSLY I HAVE PASTED OTHER JOB SPOOL DESCRIPTION NOW PLEASE FIND CORRECT ONLE PLEASE RESOLVE MY QUERY
SORT FIELDS=COPY
INREC FIELDS=(1:2,1014)
WER901I **WARNING** SYNCSORT 1.3.2.1 WILL EXPIRE IN 31 DAYS
WER276B SYSDIAG= 328915, 997153, 997153, 3042900
WER164B 6,896K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 1,004K BYTES USED
WER146B 20K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I SORTIN : RECFM=VBA ; LRECL= 1019; BLKSIZE= 27966
WER235A INREC RDW NOT INCLUDED
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8796 Location: Welsh Wales
|
|
|
|
Even so, the cause of the error is blatently obvious from the output. |
|
Back to top |
|
|
SOMASEKHAR REDDY Currently Banned New User
Joined: 21 Nov 2007 Posts: 14 Location: BAGALORE
|
|
|
|
any other way i have to copy from that input file(from2nd byte) to output file
input file vba please give correct one |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6248 Location: Mumbai, India
|
|
|
|
SOMASEKHAR REDDY wrote: |
any other way i have to copy from that input file(from2nd byte) to output file |
What RECFM do you expect for the output? |
|
Back to top |
|
|
SOMASEKHAR REDDY Currently Banned New User
Joined: 21 Nov 2007 Posts: 14 Location: BAGALORE
|
|
|
|
FB FORMAT |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6248 Location: Mumbai, India
|
|
|
|
keeping this in mind
Quote: |
copy from that input file(from2nd byte) to output file |
please try this:
Code: |
//STEP1 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DISP=SHR,DSN=..VBA.INPUT.FILE
//SORTOUT DD DSN=...FB.OUTPUT.FILE,DISP=(NEW,CATLG),
// UNIT=SYSDA, SPACE=(CYL,?),DCB=(RECFM=FB)
//SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(6,1015),CONVERT
/* |
|
|
Back to top |
|
|
SOMASEKHAR REDDY Currently Banned New User
Joined: 21 Nov 2007 Posts: 14 Location: BAGALORE
|
|
|
|
thanks its working |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19243 Location: Inside the Matrix
|
|
|
|
Hello,
Code: |
WER901I **WARNING** SYNCSORT 1.3.2.1 WILL EXPIRE IN 31 DAYS |
Suggest someone get busy and renew the license. . .
It gets really ugly when "system software" stops running. . . |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6248 Location: Mumbai, India
|
|
|
|
Glad, I could be of some help. |
|
Back to top |
|
|
|