208: IF l_combination_found THEN
209: BEGIN
210: SELECT 1
211: INTO l_exists
212: FROM zx_api_registrations reg,
213: zx_service_types srvc
214: WHERE reg.api_owner_id = l_api_owner_id
215: AND srvc.service_type_id = reg.service_type_id
216: AND srvc.service_type_code = p_srvc_type_code
258: END IF;
259: END IF; --create code combination
260:
261: /*Create data in registrations*/
262: INSERT INTO ZX_API_REGISTRATIONS
263: (API_REGISTRATION_ID,
264: API_OWNER_ID,
265: PACKAGE_NAME,
266: PROCEDURE_NAME,
273: LAST_UPDATE_LOGIN,
274: OBJECT_VERSION_NUMBER,
275: RECORD_TYPE_CODE)
276: VALUES
277: (ZX_API_REGISTRATIONS_S.nextval,
278: l_api_owner_id,
279: p_package_name,
280: p_procedure_name,
281: l_srvc_type_id,
393: /*Determine number of records to decide the status in zx_api_owner_statues*/
394: BEGIN
395: SELECT count(*)
396: INTO l_count
397: FROM ZX_API_REGISTRATIONS
398: WHERE api_owner_id = l_api_owner_id
399: AND service_type_id = l_srvc_type_id;
400:
401: EXCEPTION
405: x_return_status := FND_API.G_RET_STS_ERROR;
406: l_error_counter := l_error_counter+1;
407: END;
408:
409: DELETE from ZX_API_REGISTRATIONS
410: WHERE EXISTS (SELECT *
411: FROM zx_api_registrations reg,
412: zx_api_code_combinations cmbn,
413: zx_service_types srvc
407: END;
408:
409: DELETE from ZX_API_REGISTRATIONS
410: WHERE EXISTS (SELECT *
411: FROM zx_api_registrations reg,
412: zx_api_code_combinations cmbn,
413: zx_service_types srvc
414: WHERE reg.api_owner_id = l_api_owner_id
415: AND srvc.service_type_id = reg.service_type_id