I HAVE PROBLEM WITH PASSING PARAMETERS FROM MY ISPF PANEL TO A REXX PROGRAM.
FOR EXAMPLE, I WROTE A VERY SIMPLE PANEL TO READ A USERNAME AND SHOW IT A REXX PROGRAM.
MY PANEL CODE IS:
%COMMAND ===>_ZCMD
+USERID ===>_UUSER +
)PROC
VPUT (UUSER) SHARED
&ZSEL = TRANS( TRUNC (&UUSER,'.')
*, 'PGM(PASSSS)' )
)END
+USERID ===>_UUSER +
)PROC
VPUT (UUSER) SHARED
&ZSEL = TRANS( TRUNC (&UUSER,'.')
*, 'PGM(PASSSS)' )
)END
AND THE RELEVANT REXX CODE(PASSSS) IS:
/* REXX */
TRACE ON
ADDRESS ISPEXEC
"VGET (UUSER) SHARED"
SAY 'THE USER IS:' UUSER
TRACE ON
ADDRESS ISPEXEC
"VGET (UUSER) SHARED"
SAY 'THE USER IS:' UUSER
BUT IT DOESNT WORK AND always THE OUTPUT IS : ""THE USER IS: UUSER "" !!!
INSTEAD OF "SHARED",I TESTED "PROFILE".BUT THE RESULT WAS SAME.
COULD ANYBODY HELP?
BEST REGARDS,
MEHRDAD