contents.gifindex.gifprev1.gifnext1.gif

ADD

Format 1

ADD {num} ... TO { result [ROUNDED] } ...

     [ ON SIZE ERROR statement-1 ]

     [ NOT ON SIZE ERROR statement-2 ]

     [ END-ADD ]


Format 2

ADD {num} ... TO num GIVING { result [ROUNDED] } ...

     [ ON SIZE ERROR statement-1 ]

     [ NOT ON SIZE ERROR statement-2 ]

     [ END-ADD ]


Format 3

ADD {CORRESPONDING} group-item TO group-item [ROUNDED]
    {CORR         }

     [ ON SIZE ERROR statement-1 ]

     [ NOT ON SIZE ERROR statement-2 ]

     [ END-ADD ]


Format 4

ADD TABLE src-table TO dest-table [ROUNDED]

     [ FROM INDEX src-start TO src-end ]

     [ DESTINATION INDEX dest-start ]

     [ ON SIZE ERROR statement-1 ]

     [ NOT ON SIZE ERROR statement-2 ]

     [ END-ADD ]