×

Good News Everybody!

The new search engine is LIVE!

Please report any problems to david (at) midrange.com.




Just goes to show you that the boss needs to run some of that stuff 
through Quality Assurance   :-)

Rob Berendt
-- 
"They that can give up essential liberty to obtain a little temporary 
safety deserve neither liberty nor safety." 
Benjamin Franklin 




"York, Albert" <albert.york@xxxxxxxxxxxxxx> 
Sent by: midrange-l-bounces@xxxxxxxxxxxx
12/03/2003 04:49 PM
Please respond to
Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>


To
"'Midrange Systems Technical Discussion'" <midrange-l@xxxxxxxxxxxx>
cc

Fax to

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 thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2026 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.