日付の差を計算したい

CRS - 日付計算

日付の差を計算したい

Biz/Browser DTではDateクラスに日付の差を計算するdatedifメソッドが追加されました。
年、月、日の単位で差を計算する事ができます。また年、月単位での端数を計算する事もできます。

　例①：一月未満の日数の端数を求める
　　　　　From：2017/04/20
　　　　　To：2017/05/21
　　　　　結果：1

　例②：一年未満の月数の端数
　　　　　From：2017/04/20
　　　　　To：2018/07/20
　　　　　結果：3

　例③：一年未満の日数の端数
　　　　　From：2017/04/20
　　　　　To：2018/04/25
　　　　　結果：5

#日付の差を計算したい
Form Crs01411 {
    x = 0;
    y = 0;
    width = 505;
    height = 303;
    
    Label label1 {
        x = 22;
        y = 28;
        width = 40;
        height = 20;
        value = "From";
        verticalAlign = ALIGN_MIDDLE;
        horizontalAlign = ALIGN_CENTER;
    }
    
    DateEdit dateedit1 {
        x = 67;
        y = 28;
        width = 100;
        height = 20;
        format = "YYYY/MM/DD";
    }
    
    Label label2 {
        x = 178;
        y = 28;
        width = 40;
        height = 20;
        value = "To";
        verticalAlign = ALIGN_MIDDLE;
        horizontalAlign = ALIGN_CENTER;
    }
    
    DateEdit dateedit2 {
        x = 215;
        y = 28;
        width = 100;
        height = 20;
        format = "YYYY/MM/DD";
    }

    Label label3 {
        x = 22;
        y = 58;
        width = 69;
        height = 20;
        value = "比較単位";
        verticalAlign = ALIGN_MIDDLE;
        horizontalAlign = ALIGN_CENTER;
    }

    OptionButton optionbutton1 {
        x = 106;
        y = 58;
        width = 377;
        height = 195;
        
        OptionItem item[0] {
            height = 31;
            width = 224;
        
            x = 0;
            y = 0;}
        
        item << CSV(.Title) {
            経過年数
            経過月数
            経過日数
            一月未満の日数の端数
            一年未満の月数の端数
            一年未満の日数の端数};
        value = 0;
    }
    Button button1 {
        x = 379;
        y = 261;
        width = 100;
        height = 30;
        title = "比較";
        
        Function OnTouch(e) {
            var ret;
            #datedifメソッド：Dateクラスのスタティックメソッド。日付の差を計算します。
            #datedif(引数1,引数2,引数3)
            # 引数1：開始日
            # 引数2：終了日
            # 引数3："y"･･･経過年数
            #        "m"･･･経過年数
            #        "d"･･･経過年数
            #        "md"･･･経過年数
            #        "ym"･･･経過年数
            #        "yd"･･･経過年数
            switch ( Crs01411.optionbutton1.value ) {
                case 0:
                    ret = date.datedif( Crs01411.dateedit1.value, Crs01411.dateedit2.value, "y" );
                    break;
                case 1:
                    ret = date.datedif( Crs01411.dateedit1.value, Crs01411.dateedit2.value, "m" );
                    break;
                case 2:
                    ret = date.datedif( Crs01411.dateedit1.value, Crs01411.dateedit2.value, "d" );
                    break;
                case 3:
                    ret = date.datedif( Crs01411.dateedit1.value, Crs01411.dateedit2.value, "md" );
                    break;
                case 4:
                    ret = date.datedif( Crs01411.dateedit1.value, Crs01411.dateedit2.value, "ym" );
                    break;
                case 5:
                    ret = date.datedif( Crs01411.dateedit1.value, Crs01411.dateedit2.value, "yd" );
                    break;
                default:
                    ret = "";
                    break;
            }
            //.messageBox( "差は " + Str(ret) + "です");
        }
    }
}


		Biz-Collections Bizの宝箱トップへ
		Biz/Browser DT・Biz/Designer DT TIPS集トップへ