|
View previous topic :: View next topic
|
| Author |
Message |
Yamini C
New User
Joined: 02 Jul 2010 Posts: 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 2007 Posts: 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 2006 Posts: 2482 Location: @my desk
|
|
| Back to top |
|
 |
Yamini C
New User
Joined: 02 Jul 2010 Posts: 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 2007 Posts: 10903 Location: italy
|
|
|
|
| are You sure that the data was the same? |
|
| Back to top |
|
 |
dick scherrer
Moderator Emeritus

Joined: 23 Nov 2006 Posts: 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 2006 Posts: 6965 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 2010 Posts: 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 2010 Posts: 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 2006 Posts: 2482 Location: @my desk
|
|
|
|
| Did you try VLTESTI option? |
|
| Back to top |
|
 |
expat
Global Moderator

Joined: 14 Mar 2007 Posts: 8797 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 2010 Posts: 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 2006 Posts: 2482 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 2010 Posts: 14 Location: India
|
|
|
|
| //WRITE1 EXEC PGM=ICETOOL,PARM='VLTEST1=1' |
|
| Back to top |
|
 |
Yamini C
New User
Joined: 02 Jul 2010 Posts: 14 Location: India
|
|
|
|
//WRITE1 EXEC PGM=ICETOOL,PARM='VLTESTI=1'
tried both  |
|
| Back to top |
|
 |
Arun Raj
Moderator
Joined: 17 Oct 2006 Posts: 2482 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 2010 Posts: 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 |
|
 |
|
|
 |
All times are GMT + 6 Hours |
|