Dynamically concatenating the libraries needed to execute the YKSTART command

You can start YKSTART by dynamically concatenating the libraries required to execute YKSTART.

• The REXX Exec library HDSYEXET or HDSYEXVT can be dynamically concatenated by the ALTLIB command of TSO/E.
• The panel library HDSYPNLT, message library HDSYMSGT, and table library HDSYTABT can be dynamically concatenated by the LIBDEF service of ISPF.

The example below shows how to use the ALTLIB command and LIBDEF service.

By executing the REXX script below during ISPF startup, you can start Business Continuity Manager with individual libraries being dynamically concatenated to the DD names SYSEXEC, ISPPLIB, ISPMLIB, and ISPTLIB.

For the REXX script name, do not use a name that includes YK or JYU. If the REXX script name matches the name of a load module in the Business Continuity Manager load library, the Business Continuity Manager load module might be started instead of the REXX script. If this occurs, the REXX script does not operate correctly.

/* REXX */

  ADDRESS TSO "ALTLIB ACTIVATE APPLICATION(EXEC)",
               "DATASET('HDSYK.Vnnnnnn.HDSYEXET')";

  ADDRESS ISPEXEC;
  "LIBDEF ISPMLIB DATASET ID('HDSYK.Vnnnnnn.HDSYMSGT') STACK";
  "LIBDEF ISPPLIB DATASET ID('HDSYK.Vnnnnnn.HDSYPNLT') STACK";
  "LIBDEF ISPTLIB DATASET ID('HDSYK.Vnnnnnn.HDSYTABT') STACK";

  "SELECT CMD(YKSTART) NEWAPPL(YK) PASSLIB";

  "LIBDEF ISPTLIB";
  "LIBDEF ISPPLIB";
  "LIBDEF ISPMLIB";

  ADDRESS TSO "ALTLIB DEACTIVATE APPLICATION(EXEC)";
  Return 0;