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