A frequent, even standard way to get past the size limit of a COBOL array, or more appropriately table, was to define more "empty" space after it. Since subscript bounds checking was always turned off for performance reasons, you could effectively address substantially larger than the size limit of any single 01 item.
> -----Original Message----- > From: IBM Mainframe Discussion List [mailto:[email protected]] > On Behalf Of Peter Hunkeler > Sent: Monday, January 09, 2017 10:42 PM > To: [email protected] > Subject: AW: Re: COBOL5 and ceedump > > > >For APAR PI65115, it looks like a separate APAR PI68274, was opened for > >Cobol 6.1 If you look at the information page for PI65115: > >https://urldefense.proofpoint.com/v2/url?u=http-3A__www- > 2D01.ibm.com_su > >pport_docview.wss-3Fuid- > 3Dswg1PI65115&d=DgIFAw&c=C3yme8gMkxg_ihJNXS06Zy > >Wk4EJm8LdrrvxQb- > Je7sw&r=u9g8rUevBoyCPAdo5sWE9w&m=fMuLmQMzPx5DmslJNY_BCN > >Y0FVnGwzmPH7pETyG26Ys&s=UgfbkofOrtYfQsIO9ZMiM6G0M4fAyuman5V > LiwvHq3U&e= > > > Out of interest I had a look at what this is all about, and I must admit I'm > baffled. What does that solution help? More, I'm baffled the new behaviour > was accepted as an APARable problem. > > > Writing beyond the end of a table overwrites something, be that the index- > name or some other data. And it may lead to abnormal ends (the more lucky > case), or worst, wrong data to be processed without even recognizing this > fact. It is one of the most problematic coding error, IMHO. > > > So, the PTF will not fix anything in my opinion. It will revert to the > previous > way of how tables are handled by the compiler, yes, but that's it. > > > -- > Peter Hunkeler > > > > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, send email to > [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
