Was you under EDIF? It might explain why ISPF thought this is a builtin macro name.
Itschak | Itschak Mugzach | Director | SecuriTeam Software | | Email: [EMAIL PROTECTED] | Mob: +972 522 986404 | Skype: Itschak Mugzach | Web: www.Securiteam.co.il | -----Original Message----- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Hardee, Charles H Sent: Monday, July 21, 2008 4:34 PM To: [email protected] Subject: Re: TSO/ISPF Screen Swap Hi John, Thanks for the thought. I've tried that and either I have something not quite right, or it doesn't work any longer. This is what I have: ISPEXEC VGET (ZDEL) SET CMD = &STR(SCRNAME ON&ZDEL.SCRNAME &MEMBERNM PERM) ISPEXEC DISPLAY PANEL(FAKETSO) COMMAND(&CMD) Yes, I am using CLIST and not REXX, sorry :(. The panel, FAKETSO has 3 lines: )BODY )END The line between the )BODY and )END is blank. When I just had 2 lines, no blank line in between, panel management complained that I needed at least 1 line in the panel body. This is what I get when I execute the IMACRO: ********************************************************************* * ISPS109 * * Unexpected list found * A list of names was found where a list was not expected. * * * * * * * Current dialog statement: * ISPEXEC DISPLAY PANEL(FAKETSO) COMMAND(SCRNAME ON;SCRNAME XXX PERM) * * Enter HELP command for further information regarding this error. * Press ENTER key to terminate the dialog. If I use : ISPEXEC SELECT PGM(IEFBR14) PARM(&CMD) Instead of the DISPLAY PANEL, I don't receive any errors, but the upper left portion where I am expecting the result of the SCRNAME command are not correct. Specifically, I get "EDIT" for SCRNAME, not the name of the member being edited. Chuck <snip> Gilbert Saint-flour posted this on the TSO-REXX list a few years ago.. Address ISPEXEC "VGET ZSYSNODE" cmd = 'PANELID OFF;SCRNAME ON;SCRNAME 'zsysnode 'PERM' "DISPLAY PANEL(ISPSTRTP) COMMAND(CMD)" </snip> ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html __________ NOD32 3280 (20080718) Information __________ This message was checked by NOD32 antivirus system. http://www.eset.com ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
