بروسيجر يقوم بعرض التقويم Calendar

[ابو صالح]

السلام عليم ورحمة الله وبركاتة

هذا بروسيجر يقوم بعرض تقويم Calendar ، لشهر الذي تطلبه. وكل ماعليك ان تدخل له رقم الشهر والسنة ليطبعه لك

create or replace procedure calendar(month varchar,year varchar) as type weeks
is varray(6) of varchar2(21); 
l_weeks weeks := weeks(); 
l_last_day number;
l_w_day number; 
begin l_weeks.extend(6); 
l_w_day := to_number(to_char(to_date(month||year,'MMYYYY'),'D'));
l_last_day := to_number(to_char(last_day(to_date(month||year,'MMYYYY')),'DD'));
for i in 1..l_last_day loop
l_weeks(trunc((i+l_w_day-2)/7)+1) := l_weeks(trunc((i+l_w_day-2)/7)+1)||' '||rpad(to_char(i),2); 
end loop;
dbms_output.put_line('----- '||month||'-'||year||' -----'); 
dbms_output.put_line('--------------------');
dbms_output.put_line('Su Mo Tu We Th Fr Sa'); 
dbms_output.put_line(lpad(l_weeks(1),20,'-'));
for i in 2..6 loop
dbms_output.put_line(l_weeks(i));
end loop;
dbms_output.put_line('--------------------');
end;

وللامانة العلمية فلست من عملة . انما وضعته هنا للاستفادة.



تم إضافة الملف بالمرفقات
إدارة المنتدي

show_calendar.txt

[khaled]

الف شكر كود رهيب

[arab20002000]

مشكور على الكود و جزاك الله الف خير

[Essam]

شكرا لك...

[morsy]

شكرا اخى على الكود الرائع والناقل للخير كمن صنعه

[salama11433]

هاجروب ونرد عليك
وطبعا الرد
جزاك الله 100000000000000000000000 خير

[ألماس]

مشكور وجزاك الله خيرا

على الكود الرائع

[عبداللطيف]

شكراً اخي ابو صالح

[أبو الروض]

THANK YOU ABU SALEH VERY MUCH ..............

[oramesa]

thank for you
abu salih

[Osama Soliman]

والله فكرة جميلة
جزاك الله خيرا عليها

[IGBSpeed]

جزاك الله خيراً أخي الكريم ولكن كنت إريد أن أعرف طريقة تشغيلها لأنها لم تتضح لي .... وجزاك الله خيراً على هذا الجهد الرائع .

[kzaghloul]

جزاك الله الخير على نشر هذا الموضوع وشكرا لك على صراحتك

[ahm501]

جزاكم الله خيرا على هذا الكود
وللعلم تم تجربته على الـ SQL prompt ولكن يجب اجراء هذا الأمر قبل تشغيله

SET SERVEROUTPUT ON

[amino1]

جزاك الله خير

[armia2006]

راااااااااااااااائع
مشكوووووووووووووور

[MuhammadYassein]

مشكووووووووووووووووووووووووور

[nas]

thanks

[magedomran]

جزاك الله خيرا يا اخى

[orahamdi]

الف شكر ياغالى

[colla]

للحصول على التاريخ الهجري بإمكانك كتابة

alter session set nls_calendar = 'arabic hijrah';

او

alter session set nls_calendar = 'English Hijrah';

ومشكور يا اخوي على المشاركة الطيبة

[Heima]

جزاك الله خيرا