RE: [EXTERNAL] Getting last Friday's date

[Greg Wilburn <gwilburn@xxxxxxxxxxxxxxxxxxxxxxx>]

Great!  I copied the table to our library and updated the rows that were holidays.  I have procedures that calculate the number of "business days" based on the table (skipping holidays).  

I may need to extend mine past 2030 - it's quickly approaching.  That would break a lot of stuff here.

I did not know that Doug Mack retired... good for him.

-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Jim Oberholtzer
Sent: Tuesday, August 8, 2023 10:39 AM
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxxxxxxxx>
Subject: Re: [EXTERNAL] Getting last Friday's date

Using RUNSQL I was able to create a CLLE that achieves my goal, Thanks for
the tip.

--
Jim Oberholtzer
Chief Technical Architect
Agile Technology Architects


On Tue, Aug 8, 2023 at 7:17 AM Greg Wilburn <
gwilburn@xxxxxxxxxxxxxxxxxxxxxxx> wrote:

> I use a table from IBM called DATE_CONV for a lot of my date converting
> (JOIN is faster than converting).  I think this was included with web query
> in QWQCENT library.
>
> select dc_date from date_conv
> where dc_date <= current_date and dc_day_name='Friday'
> order by dc_date desc
> fetch first row only;
>
> Result is 2023-08-04
>
> Of course, you can return your date in virtually any date format.
>
> HTH
>
> -----Original Message-----
> From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Jim
> Oberholtzer
> Sent: Thursday, August 3, 2023 3:30 PM
> To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxxxxxxxx>
> Subject: [EXTERNAL] Getting last Friday's date
>
> I need to retrieve the date from last Friday.  If it is Friday, I want the
> current date.  Anyone have a routine that does that before I start
> developing one?   Seem like a good SQL problem but the program using it
> would be in CLLE.
>
> Thoughts?
> --
>
> --
> Jim Oberholtzer
> Chief Technical Architect
> Agile Technology Architects
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/midrange-l.
>
> Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
> questions.
>
> [CAUTION! This email originated outside of the organization. Please do not
> open attachments or click links from an unknown or suspicious origin.]
>
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/midrange-l.
>
> Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
> questions.