In SQL you can grab the numeric value of the day of week using:
select dayofweek(current_date) from filename
Thi returns a value of 1 for Monday, 2 for Tuesday, 3 for Wed, etc....
John Arnold
(301) 354-2939
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Phil Kestenbaum
Sent: Monday, October 01, 2007 7:59 AM
To: RPG programming on the AS400 / iSeries
Subject: RE: Day of the Week?
There is some code by Barbara Morris on
http://www.as400pro.com/
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of James Lampert
Sent: Wednesday, September 26, 2007 8:20 PM
To: RPG programming on the AS400 / iSeries
Subject: Day of the Week?
Is there an easy way for an ILE RPG program to find out the current day
of the week?
--
James H. H. Lampert
Touchtone Corporation
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.
This message contains information proprietary to our company. It is
intended to be read only by the individual or entity named above or
their designee.
Any distribution of this message or the information contained herein
without written permission from our company is strictly prohibited. If
the reader of this message is not the intended recipient or an agent
responsible for delivering it to the intended recipient, you are hereby
notified that you have received this document in error and that any
review, dissemination, distribution, or copying of this message is
strictly prohibited. If you have received this communication in error,
please notify us immediately by e-mail, and delete the original message.
midrange.com
