|
View previous topic :: View next topic
|
| Author |
Message |
vikirum
New User
Joined: 26 Apr 2007
Posts: 30
Location: Chennai
|
|
|
|
Evening Folks:
I have stumbled on a strange problem. I try to use the OMIT parameter in my job and strangely it does not seem to take effect the conditions mentioned in it.
The job i used is as follows. Also, have attached a screen shot of the record length in the input file. Please advise and suggest.
//S3 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SORTIN DD DSN=U142914.T6,DISP=SHR
//SORTOUT DD DSN=U142914.T7,DISP=SHR
//SYSIN DD *
OPTION COPY
OMIT COND=(7,6,CH,EQ,C'IN-CAT')
/*
//*
[/img]
Thanks very much
Vik Rajagopalan |
|
| Back to top |
|
 |
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
|
|
| The input dataset is FB? |
|
| Back to top |
|
|
vikirum
New User
Joined: 26 Apr 2007
Posts: 30
Location: Chennai
|
|
|
|
Hello:
No the file is a VBA with 125 as the record length(Should it be important).
Thanks much
Vik Rajagopalan |
|
| Back to top |
|
|
krisprems
Active Member
Joined: 27 Nov 2006
Posts: 649
Location: India
|
|
|
|
vikirum
Your statement
| Quote: |
I try to use the OMIT parameter in my job and strangely it does not seem to take effect the conditions mentioned in it.
|
is incomplete, please provide information as to whether job ran successfully and the o/p is empty or not? |
|
| Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
I would take a guess that the columns specified are not correct.
As the file is VBA, did you add 4 to the positions that you wish to check, and did you also take into account the 'A' bytes, as in RECFM=VBA |
|
| Back to top |
|
|
vikirum
New User
Joined: 26 Apr 2007
Posts: 30
Location: Chennai
|
|
|
|
Expat,
You caught me by my sneakers !! I did not know what exactly should be done for a VBA file.
Please advise what should be done for this.
Thanks much
Vik Rajagopalan |
|
| Back to top |
|
|
vikirum
New User
Joined: 26 Apr 2007
Posts: 30
Location: Chennai
|
|
|
|
Kris,
What happens as a result of this command not taking any effect is that the input file is the output file without any changes !
Hope this helps in researching the problem alongside me.
Thanks much for your help.
Vik Rajagopalan |
|
| Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
When you browse/edit the file and work out the columns, you need to add 4 to the column number to cater for the RDW of a VB record.
When you display the dataset, there should be some 1's and 0's in the first column. If not, then you will need to add another 1 to the new column position you got from adding 4 for the RDW. |
|
| Back to top |
|
|
vikirum
New User
Joined: 26 Apr 2007
Posts: 30
Location: Chennai
|
|
|
|
Expat,
Lemme give it a shot and see if this works.
Thanks for the piece of info.
Vik Rajagopalan |
|
| Back to top |
|
|
vikirum
New User
Joined: 26 Apr 2007
Posts: 30
Location: Chennai
|
|
|
|
Expat,
I get an error message:
The changed JCL parm to incorporate what you said is like this,
OPTION COPY
OMIT COND=(11,6,CH,EQ,C'IN-CAT')
and the error message I get is as follows:
ICE132I 0 OPTIONS: VLSHRT=N,ZDPRINT=Y,IEXIT=N,TEXIT=N,LISTX=N,EFS=NONE ,EXITC
ICE133I 0 OPTIONS: HIPRMAX=OPTIMAL,DSPSIZE=MAX ,ODMAXBF=0,SOLRF=Y,VLLONG=N,VSAMI
ICE235I 0 OPTIONS: NULLOUT=RC0
ICE084I 0 EXCP ACCESS METHOD USED FOR SORTOUT
ICE084I 0 EXCP ACCESS METHOD USED FOR SORTIN
ICE218A 6 13 BYTE VARIABLE RECORD IS SHORTER THAN 16 BYTE MINIMUM FOR F
ICE751I 1 EF-Q95214 F0-Q84357 E8-Q95214
ICE052I 0 END OF DFSORT
******************************** BOTTOM OF DATA |
|
| Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
Funny you should say that, but having just read that it reminded me of the same problem I had when I done something similar 
Try
| Code: |
OPTION VLSHRT VLSCMP
SORT FIELDS=COPY
OMIT COND=(11,6,CH,EQ,C'IN-CAT')
|
|
|
| Back to top |
|
|
vikirum
New User
Joined: 26 Apr 2007
Posts: 30
Location: Chennai
|
|
|
|
Expat,
It worked.  Thanks much. But I wonder what those options were and what does it specifically do?
Thanks again.
Vik Rajagopalan |
|
| Back to top |
|
|
krisprems
Active Member
Joined: 27 Nov 2006
Posts: 649
Location: India
|
|
| Back to top |
|
|
vikirum
New User
Joined: 26 Apr 2007
Posts: 30
Location: Chennai
|
|
|
|
Thanks everyone for helping me find a solution. I will officially call it end of my requirement and the objective is met successfully.
You guys have a good one.
Vik Rajagopalan |
|
| Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA
|
|
|
|
Vik,
You only need VLSCMP, not both VLSCMP and VLSHRT. For an explanation, see the "How can I use INCLUDE/OMIT with "short" fields?" Ask Professor Sort item at:
www.ibm.com/servers/storage/support/software/sort/mvs/professor_sort/
Note that a VBA record looks like this:
| Code: |
|RDW|cc|data|
4 1 n
|
so you have to take into account the RDW and cc when determining the starting position of your field. |
|
| Back to top |
|
|
|
|
