to print particular month calender sequentially

DECLARE
MYDATE DATE;
MYDATEMAX date;
I_WEEK_DAY number(15); -- VARIES BETWEEN 1 - 7 (SUNDAY - SATURDAY)
C_DATE VARCHAR2(50);
I_MONTH number(15);
I_YEAR number(15);
CAL_STR1 VARCHAR2(50);
CAL_STR2 VARCHAR2(50);
CAL_STR3 VARCHAR2(50);
CAL_STR4 VARCHAR2(50);
CAL_STR5 VARCHAR2(50);
CAL_STR6 VARCHAR2(50);...