195: l_msg_data varchar2(2000);
196:
197: begin
198:
199: l_return_status := PA_API.START_ACTIVITY(l_api_name,
200: p_init_msg_list,
201: '_PUB',
202: x_return_status);
203: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
199: l_return_status := PA_API.START_ACTIVITY(l_api_name,
200: p_init_msg_list,
201: '_PUB',
202: x_return_status);
203: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
204: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
205: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
206: RAISE PA_API.G_EXCEPTION_ERROR;
207: END IF;
200: p_init_msg_list,
201: '_PUB',
202: x_return_status);
203: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
204: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
205: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
206: RAISE PA_API.G_EXCEPTION_ERROR;
207: END IF;
208:
201: '_PUB',
202: x_return_status);
203: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
204: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
205: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
206: RAISE PA_API.G_EXCEPTION_ERROR;
207: END IF;
208:
209: if p_task_id_tbl.count > 0 then
202: x_return_status);
203: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
204: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
205: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
206: RAISE PA_API.G_EXCEPTION_ERROR;
207: END IF;
208:
209: if p_task_id_tbl.count > 0 then
210: for i in p_task_id_tbl.first..p_task_id_tbl.last loop
587: x_return_status => l_return_status,
588: x_msg_count => l_msg_count,
589: x_msg_data => l_msg_data);
590:
591: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
592: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
593: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
594: RAISE PA_API.G_EXCEPTION_ERROR;
595: END IF;
588: x_msg_count => l_msg_count,
589: x_msg_data => l_msg_data);
590:
591: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
592: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
593: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
594: RAISE PA_API.G_EXCEPTION_ERROR;
595: END IF;
596:
589: x_msg_data => l_msg_data);
590:
591: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
592: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
593: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
594: RAISE PA_API.G_EXCEPTION_ERROR;
595: END IF;
596:
597: PA_API.END_ACTIVITY(l_msg_count, l_msg_data);
590:
591: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
592: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
593: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
594: RAISE PA_API.G_EXCEPTION_ERROR;
595: END IF;
596:
597: PA_API.END_ACTIVITY(l_msg_count, l_msg_data);
598: x_return_status := PA_API.G_RET_STS_SUCCESS;
593: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
594: RAISE PA_API.G_EXCEPTION_ERROR;
595: END IF;
596:
597: PA_API.END_ACTIVITY(l_msg_count, l_msg_data);
598: x_return_status := PA_API.G_RET_STS_SUCCESS;
599:
600: EXCEPTION
601: WHEN PA_API.G_EXCEPTION_ERROR THEN
594: RAISE PA_API.G_EXCEPTION_ERROR;
595: END IF;
596:
597: PA_API.END_ACTIVITY(l_msg_count, l_msg_data);
598: x_return_status := PA_API.G_RET_STS_SUCCESS;
599:
600: EXCEPTION
601: WHEN PA_API.G_EXCEPTION_ERROR THEN
602: x_return_status := PA_API.HANDLE_EXCEPTIONS
597: PA_API.END_ACTIVITY(l_msg_count, l_msg_data);
598: x_return_status := PA_API.G_RET_STS_SUCCESS;
599:
600: EXCEPTION
601: WHEN PA_API.G_EXCEPTION_ERROR THEN
602: x_return_status := PA_API.HANDLE_EXCEPTIONS
603: (
604: l_api_name,
605: G_PKG_NAME,
598: x_return_status := PA_API.G_RET_STS_SUCCESS;
599:
600: EXCEPTION
601: WHEN PA_API.G_EXCEPTION_ERROR THEN
602: x_return_status := PA_API.HANDLE_EXCEPTIONS
603: (
604: l_api_name,
605: G_PKG_NAME,
606: 'PA_API.G_RET_STS_ERROR',
602: x_return_status := PA_API.HANDLE_EXCEPTIONS
603: (
604: l_api_name,
605: G_PKG_NAME,
606: 'PA_API.G_RET_STS_ERROR',
607: x_msg_count,
608: x_msg_data,
609: '_PUB'
610: );
607: x_msg_count,
608: x_msg_data,
609: '_PUB'
610: );
611: WHEN PA_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
612: x_return_status := PA_API.HANDLE_EXCEPTIONS
613: (
614: l_api_name,
615: G_PKG_NAME,
608: x_msg_data,
609: '_PUB'
610: );
611: WHEN PA_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
612: x_return_status := PA_API.HANDLE_EXCEPTIONS
613: (
614: l_api_name,
615: G_PKG_NAME,
616: 'PA_API.G_RET_STS_UNEXP_ERROR',
612: x_return_status := PA_API.HANDLE_EXCEPTIONS
613: (
614: l_api_name,
615: G_PKG_NAME,
616: 'PA_API.G_RET_STS_UNEXP_ERROR',
617: x_msg_count,
618: x_msg_data,
619: '_PUB'
620: );
618: x_msg_data,
619: '_PUB'
620: );
621: WHEN OTHERS THEN
622: x_return_status := PA_API.HANDLE_EXCEPTIONS
623: (
624: l_api_name,
625: G_PKG_NAME,
626: 'OTHERS',
697:
698: --(
699: begin
700:
701: l_return_status := PA_API.START_ACTIVITY(l_api_name,
702: p_init_msg_list,
703: '_PUB',
704: x_return_status);
705: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
701: l_return_status := PA_API.START_ACTIVITY(l_api_name,
702: p_init_msg_list,
703: '_PUB',
704: x_return_status);
705: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
706: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
707: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
708: RAISE PA_API.G_EXCEPTION_ERROR;
709: END IF;
702: p_init_msg_list,
703: '_PUB',
704: x_return_status);
705: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
706: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
707: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
708: RAISE PA_API.G_EXCEPTION_ERROR;
709: END IF;
710:
703: '_PUB',
704: x_return_status);
705: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
706: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
707: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
708: RAISE PA_API.G_EXCEPTION_ERROR;
709: END IF;
710:
711: if p_task_tbl.count > 0 then
704: x_return_status);
705: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
706: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
707: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
708: RAISE PA_API.G_EXCEPTION_ERROR;
709: END IF;
710:
711: if p_task_tbl.count > 0 then
712: for i in p_task_tbl.first..p_task_tbl.last loop
765: ,x_return_status => l_return_status
766: ,x_msg_count => l_msg_count
767: ,x_msg_data => l_msg_data);
768:
769: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
770: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
771: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
772: RAISE PA_API.G_EXCEPTION_ERROR;
773: END IF;
766: ,x_msg_count => l_msg_count
767: ,x_msg_data => l_msg_data);
768:
769: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
770: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
771: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
772: RAISE PA_API.G_EXCEPTION_ERROR;
773: END IF;
774:
767: ,x_msg_data => l_msg_data);
768:
769: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
770: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
771: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
772: RAISE PA_API.G_EXCEPTION_ERROR;
773: END IF;
774:
775: PA_API.END_ACTIVITY(l_msg_count, l_msg_data);
768:
769: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
770: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
771: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
772: RAISE PA_API.G_EXCEPTION_ERROR;
773: END IF;
774:
775: PA_API.END_ACTIVITY(l_msg_count, l_msg_data);
776: x_return_status := PA_API.G_RET_STS_SUCCESS;
771: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
772: RAISE PA_API.G_EXCEPTION_ERROR;
773: END IF;
774:
775: PA_API.END_ACTIVITY(l_msg_count, l_msg_data);
776: x_return_status := PA_API.G_RET_STS_SUCCESS;
777:
778: EXCEPTION
779: WHEN PA_API.G_EXCEPTION_ERROR THEN
772: RAISE PA_API.G_EXCEPTION_ERROR;
773: END IF;
774:
775: PA_API.END_ACTIVITY(l_msg_count, l_msg_data);
776: x_return_status := PA_API.G_RET_STS_SUCCESS;
777:
778: EXCEPTION
779: WHEN PA_API.G_EXCEPTION_ERROR THEN
780: x_return_status := PA_API.HANDLE_EXCEPTIONS
775: PA_API.END_ACTIVITY(l_msg_count, l_msg_data);
776: x_return_status := PA_API.G_RET_STS_SUCCESS;
777:
778: EXCEPTION
779: WHEN PA_API.G_EXCEPTION_ERROR THEN
780: x_return_status := PA_API.HANDLE_EXCEPTIONS
781: (
782: l_api_name,
783: G_PKG_NAME,
776: x_return_status := PA_API.G_RET_STS_SUCCESS;
777:
778: EXCEPTION
779: WHEN PA_API.G_EXCEPTION_ERROR THEN
780: x_return_status := PA_API.HANDLE_EXCEPTIONS
781: (
782: l_api_name,
783: G_PKG_NAME,
784: 'PA_API.G_RET_STS_ERROR',
780: x_return_status := PA_API.HANDLE_EXCEPTIONS
781: (
782: l_api_name,
783: G_PKG_NAME,
784: 'PA_API.G_RET_STS_ERROR',
785: x_msg_count,
786: x_msg_data,
787: '_PUB'
788: );
785: x_msg_count,
786: x_msg_data,
787: '_PUB'
788: );
789: WHEN PA_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
790: x_return_status := PA_API.HANDLE_EXCEPTIONS
791: (
792: l_api_name,
793: G_PKG_NAME,
786: x_msg_data,
787: '_PUB'
788: );
789: WHEN PA_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
790: x_return_status := PA_API.HANDLE_EXCEPTIONS
791: (
792: l_api_name,
793: G_PKG_NAME,
794: 'PA_API.G_RET_STS_UNEXP_ERROR',
790: x_return_status := PA_API.HANDLE_EXCEPTIONS
791: (
792: l_api_name,
793: G_PKG_NAME,
794: 'PA_API.G_RET_STS_UNEXP_ERROR',
795: x_msg_count,
796: x_msg_data,
797: '_PUB'
798: );
796: x_msg_data,
797: '_PUB'
798: );
799: WHEN OTHERS THEN
800: x_return_status := PA_API.HANDLE_EXCEPTIONS
801: (
802: l_api_name,
803: G_PKG_NAME,
804: 'OTHERS',
866: l_msg_count number;
867:
868: begin
869:
870: l_return_status := PA_API.START_ACTIVITY(l_api_name,
871: p_init_msg_list,
872: '_PUB',
873: x_return_status);
874:
871: p_init_msg_list,
872: '_PUB',
873: x_return_status);
874:
875: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
876: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
877: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
878: RAISE PA_API.G_EXCEPTION_ERROR;
879: END IF;
872: '_PUB',
873: x_return_status);
874:
875: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
876: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
877: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
878: RAISE PA_API.G_EXCEPTION_ERROR;
879: END IF;
880:
873: x_return_status);
874:
875: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
876: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
877: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
878: RAISE PA_API.G_EXCEPTION_ERROR;
879: END IF;
880:
881: if p_bvId is not null then
874:
875: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
876: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
877: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
878: RAISE PA_API.G_EXCEPTION_ERROR;
879: END IF;
880:
881: if p_bvId is not null then
882: if p_task_id_tbl.count > 0 then
943: x_return_status => l_return_status,
944: x_msg_count => l_msg_count,
945: x_msg_data => l_msg_data);
946:
947: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
948: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
949: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
950: RAISE PA_API.G_EXCEPTION_ERROR;
951: END IF;
944: x_msg_count => l_msg_count,
945: x_msg_data => l_msg_data);
946:
947: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
948: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
949: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
950: RAISE PA_API.G_EXCEPTION_ERROR;
951: END IF;
952: end if; -- if p_bvid is not null
945: x_msg_data => l_msg_data);
946:
947: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
948: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
949: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
950: RAISE PA_API.G_EXCEPTION_ERROR;
951: END IF;
952: end if; -- if p_bvid is not null
953: --}
946:
947: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
948: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
949: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
950: RAISE PA_API.G_EXCEPTION_ERROR;
951: END IF;
952: end if; -- if p_bvid is not null
953: --}
954:
951: END IF;
952: end if; -- if p_bvid is not null
953: --}
954:
955: PA_API.END_ACTIVITY(l_msg_count, l_msg_data);
956: x_return_status := PA_API.G_RET_STS_SUCCESS;
957:
958: EXCEPTION
959: WHEN PA_API.G_EXCEPTION_ERROR THEN
952: end if; -- if p_bvid is not null
953: --}
954:
955: PA_API.END_ACTIVITY(l_msg_count, l_msg_data);
956: x_return_status := PA_API.G_RET_STS_SUCCESS;
957:
958: EXCEPTION
959: WHEN PA_API.G_EXCEPTION_ERROR THEN
960: x_return_status := PA_API.HANDLE_EXCEPTIONS
955: PA_API.END_ACTIVITY(l_msg_count, l_msg_data);
956: x_return_status := PA_API.G_RET_STS_SUCCESS;
957:
958: EXCEPTION
959: WHEN PA_API.G_EXCEPTION_ERROR THEN
960: x_return_status := PA_API.HANDLE_EXCEPTIONS
961: (
962: l_api_name,
963: G_PKG_NAME,
956: x_return_status := PA_API.G_RET_STS_SUCCESS;
957:
958: EXCEPTION
959: WHEN PA_API.G_EXCEPTION_ERROR THEN
960: x_return_status := PA_API.HANDLE_EXCEPTIONS
961: (
962: l_api_name,
963: G_PKG_NAME,
964: 'PA_API.G_RET_STS_ERROR',
960: x_return_status := PA_API.HANDLE_EXCEPTIONS
961: (
962: l_api_name,
963: G_PKG_NAME,
964: 'PA_API.G_RET_STS_ERROR',
965: x_msg_count,
966: x_msg_data,
967: '_PUB'
968: );
965: x_msg_count,
966: x_msg_data,
967: '_PUB'
968: );
969: WHEN PA_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
970: x_return_status := PA_API.HANDLE_EXCEPTIONS
971: (
972: l_api_name,
973: G_PKG_NAME,
966: x_msg_data,
967: '_PUB'
968: );
969: WHEN PA_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
970: x_return_status := PA_API.HANDLE_EXCEPTIONS
971: (
972: l_api_name,
973: G_PKG_NAME,
974: 'PA_API.G_RET_STS_UNEXP_ERROR',
970: x_return_status := PA_API.HANDLE_EXCEPTIONS
971: (
972: l_api_name,
973: G_PKG_NAME,
974: 'PA_API.G_RET_STS_UNEXP_ERROR',
975: x_msg_count,
976: x_msg_data,
977: '_PUB'
978: );
976: x_msg_data,
977: '_PUB'
978: );
979: WHEN OTHERS THEN
980: x_return_status := PA_API.HANDLE_EXCEPTIONS
981: (
982: l_api_name,
983: G_PKG_NAME,
984: 'OTHERS',
1164: i_burden_cost_rate number;
1165:
1166: begin
1167:
1168: l_return_status := PA_API.START_ACTIVITY(l_api_name,
1169: p_init_msg_list,
1170: '_PUB',
1171: x_return_status);
1172:
1169: p_init_msg_list,
1170: '_PUB',
1171: x_return_status);
1172:
1173: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1174: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1175: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1176: RAISE PA_API.G_EXCEPTION_ERROR;
1177: END IF;
1170: '_PUB',
1171: x_return_status);
1172:
1173: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1174: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1175: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1176: RAISE PA_API.G_EXCEPTION_ERROR;
1177: END IF;
1178:
1171: x_return_status);
1172:
1173: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1174: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1175: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1176: RAISE PA_API.G_EXCEPTION_ERROR;
1177: END IF;
1178:
1179: -- Step 1: rollup the input tables to P/T/R/C
1172:
1173: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1174: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1175: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1176: RAISE PA_API.G_EXCEPTION_ERROR;
1177: END IF;
1178:
1179: -- Step 1: rollup the input tables to P/T/R/C
1180: if p_task_id_tbl.count > 0 then
1386: p_task_tbl => del_task_tbl,
1387: p_currency_tbl => del_currency_tbl,
1388: p_rlmi_tbl => del_rlmi_tbl);
1389:
1390: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1391: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1392: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1393: RAISE PA_API.G_EXCEPTION_ERROR;
1394: END IF;
1387: p_currency_tbl => del_currency_tbl,
1388: p_rlmi_tbl => del_rlmi_tbl);
1389:
1390: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1391: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1392: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1393: RAISE PA_API.G_EXCEPTION_ERROR;
1394: END IF;
1395:
1388: p_rlmi_tbl => del_rlmi_tbl);
1389:
1390: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1391: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1392: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1393: RAISE PA_API.G_EXCEPTION_ERROR;
1394: END IF;
1395:
1396: end if; -- del_task_tbl.count > 0
1389:
1390: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1391: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1392: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1393: RAISE PA_API.G_EXCEPTION_ERROR;
1394: END IF;
1395:
1396: end if; -- del_task_tbl.count > 0
1397:
1411: p_raw_cost_tbl => upd_raw_cost_tbl,
1412: p_currency_code_tbl => upd_currency_tbl
1413: );
1414:
1415: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1416: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1417: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1418: RAISE PA_API.G_EXCEPTION_ERROR;
1419: END IF;
1412: p_currency_code_tbl => upd_currency_tbl
1413: );
1414:
1415: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1416: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1417: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1418: RAISE PA_API.G_EXCEPTION_ERROR;
1419: END IF;
1420:
1413: );
1414:
1415: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1416: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1417: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1418: RAISE PA_API.G_EXCEPTION_ERROR;
1419: END IF;
1420:
1421: end if; -- upd_task_tbl.count > 0
1414:
1415: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1416: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1417: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1418: RAISE PA_API.G_EXCEPTION_ERROR;
1419: END IF;
1420:
1421: end if; -- upd_task_tbl.count > 0
1422: end if; -- if pa_action_type = 'DELETE'
1477: p_raw_cost_tbl => upd_raw_cost_tbl,
1478: p_currency_code_tbl => upd_currency_tbl
1479: );
1480:
1481: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1482: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1483: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1484: RAISE PA_API.G_EXCEPTION_ERROR;
1485: END IF;
1478: p_currency_code_tbl => upd_currency_tbl
1479: );
1480:
1481: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1482: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1483: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1484: RAISE PA_API.G_EXCEPTION_ERROR;
1485: END IF;
1486:
1479: );
1480:
1481: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1482: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1483: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1484: RAISE PA_API.G_EXCEPTION_ERROR;
1485: END IF;
1486:
1487: end if;
1480:
1481: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1482: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1483: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1484: RAISE PA_API.G_EXCEPTION_ERROR;
1485: END IF;
1486:
1487: end if;
1488:
1501: P_QUANTITY_TBL => ins_quantity_tbl,
1502: P_RAW_COST_TBL => ins_raw_cost_tbl
1503: );
1504:
1505: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1506: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1507: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1508: RAISE PA_API.G_EXCEPTION_ERROR;
1509: END IF;
1502: P_RAW_COST_TBL => ins_raw_cost_tbl
1503: );
1504:
1505: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1506: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1507: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1508: RAISE PA_API.G_EXCEPTION_ERROR;
1509: END IF;
1510: end if;
1503: );
1504:
1505: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1506: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1507: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1508: RAISE PA_API.G_EXCEPTION_ERROR;
1509: END IF;
1510: end if;
1511:
1504:
1505: IF (l_return_status = PA_API.G_RET_STS_UNEXP_ERROR) THEN
1506: RAISE PA_API.G_EXCEPTION_UNEXPECTED_ERROR;
1507: ELSIF (l_return_status = PA_API.G_RET_STS_ERROR) THEN
1508: RAISE PA_API.G_EXCEPTION_ERROR;
1509: END IF;
1510: end if;
1511:
1512: l_count := 0;
1649:
1650: end if; -- if rollup_task_tbl.count > 0
1651: end if; -- if p_action_type
1652:
1653: PA_API.END_ACTIVITY(l_msg_count, l_msg_data);
1654: x_return_status := PA_API.G_RET_STS_SUCCESS;
1655: EXCEPTION
1656: WHEN PA_API.G_EXCEPTION_ERROR THEN
1657: x_return_status := PA_API.HANDLE_EXCEPTIONS
1650: end if; -- if rollup_task_tbl.count > 0
1651: end if; -- if p_action_type
1652:
1653: PA_API.END_ACTIVITY(l_msg_count, l_msg_data);
1654: x_return_status := PA_API.G_RET_STS_SUCCESS;
1655: EXCEPTION
1656: WHEN PA_API.G_EXCEPTION_ERROR THEN
1657: x_return_status := PA_API.HANDLE_EXCEPTIONS
1658: (
1652:
1653: PA_API.END_ACTIVITY(l_msg_count, l_msg_data);
1654: x_return_status := PA_API.G_RET_STS_SUCCESS;
1655: EXCEPTION
1656: WHEN PA_API.G_EXCEPTION_ERROR THEN
1657: x_return_status := PA_API.HANDLE_EXCEPTIONS
1658: (
1659: l_api_name,
1660: G_PKG_NAME,
1653: PA_API.END_ACTIVITY(l_msg_count, l_msg_data);
1654: x_return_status := PA_API.G_RET_STS_SUCCESS;
1655: EXCEPTION
1656: WHEN PA_API.G_EXCEPTION_ERROR THEN
1657: x_return_status := PA_API.HANDLE_EXCEPTIONS
1658: (
1659: l_api_name,
1660: G_PKG_NAME,
1661: 'PA_API.G_RET_STS_ERROR',
1657: x_return_status := PA_API.HANDLE_EXCEPTIONS
1658: (
1659: l_api_name,
1660: G_PKG_NAME,
1661: 'PA_API.G_RET_STS_ERROR',
1662: x_msg_count,
1663: x_msg_data,
1664: '_PUB'
1665: );
1662: x_msg_count,
1663: x_msg_data,
1664: '_PUB'
1665: );
1666: WHEN PA_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1667: x_return_status := PA_API.HANDLE_EXCEPTIONS
1668: (
1669: l_api_name,
1670: G_PKG_NAME,
1663: x_msg_data,
1664: '_PUB'
1665: );
1666: WHEN PA_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1667: x_return_status := PA_API.HANDLE_EXCEPTIONS
1668: (
1669: l_api_name,
1670: G_PKG_NAME,
1671: 'PA_API.G_RET_STS_UNEXP_ERROR',
1667: x_return_status := PA_API.HANDLE_EXCEPTIONS
1668: (
1669: l_api_name,
1670: G_PKG_NAME,
1671: 'PA_API.G_RET_STS_UNEXP_ERROR',
1672: x_msg_count,
1673: x_msg_data,
1674: '_PUB'
1675: );
1673: x_msg_data,
1674: '_PUB'
1675: );
1676: WHEN OTHERS THEN
1677: x_return_status := PA_API.HANDLE_EXCEPTIONS
1678: (
1679: l_api_name,
1680: G_PKG_NAME,
1681: 'OTHERS',