|
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
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 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.