How to force the JCLNeat custom options table values, specified in MZ1C020 usermod, also in CA JCLNeat foreground execution under TSO/ISPF.

Document ID:  TEC1283929
Last Modified Date:  07/12/2017
{{active ? 'Hide' : 'Show'}} Technical Document Details

Products

  • CA JCLCheck Workload Automation

Releases

  • CA JCLCheck Workload Automation:Release:12.0

Components

  • CA JCLCheck workload Automation:JCLCHK
  • CA-JCLCheck Common Component:CM-Z2
Introduction:

The CA JCLNeat component contains default options that are different from the CA JCLCheck runtime options. They control how CA JCLNeat will format data. Usermod MZ1C020 can be used to change these defaults.

Background:

The CA JCLNeat component contains default options that are entirely different from the CA JCLCheck runtime options. The JCLNeat default options control how the CA JCLNeat component operates and interprets data.

In section "Using JCLNeat" of the CA JCLCheck Command Reference Guide, we describe how these options can be referenced to override the default values in a batch JCLNeat run. In addition we also provide usermod MZ1C020 to modify the default option table for JCLNeat (CAZ1NDEF) so that all the batch JCLNeat executions can use the same default customized values.

 By default anyway, the product doesn’t pick up  these same customized values, specified in MZ1C020 usermod, also in the foreground execution of CA JCLNeat , both using it :

 

-      As Edit macro (clist JCKNSPF invoked)

-      As Option 6 of CA JCLCheck/ISPF Interface (clist JCKNSPF2 invoked)

 

In fact, the values specified in panels JCKN01 and JCK0205/205A are still the installation defaults even if a custom CAZ1NDEF was generated by usermod MZ1C020.

 

How to force the MZ1C020 new default values in JCLNeat foreground execution? 

Environment:
CA JCLCheck 12.0
Instructions:

To force the custom CAZ1NDEF values, generated in usermod MZ1C020, in CA JCLNeat foreground execution as Option 6 of CA JCLCheck/ISPF Interface, it is necessary to do the following steps:

 

1.                   1.    Edit the source clist CAZ2CLS0(JCKNSPF)

2.    Locate the section beginning with:

/*                                                                */      

/*-------------- FORCE VAR VALUES IF THEY ARE NOT ON PROFILE      */      

/*                                                                */      

                                                                          

      IF &JNTBCI = &STR() THEN SET &JNTBCI = &STR(Y)                      

      IF &JNTBCS = &STR() THEN SET &JNTBCS = &STR(N)                      

      IF &JNTCDEL = &STR() THEN SET &JNTCDEL = 0                          

      IF &JNTDCBS = &STR() THEN SET &JNTDCBS = &STR(N)                     

      IF &JNTCEC = &STR() THEN SET &JNTCEC = 35                           

/*    IF &JNTCEC0 = &STR() THEN SET &JNTCEC0 = &JNTCEC            */      

/*    IF &JNTCEC1 = &STR() THEN SET &JNTCEC1 = &JNTCEC            */      

/*    IF &JNTCEC2 = &STR() THEN SET &JNTCEC2 = &JNTCEC            */      

/*    IF &JNTCEC3 = &STR() THEN SET &JNTCEC3 = &JNTCEC            */      

/*    IF &JNTCEC4 = &STR() THEN SET &JNTCEC4 = &JNTCEC            */      

/*    IF &JNTCEC5 = &STR() THEN SET &JNTCEC5 = &JNTCEC            */      

 

3.    Uncomment all the lines referencing options which are changed in the customized MZ1C020 usermod and force here the same values set in the usermod.

4.    Save the new CAZ2CLS0(JCKNSPF) source.

5.    Logon again to TSO then run the CA JCLCheck/ISPF Interface, referencing the new source JCKNSPF2 and verify that panels JCK0205 and JCK0205A now contain the customized values of MZ1C020 CAZ1NDEF.

3.  

5   To force the custom CAZ1NDEF values, generated in usermod MZ1C020, in CA JCLNeat foreground execution as edit macro, it is necessary to do the following steps:

 

1.    Edit the source clist CAZ2CLS0(JCKNSPF)

2.    Locate the section beginning with:

      /********************************************************/          

      /* SET DEFAULTS IF THEY ARE NOT SET                     */          

      /********************************************************/          

                                                                          

      IF &JNTBCI = &STR() THEN SET &JNTBCI = &STR(Y)                      

      IF &JNTBCS = &STR() THEN SET &JNTBCS = &STR(N)                      

      IF &JNTCDEL = &STR() THEN SET &JNTCDEL = 0                          

      IF &JNTCTM = &STR() THEN SET &JNTCTM = &STR(N)  /* JCK01312 */      

      IF &JNTDCBS = &STR() THEN SET &JNTDCBS = &STR(N)                    

      IF &JNTCEC = &STR() THEN SET &JNTCEC = 35                           

/*    IF &JNTCEC0 = &STR() THEN SET &JNTCEC0 = &JNTCEC   */               

/*    IF &JNTCEC1 = &STR() THEN SET &JNTCEC1 = &JNTCEC   */               

/*    IF &JNTCEC2 = &STR() THEN SET &JNTCEC2 = &JNTCEC   */               

/*    IF &JNTCEC3 = &STR() THEN SET &JNTCEC3 = &JNTCEC   */               

/*    IF &JNTCEC4 = &STR() THEN SET &JNTCEC4 = &JNTCEC   */               

/*    IF &JNTCEC5 = &STR() THEN SET &JNTCEC5 = &JNTCEC   */               

 

3.    Uncomment all the lines referencing options which are changed in the customized MZ1C020 usermod and force here the same values set in the usermod.

4.    Save the new CAZ2CLS0(JCKNSPF) source.

5.    Logon again to TSO then run CA JCLNeat foreground as edit macro, referencing the new JCKNSPF clist and verify that panel JCKN01 now contains the customized values of MZ1C020 CAZ1NDEF.

 

In both cases a custom dummy usermod should be generated and installed for CA JCLCheck, indicating that both sources CAZ2CLS0(JCKNSPF) and CAZ2CLS0(JCKNSPF2) have been changed, so that, if any future PTF will replace these same sources, You will need to repeat again the above steps, starting from the new sources.

1.  

Please help us improve!

Will this information enable you to resolve your issue?

Please tell us what we can do better.

{{feedbackText.length ? feedbackText.length : '0'}}/255

{{status}}

Not what you were looking for?

Search Again >

Product Information

Support by Product >

Communities

Join a Community >