© serviceprofessionalgmbh

Stellt das Profil des Editors auf den gewünschten Standard und erlaubt an Stelle des SAVE-Kommandos ein simples S.

/* REXX * EDIT MACRO *************************************************/
/*                                                                   */
/* Macroname.: $PROF                                                 */
/*                                                                   */
address isredit
"macro"
"define s alias save"
"(,lockmode) = profile"
"autolist off"
"autonum off"
"autosave on"
"caps off"
"hex off"
"nulls on"
"recovery on"
"stats on"
"tabs off"
if lockmode = "UNLOCK" then do
   status = "mit Standardwerten gespeichert"
end
else status = "temporaer veraendert"
zedsmsg="Profile O.K."
zedlmsg="Profile" status
address ispexec "setmsg msg(isrz000)"
exit
zurück zu Edit Makros