Problem with he JU command w.r.t. multil-ine JCL statements?

I'm not sure whether I've found a bug or if my expectations exceed the
capability of Yves' code.

I haven't yet updated the ISPF Configuration Table. At this stage I want to
keep the new facilities 'under test', so I followed Paul Beesley's
suggestion earlier in this thread.

Example: I have a DD statement split over three lines:

//PDBOUT   DD   DSN=TESTFILE.NAME,
//          DISP=(NEW,CATLG,DELETE),SPACE=(TRK,(3000,150)),
//          DSORG=PS,RECFM=FS,BLKSIZE=27648,LRECL=27648

I deliberately change the text to lower case with 'LC' commands:

//pdbout   dd   dsn=testfile.name,
//          disp=(new,catlg,delete),space=(trk,(3000,150)),
//          dsorg=ps,recfm=fs,blksize=27648,lrecl=27648

Then I use JU commands, hoping to change the text back to upper-case:

//PDBOUT   DD   DSN=TESTFILE.NAME,
//          disp=(new,catlg,delete),space=(trk,(3000,150)),
//          dsorg=ps,recfm=fs,blksize=27648,lrecl=27648

Lines beginning '//<space>' aren't being converted...
I've tried again and used JUU...JUU, and with JU# - same result

Regards
Sean


On Tue, 28 Apr 2020 at 11:45, Lionel B Dyck <[email protected]> wrote:

