CC compare function from stage panels cmnstg01/14/24 Hot

by JOHN BREX on February 09, 2016

Add "CC" command to stage panels cmnstg01/cmnstg14/cmnstg24 to allow quick entry to compare to baseline version of code

 

  • Adding CC compare option will allow users to quiclkly compare staged code to baseline code without having to leave staging

     

    ex:

    CMNSTG01                  STAGE: CCHM003263 Components         Row 1 to 5 of 5
                                                                                  
       Name             + Type Status   Changed         Procname User     Request 
    cc CMNSTG04           PNL  ACTIVE   20160208 174710          JBREX00          
       RLSEAUD            SKL  ACTIVE   20160208 132642          JBREX00          
       SCMRLSDF           SKL  ACTIVE   20160208 132311          JBREX00          
       SCMRLSDL           SKL  ACTIVE   20160208 132508          JBREX00          
       ADPAUD01           SRC  INCOMP   20160208 120439 CMNCOB2  JBREX00  CANCEL  
    ******************************* Bottom of data ********************************

    to compare screens

    CMNCOMP1                            Compare                  CMNSTG04 COMPARED
                                                                                  
    Compare mode . . . . O           (O-Online; B-Batch)                          
    Package  . . . . . . CCHM003263                                               
    Component  . . . . .                                                        + 
                                     (* for all members; blank for list)          
    Text type  . . . . . $.          (text type to be compared)                   
    Library type . . . . PNL         (Blank for list)                             
    Source library . . . 0           (Baseline 0 to -n; Promotion 1 to n)         
                                                                                  
    Enter "/" to select option                                                    
        Prompt for report disposition                                             
                                                                                  
    Job statement information for batch compare:                                  
       //JBREX00S  JOB (SCMG),'ADPAUD01',                                         
       //  CLASS=C,MSGCLASS=H,NOTIFY=JBREX00                                      
       //*                                                                        
       //*

    CMNCOMPL                      Compare from PNL                 Row 1 to 1 of 1
                                                                                  
      Staging library:                                                            
      CHMP.CCHM.APL1.STAGEP.#003263                                               
                                                                                  
      Name     Function vv.mm Created    Changed           Size  Init User        
    s CMNSTG04          21.01 2002/11/21 2016/02/08 17:47   123   123 JBREX00     
    ******************************* Bottom of data ********************************

    Menu  Utilities  Compilers  Help                                            
     -------------------------------------------------------------------------------
     ISRBROBA  JBREX00.CMN.#D046632.#9A0D84B.OUTLIST      Line 00000000 Col 001 080
    ********************************* Top of Data **********************************
              S E R C M P A R  (MVS - 871 - 20140828) 2    TEXTONLY    TUESDAY FEBRU
    SYSUT1=PROD.CHGMAN.V8.ROSE.BASE.PANELS(CMNSTG04),SYSUT2=CHMP.CCHM.APL1.STAGEP.#0
     . . .                                                                         
                  &USROP14 = 'N'                                                   
                  &USROP15 = 'N'                                                   
                  &USROP16 = 'N'                                                   
                  &USROP17 = 'N'                                                   
                  &USROP18 = 'N'                                                   
                  &USROP19 = 'N'                                                   
                  &USROP20 = 'N'                                                   
              IF (&COMPOPT ¬= &Z)                                                  
                  &CUSR441 = &COMPOPT                                              
                  &COMPOPT = &Z                                                    
    ++++++++|+++.++++1++++.++++2++++.++++3++++.++++4++++.++++5++++.++++6++++.++++7++
    D                                                                              
    --------|---.----1----.----2----.----3----.----4----.----5----.----6----.----7--
    I         &CUSR441 = U       /* SET 441 TO U TO INDICATE USER COMPILED */

     

     

     

    Ideas

    Status
    Tags
  • Please login to view any attachments.

  • Hi John,

    Do you use ‘staging versions’ (SSV) functionality at the moment? If you have enabled it then you should have access to the ‘VC’ component line command which gives you much of what you are requesting here. If you have not enabled SSV you will get the following ISPF errors trying to execute a ‘VC’ line command:

    Short: *NO VERS
    Long: CMN8725I - Save staging versions is not installed.

    Just to stress – you do not need to be saving staging versions for the library type being compared to use the VC command to compare the current contents of the component to its baseline counterpart. You just need to have enabled the SSV functionality.

    Further information on use of SSV can be found in the ‘Managing Staging Versions’ of the User’s Guide and on installation/configuration throughout the Installation and Administrator’s Guides.

    If this does not provide what you need then let us know how and we can reassess this request.

    Many thanks,

    Steve
    Steve Nevin Commented by Steve Nevin February 10, 2016
    Top 10 Reviewer  -  

    Hi John,

    Do you use ‘staging versions’ (SSV) functionality at the moment? If you have enabled it then you should have access to the ‘VC’ component line command which gives you much of what you are requesting here. If you have not enabled SSV you will get the following ISPF errors trying to execute a ‘VC’ line command:

    Short: *NO VERS
    Long: CMN8725I - Save staging versions is not installed.

    Just to stress – you do not need to be saving staging versions for the library type being compared to use the VC command to compare the current contents of the component to its baseline counterpart. You just need to have enabled the SSV functionality.

    Further information on use of SSV can be found in the ‘Managing Staging Versions’ of the User’s Guide and on installation/configuration throughout the Installation and Administrator’s Guides.

    If this does not provide what you need then let us know how and we can reassess this request.

    Many thanks,

    Steve

     

PrintEmail

Recent Tweets