82: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
83: l_qc_tests_rec GMD_QC_TESTS%ROWTYPE;
84: l_qc_tests_rec_in GMD_QC_TESTS%ROWTYPE;
85: l_qc_cust_tests_rec GMD_CUSTOMER_TESTS%ROWTYPE;
86: l_qc_test_values_rec_in GMD_QC_TEST_VALUES%ROWTYPE;
87: l_qc_test_values_rec GMD_QC_TEST_VALUES%ROWTYPE;
88: l_qc_test_values_tbl GMD_QC_TESTS_PUB.qc_test_values_tbl;
89: l_qc_cust_tests_tbl GMD_QC_TESTS_PUB.qc_cust_tests_tbl;
90: l_rowid ROWID;
83: l_qc_tests_rec GMD_QC_TESTS%ROWTYPE;
84: l_qc_tests_rec_in GMD_QC_TESTS%ROWTYPE;
85: l_qc_cust_tests_rec GMD_CUSTOMER_TESTS%ROWTYPE;
86: l_qc_test_values_rec_in GMD_QC_TEST_VALUES%ROWTYPE;
87: l_qc_test_values_rec GMD_QC_TEST_VALUES%ROWTYPE;
88: l_qc_test_values_tbl GMD_QC_TESTS_PUB.qc_test_values_tbl;
89: l_qc_cust_tests_tbl GMD_QC_TESTS_PUB.qc_cust_tests_tbl;
90: l_rowid ROWID;
91: l_user_id NUMBER(15);
276:
277:
278: -- Validate Values definition
279:
280: GMD_QC_TEST_VALUES_GRP.VALIDATE_BEFORE_INSERT(
281: p_qc_test_values_rec => l_qc_test_values_rec_in,
282: x_qc_test_values_rec => l_qc_test_values_rec,
283: x_return_status => l_return_status,
284: x_message_data => l_msg_data
294: l_qc_test_values_rec.created_by := l_user_id;
295: l_qc_test_values_rec.last_updated_by := l_user_id;
296: l_qc_test_values_rec.test_value_id := NULL;
297:
298: IF NOT GMD_QC_TEST_VALUES_PVT.INSERT_ROW(
299: p_qc_test_values_rec => l_qc_test_values_rec) THEN
300: RAISE FND_API.G_EXC_ERROR;
301: END IF;
302:
307: END LOOP;
308:
309: -- Now we have valid Test Record Call Validate after Insert.
310:
311: GMD_QC_TEST_VALUES_GRP.VALIDATE_AFTER_INSERT_ALL(
312: p_gmd_qc_tests_rec => l_qc_tests_rec,
313: x_gmd_qc_tests_rec => l_qc_tests_rec_in,
314: x_return_status => l_return_status,
315: x_message_data => l_msg_data);
644: l_msg_data VARCHAR2(2000);
645: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
646: l_qc_tests_rec GMD_QC_TESTS%ROWTYPE;
647: l_qc_tests_rec_in GMD_QC_TESTS%ROWTYPE;
648: l_qc_test_values_rec GMD_QC_TEST_VALUES%ROWTYPE;
649: l_qc_test_values_tbl GMD_QC_TESTS_PUB.qc_test_values_tbl;
650: l_deleted_rows NUMBER(10);
651: l_test_id NUMBER(10);
652:
743: END IF;
744:
745: -- Call Validate Routine to validate Header
746:
747: GMD_QC_TEST_VALUES_GRP.VALIDATE_BEFORE_DELETE(
748: p_test_value_id => l_qc_test_values_rec.test_value_id,
749: x_return_status => l_return_status,
750: x_message_data => l_msg_data);
751:
754: END IF;
755:
756: -- Lock the Value Row.
757:
758: IF NOT GMD_QC_TEST_VALUES_PVT.LOCK_ROW(
759: p_test_value_id => l_qc_test_values_rec.test_value_id) THEN
760: GMD_API_PUB.Log_Message('GMD_LOCKING_FAILURE',
761: 'l_table_name', 'GMD_QC_TEST_VALUES',
762: 'l_column_name','TEST_VALUE_ID',
757:
758: IF NOT GMD_QC_TEST_VALUES_PVT.LOCK_ROW(
759: p_test_value_id => l_qc_test_values_rec.test_value_id) THEN
760: GMD_API_PUB.Log_Message('GMD_LOCKING_FAILURE',
761: 'l_table_name', 'GMD_QC_TEST_VALUES',
762: 'l_column_name','TEST_VALUE_ID',
763: 'l_key_value', l_qc_test_values_rec.test_value_id);
764:
765: RAISE FND_API.G_EXC_ERROR;
767:
768:
769: -- Delete the Value Row.
770:
771: IF NOT GMD_QC_TEST_VALUES_PVT.DELETE_ROW(
772: p_test_value_id => l_qc_test_values_rec.test_value_id) THEN
773: GMD_API_PUB.Log_Message('GMD_FAILED_TO_DELETE_ROW',
774: 'l_table_name', 'GMD_QC_TEST_VALUES',
775: 'l_column_name', 'TEST_VALUE_ID',
770:
771: IF NOT GMD_QC_TEST_VALUES_PVT.DELETE_ROW(
772: p_test_value_id => l_qc_test_values_rec.test_value_id) THEN
773: GMD_API_PUB.Log_Message('GMD_FAILED_TO_DELETE_ROW',
774: 'l_table_name', 'GMD_QC_TEST_VALUES',
775: 'l_column_name', 'TEST_VALUE_ID',
776: 'l_key_value', l_qc_test_values_rec.test_value_id);
777:
778:
785: END LOOP;
786:
787: -- Now Process All VAlues After Deletion
788:
789: GMD_QC_TEST_VALUES_GRP.VALIDATE_AFTER_DELETE_ALL(
790: p_gmd_qc_tests_rec => l_qc_tests_rec,
791: x_gmd_qc_tests_rec => l_qc_tests_rec_in,
792: x_return_status => l_return_status,
793: x_message_data => l_msg_data);