السلام عليكم ...
اولا اود ان اشكر الاخ ابو خلف على الموضوع الشيق الذي طرحه وهو برنامج تحويل التاريخ
وهذه الوصله لكل من يحب ان يطلع عليه لانه مستخدم طريقة اللوجريتم .
http://www.arabteam2000.com/ib/index.php?s...showtopic=35987
اما انا فهو برنامج سهل مماثل له ...فقط استخدمت بعض الدوال للتحويل وهذا هو البرنامج
ارجو من الجميع الاستفادة منه ..
Begin
MESSAGE('ÌãíÚ ÍÞæÞ ÇáØÈÚ ÛíÑ ãÍÝæÙå ...ÇÎæßã ÍÓíä ÚÈÏÇááå ÃÍãÏ');
MESSAGE('ÌãíÚ ÍÞæÞ ÇáØÈÚ ÛíÑ ãÍÝæÙå ...ÇÎæßã ÍÓíä ÚÈÏÇááå ÃÍãÏ');
IF :G_DATE IS NULL THEN
MESSAGE('áÇíæÌÏ ÊÇÑíÎ');
MESSAGE('áÇíæÌÏ ÊÇÑíÎ');
ELSE
BEGIN
select to_char(:G_DATE,'dd month yyyy','nls_calendar=''arabic hijrah''')
INTO :H_DATE from dual;
END;
BEGIN
select to_char(:G_DATE,'DD-MM-YYYY','nls_calendar=''arabic hijrah''')
INTO :H_DATE2 from dual;
END;
END IF;
END;