Return to Mainframe Utilities Page
Module
PROC 0 HELP /*** CHECK THE DEBUG SWITCH ***/ ISPEXEC VGET DBGSWTCH PROFILE IF &DBGSWTCH = ON THEN + CONTROL MSG LIST CONLIST SYMLIST NOFLUSH NOPROMPT ASIS ELSE + CONTROL NOMSG NOLIST NOFLUSH NOPROMPT ASIS IF &HELP = HELP THEN GOTO HELPSEC /********************************************************************** /* UTILITY: SAVEPROF * /* AUTHOR: DAVE LEIGH * /* FUNCTION: SAVE THE CURRENT STATE OF ALL PROFILE VARIABLES TO DISK * /* SO THAT CHANGES ARE SAVED IMMEDIATELY * /********************************************************************** ISPEXEC VGET ZAPPLID SHARED ISPEXEC LIBDEF ISPTLIB LIBRARY ID(ISPPROF) ISPEXEC LIBDEF ISPTABL LIBRARY ID(ISPPROF) ISPEXEC TBSAVE &ZAPPLID.PROF ISPEXEC LIBDEF ISPTLIB ISPEXEC LIBDEF ISPTABL EXIT
Documentation
The SAVEPROF utility performs a TBSAVE on the profile table for the profile variable pool currently open. This can be valuable, in that ISPF never saves the profile pool ISPF table until ISPF is exited. Consequently, if you update a variable in ISPF and then time-out of TSO, you will loose that update. SAVEPROF ensures that the update will "stick" even if you do "time-out".