if SWITCH( "INSTALL" ) then do      /* set tmpcmds                */
      queue "CMDUPD"                   /* zctverb                    */
      queue "4"                        /* zcttrunc                   */
      queue "SELECT CMD( %CMDUPD &ZPARM )"    /* zctact              */
      queue " ...                         "   /* zctdesc             */
      "FCCMDUPD"                       /* load the table             */
      exit
      end                              /* INSTALL                    */