I was wondering if someone has a focus proc that updates NEXTRUNTIME in botsched inorder to run a schedule immediately. Are there any other columns that need to be updated along with NEXTRUNTIME to schedule the job immediately. I know that I will have to build the NEXTRUNTIME in Zoolo(?) time.

Any assistance will be greatly appreciated

Barry,

If you look in the "IB - Development Center" link (top left) and then go to "Tips and Techniques", you will find two articles that would be of use to you.

The first by Susannah entitled "Zulu Time" about interpreting times from Report Caster, and the second article by Jodye entitled "How to Automatically Delay Report Caster Jobs".

A combination of the information held within these two documents should give you enough information to assist, however, be aware that "schedule the job immediately" doesn't mean what a lot of people believe. RC sweeps the list periodically to see what needs executing, so you might be better off setting the next run time to now + 10 seconds.

There are also quite a few topics within the Forum on this subject already. Use the link "Search the Technical Document Library" above right, and in the right hand selection select "FOCUS / WebFOCUS Messages" in the combo box and then enter "next run time" in the "search for:" text box.

Good luck

T

If you want to run a job immediately, you may be able to use the DSTRUN subroutine. There have been several topics about it so search on it as well. I doesn't do anything fancy, it just submits a RC job for immediate execution.

This is my solution to DSTRUN by updating the nextruntime in the botsched.

-* File runonce.fex
-DEFAULT &SchedID = 'S135ooagmo0a';


-SET &TIME1 = EDIT(&TOD);
-SET &HOUR = EDIT(&TIME1,'99$$$$$$');
-SET &MIN = EDIT(&TIME1,'$$$99$$$');
-SET &SEC = EDIT(&TIME1,'$$$$$$99');

DEFINE FILE BOTSCHED
-* OFFSET/D12 = '&OFFSETHOURS.EVAL';
TODAYDATE/YYMD = &YYMD;
OFFSET/D12 = IF TODAYDATE IS-FROM 20080406 TO 20081026 THEN 4 ELSE IF TODAYDATE IS-FROM 20090405 TO 20091025 THEN 4 ELSE IF TODAYDATE IS-FROM 20100404 TO 20101031 THEN 4 ELSE IF TODAYDATE IS-FROM 20100404 TO 20101031 THEN 4 ELSE 5 ;
ORA_BASE/YYMD = '1970/01/01';
NoOfDays/D12 = DATEDIF(ORA_BASE, TODAYDATE, 'D');
SEC_HR/D12 = 3600 ;
SEC_DAY/D12 = 86400 ;
TIMEHR/D12 = &HOUR * SEC_HR ;
TIMEMIN/D12 = (&MIN * 60) + &SEC;
DaysSeconds/D19 = (((NoOfDays * SEC_DAY) + (OFFSET * SEC_HR) + TIMEHR + TIMEMIN ) * 1000) ;
DS/A32 = FTOA(DaysSeconds,'(D19)','A32');
DS3/A32 = STRREP(32, DS, 1, ',', 0, '',32, 'A32')
END

TABLE FILE BOTSCHED
PRINT DS3
WHERE SCHEDULEID = '&SchedID.EVAL'
ON TABLE HOLD AS NEXTRT FORMAT ALPHA
END

-RUN
-READ NEXTRT &NEWRT.A32
-SET &RT = '&NEWRT.EVAL';

END

-RUN
SQL SQLORA

UPDATE BOTSCHED SET NEXTRUNTIME = LPAD('&RT',32,'0') WHERE SCHEDULEID = '&SchedID';
END

-SET &ERRMSG = IF( &RETCODE EQ 0 ) THEN 'The report submitted for execution' ELSE 'The report was not run, try later';

This message has been edited. Last edited by: <Barry>,