01  EXAMPLE-TABLE.
    05  MY-COUNT     PIC S9(9) COMP VALUE 0.
    05  MY-TABLE.

On Mon, Aug 11, 2014 at 8:37 PM, Ron Thomas <ron5...@gmail.com> 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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN



-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to