looks like my email reply got truncated:
===> Scroll ===> CSR
Say "SM1 invoked"
Say " "
Say "Job() =" Jobname()
Say "Appl() =" Applname()
/* REXX: ASEPSAME(CYBESS67) */
/* Copyright (C) 2006 CA */
/* CSF/ApplMon extension to Trigger an Event */
/* associated with a job or Application. */
/* Command Name: TR */
/* Uncomment the following line to enable the confirmation pop-up. */
/* AskConf = "Yes" */
/* Blank out Variables used in panel CYBESTRI: */
A = "" /* Bypass next scheduled execution option */
AA = "" /* System option */
AA2 = "" /* Trigger time/date */
B = "" /* Place Appl on hold option */
FF1 = "" /* User1 parm */
FF2 = "" /* User2 parm */
FF3 = Jobname() /* User3 parm */
FF4 = Applname() /* User4 parm */
FF5 = "" /* Root jobs1 */
FF6 = "" /* Root jobs2 */
FF7 = "" /* Subapplication */
Q = "" /* Case sensitivity flag */
Raopt = "" /* Replace or Add option */
Again:
/* Display panel CYBESTRI to obtain options: */
/*Address ISPEXEC "DISPLAY PANEL(CYBESTRI)" */
Address ISPEXEC "DISPLAY PANEL(CYBESSM1)" << panel cybessm1 is 100% copy of panel cybestri (I don’t want to mess with original panel)
Say "FF3 STILL =" FF3
exit /* MB */ <<<< I am exiting here while testing
You can see FF3 is set to Jobname() and FF4 to Applname()
When I type SM1 next to job a#biega, I get a display verifying
the variables FF3 and FF4 are correct at least while inside the rexx:
SM1 invoked
Job() = A#BIEGA6
Appl() = SMTEST
***
but panel cybessm1 which, again, is a 100% identical copy of cybestri still shows no values whatsoever in USER3 or USER4:
CYBESSM1 --------------------- TRIGGER AN EVENT --------------------------
COMMAND ===>
FIll in any of the following optional fields and press ENTER:
REPLACE/ADD ===> (Defaults to REPLACE - set by TRDFLT command)
TRIGGER TIME ===>
(Specify trigger time/date, NOW is the default)
APPL on HOLD ===> (Specify Y to place Application in APPLHOLD status)
BYPASS XEQ ===> (Specify Y to bypass next scheduled Event execution)
SYSTEM ===> (SYSID where this Event is to execute)
User Parameters passed to Event:
USER1 ===>
USER2 ===>
USER3 ===>
USER4 ===>