এখানে আমরা PL/SQL ব্যবহার করে কীভাবে প্রদত্ত বছরটি লিপ ইয়ার কিনা তা পরীক্ষা করতে দেখব। PL/SQL কোডে, কিছু গ্রুপ কমান্ড বিবৃতিগুলির সম্পর্কিত ঘোষণার একটি ব্লকের মধ্যে সাজানো হয়।
লিপ ইয়ার চেকিং অ্যালগরিদম নিচের মত।
অ্যালগরিদম
isLeapYear(year): begin if year is divisible by 4 and not divisible by 100, then it is leap year else if the number is divisible by 400, then it is leap year else it is not leap year end
উদাহরণ
DECLARE year NUMBER := 2012; BEGIN IF MOD(year, 4)=0 AND MOD(year, 100)!=0 OR MOD(year, 400)=0 THEN dbms_output.Put_line(year || ' is leap year '); ELSE dbms_output.Put_line(year || ' is not leap year.'); END IF; END;
আউটপুট
2012 is leap year