戻る|進む

DCL:MISC１:DATELIB : 日付の取り扱い ＊☆:サブルーチンの説明

7.4.2 DATEF1/DATEF2/DATEF3

1.

機能

N日後の日付を求める.
DATEF1 : IDATEのN日後(NDATE)を求める.
DATEF2 : IY,ITDのN日後(NY,NTD)を求める.
DATEF3 : IY,IM,IDのN日後(NY,NM,ND)を求める.

2.

呼び出し方法

CALL DATEF1(N,IDATE,NDATE)
CALL DATEF2(N,IY,ITD,NY,NTD)
CALL DATEF3(N,IY,IM,ID,NY,NM,ND)

3.

パラメーターの説明

IDATE, NDATE	(I)	1型の日付.
IY, NY	(I)	年.
IM, NM	(I)	月.
ID, ND	(I)	日.
ITD, NTD	(I)	通しの日付.
N	(I)	日付の差(日数).

4.

備考

(a)

Nとしては負の値を指定してもよい. つまり負のNに対して-N日前の日付も 調べることができる.