OTL- Timecard: How can associate Project with Time

Question

Hello gurus,
I have an OTL requirement where users are required to enter no more than 8 hours of sick time a week.
I have an idea on how to accomplish this but I am not sure how to count the hours when Project = Sick.
Can somebody give me an idea how to accomplish this? This is what I have so far:
FUNCTION XXJIBE_SICK_HRS(p_resource_id NUMBER)
RETURN VARCHAR2
IS
l_timecard_info hxc_self_service_time_deposit.timecard_info;
l_tbb_array HXC_BLOCK_TABLE_TYPE;
l_attributes_info hxc_self_service_time_deposit.building_block_attribute_info;
l_attr_array HXC_ATTRIBUTE_TABLE_TYPE;
BEGIN
l_timecard_info := hxc_self_service_time_deposit.get_building_blocks;
l_tbb_array := hxc_deposit_wrapper_utilities.blocks_to_array(p_blocks => l_timecard_info);
l_attributes_info := hxc_self_service_time_deposit.get_block_attributes;
l_attr_array := hxc_deposit_wrapper_utilities.attributes_to_array (p_attributes => l_attributes_info);
IF l_tbb_array.FIRST IS NOT NULL THEN
FOR i IN l_tbb_array.FIRST .. l_tbb_array.LAST
LOOP
IF (l_tbb_array(i).MEASURE > 0 and l_tbb_array(i).SCOPE = 'DETAIL') THEN
IF l_attr_array.FIRST IS NOT NULL THEN
FOR i IN l_attr_array.FIRST .. l_attr_array.LAST
LOOP
IF (l_attr_array(i).attribute_category = 'PROJECTS'
and l_attr_array(i).attribute1 = 4015 ---project_id for "Non-Work Time US"
and l_attr_array(i).attribute2 = 5121 ---task_id for "Sick"
) THEN
v_sick_hours := nvl(l_tbb_array(i).MEASURE,0) + v_sick_hours;
END IF;
END LOOP;
END IF;
END IF;
END LOOP;
END IF;
IF (v_sick_hours > 8) THEN
v_out := Per our policy you are limited to 8 hours of sick time in a week.
Please adjust your sick time hours on this timecard.';
else
v_out := 'Pass';
END IF;
end;
The code above is not correct because it is failing when I submit 5 hours for the week.

Answer 1

I got the solution. Here is the code I modified:
IF l_tbb_array.FIRST IS NOT NULL THEN
FOR i IN l_tbb_array.FIRST .. l_tbb_array.LAST
LOOP
IF (l_tbb_array(i).MEASURE > 0 and l_tbb_array(i).SCOPE = 'DETAIL') THEN
v_tbbid := l_tbb_array(i).time_building_block_id;
v_measure := nvl(l_tbb_array(i).MEASURE,0);
IF l_attr_array.FIRST IS NOT NULL THEN
FOR i IN l_attr_array.FIRST .. l_attr_array.LAST
LOOP
IF (l_attr_array(i).attribute_category = 'PROJECTS'
and l_attr_array(i).attribute1 = 4015 --project_id for "Non-Work Time US"
and l_attr_array(i).attribute2 = 5121 --task_id for "Sick"
and l_attr_array(i).building_block_id = v_tbbid) THEN
v_sick_hours := v_measure + v_sick_hours;
END IF;
END LOOP;
END IF;
END IF;
END LOOP;
END IF;