> Glad you got it working - Yves did a FANTASTIC job creating this tool that
> greatly improves ISPF Edit.
>
>
> Lionel B. Dyck <sdg><
> Website: https://www.lbdsoftware.com
>
> "Worry more about your character than your reputation.  Character is what
> you are, reputation merely what others think you are." - John Wooden
>
> -----Original Message-----
> From: IBM Mainframe Discussion List <[email protected]> On Behalf
> Of Sean Gleann
> Sent: Tuesday, April 28, 2020 5:08 AM
> To: [email protected]
> Subject: Re: Request for help with CBT961
>
> I just noticed that one myself, Lionel. No, i didn't. (Got mixed up as to
> which z/OS version I was using. Doh!) Thanks anyway Sean
>
> On Tue, 28 Apr 2020 at 11:05, Joe Monk <[email protected]> wrote:
>
> > Maybe this will help:
> >
> > //***FILE 961 is from Yves Colliard and contains a collection of    *
> > FILE 961
> > //*           ISPF commands which can be added to your session.     *
> > FILE 961
> > //*                                                                 *
> > FILE 961
> > //*     YCLMAC - A collection of user line commands for use in      *
> > FILE 961
> > //*              ISPF Edit and View                                 *
> > FILE 961
> > //*                                                                 *
> > FILE 961
> > //*     by YCOS Yves Colliard Software - www.ycos.de                *
> > FILE 961
> > //*     and many others                                             *
> > FILE 961
> > //*                                                                 *
> > FILE 961
> > //*     Installation:                                               *
> > FILE 961
> > //*                                                                 *
> > FILE 961
> > //*     1. Copy YCLMACTB into ISPTLIB library                       *
> > FILE 961
> > //*     2. Copy REXX others into SYSEXEC or SYSPROC library         *
> > FILE 961
> > //*     3. Update ISPF site customization table (ISPFC) (z/OS 2.2)  *
> > FILE 961
> > //*        GLOBAL_LINE_COMMAND_TABLE = YCLMACTB                     *
> > FILE 961
> > //*     4. If using (E)JES instead of SDSF change the LMACJES2/3    *
> > FILE 961
> > //*        members from sdsf to ejes                                *
> > FILE 961
> > //*                                                                 *
> > FILE 961
> > //*     Members of this dataset:                                    *
> > FILE 961
> > //*                                                                 *
> > FILE 961
> > //*        $$$DOC           This member that you are reading        *
> > FILE 961
> > //*        $$$HELP          A copy of the HELP information          *
> > FILE 961
> > //*        $$$HELPS         A short reference "card" of commands    *
> > FILE 961
> > //*                                                                 *
> > FILE 961
> > //*     Rexx to be added to SYSEXEC/SYSPROC                         *
> > FILE 961
> > //*        YCLMACDS         REXX to extract DSN from records        *
> > FILE 961
> > //*        YCLMACHG         Summary of Changes                      *
> > FILE 961
> > //*        YCLMACLM         REXX to get messages                    *
> > FILE 961
> > //*        YCLMACNS         REXX to support split screen functions  *
> > FILE 961
> > //*        YCLMACRX         REXX to process new line commands       *
> > FILE 961
> > //*        YCLMAHLP         REXX to display help information        *
> > FILE 961
> > //*        YCLMAHLU         REXX to display user extensions         *
> > FILE 961
> > //*                         help information                        *
> > FILE 961
> > //*        Y$CL             REXX to compare members                 *
> > FILE 961
> > //*        Y$HC             REXX short help                         *
> > FILE 961
> > //*                                                                 *
> > FILE 961
> > //*     ISPF Table - must be copied to ISPTLIB                      *
> > FILE 961
> > //*        YCLMACTB         ISPF Table of Line Commands             *
> > FILE 961
> > //*                                                                 *
> > FILE 961
> > //*     Rexx Additional commands - extra installation needed        *
> > FILE 961
> > //*     Rexx to be added to SYSEXEC/SYSPROC if needed               *
> > FILE 961
> > //*        Y$REV            REXX to interface to Greg Price's       *
> > FILE 961
> > //*                         REVIEW command                          *
> > FILE 961
> > //*        Y$PDS            REXX to interface to the PDS command    *
> > FILE 961
> > //*        Y$PG             REXX to interface to Lionel Dyck's PDSEGEN
> >  FILE 961
> > //*        YCLMACT          REXX to support user line command       *
> > FILE 961
> > //*                         table extensions                        *
> > FILE 961
> > //*                                                                 *
> > FILE 961
> > //*     Samples to run EX command                                   *
> > FILE 961
> > //*        LMACJES2         Sample JES2 commands for use with EX    *
> > FILE 961
> > //*        LMACJES3         Sample JES3 commands for use with EX    *
> > FILE 961
> > //*        LMACMVS          Sample MVS (SDSF/EJES) commands for     *
> > FILE 961
> > //*                         use with EX                             *
> > FILE 961
> > //*        LMACTSO          Sample TSO commands for use with EX     *
> > FILE 961
> > //*        LMACUSS          Sample OMVS commands for use with EX    *
> > FILE 961
> > //*        LMACING          Sample System Automation cmds use       *
> > FILE 961
> > //*                         with EX                                 *
> > FILE 961
> > //*        LMACISPF         Sample ISPF commands use with EX        *
> > FILE 961
> > //*                                                                 *
> > FILE 961
> > //*     Sample coding for own application                           *
> > FILE 961
> > //*        YLM01            Sample application using own line       *
> > FILE 961
> > //*                         commands                                *
> > FILE 961
> > //*        YLM02            Sample application using own line       *
> > FILE 961
> > //*                         commands                                *
> > FILE 961
> > //*                                                                 *
> > FILE 961
> > //*     Addition of user/local commands:                            *
> > FILE 961
> > //*                                                                 *
> > FILE 961
> > //*        1. Update YCLMACT with the name of the new command       *
> > FILE 961
> > //*           - Update at the bottom in the User Command section    *
> > FILE 961
> > //*           - Follow the coding examples in YCLMACT               *
> > FILE 961
> > //*        2. Run the REXX YCLMACT to replace the line command      *
> > FILE 961
> > //*           table YCLMACTB                                        *
> > FILE 961
> > //*        3. Copy YCLMACTB into the ISPTLIB library                *
> > FILE 961
> > //*        4. Create a REXX Exec Y$xxx                              *
> > FILE 961
> > //*           - where xxx is the 1-6 character name of the new      *
> > FILE 961
> > //*             command                                             *
> > FILE 961
> > //*        5. Update YCLMAHLU to document the new command           *
> > FILE 961
> > //*                                                                 *
> > FILE 961
> >
> > Joe
> >
> > On Tue, Apr 28, 2020 at 4:58 AM Sean Gleann <[email protected]>
> wrote:
> >
> > > Can anyone help me with installing/using the ISPF editor extensions
> > > provided in CBT961, please?
> > >
> > > CBT961 came to my notice when reading through another thread here,
> > > and I thought it might come in handy.
> > > I've downloaded and RECVd the install package, then modified and
> > > used the £££INST skeleton JCL to copy the supplied members into the
> > > SYSEXEC
> > and
> > > ISPTLIB liraries specified in the relevant concatenations in my TSO
> > > logon proc.
> > > Logged off and on again, and tried to make use of the new commands
> > > in an ISPF edit ...
> > > Result: 'Command not recognised' in every case.
> > > What (almost certainly very basic) step have I missed out here?
> > > It's not a RACF thing. It's just as if I hadn't done anything at all.
> > >
> > > Hopefully,
> > > Sean Gleann
> > >
> > > --------------------------------------------------------------------
> > > -- For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to [email protected] with the message: INFO
> > > IBM-MAIN
> > >
> >
> > ----------------------------------------------------------------------
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to [email protected] with the message: INFO IBM-MAIN
> >
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to [email protected] with the message: INFO IBM-MAIN
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
>

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to