85: p_servicetran_rec IN ServiceTran_Rec_Type
86: )
87: RETURN VARCHAR2 IS
88: item_not_found_error EXCEPTION;
89: CURSOR cs_cp_services_all_pk_csr (p_cp_service_id IN NUMBER) IS
90: SELECT *
91: FROM Cs_Cp_Services_All
92: WHERE cs_cp_services_all.cp_service_id = p_cp_service_id;
93: l_cs_cp_services_all_pk cs_cp_services_all_pk_csr%ROWTYPE;
87: RETURN VARCHAR2 IS
88: item_not_found_error EXCEPTION;
89: CURSOR cs_cp_services_all_pk_csr (p_cp_service_id IN NUMBER) IS
90: SELECT *
91: FROM Cs_Cp_Services_All
92: WHERE cs_cp_services_all.cp_service_id = p_cp_service_id;
93: l_cs_cp_services_all_pk cs_cp_services_all_pk_csr%ROWTYPE;
94: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
95: l_row_notfound BOOLEAN := TRUE;
88: item_not_found_error EXCEPTION;
89: CURSOR cs_cp_services_all_pk_csr (p_cp_service_id IN NUMBER) IS
90: SELECT *
91: FROM Cs_Cp_Services_All
92: WHERE cs_cp_services_all.cp_service_id = p_cp_service_id;
93: l_cs_cp_services_all_pk cs_cp_services_all_pk_csr%ROWTYPE;
94: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
95: l_row_notfound BOOLEAN := TRUE;
96: BEGIN
89: CURSOR cs_cp_services_all_pk_csr (p_cp_service_id IN NUMBER) IS
90: SELECT *
91: FROM Cs_Cp_Services_All
92: WHERE cs_cp_services_all.cp_service_id = p_cp_service_id;
93: l_cs_cp_services_all_pk cs_cp_services_all_pk_csr%ROWTYPE;
94: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
95: l_row_notfound BOOLEAN := TRUE;
96: BEGIN
97: IF (p_servicetran_rec.CP_SERVICE_ID IS NOT NULL)
95: l_row_notfound BOOLEAN := TRUE;
96: BEGIN
97: IF (p_servicetran_rec.CP_SERVICE_ID IS NOT NULL)
98: THEN
99: OPEN cs_cp_services_all_pk_csr(p_servicetran_rec.CP_SERVICE_ID);
100: FETCH cs_cp_services_all_pk_csr INTO l_cs_cp_services_all_pk;
101: l_row_notfound := cs_cp_services_all_pk_csr%NOTFOUND;
102: CLOSE cs_cp_services_all_pk_csr;
103: IF (l_row_notfound) THEN
96: BEGIN
97: IF (p_servicetran_rec.CP_SERVICE_ID IS NOT NULL)
98: THEN
99: OPEN cs_cp_services_all_pk_csr(p_servicetran_rec.CP_SERVICE_ID);
100: FETCH cs_cp_services_all_pk_csr INTO l_cs_cp_services_all_pk;
101: l_row_notfound := cs_cp_services_all_pk_csr%NOTFOUND;
102: CLOSE cs_cp_services_all_pk_csr;
103: IF (l_row_notfound) THEN
104: TAPI_DEV_KIT.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CP_SERVICE_ID');
97: IF (p_servicetran_rec.CP_SERVICE_ID IS NOT NULL)
98: THEN
99: OPEN cs_cp_services_all_pk_csr(p_servicetran_rec.CP_SERVICE_ID);
100: FETCH cs_cp_services_all_pk_csr INTO l_cs_cp_services_all_pk;
101: l_row_notfound := cs_cp_services_all_pk_csr%NOTFOUND;
102: CLOSE cs_cp_services_all_pk_csr;
103: IF (l_row_notfound) THEN
104: TAPI_DEV_KIT.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CP_SERVICE_ID');
105: RAISE item_not_found_error;
98: THEN
99: OPEN cs_cp_services_all_pk_csr(p_servicetran_rec.CP_SERVICE_ID);
100: FETCH cs_cp_services_all_pk_csr INTO l_cs_cp_services_all_pk;
101: l_row_notfound := cs_cp_services_all_pk_csr%NOTFOUND;
102: CLOSE cs_cp_services_all_pk_csr;
103: IF (l_row_notfound) THEN
104: TAPI_DEV_KIT.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CP_SERVICE_ID');
105: RAISE item_not_found_error;
106: END IF;