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.