In this new world of zero tollerance for abends and the goal of 100% production stability, I have been charged with determining the best method to prevent abends due to internal program table overflows. Our environment has Cobol, Eztrieve and Assembler programs with internal tables. We are looking to replace hard-coding of occurs clauses with a new method to dynamically increase table space if needed. I don't know the best or simplest method or if there is a method that can be applied to all our programming languages. My suggestion was to set a threshold value to indicate if the table was close to max and send a message to support that the table is getting ready to overflow. This method is easy and could be applied to all laguages, but my mgmt. voted this down because it "doesn't guarentee" the prevention of an abend. Another suggestion was the use of Dynamic Table Expansion using MICM tables. I haven't completely figured out how this works and I'm not sure it this can be applied to all laguages, it also appears to require alot of coding. Another co-worker said that they have heard of coding a file FD where Cobol treats the file as a table and you don't have to specify an occurs. I have not found any documentation on this method. Please lend your advise and point me to any examples and resources that might be available. Thanks very much for your assitance.
Mainframe computer using Cobol, Assembler and Easytrieve
November 6, 2009 5:14 PM
November 9, 2009 3:34 PM