4134: lmonth number:=0;
4135:
4136: CURSOR diff IS
4137: SELECT day30, MONTH
4138: FROM bsc_db_calendar
4139: WHERE calendar_id = p_calid
4140: AND calendar_year = p_cyear
4141: MINUS
4142: SELECT day30, MONTH
4139: WHERE calendar_id = p_calid
4140: AND calendar_year = p_cyear
4141: MINUS
4142: SELECT day30, MONTH
4143: FROM bsc_db_calendar
4144: WHERE calendar_id = p_calid
4145: AND calendar_year = p_pyear;
4146: BEGIN
4147: OPEN diff;
4153: CLOSE diff;
4154: IF lday <>0 THEN
4155: SELECT day365
4156: INTO x_result
4157: FROM bsc_db_calendar
4158: WHERE calendar_id = p_calid
4159: AND calendar_year = p_cyear
4160: AND day30 = lday
4161: AND MONTH = lmonth;