Page 1 of 1

How to extract data less than 90 days from the Current Data

PostPosted: Sun Apr 08, 2018 4:53 pm
by N J Baruah
Hi All,

I have an input file which is having data along with a reference date. The reference date is in the format YY/MM/DD and it is present in 55-62 column. My requirement is to sort out all those data from the input file to the output which has been last referenced within 3 months i.e 90 days. I am using the below code:
______________________________________________________________________
//STEP1 EXEC PGM=ICEMAN
//SYMNAMES DD *
Cur_Date,S'&YR2./&MON./&DAY'
/*
//SORTIN DD DSN=INPUT.FILE,DISP=SHR
//SORTOUT DD DSN=OUTPUT.FILE, DISP= ....
//SYSIN DD*
OPTION COPY
INCLUDE COND=(55,8,CH,EQ,Cur_Date-90)
/*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
______________________________________________________________________

But I am not able to retrieve the data which has been last referenced within 3 months.
Can anyone please help me to correct my mistake and get the required results ?

Re: How to extract data less than 90 days from the Current D

PostPosted: Sun Apr 08, 2018 5:41 pm
by Robert Sample
Let's see --
You don't tell us what problem you have with your code
You don't show us job output
You don't tell us how the actual output is different from what you expect
You don't show us any SORT messages

In other words, you provided nothing for us to help you with.

Furthermore, you have ALREADY asked about this -- if you're not happy with the answers in the other topic, perhaps you should ask a better question?

Topic locked as duplicate.