CD for z/OS - customisation of ISPF panel library for scroll amounts & CF enhancement

Hi. I have 2 enhancement requests, but they both relate to the ISPF panels for CD for zOS.

1. The default scroll amount on various panels is set to PAGE. I think the CSR setting is more flexible.
   As the panels do not remember your settings, I have had to amend the following members in the PANEL library, after installing the latest version of software, or any maintenance updates which affect these members. Therefore, can you either make the updates below, or allow the setting to be remembered (saved in your profile?).

Members in new CD V5.2.0 - .SDGAPENU library;

DGA@SN01 (alias DMI#SN01) - amend to be: &AMT   = CSR
DGA@SP01 (alias DMI#SP01) - amend to be: &ZAMT   = CSR
DGA@SP03 (alias DMI#SP03) - amend to be: &AMT   = CSR
DGA@SS01 (alias DMI#SS01) - amend to be: &AMT   = CSR
DGA@ST01 (alias DMI#ST01) - amend to be: &ZAMT   = CSR
DGA@ST02 (alias DMI#ST02) - amend to be: &AMT   = CSR
DGA@UTPI (alias DMIIUTPI) - amend to be: &TBLSCRL   = CSR
DGA@UTPQ (alias DMIIUTPQ) - amend to be: &TBLSCRL   = CSR
DGA@UTPR (alias DMIIUTPR) - amend to be: &TBLSCRL   = CSR
DGA@£100 (alias DMME£100) - amend to be: &AMT   = CSR
DGA@£102 (alias DMME£102) - amend to be: &AMT   = CSR

2. This enhancement is actually the more important of the two. In our organisation, some of our users have a tendency, when using the CF panels, of submitting a process, and then hitting ENTER until they see the COPY COMPLETION message! This inevitably leads to multiple processes being submitted for the same files - leading to process failures, or wasted processing by CD.

I have implemented a fix in a couple of the ISPF PANEL members, to prevent this from happening, and in the process educate the user.

Members in new CD V5.2.0 - .SDGAPENU library;
DGA@CF01 (alias DMI@CF01)
In the )INIT section:
after the line:

  &SPC  = ''                                      /* RESET SPEC. PROCESSING  */

I added the line:

  &O@BUILD = ' '

This will hold the OLD BUILD value.

+++++

(unrelated to this, I've also amended the PROCESS NAME variable to default to the user's RACFID - many users don't alter this field, so this now makes it easier for them to find their own processes, rather than the old default of COPYCF:)

  IF (&V@NEWN = ' ')                                                           
    &V@NEWN   = &ZUSER                            /* DEFAULT PROC NAME       */

+++++

DGA@CF20 (alias DMI@CF20)
In the )PROC section, I've amended the code block...

 /* *************** BUILD FINAL CMD STRING FOR DMICMD ********************/    
/*                                                         /* 1145461 */       
/*   &V@BUILD = '&V@CF01 &V@SDNS &V@FROM &V@TO'            /* 1145461 */       
     &V@CF01X = '&V@CF01  &V@CFS1 &V@CFS2 &V@CFP1 &V@CFP2' /* 1145461 */       
     &V@BUILD = '&V@CF01X &V@SDNS &V@FROM &V@TO'           /* 1145461 */       
/*                                                         /* 1145461 */       
     IF (&O@BUILD = &V@BUILD)                         /* NO CHANGES MADE     */
       .CURSOR = V@SDSN#                              /* SINCE LAST TIME, SO */
       .MSG = IUCF105I                                /* SET AN INFO MESSAGE */
     &O@BUILD = &V@BUILD                              /* SAVE CURRENT VALUES */
                                                                               
     &CMD1 = ' '                                        /* CLEAR CMD AREA    */
     &CMD2 = ' '                                                               
     &CMD3 = ' '                                                               
     &CMD4 = ' '                                                              

You'll see I've inserted an IF block between the &V@BUILD and &CMD1 lines, to check for changes in the build string - if none, then there's no need to re-submit. I then set the OLD value to the CURRENT value.

This also requires a new message to be added to the .SDGAMENU library;

Add the following to member DGAMCF10 (alias IUCF10);

IUCF105I '                         ' .TYPE=NOTIFY .WINDOW=LRESP
'Process NOT re-submitted.                                        ' +
'                                                                 ' +
'You have already submitted a process with the same information! ' +
'If you have not seen the completion messages yet, then you can ' +
'check on the progress of the copy using option SP from the main ' +
'Connect:Direct menu. '

Thanks in advance.