Microsoft Access 掲示板

SELECT min( ymd ) As d_from
     , max( ymd ) As d_to
FROM
(
    SELECT x.ymd
         , count(1) As n
    FROM q_ymdlist x
       , q_ymdlist y
    WHERE x.ymd >= y.ymd
    GROUP BY x.ymd
) q
GROUP BY ymd - n ;

SELECT x.d_from
     , x.d_to
     , max( iif( y.終了日 Is Null, y.開始日 ) ) As high
     , max( y.開始日 ) As low
FROM q_fromto x
LEFT JOIN 単価マスタ y
       ON ( 
              (
                  x.d_from > y.開始日
                      AND
                  y.開始日 >= dateserial( year( date() ), month( date() ), 1 )
              )
          )
GROUP BY x.d_from
       , x.d_to ;

SELECT x.d_from
     , x.d_to
     , y.開始日 As 基準開始日
     , 1 As 補填行
     , y.単価
FROM q_highlow x
   , 単価マスタ y
WHERE cdate( nz( x.high, x.low ) ) = y.開始日 ;

SELECT 開始日 As 指定開始日
     , 終了日 As 指定終了日
     , 開始日 As 基準開始日
     , 0 As 補填行
     , 単価
FROM q_base
UNION ALL
SELECT d_from
     , d_to
     , 基準開始日
     , 補填行
     , 単価
FROM q_union
ORDER BY 1 ;