¿ªÔÆÌåÓý

  1. H390-Vm
  2. Messages
Single Messages Topics Expanded Polls

Re: #VMCE #rexx EE goes XEDIT - compiling a wish list #VMCE #rexx

 

On Sun, Oct 30, 2022 at 12:33 PM, Bertram Moshier wrote:
Please add to the wishlist:? Accept * for the drive letter (e.g. EE DMKSYS ASSEMBLE *).
This should be acceptable, XEDIT on z/VM 6.4 behaves this way. LCM+L's VM/SP 5 is down atm.
It would also be nice to have a SYNONYM list for filetypes (e.g. ASM for ASSEMBLE).
This might be a typical task for the profile when EE will be able to run REXX-powered macros.
Here an example for XEDIT on z/VM 6.4 :

?PROFILE? XEDIT??? A1? V 255? Trunc=255 Size=17 Line=0 Col=1 Alt=0??? ?
====>???????????????????????????????????????????????????????????????? ?
????? |...+....1....+....2....+....3....+....4....+....5....+....6....+
????????????????????????????????????????????????????????????????????? ?
??? 0 * * * Top of File * * *???????????????????????????????????????? ?
??? 1 /* REXX */????????????????????????????????????????????????????? ?
??? 2 parse arg fn ft next??????????????????????????????????????????? ?
??? 3???????????????????????????????????????????????????????????????? ?
??? 4 fn = strip(fn)????????????????????????????????????????????????? ?
??? 5 upper fn??????????????????????????????????????????????????????? ?
??? 6 if abbrev("ASSEMBLE",ft,1) then "LOAD" fn "ASSEMBLE"??????????? ?
??? 7 if abbrev("ASM"???? ,ft,3) then "LOAD" fn "ASSEMBLE"??????????? ?
??? 8 if abbrev("XEDIT"?? ,ft,1) then "LOAD" fn "XEDIT"?????????????? ?
??? 9???????????????????????????????????????????????????????????????? ?
?? 10 /* all other commands AFTER "LOAD" */?????????????????????????? ?
?? 11 "set case m i"????????????????????????????????????????????????? ?
?? 12 "set prefix nulls left"???????????????????????????????????????? ?
?? 13 "set number on"???????????????????????????????????????????????? ?
?? 14 "set cmdline top"?????????????????????????????????????????????? ?
?? 15 "set scale on 3"??????????????????????????????????????????????? ?
?? 16 "set msgline on 3 20 overlay"?????????????????????????????????? ?
?? 17 "set curline on 5"????????????????????????????????????????????? ?
?? 18 * * * End of File * * *???????????????????????????????????????? ?
??????????????????????????????????????????????????????????????????????

Join [email protected] to automatically receive all group messages.