|
midrange.com
Wouldn't that be nice?
Paul Nelson
Arbor Solutions, Inc.
708-670-6978 Cell
pnelson@xxxxxxxxxx
"Courage is contagious. When a brave man takes a stand, the spines of
others are often stiffened." ~~ Billy Graham
"York, Albert" <albert.york@xxxxxxxxxxxxxx>
Sent by: midrange-l-bounces@xxxxxxxxxxxx
12/03/2003 03:49 PM
Please respond to Midrange Systems Technical Discussion
To: "'Midrange Systems Technical Discussion'"
<midrange-l@xxxxxxxxxxxx>
cc:
Subject: RE: I wanna check US Holiday!!!
Yes. I remember. It's CHGHAIRLIN RECEDE(*NO)
Albert York
-----Original Message-----
From: michaelr_41@xxxxxxxxxxxxxx
[SMTP:michaelr_41@xxxxxxxxxxxxxx]
Sent: Wednesday, December 03, 2003 1:24 PM
To: Midrange Systems Technical Discussion
Subject: Re: I wanna check US Holiday!!!
I think there's a TAA tool for just about whatever ails
you. I've
used
one for baldness.
On Wed, 3 Dec 2003 16:04:46 -0500, "Al Barsa"
<barsa@xxxxxxxxxxxxxxxxxxx>
said:
>
>
>
>
>
> There's a RTVHOLIDAY tool in TAA Tools. See:
>
> http://www.taatool.com/document/L_rtvholiday.htm
>
> Al
>
> Al Barsa, Jr.
> Barsa Consulting Group, LLC
>
> 400>390
>
> 914-251-1234
> 914-251-9406 fax
>
> http://www.barsaconsulting.com
> http://www.taatool.com
>
>
>
>
> Vern Hamberg
> <vhamberg@centerf
> ieldtechnology.co
> To
> m> Midrange Systems
Technical
> Sent by: Discussion
> midrange-l-bounce
<midrange-l@xxxxxxxxxxxx>
> s@xxxxxxxxxxxx
> cc
>
>
Subject
> 12/03/2003 02:37 Re: I wanna
check US
Holiday!!!
> PM
>
>
> Please respond to
> Midrange Systems
> Technical
> Discussion
> <midrange-l@midra
> nge.com>
>
>
>
>
>
>
> Murali, can you find out what controls the creation of
YPROF? Is
it on
> your
>
> iSeries box that it is created? Then use the same
process. Someone
had to
> have written it - it's not a standard part of OS/400.
Is it
controlled by
> something like ROBOT job scheduler? Or were you the one
that had a
> customer
>
> with Advanced Job Scheduler? Maybe something in there
controls it.
Use
> the
> same mechanism. Maybe there is an API. ROBOT has
functions you can
call
> to
> check these things against their internal objects. No
point in
> reinventing
> the wheel, eh?
>
> No magic bullet that I know of. Holidays vary according
to the
policies
> of
> your customer. Every company can have a different set.
There are
some
> rules
>
> for them, maybe, that you could use. Easter is relative
to some
solar or
> lunar events, I think. Thanksgiving is Thursday of a
certain week
in
> November.
>
> One method is to have a file with the holidays in it -
perhaps
year and
> day-number in the year (kind of *JUL format), then
figure out
whether the
> day you test is in that file - there are CEE* APIs for
dates that
could
> do
> this, maybe even something in RPG. SQL has DAYOFYEAR, I
think.
This file
> could be generated by rule, if you can find out what
they are, at
> year-end
> or at program initialization; or entered by the
customer according
to
> their
>
> requirements - Help Systems' ROBOT has those calendar
kinds of
things
> that
> can be applied to different jobs.
>
> Good luck
> Vern
>
> At 09:10 AM 12/3/2003 -0800, you wrote:
>
> >Following is the part of the program YPPM01
> >=======================================
> > FTP: IF COND(&BKSYS =
'85B')
THEN(DO)
> >
> > RTVDTAARA DTAARA(YODCTEST *ALL)
RTNVAR(&TEST)
> >
> > IF COND(&TEST = '*YES') THEN(DO)
> >
> > CLRSAVF FILE(QS36SAVF/YIMPORT)
> >
> >(7100) SAVOBJ OBJ(*ALL) LIB(YIMPORT)
DEV(*SAVF) +
> > SAVF(QS36SAVF/YIMPORT)
DTACPR(*YES)
> >
> > CLRSAVF FILE(QS36SAVF/YDATA)
> >==============================================
> >This program is failing at the statement SAVOBJ and
giving the
following
> >error.
> >****
> >CPF3701 received by YPPM01 at 7100. (C D I R)
> >Cannot allocate object for file YPROF in YIMPORT.
> >FILE YPROF in YIMPORT not saved.
> >****
> >
> >I found that file YPROF will nt be generated
> >on a US holiday. I will have to make a change to
check for a
holiday.
> >For our system Night Time date is changed on next date
8:00AM
> >I have to use this night time date to check for
holiday depending
on when
> >i check...
> >How can i modify my program to check for holiday
sothat i can
capture this
>
> >message and send a message to users.
> >what i thought sofar is putting a monmsg and the
followed by
sndusrmsg.Iam
>
> >still doubtful!!I request the folks here to share
their valuable
> >knowledge and suggest me what should i do to see i
should nt get
this
> >error in future...
> >Thank you so much from bottom of my heart to this list
and to the
folks
> >who are sharing their knowledge and spending valuable
time ...
> >Thanks in adv for help,
> >Murali.
>
>
> _______________________________________________
> This is the Midrange Systems Technical Discussion
(MIDRANGE-L)
mailing
> list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the
archives
> at http://archive.midrange.com/midrange-l.
>
>
>
> _______________________________________________
> This is the Midrange Systems Technical Discussion
(MIDRANGE-L)
mailing
> list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the
archives
> at http://archive.midrange.com/midrange-l.
>
--
michaelr_41@xxxxxxxxxxxxxx
--
http://www.fastmail.fm - Access your email from home and the
web
_______________________________________________
This is the Midrange Systems Technical Discussion
(MIDRANGE-L)
mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the
archives
at http://archive.midrange.com/midrange-l.
_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
