TIRFDSTS

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

DAYSTIMESTAMP converts a timestamp to a positive integer representing the number of days since December 31, 0000.

DAYSTIMESTAMP generates the following COBOL statements:

Statement

Quantity

Call

1

Compute

2

Move

2

Initialize

1

IF

1

Heavy use of DAYSTIMESTAMP can drastically increase CPU costs.

Hints

If an action diagram uses DAYSTIMESTAMP more than once for the same timestamp:

  • use DAYSTIMESTAMP once for the desired timestamp

  • save the converted number of days in a local view

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

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