I'm in the same boat, using VM again after about 12 years of not. I'm thinking about resurrecting something based on these profiles I used to use, which were still archived in an MVS pds created in 1991...
BROWSE CKDMJS1.VMEXEC(PROFILE) Line 00000000 Col 001 080
Command ===> Scroll ===> HALF
********************************* Top of Data **********************************
/* MJS XEDIT PROFILE - COPIED FROM PROFMJS XEDIT BY PROFILE EXEC */
TRACE OFF
IF QUEUED() > 0 THEN PULL ZTYPE
ELSE ZTYPE = EDIT
SAY 'ZTYPE='ZTYPE
'COMMAND SET MSGLINE ON 3'
'COMMAND SET MACRO ON'
'COMMAND SET CMDLINE TOP'
'COMMAND SET CURLINE ON 3'
'COMMAND SET SCALE ON 4'
'COMMAND SET NULLS ON'
'COMMAND SET NUM ON'
IF ZTYPE = 'BROWSE' THEN DO
'COMMAND SET PF3 QUIT'
'COMMAND SET PF15 QUIT'
'COMMAND SET PF4 QQUIT'
'COMMAND SET PF16 QQUIT'
END
IF ZTYPE = 'EDIT' THEN DO
'COMMAND SET PF3 FILE'
'COMMAND SET PF15 FILE'
'COMMAND SET PF4 QUIT'
'COMMAND SET PF16 QUIT'
END
'COMMAND SET PREFIX ON LEFT'
'COMMAND SET PF7 UP19'
'COMMAND SET PF19 UP19'
'COMMAND SET PF8 DOWN19'
'COMMAND SET PF20 DOWN19'
'COMMAND SET PF5 ONLY ='
'COMMAND SET PF17 MJSF'
'COMMAND SET PF5 REPEAT'
'COMMAND SET PF11 ONLY RIGHT 50'
'COMMAND SET PF10 ONLY LEFT 50'
'COMMAND SET PF12 ONLY SPLTJOIN'
'COMMAND SET PF22 ONLY LEFT 40'
'COMMAND SET PF23 ONLY RIGHT 40'
'COMMAND SET PREFIX SYNONYM R "'
'COMMAND SET PREFIX SYNONYM .R. "'
'COMMAND SET PREFIX SYNONYM RR ""'
'COMMAND SET PREFIX SYNONYM A F'
'COMMAND SET PREFIX SYNONYM B P'
'COMMAND SET PREFIX SYNONYM I SI'
'COMMAND SET PREFIX SYNONYM LL L'
'COMMAND SET PREFIX SYNONYM UU U'
'COMMAND SET PREFIX SYNONYM HH H'
'COMMAND SET SYNONYM COPY GET'
'COMMAND SET SYNONYM BNDS ZONE'
/*'COMMAND SET SYNONYM CAN QQUIT' - USE CAN.EXEC */
'COMMAND SET SYNONYM CANCEL QQUIT'
'COMMAND SET SYNONYM F MJSF'
'COMMAND SET SYNONYM FROW MJSFROW'
'COMMAND SET VERIFY 1 72'
'COMMAND SET WRAP ON'
ARG FN FT FM REST
IF LEFT(FN,3) = 'MS0' THEN 'COMMAND SET CASE MIXED IGNORE'
/*IF FT = 'EXEC' THEN 'COMMAND SET CASE MIXED IGNORE'*/
/*'COMMAND SET ENTER IGNORE COMMAND CURSOR HOME PRIORITY 5'*/
EXIT
******************************** Bottom of Data ********************************
BROWSE CKDMJS1.VMEXEC(PROFMJS) Line 00000000 Col 001 080
Command ===> Scroll ===> HALF
********************************* Top of Data **********************************
/* */
'CP TERM MODE VM'
'CP SET EMSG OFF'
'CP SET IMSG OFF'
/* 'CP SCRE STATAREA TUR REV' */
/* 'CP SCRE INA WHITE' */
/* 'CP SCRE INR GREEN' */
/* 'CP SCRE VMO TUR REV' */
/* 'CP SCRE CPO BLUE' */
/* 'CP SET PF1 RETRIEVE' */
'CP SET SMSG OFF'
'CP TERM HI ON'
'CP SET EMSG ON'
'CP SET IMSG ON'
'CP SET PF1 IMM HELP'
'CP SET PF13 IMM HELP'
'CP SET PF12 RETRIEVE'
'CP SET PF24 RETRIEVE'
'SYNONYM SYNONMJS'
'COPYFILE PROFMJS XEDIT A PROFILE = = (REP'
'LINK CKPROD 212 212 RR RHP110D'
'ACC 212 D'
'LINK HP110D 191 291 RR RHP110D'
'ACC 291 C'
/* 'LNK CKPROD MS312'*/
'LINK CKPROD 312 312 RR RMS312D'
'ACC 312 F'
/* 'LNK CKPROD 211'*/
'LINK CKPROD 211 211 RR RMS271D'
'ACC 211 E'
/* 'LNK CKPROD NA210'*/
'LINK NA210D 191 391 RR RNA210D'
'ACC 391 P'
'LINK CKPROD 322 322 RR RNA210D'
'ACC 322 Q'
/* 'LNK CKPROD 101'*/
'LINK CKPROD 101 101 RR RCKDEV'
'ACC 101 K' /* CK MACROS */
/* 'LNK MAINT 191'*/
'LINK MAINT 191 291 RR RMAINT'
'ACC 291 M'
/* 'LNK MAINT 595'*/
'LINK MAINT 595 595 RR RMAINT'
'ACC 595 G'
/* 'LNK MAINT 595'*/
'LINK MAINT 59E 59E RR RMAINT'
'ACC 59E H'
'Q DISK'
******************************** Bottom of Data ********************************
Martin Stone
Senior Software Engineer
Quest Software (now including the people and products of PassGo Technologies)
Horton Manor, Ilminster, Somerset
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED]
Behalf Of Ulrich Boche
Sent: 09 January 2008 13:12
To: [email protected]
Subject: Help with VM CMS Profile Files
After a good number of years of abstinence, I've started again to use
z/VM (mainly to maintain the RACF security of a z/VM hosting system).
When I was using VM years ago at IBM, we had a number of configuration
files such as PROFILE EXEC and PROFILE XEDIT to customize the CMS
environment. Especially, the standard appearance of the XEDIT editor is
quite miserable for people used to ISFP. I remember I had a PROFILE
XEDIT file that changed the XEDIT appearance to a look and feel much
closer to the ISPF editor.
Is there anybody (left) who could provide me with good samples of
PROFILE XEDIT and, maybe, also PROFILE EXEC?
--
Ulrich Boche
SVA GmbH, Germany
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
______________________________________________________________________
This email has been scanned by the MessageLabs Email Security System.
For more information please visit http://www.messagelabs.com/email
______________________________________________________________________
______________________________________________________________________
This email has been scanned by the MessageLabs Email Security System.
For more information please visit http://www.messagelabs.com/email
______________________________________________________________________
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
