Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Append sequence number inbetween a VB file

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

Active User


Joined: 17 Mar 2008
Posts: 148
Location: Anna NGR

PostPosted: Tue Jul 07, 2009 4:19 pm    Post subject: Append sequence number inbetween a VB file
Reply with quote

Hi,

I have a requirement to change a VB for adding sequence number in between.

I/P file is

100 11111 1000000 1000000 11111
100 11111 1000000 1000000 11111
101 11111 1000000 1000000 11111
101 11111 1000001 1000000 11111
101 11111 1000001 1000000 11111

Key vaues are the first 12 bytes which is a Packed fields.

O/p file should be

100 11111 1000000 1 11111
100 11111 1000000 2 11111
101 11111 1000000 1 11111
101 11111 1000001 1 11111
101 11111 1000001 2 11111

inbetween the fields i want to append my seqence no.

Note: the field iam trying to change is a Packed decimal

pls. assist me how can i achieve this.

Thanks,
Raj
Back to top
View user's profile Send private message

kratos86

Active User


Joined: 17 Mar 2008
Posts: 148
Location: Anna NGR

PostPosted: Tue Jul 07, 2009 5:18 pm    Post subject:
Reply with quote

I achieved my requirement using the sort card icon_biggrin.gif ,

Code:

  SORT FIELDS=(5,12,CH,A)                                             
  OUTREC FIELDS=(1,16,17:SEQNUM,4,PD,START=1,INCR=1,RESTART=(5,12),21)


Thanks,
Raj
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 Copy RECFM =VB TO FB file with RECL =... sahil41352 DFSORT/ICETOOL 3 Wed Dec 28, 2016 11:29 pm
No new posts Add PD field from 2nd file to PD in 1st Sushant Garje DFSORT/ICETOOL 6 Thu Dec 01, 2016 4:32 pm
No new posts File Aid to File Manager conversion murali3955 IBM Tools 4 Thu Nov 24, 2016 3:41 pm
No new posts How to convert the VBM file to VB or... Sulabh Agrawal JCL & VSAM 4 Fri Nov 18, 2016 1:04 pm
No new posts CICS Roll back partially - Need to re... dwijadas CICS 4 Wed Nov 16, 2016 4:30 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us