John For clarification, would that be added to the )INIT section or the )PROC or the )REINIT
Lizette -----Original Message----- >From: John P Kalinich <[email protected]> >Sent: Jul 16, 2009 10:22 AM >To: [email protected] >Subject: Re: &ZSYSID In Panel > >Add this code to the panel. > >Regards, >John K > >&DOT = '.' >IF (&ZSYSID = 'SYSTS1') > &SID = '&ZSYSID.&DOT' >ELSE > &SID = '' > >&ZSEL = TRANS (TRUNC (&ZCMD,'.') >. . . >9,'CMD(EX ''SVS.IBMOM.&SID.SCKMPARM(CKMISPF)'')' > > >Lizette Koehler of the IBM Mainframe Discussion List <[email protected]> >wrote on 07/16/2009 09:06:25 AM: > >> Lizette Koehler <[email protected]> >> Sent by: IBM Mainframe Discussion List <[email protected]> >> >> 07/16/2009 09:06 AM >> >> Please respond to >> IBM Mainframe Discussion List <[email protected]> >> >> To >> >> [email protected] >> >> cc >> >> Subject >> >> Re: &ZSYSID In Panel >> >> A simple question. Do you have more than the 2 LPARS? If so, the >> the ZSYSID will probably be different for each LPAR. >> >> If that is not what you want, You may need to create a LOGON process >> to set a var that is used by your ISPF Prim panel. That way all >> LPARS except SYSTS1 will get the same library, and SYSTS1 will get >> the unique one. >> >> Lizette >> >> >> >> > >> >That should work (with the extra period after &ZSYSID). >> > >> > 9,'CMD(EX ''SVS.IBMOM.&ZSYSID..SCKMPARM(CKMISPF)'')'. >> > >> >Regards, >> >John K >> > >> >Kenneth.Klein of the IBM Mainframe Discussion List ><[email protected]> >> >wrote on 07/16/2009 07:37:35 AM: >> > >> >> I want to change this line in a panel definition in our main ispplib: >> >> >> >> 9,'CMD(EX ''SVS.IBMOM.SYSTS1.SCKMPARM(CKMISPF)'')' >> >> >> >> to one like this: >> >> >> >> 9,'CMD(EX ''SVS.IBMOM.&ZSYSID.SCKMPARM(CKMISPF)'')' >> >> >> >> SYSTS1 is the name of our sandbox lpar. I want to use this panel >> >> unchanged on the other lpars. >> >> Is that how this system variable is used or do I have to use a vget >into >> >> my own variable. > >---------------------------------------------------------------------- >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 ---------------------------------------------------------------------- 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
