View previous topic :: View next topic
Author
Message
Yamini C New User Joined: 02 Jul 2010Posts: 14 Location: India
Hi
I am trying to generate a report using DFRMM REPORT option and it uses SYNCSORT as SORT tool.
The SYSIN cards are as below:
Code:
OPTION VLSHRT
INCLUDE COND=((853,10,CH,LT,C'2010/084'))
INREC FIELDS=(1,4,
809,44,C' ',
9,6,C' ',
318,4,C' ',
1326,5,C' ',
1058,8,C' ',
853,10,C' ',
863,6,C' ')
SORT FIELDS=(5,44,CH,A,
50,6,CH,A,
77,10,CH,A,
88,6,CH,A)
i am getting error for INREC:
Code:
INDD : RECFM=VB ; LRECL= 7004; BLKSIZE= 27998
INREC RECORD LENGTH = 160
TEMP : RECFM=VB ; LRECL= 160; BLKSIZE= 27998
15,448K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG LINE,
0 BYTES RESERVE REQUESTED, 15,448K BYTES USED
G=750,SEGLEN=4784
INREC - SHORT RECORD
I have read the previous post on OUTREC -SHORT RECORDS and tried to fix the issue.It didnot work.Can some one throw light on this pls.
Back to top
CICS Guy Senior Member Joined: 18 Jul 2007Posts: 2146 Location: At my coffee table
Yamini C wrote:
Can some one throw light on this pls.
Maybe...
Please post the jcl, control statements and all messages (including the message ids) created by the job you are inquiring about.
Back to top
Arun Raj Moderator Joined: 17 Oct 2006Posts: 2481 Location: @my desk
Back to top
Yamini C New User Joined: 02 Jul 2010Posts: 14 Location: India
Hi
Splendid...it worked for the same job after trying for 2 weeks..dont know how
Thank You
Back to top
enrico-sorichetti Superior Member Joined: 14 Mar 2007Posts: 10886 Location: italy
are You sure that the data was the same?
Back to top
dick scherrer Moderator Emeritus Joined: 23 Nov 2006Posts: 19243 Location: Inside the Matrix
Hello,
Quote:
it worked for the same job after trying for 2 weeks..dont know how
Good to hear it worked, but i don't believe this is a solution . . .
Suggest you invest the time to determine why it failed and why it works now . . .
If not, it is a time bomb waiting to cause problems at some other inopportune time. . .
Back to top
dbzTHEdinosauer Global Moderator Joined: 20 Oct 2006Posts: 6966 Location: porcelain throne
Quote:
If not, it is a time bomb waiting to cause problems at some other inopportune time. . .
why should I care?
It will be somebody else's problem.
Back to top
Yamini C New User Joined: 02 Jul 2010Posts: 14 Location: India
yes it ran for the same data.I tried to find out the real cause of the problem but in vain..still investigating..Thank You all!
Back to top
Yamini C New User Joined: 02 Jul 2010Posts: 14 Location: India
I have encountered with the same issue.Do i need to modify anything.i have already tried with TEST2 option as well.
Please find the input parms.
INCLCNTL :
OPTION VLSHRT
INCLUDE COND=((853,10,CH,LE,C'2009/200'))
INREC FIELDS=(1,4,
9,6,C' ',
809,44,C' ',
119,10,C' ',
322,8,C' ',
318,4,C' ',
1326,5,C' ',
1058,8,C' ',
853,10,C' ',
863,6,C' ',
220,10,C' ',
230,10,C' ')
SORT FIELDS=(5,6,CH,A,
12,44,CH,A)
PARMLIST :
OPTION RESINV=0,ARESINV=0,MSGDDN=DFSMSG,SORTIN=INDD,SORTOUT=TEMP,SORTDD=INCL,DYNALLOC
WER428I CALLER-PROVIDED IDENTIFIER IS "0001"
WER276B SYSDIAG= 1522874, 2448356, 2448356, 1072419
WER164B 16,452K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 16,064K BYTES USED
WER108I INDD : RECFM=VB ; LRECL= 7004; BLKSIZE= 27998
WER257I INREC RECORD LENGTH = 136
WER110I TEMP : RECFM=VB ; LRECL= 136; BLKSIZE= 27998
WER410B 15,424K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG LINE,
WER410B 0 BYTES RESERVE REQUESTED, 15,424K BYTES USED
WER036B G=882,SEGLEN=4752
WER244A INREC - SHORT RECORD
WER055I INSERT 0, DELETE 193620
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
Back to top
Arun Raj Moderator Joined: 17 Oct 2006Posts: 2481 Location: @my desk
Did you try VLTESTI option?
Back to top
expat Global Moderator Joined: 14 Mar 2007Posts: 8796 Location: Welsh Wales
Just as a curiosity, which report are you trying to generate. From my experience RMM comes with a complete set of pre defined reports. Is this something you are trying for yourself or the IBM supplied reports.
Back to top
Yamini C New User Joined: 02 Jul 2010Posts: 14 Location: India
Yup. I am using REPORT3- EDGGR03 Inventory List by Volume Serial and submitted it.It had " OPTION VLSHRT,VLSCMP,NOCHALT " in the option statament and job abended with SYNTAX ERROR IN OPTION.
Hence i removed VLSCMP,NOCHALT. Now getting the INREC SHORT LENGTH error.
VLTEST1 did not work either.
Back to top
Arun Raj Moderator Joined: 17 Oct 2006Posts: 2481 Location: @my desk
Yamini C wrote:
VLTEST1 did not work either.
It's VLTESTI and NOT VLTEST1 .
It would be better if you show us the JCL you submitted
Back to top
Yamini C New User Joined: 02 Jul 2010Posts: 14 Location: India
//WRITE1 EXEC PGM=ICETOOL,PARM='VLTEST1=1'
Back to top
Yamini C New User Joined: 02 Jul 2010Posts: 14 Location: India
//WRITE1 EXEC PGM=ICETOOL,PARM='VLTESTI=1'
tried both
Back to top
Arun Raj Moderator Joined: 17 Oct 2006Posts: 2481 Location: @my desk
Yamini C wrote:
//WRITE1 EXEC PGM=ICETOOL,PARM='VLTESTI=1'
tried both
AFAIK, there's NO such option as VLTEST1 . There is only VLTEST and VLTESTI . As per the manual,
VLTEST is used to handle records not long enough to contain all of the control fields specified in the SORT/MERGE control statement. It's default value is '1' which terminates the step on encountering a short record.
VLTESTI deals with handling variable length records during INCLUDE/OMIT pocessing.
Since your application is doing both INCLUDE and SORT processing, you might need to consider both the parameters mentioned above.
Back to top
Yamini C New User Joined: 02 Jul 2010Posts: 14 Location: India
Thank you.
I have tried with both the parms with/without OPTION VLSHRT.
Now i am getting the message:
PARMLIST :
OPTION RESINV=0,ARESINV=0,MSGDDN=DFSMSG,SORTIN=INDD,SORTOUT=TEMP,SORTDD=INCL,DY
ALLOC
WER428I CALLER-PROVIDED IDENTIFIER IS "0001"
WER276B SYSDIAG= 1494626, 2415858, 2415858, 1069231
WER164B 15,488K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 15,060K BYTES USED
WER108I INDD : RECFM=VB ; LRECL= 7004; BLKSIZE= 27998
WER257I INREC RECORD LENGTH = 136
WER110I TEMP : RECFM=VB ; LRECL= 136; BLKSIZE= 27998
WER410B 14,460K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG LINE,
WER410B 0 BYTES RESERVE REQUESTED, 14,460K BYTES USED
WER036B G=827,SEGLEN=4448
WER250A INCLUDE/OMIT FIELD BEYOND RECORD
WER055I INSERT 0, DELETE 0
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
The code used:
//STEP11 EXEC PGM=SYNCTOOL,PARM='VLTESTI=1,VLTEST'
....
INCLCNTL :
INCLUDE COND=((853,10,CH,LE,C'2010/190'))
INREC FIELDS=(1,4,
9,6,C' ',
809,44,C' ',
119,10,C' ',
322,8,C' ',
318,4,C' ',
1326,5,C' ',
1058,8,C' ',
853,10,C' ',
863,6,C' ',
220,10,C' ',
230,10,C' ')
SORT FIELDS=(5,6,CH,A,
12,44,CH,A)
VLTESTI was for INCLUDE Statements right..it didnot select any record. i used VLTESTI=1 as well.
Back to top
Please enable JavaScript!