TIRFDSTS

TIRFDSTSはCA Genで提供される呼び出し先モジュールです。CA Genアクション ダイアグラムがDAYSTIMESTAMP関数を使用するたびに呼び出されます。

DAYSTIMESTAMPは、タイムスタンプを0000年12月31日から起算した日数を表す正の整数に変換します。

DAYSTIMESTAMPは、以下のCOBOLステートメントを生成します。

ステートメント

個数

Call

1

Compute

2

Move

2

Initialize

1

IF

1

DAYSTIMESTAMPを頻繁に使用すると、CPUコストが大幅に増加します。

ヒント

1つのアクション ダイアグラム内で、DAYSTIMESTAMPが同じタイムスタンプに対して複数回使用される場合は、以下のように対処します。

  • 希望するタイムスタンプに対してDAYSTIMESTAMPを1回使用する。

  • 変換された日数をローカル ビューに保存する。

  • 残りのインスタンスに対しては、DAYSTIMESTAMPの代わりにローカル ビューを使用する。

  • ローカル ビューを、値を必要とするすべての呼び出し先アクション ダイアグラムのインポート ビューに渡す。