我正在研究一个简单的PL / SQL块,询问用户他们的出生日期并计算他们的年龄。我已经使用了months_between除以12的转换,但是我在用户替换变量的日期转换和日期输入方面遇到了问题。请忽略v_birthday_year,因为这是我稍后需要集成的代码的另一部分。
我不确定用户必须输入的格式,即05-07-1980,或1978年3月6日可以接受的格式,以及如何根据他们输入的内容计算他们的年龄。
我想要的程序是编写一个PL / SQL程序,以此格式DD-MON-YYYY接受用户的生日,并计算1个小数位的年龄。所以我需要它计算到小数点后一位。
这是我所拥有的,但我不确定在替换变量输入的DOB中输入什么格式以及带有一个小数位的实际计算。我只是想看看我哪里出错了以及如何纠正它。
SET SERVEROUTPUT ON
DECLARE
--v_birthday_year NUMBER(4) := &v_birthday_year;
v_dob DATE := &v_dob
v_your_age NUMBER(3, 1);
BEGIN
v_your_age := TRUNC(MONTHS_BETWEEN(SYSDATE, v_dob))/12;
DBMS_OUTPUT.PUT_LINE ('Your age is ' || v_your_age);
END;
/
答案 0 :(得分:23)
您可以使用其中任何一种(纯sql)
SELECT months_between(sysdate, user_birth_date) /12 FROM dual;
或
SELECT floor(months_between(sysdate, user_birth_date) /12) FROM dual;
或
SELECT EXTRACT(YEAR FROM sysdate) - EXTRACT(YEAR FROM user_birth_date) FROM dual
或
SELECT (sysdate - user_birth_date) / 365.242199 FROM dual
希望这会有所帮助
答案 1 :(得分:9)
除非您正在学习PL / SQL,否则其他人和我的所有SQL示例都可能更好用。这就是我想出的:
DECLARE
v_dob DATE:= to_date('&v_dob', 'MM/DD/YYYY'); -- copy this line and you'll be fine
v_your_age NUMBER(3, 1);
BEGIN
v_your_age := TRUNC(MONTHS_BETWEEN(SYSDATE, v_dob))/12;
DBMS_OUTPUT.PUT_LINE ('Your age is ' || v_your_age);
END;
/
I passed 01/01/2010. Got this in output:
Your age is 3.1
另一个SQL示例:
SELECT empno, ename, hiredate
, TRUNC(MONTHS_BETWEEN(sysdate, hiredate)/12) years_of_service
FROM scott.emp
/
答案 2 :(得分:0)
Create or replace function getAge(birthday date) return number is
v_your_age NUMBER(3, 1);``
BEGIN
v_your_age := floor(MONTHS_BETWEEN(SYSDATE, birthday))/12;
return v_your_age;
END;
/
然后你调用该函数
BEGIN
DBMS_OUTPUT.PUT_LINE ('Your age is ' || getAge(to_date('10/10/2015','DD/MM/YYYY')));
end;
/
答案 3 :(得分:0)
{{1}}