copy matching and its next record



Support for NetApp SyncSort for z/OS, Visual SyncSort, SYNCINIT, SYNCLIST and SYNCTOOL

copy matching and its next record

Postby ranga_subham » Fri Jan 16, 2009 9:32 pm

Hi,

My input data (LRECL=80 and RECFM=FB) looks like this...

----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8
0000016138800000NA132009          000002303070000100000230307000013ZX62   000100
0000016138800000NB11+C1U +LE5 +MN5 +NE1 +UE0 +U2J +VQ2 +VX7 +1FL +75U +83B     
0000016138800000NA162009          000001896240000100000189624000018SL28   000100
0000016138800000NB11+C1U +C60 +LAX +MX0 +NE1 +PCM +VQ2 +VX7 +1SB +14C +20U     
0000016138800000NA162009          000001896240000100000189624000018SL28   000100
0000016138800000NB11+C1U +C60 +LAX +MX0 +NE1 +PCM +VQ2 +VX7 +1SB +14C +70U     
0000016138800000NA132009          000002303070000100000230307000019ZG61   000100
0000016138800000NB11+C1U +LE5 +MN5 +NE1 +UE0 +U2J +VQ2 +VX7 +1FL +75U +83B     
0000016138800000NA162009          000001896240000100000189624000018SL28   000100
0000016138800000NB11+C1U +C60 +LAX +MX0 +NE1 +PCM +VQ2 +VX7 +1SB +14C +71U     


I want the outupt data as given below: Copy all the records that have "8SL28" starting at 67th column and its next 1 record.

0000016138800000NA162009          000001896240000100000189624000018SL28   000100
0000016138800000NB11+C1U +C60 +LAX +MX0 +NE1 +PCM +VQ2 +VX7 +1SB +14C +20U     
0000016138800000NA162009          000001896240000100000189624000018SL28   000100
0000016138800000NB11+C1U +C60 +LAX +MX0 +NE1 +PCM +VQ2 +VX7 +1SB +14C +70U     
0000016138800000NA162009          000001896240000100000189624000018SL28   000100
0000016138800000NB11+C1U +C60 +LAX +MX0 +NE1 +PCM +VQ2 +VX7 +1SB +14C +71U     


Please let me know how to get it. We are using SYNCSORT FOR Z/OS 1.2.3.1R.

Please help.

Thanks.
ranga_subham
 
Posts: 279
Joined: Fri Jul 18, 2008 7:46 pm
Has thanked: 0 time
Been thanked: 1 time

Re: copy matching and its next record

Postby Alissa Margulies » Fri Jan 16, 2009 10:08 pm

This can be easily accomplished in SyncSort for z/OS 1.3.2 with the WHEN=GROUP feature. Please contact the system programmers at your site who support SyncSort and request that they upgrade to the current release. This is a free upgrade.
Alissa Margulies
Syncsort Mainframe Product Services
201-930-8260
zos_tech@syncsort.com
Alissa Margulies
Global moderator
 
Posts: 369
Joined: Tue Feb 26, 2008 11:15 pm
Location: USA
Has thanked: 1 time
Been thanked: 3 times

Re: copy matching and its next record

Postby ranga_subham » Fri Jan 16, 2009 10:11 pm

Alissa, thanks for the suggestion. Our recommendations are not considered :( Any workaround?
ranga_subham
 
Posts: 279
Joined: Fri Jul 18, 2008 7:46 pm
Has thanked: 0 time
Been thanked: 1 time

Re: copy matching and its next record

Postby dick scherrer » Sat Jan 17, 2009 2:28 am

Hello,

Suggest you tell your manager that "they" (system support) can upgrade the product or you (and probably others) will spend additional time writing code for what could be a utility function.

Keep in mind that if the only function this process needs to do is copy the required records, a utility approach is fine. If there are also lots of business requirements that need to be met, using code is a better choice anyway.
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6268
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times


Return to Syncsort/Synctool

 


  • Related topics
    Replies
    Views
    Last post