For the examples shown in Fixed-Point versus Floating-Point Arithmetic, if you define the data items in the following manner:
01 EMPLOYEE-TABLE.
05 EMP-COUNT PIC 9(4).
05 EMPLOYEE-RECORD OCCURS 1 TO 1000 TIMES
DEPENDING ON EMP-COUNT.
10 HOURS PIC +9(5)E+99.
.
.
.
01 REPORT-MATRIX-COL PIC 9(3).
01 REPORT-MATRIX-MIN PIC 9(3).
01 REPORT-MATRIX-MAX PIC 9(3).
01 REPORT-MATRIX-TOT PIC 9(3).
01 CURRENT-DAY PIC 9(7).
01 NUMBER-OF-DAYS PIC 9(3).
COMPUTE REPORT-MATRIX-COL = FUNCTION SQRT(EMP-COUNT) + 1
IF REPORT-MATRIX-TOT < FUNCTION SQRT(EMP-COUNT) + 1 ADD REPORT-MATRIX-MIN TO REPORT-MATRIX-MAX GIVING REPORT-MATRIX-TOT.
IF CURRENT-DAY NOT = FUNCTION DAY-OF-INTEGER((NUMBER-OF-DAYS) + 1)
COMPUTE REPORT-MATRIX-MAX =
FUNCTION MAX(REPORT-MATRIX-MAX REPORT-MATRIX-TOT)(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.