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.
Help