2022年1月9日 星期日

Oralce Add Weeks 計算疫苗第二劑 + 12 週 第三劑疫苗施打日期計算

Oralce Add Weeks 計算疫苗第二劑 + 12 週 第三劑疫苗施打日期計算


set SERVEROUTPUT ON
declare
shot2 VARCHAR2(8) := '20211020'; --第二劑日期
shot2date date;
gapeweeks number(2) := 12;
shot3  VARCHAR2(8);  --第三劑日期
begin

    select  to_date(shot2,'YYYYMMDD') into shot2date from dual;
    SELECT  to_char(shot2date + ( gapeweeks * 7 ),'YYYYMMDD') into shot3 from dual;
    DBMS_OUTPUT.PUT_LINE('第二劑日期:' || shot2 || ' + ' || gapeweeks  || ' 週');
    DBMS_OUTPUT.PUT_LINE('第三劑日期:' || shot3);
end;


--======
--OUT_PUT
--第二劑日期:20211020 + 12 週
--第三劑日期:20220112