The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT concatenated_segments
FROM mtl_system_items_kfv
WHERE inventory_item_id = p_cp_service_id
AND organization_id = FND_PROFILE.VALUE_SPECIFIC('SO_ORGANIZATION_ID');
SELECT *
FROM cs_contracts_all
WHERE contract_id = p_contract_id;
SELECT *
FROM cs_coverage_txn_groups
WHERE coverage_id = p_coverage_id;
SELECT *
FROM cs_coverage_txn_groups
WHERE coverage_id = p_coverage_id;
SELECT *
FROM cs_contract_cov_levels
WHERE cp_service_id = p_cp_service_id;
SELECT *
FROM cs_covered_products
WHERE coverage_level_id = p_cov_lvl_id;
SELECT *
FROM cs_coverages
WHERE coverage_id = p_coverage_id;
SELECT *
FROM cs_cp_services_all
WHERE contract_id = p_contract_id;
SELECT *
FROM cs_contract_cov_levels cccl
WHERE cp_service_id = p_cp_service_id
AND NOT EXISTS (SELECT 'x'
FROM cs_covered_products ccp
WHERE ccp.coverage_level_id = cccl.coverage_level_id);
PROCEDURE update_contract
(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := TAPI_DEV_KIT.G_FALSE,
p_validation_level IN NUMBER,
p_commit IN VARCHAR2 := TAPI_DEV_KIT.G_FALSE,
x_return_status OUT VARCHAR2,
x_msg_count OUT NUMBER,
x_msg_data OUT VARCHAR2,
p_contract_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_contract_number IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_workflow IN CS_CONTRACTS.WORKFLOW%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_workflow_process_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_agreement_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_price_list_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_currency_code IN CS_CONTRACTS.CURRENCY_CODE%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_conversion_type_code IN CS_CONTRACTS.CONVERSION_TYPE_CODE%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_conversion_rate IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_conversion_date IN CS_CONTRACTS.CONVERSION_DATE%TYPE := TAPI_DEV_KIT.G_MISS_DATE,
p_invoicing_rule_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_accounting_rule_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_billing_frequency_period IN CS_CONTRACTS.BILLING_FREQUENCY_PERIOD%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_first_bill_date IN CS_CONTRACTS.FIRST_BILL_DATE%TYPE := TAPI_DEV_KIT.G_MISS_DATE,
p_next_bill_date IN CS_CONTRACTS.NEXT_BILL_DATE%TYPE := TAPI_DEV_KIT.G_MISS_DATE,
p_create_sales_order IN CS_CONTRACTS.CREATE_SALES_ORDER%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_renewal_rule IN CS_CONTRACTS.RENEWAL_RULE%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_termination_rule IN CS_CONTRACTS.TERMINATION_RULE%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_bill_to_site_use_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_contract_status_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_contract_type_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_contract_template_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_contract_group_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_customer_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_duration IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_period_code IN CS_CONTRACTS.PERIOD_CODE%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_ship_to_site_use_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_salesperson_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_ordered_by_contact_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_source_code IN CS_CONTRACTS.SOURCE_CODE%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_source_reference IN CS_CONTRACTS.SOURCE_REFERENCE%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_terms_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_po_number IN CS_CONTRACTS.PO_NUMBER%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_bill_on IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_tax_handling IN CS_CONTRACTS.TAX_HANDLING%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_tax_exempt_num IN CS_CONTRACTS.TAX_EXEMPT_NUM%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_tax_exempt_reason_code IN CS_CONTRACTS.TAX_EXEMPT_REASON_CODE%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_contract_amount IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_auto_renewal_flag IN CS_CONTRACTS.AUTO_RENEWAL_FLAG%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_original_end_date IN CS_CONTRACTS.ORIGINAL_END_DATE%TYPE := TAPI_DEV_KIT.G_MISS_DATE,
p_terminate_reason_code IN CS_CONTRACTS.TERMINATE_REASON_CODE%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_discount_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_po_required_to_service IN CS_CONTRACTS.PO_REQUIRED_TO_SERVICE%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_pre_payment_required IN CS_CONTRACTS.PRE_PAYMENT_REQUIRED%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_last_update_date IN CS_CONTRACTS.LAST_UPDATE_DATE%TYPE := TAPI_DEV_KIT.G_MISS_DATE,
p_last_updated_by IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_creation_date IN CS_CONTRACTS.CREATION_DATE%TYPE := TAPI_DEV_KIT.G_MISS_DATE,
p_created_by IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_last_update_login IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
p_start_date_active IN CS_CONTRACTS.START_DATE_ACTIVE%TYPE := TAPI_DEV_KIT.G_MISS_DATE,
p_end_date_active IN CS_CONTRACTS.END_DATE_ACTIVE%TYPE := TAPI_DEV_KIT.G_MISS_DATE,
p_attribute1 IN CS_CONTRACTS.ATTRIBUTE1%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_attribute2 IN CS_CONTRACTS.ATTRIBUTE2%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_attribute3 IN CS_CONTRACTS.ATTRIBUTE3%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_attribute4 IN CS_CONTRACTS.ATTRIBUTE4%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_attribute5 IN CS_CONTRACTS.ATTRIBUTE5%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_attribute6 IN CS_CONTRACTS.ATTRIBUTE6%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_attribute7 IN CS_CONTRACTS.ATTRIBUTE7%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_attribute8 IN CS_CONTRACTS.ATTRIBUTE8%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_attribute9 IN CS_CONTRACTS.ATTRIBUTE9%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_attribute10 IN CS_CONTRACTS.ATTRIBUTE10%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_attribute11 IN CS_CONTRACTS.ATTRIBUTE11%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_attribute12 IN CS_CONTRACTS.ATTRIBUTE12%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_attribute13 IN CS_CONTRACTS.ATTRIBUTE13%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_attribute14 IN CS_CONTRACTS.ATTRIBUTE14%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_attribute15 IN CS_CONTRACTS.ATTRIBUTE15%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_context IN CS_CONTRACTS.CONTEXT%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
p_object_version_number IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
x_object_version_number OUT NUMBER) IS
l_api_name CONSTANT VARCHAR2(30) := 'update_contract';
SELECT contract_status_id
INTO p_old_status_id
FROM CS_CONTRACTS
WHERE contract_id = p_contract_id;
l_contract_rec.LAST_UPDATE_DATE := p_last_update_date;
l_contract_rec.LAST_UPDATED_BY := p_last_updated_by;
l_contract_rec.LAST_UPDATE_LOGIN := p_last_update_login;
CS_CONTRACT_PVT.update_row(
p_api_version,
p_init_msg_list,
p_validation_level,
p_commit,
x_return_status,
x_msg_count,
x_msg_data,
l_contract_rec,
x_object_version_number
);
SELECT contract_status_id
INTO p_new_status_id
FROM CS_CONTRACTS
WHERE contract_id = l_contract_rec.contract_id;
SELECT eligible_for_invoicing
INTO p_inv_flag
FROM CS_CONTRACT_STATUSES
WHERE contract_status_id = p_new_status_id;
Select cp_service_id from cs_cp_services
where contract_id = l_contract_rec.contract_id
and contract_line_status_id = p_old_status_id)
LOOP
--- Call update service
CS_SERVICES_PVT.Update_Service
(
p_api_version => 1.0,
p_init_msg_list => TAPI_DEV_KIT.G_FALSE,
p_validation_level => 100,
p_commit => TAPI_DEV_KIT.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_cp_service_id => l_servicerec.cp_service_id,
p_contract_line_status_id => p_new_status_id,
p_last_update_date => sysdate,
p_last_updated_by => FND_GLOBAL.user_id
);
END Update_Contract;