ACCUM

You can use the ACCUM keyword to add single or multiple numeric fields of various types. Each numeric field is totaled separately and each total is printed with the description that you provide. Different numeric fields cannot be added within the same record. For example, all Field-As can be added together, but Field-A cannot be added to Field-B. ACCUM fields with invalid numeric data are not processed. The total number of records in which invalid numeric data was detected is printed. The output, or totals, is printed to ddname SYSTOTAL. If SYSTOTAL is not allocated, the print is directed to SYSPRINT. This keyword can be specified multiple times in a command. The length and data-type parameters are not required, but If you do not specify either or both, the field is assumed to be in packed format. The ACCUM command scans for a valid packed field up to 16 bytes long.