I have requirement in our project and we have ICEMAN in our project.
Below is structure of input file:
input file structure is - Header will be repeated for every 40 policies- i.e., every page will have 40 policies.- And records are not sorted And in future more states can be added.
POLICY NO STATE AGENCY CODE EFFECTIVE DATE
DP 116038 RI 000104600000 2009-08-16
DP 116242 IA 000101500000 2009-08-17
DP 216038 RI 000104600000 2010-08-16
DP 216242 MN 000101500000 2010-08-17
Required output is - State Column should be Removed- And policies should be grouped by state code.
STATE - RI
POLICY NO AGENCY CODE EFFECTIVE DATE
DP 116038 000104600000 2009-08-16
DP 216038 000104600000 2010-08-16
STATE - IA
POLICY NO AGENCY CODE EFFECTIVE DATE
DP 116242 IA 000101500000 2009-08-17
STATE - MN
POLICY NO AGENCY CODE EFFECTIVE DATE
DP 216242 MN 000101500000 2010-08-17
Is it possible using a JCL/DFSORT or do i need write a cobol code?
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
Suggest you search the forum, this has been asked and answered repeatedly.
with any luck, the other posters would have used a meaningful title which you decided was not necessary.
Help Required - DFSORT - Sorting as a title for a thread in a SORT forum, the function of the forum being to provide help,
is not very useful for searches.
Thank you very much for the sugesstion, I am very sorry for wasting your time.
I have given 1 min think on the subject, as any thing didnt stuck my brain, I have used help required.
I will make sure, to follow your suggestions from the next time and even i will try to change subject for this tread(i am not sure if it possible or not).
Once again thank you very much and sorry for wasting your time.
Thank you very very very much, the soultion you have given is working very fine. I just had two more question,
1. After State we are display RI, IA , MN - but while printing the output, if need to show the expanded form like RI- Rhode Island, IA - IOWA. How can we do that?
2. If there is some piece of header(company name, and some 3-4 lines - Actually i have missed in the above example) and need to display before every state and/or after every 40 policies, how to do that.
I am sorry for posing so many questions, I have never used DFSORT before, this is first i am using it for, a larger requirement. I will make to learn it.
2. If there is some piece of header(company name, and some 3-4 lines - Actually i have missed in the above example) and need to display before every state and/or after every 40 policies, how to do that.
HEADER3 is a section header. It will be displayed at the top of every state section. You can put whatever you want in HEADER3. If that doesn't help, then show an example of the output you want.
DATE RUN... 08/06/2009 ABC XYZ INC.
VALUATION DATE.08/06/2009 MMM PAGE: 1
ABCD PROCESS REPORT
POLICY NO STATE AGENCY CODE EFFECTIVE DATE
DP 116038 RI 000104600000 2009-08-16
DP 116242 IA 000101500000 2009-08-17
DP 216038 RI 000104600000 2010-08-16
DP 216242 MN 000101500000 2010-08-17
1,2,3,4(SPACES) LINES NEED TO BE DISPLAYED FOR EVERY STATE OR FOR EVERY 40 POLICIES(EACH PAGE CAN HAVE 40 POLICIES + 5 HEADER LINES)
AND Line two has a page number.
Can we achieve this. Thank you very much in advance for the every help.
Thank you very much for the generous help, but when i am trying to excute above code. I am facing issue. In the above code, Observed that in the first step sortout is &&S1, but in the second step SYSNAME is &&SYS1. I have fixed this, but the issue still continues.
Yes... DSCH..i just missed out something.sorry for that. according to the code provided by the frank, the state code is starting in the 21 positon.. So i have changed according to my input file where my State code is state code starts at 16.
Code:
1 DATE RUN.........05/15/2009 ABC COMPANY
VALUATION DATE...05/15/2009 PERSONAL LINES PAGE: 1
0 CAPPING WAS APPLIED ON THE FOLLOWING POLICI
0 POLICY NO STATE AGENCY CODE EFFECTIVE DATE CAP YR OLD WAY PREMIUM
---------- ----- ------------ -------------- ------ ---------------
DP 77238 RI 000144100000 2009-06-25 FIRST $1,404.00
DP 127754 RI 000103600000 2009-06-24 FIRST $1,244.00
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
Hello,
Your "omit" is a bit different than the one Frank posted. I don't know if this is a problem or not but that is when the first error message is written:
ICE170I 2 FORMAT OPERAND IGNORED
There is also the chance that your software doesn't have the most recent ptf.
I'll be away for a few hours, but someone will be online to follow up.
Good luck
Quote:
i am not sure until now how to use effectively post the info
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
There are several problems.
First off, in the second step, you have //SYSNAMES instead of //SYMNAMES so your symbols were ignored. Look at my job again and you'll see that I have //SYMNAMES.
Based on the original input you showed, I created the symbols as 45 characters which results in valid symbols. You changed that to create symbols of 100 characters which won't work. The Symbols data set must have RECFM=FB and LRECL=80, so I used IFOUTLEN=80 to set the length to 80. That will truncate your symbols to 80 bytes so they won't be valid. We'll have to break up your symbols so they'll work. Note that for the symbol with the PAGE number, we don't want to include the PAGE number part because we need to generate new page numbers for the new report.
Your fields don't seem to be where I thought they were either. But based on your latest job, I tried to figure out where they were. Here's my best guess at the DFSORT job you need: