Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
eliminate dups in VB file

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
anatol

Active User


Joined: 20 May 2010
Posts: 118
Location: canada

PostPosted: Tue Feb 13, 2018 2:59 am    Post subject: eliminate dups in VB file
Reply with quote

Hello,
I have VB file - is it possible to remove dups checking full record ... I don't know the each record length or positions to check ... just remove dups for full record.
Back to top
View user's profile Send private message

Arun Raj

Moderator


Joined: 17 Oct 2006
Posts: 2352
Location: @my desk

PostPosted: Tue Feb 13, 2018 3:22 am    Post subject: Re: eliminate dups in VB file
Reply with quote

anatol wrote:
Hello,
I have VB file - is it possible to remove dups checking full record ... I don't know the each record length or positions to check ... just remove dups for full record.
Yes it is possible. Look for OPTION VLSHRT examples here.
Back to top
View user's profile Send private message
anatol

Active User


Joined: 20 May 2010
Posts: 118
Location: canada

PostPosted: Tue Feb 13, 2018 3:33 am    Post subject:
Reply with quote

yes, OPTION VLSHRT will work with VB, but I don't know the positions to use ON(x,y,f) for NODUPS
Back to top
View user's profile Send private message
Arun Raj

Moderator


Joined: 17 Oct 2006
Posts: 2352
Location: @my desk

PostPosted: Tue Feb 13, 2018 5:56 am    Post subject:
Reply with quote

anatol wrote:
yes, OPTION VLSHRT will work with VB, but I don't know the positions to use ON(x,y,f) for NODUPS
But you know the LRECL of the VB data set, don't you? You just need to substitute the LRECL(- RDW length) in your ON(....) if you are using PGM=ICETOOL or SORT FIELDS=(...) if you are using PGM=SORT.

Keep in mind that NODUPS will suppress ALL the duplicate records. If you need to retain the very first duplicate record you might need FIRST.
Back to top
View user's profile Send private message
anatol

Active User


Joined: 20 May 2010
Posts: 118
Location: canada

PostPosted: Tue Feb 13, 2018 6:32 am    Post subject:
Reply with quote

good idea, but I don't know how to do that. Lets actual length of records are 10,10,30,30,40,40,40,10,50,50 how I should put it in ON parameter?
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8280
Location: Dubuque, Iowa, USA

PostPosted: Tue Feb 13, 2018 5:35 pm    Post subject:
Reply with quote

LRECL has nothing to do with the actual record lengths -- it is a single constant number that represents the longest possible record in the data set.
Back to top
View user's profile Send private message
anatol

Active User


Joined: 20 May 2010
Posts: 118
Location: canada

PostPosted: Tue Feb 13, 2018 6:32 pm    Post subject:
Reply with quote

Sorry - my mistake ... I was thinking that OPTION VLSHRT ignore the records if length is shorter than in ON() parameter. It worked - thank you
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts IDCAMS RENAMING VSAM FILE ALONG WITH ... upendrasri JCL & VSAM 11 Tue Apr 17, 2018 10:42 pm
No new posts VSAM file NOT Found error while proce... SumaReva CICS 5 Wed Apr 11, 2018 9:54 pm
No new posts converting a mainframe file with ASA ... Lynne Schuler All Other Mainframe Topics 5 Wed Apr 04, 2018 9:44 am
No new posts VSAM File free space sancraig16 JCL & VSAM 13 Fri Mar 30, 2018 1:02 am
No new posts write multiple lines in PS file in cobol Balu5491 COBOL Programming 7 Wed Mar 07, 2018 10:27 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us