If you use 'Base' then maths works without needing to worry about 0 or
negatives.
/* REXX */
TODAY = DATE('BASE')
YESTERDAY = TODAY-1
DAYB4 = TODAY-2
ISODATE = DATE('STANDARD',TODAY,'BASE')
SAY ISODATE
ISODATE = DATE('STANDARD',YESTERDAY,'BASE')
SAY ISODATE
ISODATE = DATE('STANDARD',DAYB4,'BASE')
SAY ISODATE
This gives me:
20180802
20180801
20180731
On Thu, Aug 2, 2018 at 4:44 PM ITschak Mugzach <[email protected]> wrote:
> Try this logic:
>
> - Get the Julian date of today (YYXXX)
> - Deduct 1 from Julian date (xxx)
> - Last 3 digits zero? (xxx)
> - Deduct one from first two chars (year) (YY)
> - Decide the Julian date (365 or 366 based on year/4) (xxx)
>
> ITschak
>
>
> On Thu, Aug 2, 2018 at 10:38 AM saurabh khandelwal <
> [email protected]> wrote:
>
> > Hello Group,
> >
> > In REXX , we have Date function to calculate today's date but do we have
> > any separate function to calculate yesterday's date.
> >
> > currently, we used
> >
> > TODAY= DATE('S')
> > YESTERDAY = TODAY - 1
> >
> > this code work whole month but, starting of the month where we have date
> >
> > ex :
> >
> > TODAY - '20180801'
> >
> > then yesterday will be calculated like
> >
> > TODAY -1 , So yesterday value will be
> > YESTERDAY = '20180800' , which is wrong.
> >
> > Can you please help to overcome this issue.
> >
> > ----------------------------------------------------------------------
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to [email protected] with the message: INFO IBM-MAIN
> >
>
>
> --
> ITschak Mugzach
> *|** IronSphere Platform* *|* *Information Security Contiguous Monitoring
> for Legacy **| *
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
>
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
