كود لحساب العمر

[HGAGG]

السلام عليكم
وإليكم البرنامج الأكثر إحترافيه في حساب العمر
هذا البرنامج يقوم بحساب كم لحظه و كم ثانيه و كم ساعة وكم يوم وكم إسبوع وكم شهر وكم سنه في عمرك
لا تتعجب فإنه يئتي بهذه النتايج
كل ما عليك إدخل تاريخ الميلاد......

set verify off
select round(months_between(sysdate, '&&Date_of_Birth' )) /12 Age,
round(months_between(sysdate, '&Date_of_Birth' )) "The number of months" ,
round(months_between(sysdate,'&Date_of_Birth' ))*4 "The number of Weeks",
round(months_between(sysdate, '&Date_of_Birth'))*4*30 as "The number of days",
round(months_between(sysdate, '&Date_of_Birth'))*4*30*24 "The number of hours",
round(months_between(sysdate, '&Date_of_Birth'))*4*30*24*60 "The number of seconds",
round(months_between(sysdate, '25/05/1988'))*4*30*24*60*60 "Moment"
from dual

[email protected]

[وليد علاء الدين]

[left]create or replace[/left]

[left]function how_old (p_date varchar)[/left]

[left]return varchar [/left]

[left]is [/left]

[left]birth_day timestamp(2) := to_date(p_date,'DD-MM-YYYY ');[/left]

[left]today timestamp(2) := sysdate;[/left]

[left]age varchar2(100);[/left]

[left]begin age :='You are ' || to_char[/left]

[left](trunc([/left]

[left](extract([/left]

[left]day from (today-birth_day))/30.4375)/12)[/left]

[left]) [/left]

[left]|| ' years and ' || [/left]

[left]to_char([/left]

[left]trunc([/left]

[left](mod([/left]

[left](extract([/left]

[left]day from (today-birth_day))/30.4375)/12,1)*[/left]

[left]365.25)/30.4375))[/left]

[left] || ' months and ' || [/left]

[left]to_char([/left]

[left]trunc(mod[/left]

[left](([/left]

[left]mod([/left]

[left]([/left]

[left]extract(day from (today-birth_day))/30.4375)/12,1)*[/left]

[left]365.25)/30.4375,1)*30.4375))[/left]

[left] || ' days and ' || [/left]

[left]to_char([/left]

[left]to_char([/left]

[left]round([/left]

[left]mod([/left]

[left]mod([/left]

[left](mod([/left]

[left](extract([/left]

[left]day from (today-birth_day))/30.4375)/12,1)*[/left]

[left]365.25)/30.4375,1)*30.4375,1)*24,5))+  [/left]

[left](extract([/left]

[left]hour from (today-birth_day))) || ' hours and ' ||[/left]

[left] to_char[/left]

[left](extract([/left]

[left]minute from (today-birth_day)))) || ' minutes.';[/left]

[left]return age;[/left]

[left]end;[/left]

Select HOW_OLD('12-01-1982') from dual

[وليد علاء الدين]

create or replace

function how_old (p_date varchar)

return varchar

is

birth_day timestamp(2) := to_date(p_date,'DD-MM-YYYY ');

today timestamp(2) := sysdate;

age varchar2(100);

begin age :='You are ' || to_char

(trunc(

(extract(

day from (today-birth_day))/30.4375)/12)

)

|| ' years and ' ||

to_char(

trunc(

(mod(

(extract(

day from (today-birth_day))/30.4375)/12,1)*

365.25)/30.4375))

|| ' months and ' ||

to_char(

trunc(mod

((

mod(

(

extract(day from (today-birth_day))/30.4375)/12,1)*

365.25)/30.4375,1)*30.4375))

|| ' days and ' ||

to_char(

to_char(

round(

mod(

mod(

(mod(

(extract(

day from (today-birth_day))/30.4375)/12,1)*

365.25)/30.4375,1)*30.4375,1)*24,5))+

(extract(

hour from (today-birth_day))) || ' hours and ' ||

to_char

(extract(

minute from (today-birth_day)))) || ' minutes.';

return age;

end;

[Sireen]

الاسهل ما هادا كله

حساب العمر بالسنة و الشهر و اليوم

SELECT EXTRACT(YEAR FROM (SYSDATE - to_date('27-oct-1985','dd-mm-yyyy')) YEAR TO MONTH )
|| ' years '
|| EXTRACT (MONTH FROM (SYSDATE - to_date('27-oct-1985','dd-mm-yyyy')) YEAR TO MONTH )
|| ' months '
|| (EXTRACT(DAY FROM (to_DATE(SYSDATE,'dd-mm-yyyy')))-EXTRACT(DAY FROM (to_DATE('27-OCT-1985','dd-mm-yyyy'))))
FROM dual

[maher1215]

الاسهل ما هادا كله

حساب العمر بالسنة و الشهر و اليوم

SELECT EXTRACT(YEAR FROM (SYSDATE - to_date('27-oct-1985','dd-mm-yyyy')) YEAR TO MONTH )
|| ' years '
|| EXTRACT (MONTH FROM (SYSDATE - to_date('27-oct-1985','dd-mm-yyyy')) YEAR TO MONTH )
|| ' months '
|| (EXTRACT(DAY FROM (to_DATE(SYSDATE,'dd-mm-yyyy')))-EXTRACT(DAY FROM (to_DATE('27-OCT-1985','dd-mm-yyyy'))))
FROM dual

برنامجك بيعطي شهر زيادة أرجو المراجعة

[Eng_AL_kamel]

طيب اخواني الكرام خذوا هذا الكود المختصر
بيحسب العمر كامل بالايام والشهور

select months_between(sysdate,to_date('&Enter_Birth_Date','dd/mm/yyyy'))/12 from dual ;

بالتوفيق