Doubt in the value return by the function based on given condition

Question

Hi,
Below function should return the value based on the value of in_row_number_high variable.
I have used CASE but it does't return proper value.
How could I give that condition?
Please help.
FUNCTION gen_total_lane_count_pct
    in_lane_id                  edr_rpt_by_ranges_output.lane_id%TYPE,
    in_direction_id             edr_rpt_by_ranges_output.direction_id%TYPE,
    in_interval_start_date_time edr_rpt_by_ranges_output.interval_start_date_time%TYPE,
    in_interval_end_date_time   edr_rpt_by_ranges_output.interval_end_date_time%TYPE,
    in_row_number               edr_rpt_by_ranges_output.range_low%TYPE,
    in_row_number_high          edr_rpt_by_ranges_output.range_high%TYPE,
    in_lane_min                    edr_lane_by_class_report_data.v_lane%TYPE,
    in_lane_max                    edr_lane_by_class_report_data.v_lane%TYPE   
RETURN NUMBER
IS
     my_total             NUMBER(18);
     my_count_pct         NUMBER(18);
     my_total_pct         NUMBER(18);
     my_each_count_result NUMBER(18);
     my_count_result            NUMBER(18);
     my_total_count             NUMBER(18);
  lane_start           edr_rpt_tmp_report_lanes.site_lane_id%TYPE;
  lane_end             edr_rpt_tmp_report_lanes.site_lane_id%TYPE;
  row_start            NUMBER(12);
  row_end              NUMBER(12);
BEGIN
     my_count_pct       := 0 ;
       SELECT MIN(site_lane_id)
         INTO lane_start
      FROM edr_rpt_tmp_report_lanes
     WHERE edr_rpt_tmp_report_lanes.output_lane_id        = in_lane_id
       AND edr_rpt_tmp_report_lanes.output_direction_id   = in_direction_id;
     SELECT MAX(site_lane_id)
          INTO lane_end
       FROM edr_rpt_tmp_report_lanes
      WHERE edr_rpt_tmp_report_lanes.output_lane_id        = in_lane_id
        AND edr_rpt_tmp_report_lanes.output_direction_id   = in_direction_id;  
     SELECT MIN(range_low)
       INTO row_start
       FROM edr_rpt_by_ranges_output;
     SELECT MAX(range_low)
       INTO row_end
       FROM edr_rpt_by_ranges_output;
           my_each_count_result := edr_rpt_lane_by_class_package.gen_total_lane_count (
                                    in_lane_id,
                                    in_direction_id,
                                    in_interval_start_date_time,
                                    in_interval_end_date_time,
                                    in_row_number,
                                    in_row_number_high,
                                    in_lane_min,
                                    in_lane_max             
    my_count_result := edr_rpt_lane_by_class_package.gen_total_lane_count (
                                    in_lane_id,
                                    in_direction_id,
                                    in_interval_start_date_time,
                                    in_interval_end_date_time,
                                    row_start,
                                    row_end,
                                    in_lane_min,
                                    in_lane_max              
     my_total_count :=  edr_rpt_lane_by_class_package.gen_total_lane_count (
                                    in_lane_id,
                                    in_direction_id,
                                    in_interval_start_date_time,
                                    in_interval_end_date_time,
                                    in_row_number,
                                    in_row_number_high,
                                    lane_start,
                                    lane_end               
         IF (my_each_count_result > 0)   THEN                          
               my_total := edr_rpt_lane_by_class_package.gen_total_lane_count (
                                    in_lane_id,
                                    in_direction_id,
                                    in_interval_start_date_time,
                                    in_interval_end_date_time,
                                    row_start,
                                    row_end,
                                    lane_start,
                                    lane_end              
            CASE
            WHEN in_row_number_high = row_end THEN                       
                 my_count_pct := ROUND((my_each_count_result / my_count_result ) * 100 );     
            WHEN in_row_number_high < row_end THEN                
                    my_count_pct := ROUND((my_each_count_result / my_total ) * 100 ) ;               
            ELSE
     RAISE_APPLICATION_ERROR(-20101, 'The row number specified is not recognized.');                 
            END CASE;     
         END IF;
         return my_count_pct;
END gen_total_lane_count_pct;          Edited by: Indhu Ram on Jan 5, 2010 11:43 AM

Answer 1

Hi,
I have to find out the % value for each column value( For rx if there is only 2 columns).To calculate the % , each column value should get divided by the total of that column value.
To calculate the % for the total row , each column total should get divide by the sum of column ( sum of column 1 + sum of column 2)values.
ROUND((my_each_count_result / my_count_result ) * 100 ) ---- This calculaton gives me the % for the total row.
ROUND((my_each_count_result / my_total ) * 100 ) ------- This calculation gives the % for the data row.
The condition that I have tried is, if it reaches end of data row (to achieve that condition I have given this condition in_row_number_high < row_end )
Now my result returns only values based on this condition -- in_row_number_high < row_end .
It does't look for the first condition.
CASE
WHEN in_row_number_high = row_end THEN
my_count_pct := ROUND((my_each_count_result / my_count_result ) * 100 );     
WHEN in_row_number_high < row_end THEN
     my_count_pct := ROUND((my_each_count_result / my_total ) * 100 ) ;               
ELSE
RAISE_APPLICATION_ERROR(-20101, 'The row number specified is not recognized.');          
END CASE;
Hope , you have some good understanding now. Please help me how could I do this?