TIRFDTEN

TIRFDTEN is a called module supplied with CA Gen. TIRFDTEN is called every time an CA Gen action diagram uses the DATEDAYS function.

DATEDAYS converts a positive numeric value to a valid date that represents the number of days since December 31, 0000.

DATEDAYS generates the following COBOL statements:

Statement

Quantity

Call

1

Compute

2

Move

2

Initialize

1

IF

1

Heavy use of DATEDAYS can drastically increase CPU costs.

Hints

If a CA Gen action diagram uses DATEDAYS more than once for the same numeric value:

  • use DATEDAYS once for the desired numeric value

  • save the date returned in a local view

  • use the local view instead of DATEDAYS for the remaining instances

  • pass the local view to the import view of any called action diagrams that need it