Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations Chriss Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
how to invoke rexx panel from jcl
- Thread starter gpinaki
- Start date
Start with the Dialog Developer's Guide and Reference in ch.2.13, "ISPF Services in Batch Mode".
If the process is one that you (in fact) can run in the background, your JCL must allocate all the necessary ISPF filenames: ISPLOG, ISPPROF, ISPPLIB, ISPSLIB, ISPMLIB, ISPTLIB... possibly others, too, depending on the actual process. You must then start execution by "ISPSTART CMD(...)" in SYSTSIN.
If the process is one that you (in fact) can run in the background, your JCL must allocate all the necessary ISPF filenames: ISPLOG, ISPPROF, ISPPLIB, ISPSLIB, ISPMLIB, ISPTLIB... possibly others, too, depending on the actual process. You must then start execution by "ISPSTART CMD(...)" in SYSTSIN.
KarlheinzWittemann
Programmer
also you havve to know, if you are in batch or foreground. in batch you habe to set your variables and in frotn you invoke the display service you have to make clear, that your panel will not wait for a user action
:
address ispexec
if run_in_batch() then do
"control display lock"
"display panel(pname)"
/* set your variables */
end
else do
"display panel(pname)"
end
:
exit
run_in_batch: procedure
/*
set MODE to 0 or 1, depending how your program runs
if you need something here, let me know
*/
return mode
:
address ispexec
if run_in_batch() then do
"control display lock"
"display panel(pname)"
/* set your variables */
end
else do
"display panel(pname)"
end
:
exit
run_in_batch: procedure
/*
set MODE to 0 or 1, depending how your program runs
if you need something here, let me know
*/
return mode
- Status