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
 
Increment number for every group of records

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

New User


Joined: 13 May 2008
Posts: 47
Location: Chennai

PostPosted: Thu Nov 09, 2017 10:31 pm    Post subject: Increment number for every group of records
Reply with quote

Hi,
My requirement is to increment the policy numbers within the data file for testing. every policy starts with record type 10 & ends with record type 13. All the records already have the dummy policy number 80988116.

Code:

90+20171108+15:05:51+HEADER+
10+ABCD001   +000080988116   +123
11+ABCD001   +000080988116   +123
12+ABCD001   +000080988116   +123
13+ABCD001   +000080988116   +123
10+ABCD001   +000080988116   +123
11+ABCD001   +000080988116   +123
12+ABCD001   +000080988116   +123
13+ABCD001   +000080988116   +123


I would like to add sequence number as below

Code:

90+20171108+15:05:51+HEADER+
10+ABCD001   +000080988116001+123
11+ABCD001   +000080988116001+123
12+ABCD001   +000080988116001+123
13+ABCD001   +000080988116001+123
10+ABCD001   +000080988116002+123
11+ABCD001   +000080988116002+123 
12+ABCD001   +000080988116002+123
13+ABCD001   +000080988116002+123 
10+ABCD001   +000080988116003+123
11+ABCD001   +000080988116003+123
12+ABCD001   +000080988116003+123
13+ABCD001   +000080988116003+123


I was looking in to samples given in the forum using WHEN=GROUP. But most of them looks like they increment for every record. Please let me know if this can be done through DFSORT.
Back to top
View user's profile Send private message

sergeyken

Active User


Joined: 29 Apr 2008
Posts: 212
Location: Maryland

PostPosted: Thu Nov 09, 2017 11:03 pm    Post subject:
Reply with quote

Code:
 IFTHEN=(WHEN=GROUP,
         BEGIN=(1,2,CH,EQ,C'10'),
         END=(1,2,CH,EQ,C'13'),
         PUSH=(27:ID=3))

Common answer: RTFM

This was a very primitive question.
Back to top
View user's profile Send private message
srajendran2

New User


Joined: 13 May 2008
Posts: 47
Location: Chennai

PostPosted: Fri Nov 10, 2017 12:33 am    Post subject:
Reply with quote

sergeyken wrote:
Code:
 IFTHEN=(WHEN=GROUP,
         BEGIN=(1,2,CH,EQ,C'10'),
         END=(1,2,CH,EQ,C'13'),
         PUSH=(27:ID=3))

Common answer: RTFM

This was a very primitive question. Shame on those who call themselves "professionals"


Thanks for the help. i understand you've tried to help me. you may be an expert. Not everyone understands every topic explained in the manual because of the language. But it doesn't give the rights to "RTFM" or shame someone who is asking for help. The language was offensive for me. i request you to be considerate while replying.
Back to top
View user's profile Send private message
sergeyken

Active User


Joined: 29 Apr 2008
Posts: 212
Location: Maryland

PostPosted: Fri Nov 10, 2017 12:52 am    Post subject:
Reply with quote

This forum is supposed to be used by some kind of experts, to clarify more or less sophisticated issues.

Unfortunately, 90% of new questions are at the same level of expertize as this example: "I'm given the task to multiply 2*2. I am new to REXX/Java/COBOL/JCL/SORT/... Can you, please, help me; it's very urgent"

There is a separate forum for beginners; everyone is welcome there, to clarify how to calculate 2*2
Back to top
View user's profile Send private message
srajendran2

New User


Joined: 13 May 2008
Posts: 47
Location: Chennai

PostPosted: Fri Nov 10, 2017 1:21 am    Post subject:
Reply with quote

sergeyken wrote:
This forum is supposed to be used by some kind of experts, to clarify more or less sophisticated issues.

Unfortunately, 90% of new questions are at the same level of expertize as this example: "I'm given the task to multiply 2*2. I am new to REXX/Java/COBOL/JCL/SORT/... Can you, please, help me; it's very urgent"

There is a separate forum for beginners; everyone is welcome there, to clarify how to calculate 2*2


When you say 90% of the questions are at the same level, i understand that there is no direction or recommendation of what can be posted in this forum. Or i think this is an input to group admin or site admin to have a message in the page where the user creates and submits the post to say only expert or high level questions can be posted here.
Back to top
View user's profile Send private message
Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1781
Location: Bloomington, IL

PostPosted: Fri Nov 10, 2017 5:24 am    Post subject:
Reply with quote

You will note that the top-left corner of this is a graphic calling this the "EXPERT FORUM".
Back to top
View user's profile Send private message
srajendran2

New User


Joined: 13 May 2008
Posts: 47
Location: Chennai

PostPosted: Fri Nov 10, 2017 11:36 pm    Post subject:
Reply with quote

Akatsukami wrote:
You will note that the top-left corner of this is a graphic calling this the "EXPERT FORUM".


Thanks for the update.

i have created multiple post and never noticed this. If you would like to avoid having simple issues to be posted, i would highly recommend to highlight in RED on the page where the post is created. just my thoughts. you can ignore, if it is not useful
Back to top
View user's profile Send private message
Rohit Umarjikar

Senior Member


Joined: 21 Sep 2010
Posts: 1818
Location: NY,USA

PostPosted: Mon Nov 13, 2017 8:15 pm    Post subject:
Reply with quote

Quote:
When you say 90% of the questions are at the same level, i understand that there is no direction or recommendation of what can be posted in this forum. Or i think this is an input to group admin or site admin to have a message in the page where the user creates and submits the post to say only expert or high level questions can be posted here.

If you ever have a doubt, post here regardless but after the proper research as usually similar questions certainly were answered in past.
Beginners Forum
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 Matching and unmatched records!! Vignesh Sid SYNCSORT 3 Thu Nov 09, 2017 11:22 am
No new posts Formatting multiple records to a sing... Vignesh Sid SYNCSORT 3 Tue Nov 07, 2017 12:22 pm
This topic is locked: you cannot edit posts or make replies. Can a alphanumeric data be moved to a... nico_neoz COBOL Programming 10 Mon Oct 30, 2017 8:28 am
No new posts Format Last Record differently from r... Learncoholic DFSORT/ICETOOL 5 Tue Oct 24, 2017 12:01 pm
No new posts sort records based on length exceeds ... maxsubrat DFSORT/ICETOOL 7 Wed Oct 04, 2017 4:48 pm

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