Topic
  • 4 replies
  • Latest Post - ‏2013-09-11T09:35:52Z by damir385
damir385
damir385
9 Posts

Pinned topic Protection exception caused by custom exception throwing in EGL ZOSBATCH program

‏2013-08-02T15:01:38Z |

 

I have a problem with EGL ZOSBATCH generated programs that throw a custom exception during processing, and I would appreciate some help in finding the solution.
 
In particular, logic of the program requires throwing custom exception if some condition is met, while iterating through a loop. This works fine at the begginig, but after a numer of iteratons protection exception gets thrown while trying to execute throw statement.(in attached example ... TESTLB.handelControl() function) 

 

 

This is a resulting output:

 

...
Processing :104                                                                 
Processing :105                                                                 
CEE3204S The system detected a protection exception (System Completion Code=0C4)
         From compile unit TESTCP2 at entry point TESTCP2 at compile unit offset
         at address 26EA04B8.                                                    

 

 

EGL source of simple example that demonstrates this problem is attached. Program TESTBP calls TESTCP2 in a loop and TESTLB is a simple error handling library. 
 
Thanks for any suggestions.

Attachments

  • markevans
    markevans
    2807 Posts
    ACCEPTED ANSWER

    Re: Protection exception caused by custom exception throwing in EGL ZOSBATCH program

    ‏2013-08-19T15:50:01Z  
    • damir385
    • ‏2013-08-06T08:56:46Z

    Hi,

    here is the info:

    a) RBD V 8.5.1.0 Build ID: RBDO851-I20121115_1909

    b) UK60551

    c) see attached zip

     

    Hi,

    Sorry for the delay in answering.

    I tried this today..and it would not fail for me with the latest EGL COBOL Runtime fixes.   The UK60551 is pretty old..and while I am not sure which one specifically fixes it, we do remember a similar problem.  I went back and tried at a version of the runtime we had associated with 7.5.1 and it failed like you were seeing.  With the latest, it ran to completion.

    Processing :1000                                    
    The End                                             
    -------------------------------------------         
    errorFlag:    0                                     
    messageId:    0                                     
    messageText:                                        
                                                        
    SQLCode:      0                                     
    tableName:                                          
    programName:  TESTCP2                               
    functionName:                                       
    data:                                             

    Please see the following link for the current list of PTFs... You should apply all of them regardless of which release it states as they are common for all RBD releases.  The fixpack or version/release listed is just when we tested the PTFs.

    RBD Fix pages

    Click on the PTF list tab.

    Hope it helps.

  • markevans
    markevans
    2807 Posts

    Re: Protection exception caused by custom exception throwing in EGL ZOSBATCH program

    ‏2013-08-02T17:26:19Z  

    Hey,

    three pieces of information that would be needed beyond the EGL source.

    a.) what version of EGL/RBD are you using to generate with (including any fixtests)?

    b.) What is the latest PTF installed on the Rational COBOL Runtime for z/Series?

    c.)  Can you attach your generated COBOL for each of the test programs?

    This could have already been fixed...but hard to say without knowing what level of code you are using to generate with and to execute with.

     

  • damir385
    damir385
    9 Posts

    Re: Protection exception caused by custom exception throwing in EGL ZOSBATCH program

    ‏2013-08-06T08:56:46Z  
    • markevans
    • ‏2013-08-02T17:26:19Z

    Hey,

    three pieces of information that would be needed beyond the EGL source.

    a.) what version of EGL/RBD are you using to generate with (including any fixtests)?

    b.) What is the latest PTF installed on the Rational COBOL Runtime for z/Series?

    c.)  Can you attach your generated COBOL for each of the test programs?

    This could have already been fixed...but hard to say without knowing what level of code you are using to generate with and to execute with.

     

    Hi,

    here is the info:

    a) RBD V 8.5.1.0 Build ID: RBDO851-I20121115_1909

    b) UK60551

    c) see attached zip

     

    Attachments

  • markevans
    markevans
    2807 Posts

    Re: Protection exception caused by custom exception throwing in EGL ZOSBATCH program

    ‏2013-08-19T15:50:01Z  
    • damir385
    • ‏2013-08-06T08:56:46Z

    Hi,

    here is the info:

    a) RBD V 8.5.1.0 Build ID: RBDO851-I20121115_1909

    b) UK60551

    c) see attached zip

     

    Hi,

    Sorry for the delay in answering.

    I tried this today..and it would not fail for me with the latest EGL COBOL Runtime fixes.   The UK60551 is pretty old..and while I am not sure which one specifically fixes it, we do remember a similar problem.  I went back and tried at a version of the runtime we had associated with 7.5.1 and it failed like you were seeing.  With the latest, it ran to completion.

    Processing :1000                                    
    The End                                             
    -------------------------------------------         
    errorFlag:    0                                     
    messageId:    0                                     
    messageText:                                        
                                                        
    SQLCode:      0                                     
    tableName:                                          
    programName:  TESTCP2                               
    functionName:                                       
    data:                                             

    Please see the following link for the current list of PTFs... You should apply all of them regardless of which release it states as they are common for all RBD releases.  The fixpack or version/release listed is just when we tested the PTFs.

    RBD Fix pages

    Click on the PTF list tab.

    Hope it helps.

  • damir385
    damir385
    9 Posts

    Re: Protection exception caused by custom exception throwing in EGL ZOSBATCH program

    ‏2013-09-11T09:35:52Z  
    • markevans
    • ‏2013-08-19T15:50:01Z

    Hi,

    Sorry for the delay in answering.

    I tried this today..and it would not fail for me with the latest EGL COBOL Runtime fixes.   The UK60551 is pretty old..and while I am not sure which one specifically fixes it, we do remember a similar problem.  I went back and tried at a version of the runtime we had associated with 7.5.1 and it failed like you were seeing.  With the latest, it ran to completion.

    Processing :1000                                    
    The End                                             
    -------------------------------------------         
    errorFlag:    0                                     
    messageId:    0                                     
    messageText:                                        
                                                        
    SQLCode:      0                                     
    tableName:                                          
    programName:  TESTCP2                               
    functionName:                                       
    data:                                             

    Please see the following link for the current list of PTFs... You should apply all of them regardless of which release it states as they are common for all RBD releases.  The fixpack or version/release listed is just when we tested the PTFs.

    RBD Fix pages

    Click on the PTF list tab.

    Hope it helps.

    Our admins have upgraded the runtime and problem was resolved.

     

    Thanks for the assistance.