Heavy emphasis on that last sentence. Just had a customer who didn't keep track of the number of entries in his COBOL table while adding new ones. Ended up adding entries way beyond the end of his table leading to altering the fields following the table to wrong values leading to very strange scary looking dumps that seemed to point to big problems in unsupported code! But, nope, simple, his table got bigger than the definition.
Duffy Nightingale Sound Software Printing, Inc. [email protected] www.soundsoftware.us Phone: 360.385.3456 Fax: 973.201.8921 The information in this e-mail, and any attachment therein, is confidential and for use by the addressee only. If you are not the intended recipient, please return the e-mail to the sender and delete it from your computer. Although Sound Software Printing, Inc. attempts to sweep e-mail and attachments for viruses, it does not guarantee that either are virus-free and accepts no liability for any damage sustained as a result of viruses. > On Aug 11, 2014, at 6:43 PM, Sam Siegel <[email protected]> wrote: > > Don't. > > Use occurs depending on or keep track of number of entries in a separate > variable. > > Populate entries as needed. All valid entrIes are initialized when > populated. > > Restrict subsequent operations to number of rows in table. >> On Aug 11, 2014 6:37 PM, "Ron Thomas" <[email protected]> wrote: >> >> Hello. >> >> We have a array like this , what would be best way to initlaize this array >> in terms of performance ? >> >> 01 EXAMPLE-TABLE. >> 05 MY-TABLE. >> 10 TABLE-ENTRY OCCURS 9999 TIMES. >> 15 FIRST-NAME PIC X(15). >> 15 LAST-NAME PIC X(15). >> 15 SEX-CODE PIC X. >> 15 DOB. >> 20 DOB-YYYY PIC 9(4). >> 20 DOB-MM PIC 99. >> 20 DOB-DD PIC 99. >> 15 SSN PIC 9(9). >> 15 SALARY PIC S9(9)V99 COMP-3. >> >> Thanks >> Ron T >> >> ---------------------------------------------------------------------- >> 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 ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
