【Access】複雑な日付の計算（複数の締日など）

Microsoft（マイクロソフト）のデータベースソフトAccess（アクセス）を使っていると、日付の計算をしなければならない時があります。

今回も消費税の仕組みを実装するのに、ちょっと複雑な日付計算が出てきましたので備忘録にしてみました。

締日を含んだ複雑な状況

１日から月末までの数値を合算して消費税を出すだけなら簡単。

●今月初日

●今月末

あとは、簡単であり、先月初めなら、月の部分を「Month(Date)-1」にすればいいし、来月初なら、「Month(Date)+1」にすればいい。

月末も同じ考えで、先月末なら、「Month(Date) 」とすればいいし、来月月末なら、「Month(Date)+２」というに足して行けばいい。 

つまり、あとはクエリーなので、Between関数を使って日付て抽出してやればOKですよね。

しかし、

はどうしたらいいのか？

３期間の締日の計算

答えは簡単ですが、クエリーなどで、「OR」を使って（実際は行を変えてOR状態にする）やれば３期間の抽出が可能ですよね。

●当月１日～月末

●２０日締め（前月２１日～当月２０日）

●２５日締め（前月２６日～当月２５日）

※Dateの部分をDate()に変更しないと今日の日付が出ませんでした。

でも、

Q.　上記のクエリーなら、前月２１日～当月末までのクエリーにすればいいんじゃないですか？

A.　正にその通りなのです。

通常は、

のですから、その締日によって計算が変わってくれなければ意味がないですよね。

月次のマスターテーブルから計算

月次の為のマスターテーブルが他にある場合にどのようにしたら良いのかを考えてみました。

この例では、「作業中」というのが当月処理している月になるので、まず、テーブルから月次処理年月日を引っ張ってくるところから始めます。テーブル名は、「dbo_mst_月次」としてあります。

※作業中のカンマに注意してください。

https://pctips.jp/pc-soft/access-dlookup-howto2019/

計算するテーブル元には、「締日」というフィールドがあり、２０、２５、３１という数字でメーカー毎に設定してあるという事を前提にします。

それをクエリーで期間選択するには、下記のように設定すると締日ごとに期間が変化して抽出されるようになりました。

消費税の差額を計算

から、締日が違うという事は、その差額を計算したいという要望が出てきます。

つまり、１０月になって経理上、２０日締めの場合は、

９月２１日～１０月２０日の請求分から９月２１日～９月末までは、８％で計算しなければならないのです。

私が考える方法としては、

という方法で消費税対策をしてみたいと考えています。

計算式としては、１０月が当月だとすれば、

を産出できればいいという事になります。

もう、訳が分からなくなるくらいに複雑ですよね。

自分の備忘録として残しておきたいと思います。

DateSerialとDateAdd

今回の処理で、この２つの関数の違いが混乱しました。

DateSerialの方が良く使われるようですが、DateAddの方がシンプルで分かり易かったりします。

例えば、X＝「2019/09/01」だとして、「2019/09/21」にしたい場合、

●DeteSerial（Year(X),Month(X),21)

●DateAdd("d",20,X)

という感じで同じことができるんじゃないかと思うのです。

しかし、月末を出したい場合になるとDateSerialなら

●DeteSerial（Year(X),Month(X)+1,0)

※最後の「０」が前日の意味になるらしい。

ように思えます。