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
 
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 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 Repeat Sequence Number Until change i... rahulabvp DFSORT/ICETOOL 6 Thu Mar 29, 2018 12:51 pm

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