初心者のFileMaker pro Q&A (旧掲示板)

きっさん

Member

1ヶ月後の日

Windows 10 Pro 64bit
FMP 17

開始日：日付
１ヶ月後：計算：非保存：Date(Month(開始日) + 1 ; Day(開始日) - 1 ; Year(開始日))  計算結果：日付

とすれば、開始日から１ヶ月後で１日を差し引いた日付が計算されるのですが、開始日が１月３０日、３１日の場合、１ヶ月後が３月１日、３月２日となってしまいます。
開始日が１月３０日、３１日の場合は、１ヶ月後が２月２８日、閏年は２月２９日となるように設定したいのですが、その方法で詰まってしまいました。
ご教示、お願いいたします。

wader

Member

Re: 1ヶ月後の日

結果の日に1足して元の日にならなければ、前月末に調整する。
Let ( d= Date(Month(開始日) + 1 ; Day(開始日) - 1 ; Year(開始日)) ; d - Case ( Day ( d ) + 1 <> Day ( 開始日 ) ; Day ( d ) ) )

きっさん

Member

Re: 1ヶ月後の日

waderさん

結果の日に1足して元の日にならなければ、前月末に調整する。
Let ( d= Date(Month(開始日) + 1 ; Day(開始日) - 1 ; Year(開始日)) ; d - Case ( Day ( d ) + 1 <> Day ( 開始日 ) ; Day ( d ) ) )

ご教示頂いた式にすると、２月１日の1ヶ月後が１月３１日になってしまいます。

Shin

Member

Re: 1ヶ月後の日

Min (
Date ( Month ( 開始日 ) + 1 ; Day ( 開始日 ) - 1 ; Year ( 開始日 ) ) ;
Date ( Month ( 開始日 ) + 2 ; 0 ; Year ( 開始日 ) )
)

wader

Member

Re: 1ヶ月後の日

足し方を間違えてた、こうかな？
Let ( d= Date(Month(開始日) + 1 ; Day(開始日) - 1 ; Year(開始日)) ; d - Case ( Day ( d + 1 ) <> Day ( 開始日 ) ; Day ( d ) ) )

wader

Member

Re: 1ヶ月後の日

それだと、1/29がだめになるか。

きっさん

Member

Re: 1ヶ月後の日

shinさん、waderさん
ご教示、ありがとうございます。
計算式がシンプルなMin関数を使ったshinさんの式を使用させて頂きます。