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 Converting Variable block file to Fix... bhavana yalavarthi DFSORT/ICETOOL 10 Tue May 16, 2017 2:20 pm
No new posts Getting error while opening a variabl... apandey1 COBOL Programming 5 Fri May 05, 2017 12:22 pm
No new posts SMTP the current generation number of... Jyothi Kulunde JCL & VSAM 4 Thu May 04, 2017 4:08 pm
No new posts Issue with NDM process to transmit ES... chetanambi All Other Mainframe Topics 6 Wed May 03, 2017 10:52 am
No new posts File processing vishwakotin Mainframe Interview Questions 9 Fri Apr 28, 2017 11:38 am


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