If your Process Manager server is on a different host to your MA servers, then you do have the option of setting the LSF queue which runs your campaigns to be OPEN and INACTIVE. This will allow scheduled campaigns to be submitted to the queue at the normal time, but not execute (they will just sit there in PM waiting). When your MA server(s) come back online, you can ACTIVATE the queue, which would allow the campaign to then begin executing. This could even work if PM is on the same host as MA, providing you are able to leave PM running.
However, to go back to your question about getting a list, jdefs will produce a job listing that includes the last and next time of execution. I've highlighted the interesting parts in red.
C:\Users\sas>jdefs -l
User name: .\lsfadmin
Password:
NAME: _CAMP1303
-- 2015 Marketing campaign CI\Financial Services\CI Business Context\Campaigns\Outbound\MOM-MA Starts Friday, July 6, 2018 2:00:00 AM EDT Recurs every 1 day(s) Ends after 1 occurrences
USER STATUS FLOW_IDS
.\lsfadmin Release
DEFAULT VERSION: 1.0
LATEST VERSION: 1.0
Triggering Events :
Last Event: None
Next Event: Fri Jul 06 02:00:00 GMT-04:00 2018
Exit Condition:
All jobs completed successfully.
The trick here is that jdefs requires a user and password to be provided interactively. So you need to write a script to do this. On Linux you can use the EXPECT command:
getJobDefs.sh
#! /bin/sh
/usr/bin/expect <
spawn jdefs -l -u $1
expect "User name:"
send "lsfuser\r"
expect "Password:"
send "myPassword\r"
expect eof
EOD
Then with some good 'ol BASE SAS, pipe filename and some string parsing you can put this data into a dataset.
%MACRO GetJobDefs(User) ;
filename jdefcmd pipe "&ScriptDir/getJobDefs.sh &User";
data jdefs_tmp (drop= jdefstr LastEvent NextEvent);
format jdefstr $1000.
FlowName $50.
JobStatus $20.
User $50.
LastEvent $35.
LastRun Datetime19.
NextRun Datetime19.
Trigger $200. ;
infile jdefcmd lrecl=1000 truncover ;
input @1 jdefstr $1000. ;
retain FlowName JobStatus User LastRun NextRun Trigger ;
if jdefstr =:'NAME:' then do ;
FlowName=substr(jdefstr,7) ;
JobStatus = '' ;
LastRun = '' ;
NextRun='' ;
Trigger='' ;
end;
if jdefstr =: "&User" then do;
JobStatus = scan(jdefstr,2,' ') ;
User = "&User" ;
end;
if jdefstr=: '<' then do;
Trigger = scan(jdefstr,1, '<>');
end;
if jdefstr =: 'Last Event' then do;
LastEvent = CATT(substr(jdefstr, index(jdefstr,':')+1));
if INDEX(LastEvent, 'None') = 0 then do;
LastRun = input(CATX(' ', CATT(scan(LastEvent,3), scan(LastEvent,2), scan(LastEvent,-1)), scan(LastEvent,4)), Datetime19.) ;
end ;
end;
if jdefstr =: 'Next Event' then do;
NextEvent = CATT(substr(jdefstr, index(jdefstr,':')+1));
if INDEX(NextEvent, 'None') = 0 then do;
NextRun = input(CATX(' ', CATT(scan(NextEvent,3), scan(NextEvent,2), scan(NextEvent,-1)), scan(NextEvent,4)), Datetime19.) ;
end ;
output ;
end;
run;
%MEND ;
%
/* get history and jobs for all users */
%GetJobDefs(all);
Cheers
James
