The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT 'x'
FROM csi_t_txn_systems txn, csi_systems_vl sys
WHERE txn.system_name = p_system_name
AND txn.customer_id = p_Customer_ID
AND (txn.system_number IS NULL OR
txn.system_number = p_System_number)
OR sys.name = p_system_name
AND sys.customer_id = p_Customer_ID
AND (sys.system_number IS NULL OR
sys.system_number = p_System_number);
SELECT 'x'
FROM csi_t_txn_systems txn, csi_systems_vl sys
WHERE txn.system_name = p_system_name
AND txn.customer_id = p_Customer_ID
AND (txn.system_number IS NULL OR
txn.system_number = p_System_number)
AND txn.transaction_line_id =p_txn_line_id
OR sys.name = p_system_name
AND sys.customer_id = p_Customer_ID
AND (sys.system_number IS NULL OR
sys.system_number = p_System_number);
SELECT 'Y'
INTO l_dummy
FROM csi_systems_vl sys
WHERE sys.name = p_system_name
AND sys.customer_id = p_Customer_ID
AND (sys.system_number IS NULL OR
sys.system_number = p_System_number);
SELECT 'Y'
INTO l_dummy
FROM csi_t_txn_systems txn
WHERE txn.system_name = p_system_name
AND txn.customer_id = p_Customer_ID
AND (txn.system_number IS NULL OR
txn.system_number = p_System_number);
SELECT 'Y'
INTO l_dummy
FROM csi_t_txn_systems txn
WHERE txn.system_name = p_system_name
AND txn.customer_id = p_Customer_ID
AND txn.transaction_line_id =p_txn_line_id
AND (txn.system_number IS NULL OR
txn.system_number = p_System_number);
csi_t_txn_systems_pkg.insert_row(
px_transaction_system_id => x_txn_system_id,
p_transaction_line_id => p_txn_system_rec.transaction_line_id,
p_system_name => p_txn_system_rec.system_name,
p_description => p_txn_system_rec.description,
p_system_type_code => p_txn_system_rec.system_type_code,
p_system_number => p_txn_system_rec.system_number,
p_customer_id => p_txn_system_rec.customer_id,
p_bill_to_contact_id => p_txn_system_rec.bill_to_contact_id,
p_ship_to_contact_id => p_txn_system_rec.ship_to_contact_id,
p_technical_contact_id => p_txn_system_rec.technical_contact_id,
p_service_admin_contact_id => p_txn_system_rec.service_admin_contact_id,
p_ship_to_site_use_id => p_txn_system_rec.ship_to_site_use_id,
p_bill_to_site_use_id => p_txn_system_rec.bill_to_site_use_id,
p_install_site_use_id => p_txn_system_rec.install_site_use_id,
p_coterminate_day_month => p_txn_system_rec.coterminate_day_month,
p_config_system_type => p_txn_system_rec.config_system_type,
p_start_date_active => l_start_date,
p_end_date_active => p_txn_system_rec.end_date_active,
p_context => p_txn_system_rec.context,
p_attribute1 => p_txn_system_rec.attribute1,
p_attribute2 => p_txn_system_rec.attribute2,
p_attribute3 => p_txn_system_rec.attribute3,
p_attribute4 => p_txn_system_rec.attribute4,
p_attribute5 => p_txn_system_rec.attribute5,
p_attribute6 => p_txn_system_rec.attribute6,
p_attribute7 => p_txn_system_rec.attribute7,
p_attribute8 => p_txn_system_rec.attribute8,
p_attribute9 => p_txn_system_rec.attribute9,
p_attribute10 => p_txn_system_rec.attribute10,
p_attribute11 => p_txn_system_rec.attribute11,
p_attribute12 => p_txn_system_rec.attribute12,
p_attribute13 => p_txn_system_rec.attribute13,
p_attribute14 => p_txn_system_rec.attribute14,
p_attribute15 => p_txn_system_rec.attribute15,
p_created_by => fnd_global.user_id,
p_creation_date => SYSDATE,
p_last_updated_by => fnd_global.user_id,
p_last_update_date => SYSDATE,
p_last_update_login => fnd_global.conc_login_id,
p_object_version_number => 1
);
PROCEDURE update_txn_system(
p_api_version IN NUMBER,
p_commit IN VARCHAR2 := fnd_api.g_false,
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
p_txn_system_rec IN csi_t_datastructures_grp.txn_system_rec,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
)
IS
CURSOR txn_sys_csr (sys_id NUMBER) IS
SELECT customer_id
,object_version_number
,start_date_active
,end_date_active
FROM csi_t_txn_systems
WHERE transaction_system_id=sys_id
FOR UPDATE NOWAIT;
l_api_name CONSTANT VARCHAR2(30) := 'update_txn_system';
SAVEPOINT update_txn_system_pvt;
fnd_message.set_name('CSI', 'CSI_CANT_UPDATE_EXPIRED_SYS');
,p_validation_mode => 'UPDATE'
,p_txn_system_rec => p_txn_system_rec
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);
p_validation_mode => 'UPDATE',
p_system_rec => l_system_rec,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
csi_t_txn_systems_pkg.update_row(
p_transaction_system_id => p_txn_system_rec.transaction_system_id,
p_transaction_line_id => p_txn_system_rec.transaction_line_id,
p_system_name => p_txn_system_rec.system_name,
p_description => p_txn_system_rec.description,
p_system_type_code => p_txn_system_rec.system_type_code,
p_system_number => p_txn_system_rec.system_number,
p_customer_id => p_txn_system_rec.customer_id,
p_bill_to_contact_id => p_txn_system_rec.bill_to_contact_id,
p_ship_to_contact_id => p_txn_system_rec.ship_to_contact_id,
p_technical_contact_id => p_txn_system_rec.technical_contact_id,
p_service_admin_contact_id => p_txn_system_rec.service_admin_contact_id,
p_ship_to_site_use_id => p_txn_system_rec.ship_to_site_use_id,
p_bill_to_site_use_id => p_txn_system_rec.bill_to_site_use_id,
p_install_site_use_id => p_txn_system_rec.install_site_use_id,
p_coterminate_day_month => p_txn_system_rec.coterminate_day_month,
p_config_system_type => p_txn_system_rec.config_system_type,
p_start_date_active => p_txn_system_rec.start_date_active,
p_end_date_active => p_txn_system_rec.end_date_active,
p_context => p_txn_system_rec.context,
p_attribute1 => p_txn_system_rec.attribute1,
p_attribute2 => p_txn_system_rec.attribute2,
p_attribute3 => p_txn_system_rec.attribute3,
p_attribute4 => p_txn_system_rec.attribute4,
p_attribute5 => p_txn_system_rec.attribute5,
p_attribute6 => p_txn_system_rec.attribute6,
p_attribute7 => p_txn_system_rec.attribute7,
p_attribute8 => p_txn_system_rec.attribute8,
p_attribute9 => p_txn_system_rec.attribute9,
p_attribute10 => p_txn_system_rec.attribute10,
p_attribute11 => p_txn_system_rec.attribute11,
p_attribute12 => p_txn_system_rec.attribute12,
p_attribute13 => p_txn_system_rec.attribute13,
p_attribute14 => p_txn_system_rec.attribute14,
p_attribute15 => p_txn_system_rec.attribute15,
p_created_by => fnd_global.user_id,
p_creation_date => SYSDATE,
p_last_updated_by => fnd_global.user_id,
p_last_update_date => SYSDATE,
p_last_update_login => fnd_global.conc_login_id,
p_object_version_number => p_txn_system_rec.object_version_number
);
ROLLBACK TO update_txn_system_pvt;
ROLLBACK TO update_txn_system_pvt;
ROLLBACK TO update_txn_system_pvt;
END update_txn_system;
PROCEDURE delete_txn_system
(
p_api_version IN NUMBER,
p_commit IN VARCHAR2 := fnd_api.g_false,
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_validation_level IN NUMBER := fnd_api.g_valid_level_full,
p_txn_system_id IN NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
l_api_version_number CONSTANT NUMBER := 1.0;
l_api_name CONSTANT VARCHAR2(30) := 'delete_txn_system';
SAVEPOINT delete_txn_system_pvt;
,p_validation_mode => 'DELETE'
,p_txn_system_rec => l_txn_system_rec
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);
csi_t_txn_systems_pkg.Delete_Row(p_txn_system_id );
ROLLBACK TO delete_txn_system_pvt;
ROLLBACK TO delete_txn_system_pvt;
ROLLBACK TO delete_txn_system_pvt;
END delete_txn_system;
SELECT 'x'
INTO l_dummy
FROM csi_t_txn_systems
WHERE transaction_system_id=p_txn_system_id;
ELSIF p_validation_mode='UPDATE' OR p_validation_mode='DELETE' THEN
IF ( (p_txn_system_id IS NOT NULL) AND (p_txn_system_id<>fnd_api.g_miss_num) ) THEN
BEGIN
SELECT 'x'
INTO l_dummy
FROM csi_t_txn_systems
WHERE transaction_system_id=p_txn_system_id;
IF(p_validation_mode = 'UPDATE') THEN
IF ( (p_object_version_number IS NULL) OR (p_object_version_number = fnd_api.g_miss_num) ) THEN
fnd_message.set_name('CSI', 'CSI_MISSING_OBJ_VER_NUM');
IF ( (p_validation_mode='CREATE') OR (p_validation_mode='UPDATE') ) THEN
IF (p_end_date = FND_API.G_MISS_DATE) THEN
l_end_date := NULL;