The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT ozf_process_setup_all_s.nextval INTO l_process_setup_id FROM DUAL;
OZF_PROCESS_SETUP_PKG.Insert_Row(
px_process_setup_id => l_process_setup_id,
px_object_version_number => l_object_version_number,
p_last_update_date => SYSDATE,
p_last_updated_by => FND_GLOBAL.USER_ID,
p_creation_date => SYSDATE,
p_created_by => FND_GLOBAL.USER_ID,
p_last_update_login => FND_GLOBAL.CONC_LOGIN_ID,
px_org_id => l_org_id,
p_supp_trade_profile_id => l_process_setup_rec.supp_trade_profile_id,
p_process_code => l_process_setup_rec.process_code,
p_enabled_flag => l_process_setup_rec.enabled_flag,
p_automatic_flag => l_process_setup_rec.automatic_flag,
p_attribute_category => l_process_setup_rec.attribute_category,
p_attribute1 => l_process_setup_rec.attribute1,
p_attribute2 => l_process_setup_rec.attribute2,
p_attribute3 => l_process_setup_rec.attribute3,
p_attribute4 => l_process_setup_rec.attribute4,
p_attribute5 => l_process_setup_rec.attribute5,
p_attribute6 => l_process_setup_rec.attribute6,
p_attribute7 => l_process_setup_rec.attribute7,
p_attribute8 => l_process_setup_rec.attribute8,
p_attribute9 => l_process_setup_rec.attribute9,
p_attribute10 => l_process_setup_rec.attribute10,
p_attribute11 => l_process_setup_rec.attribute11,
p_attribute12 => l_process_setup_rec.attribute12,
p_attribute13 => l_process_setup_rec.attribute13,
p_attribute14 => l_process_setup_rec.attribute14,
p_attribute15 => l_process_setup_rec.attribute15);
OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' after insert call - code conversion id' || l_process_setup_id);
OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' after insert call - obj version no ' || l_process_setup_rec.Object_Version_Number);
SELECT lookup_code
BULK COLLECT INTO process_code_tbl
FROM dpp_lookups fl
WHERE fl.lookup_type='DPP_EXECUTION_PROCESSES'
AND nvl(fl.start_date_active,sysdate) <= sysdate
AND nvl(fl.end_date_active,sysdate) >= sysdate
AND fl.enabled_flag= 'Y'
AND fl.tag IS NOT NULL;
SELECT ozf_process_setup_all_s.nextval INTO l_process_setup_id FROM DUAL;
OZF_PROCESS_SETUP_PKG.Insert_Row(
px_process_setup_id => l_process_setup_id,
px_object_version_number => l_object_version_number,
p_last_update_date => SYSDATE,
p_last_updated_by => FND_GLOBAL.USER_ID,
p_creation_date => SYSDATE,
p_created_by => FND_GLOBAL.USER_ID,
p_last_update_login => FND_GLOBAL.CONC_LOGIN_ID,
px_org_id => l_org_id,
p_supp_trade_profile_id => l_process_setup_rec.supp_trade_profile_id,
p_process_code => process_code_tbl(i),
p_enabled_flag => 'N',
p_automatic_flag => 'N',
p_attribute_category => NULL,
p_attribute1 => NULL,
p_attribute2 => NULL,
p_attribute3 => NULL,
p_attribute4 => NULL,
p_attribute5 => NULL,
p_attribute6 => NULL,
p_attribute7 => NULL,
p_attribute8 => NULL,
p_attribute9 => NULL,
p_attribute10 => NULL,
p_attribute11 => NULL,
p_attribute12 => NULL,
p_attribute13 => NULL,
p_attribute14 => NULL,
p_attribute15 => NULL);
PROCEDURE Update_process_setup
(
p_api_version_number IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_process_setup_tbl IN process_setup_tbl_type ,
x_object_version_number OUT NOCOPY JTF_NUMBER_TABLE
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Update_process_setup';
SELECT process_setup_id,
object_version_number,
last_update_date,
last_updated_by,
creation_date,
created_by,
last_update_login,
org_id,
supp_trade_profile_id,
process_code,
enabled_flag,
automatic_flag,
attribute_category,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15,
security_group_id
FROM ozf_process_setup_all
WHERE process_setup_id = cv_process_setup_id;
SELECT org_id FROM ozf_sys_parameters;
SAVEPOINT update_process_setup_pvt;
OZF_UTILITY_PVT.debug_message( 'In Update :Process Setup ID' || l_process_setup_id);
,l_process_setup_rec.last_update_date
,l_process_setup_rec.last_updated_by
,l_process_setup_rec.creation_date
,l_process_setup_rec.created_by
,l_process_setup_rec.last_update_login
,l_process_setup_rec.org_id
,l_process_setup_rec.supp_trade_profile_id
,l_process_setup_rec.process_code
,l_process_setup_rec.enabled_flag
,l_process_setup_rec.automatic_flag
,l_process_setup_rec.attribute_category
,l_process_setup_rec.attribute1
,l_process_setup_rec.attribute2
,l_process_setup_rec.attribute3
,l_process_setup_rec.attribute4
,l_process_setup_rec.attribute5
,l_process_setup_rec.attribute6
,l_process_setup_rec.attribute7
,l_process_setup_rec.attribute8
,l_process_setup_rec.attribute9
,l_process_setup_rec.attribute10
,l_process_setup_rec.attribute11
,l_process_setup_rec.attribute12
,l_process_setup_rec.attribute13
,l_process_setup_rec.attribute14
,l_process_setup_rec.attribute15
,l_process_setup_rec.security_group_id;
p_validation_mode => JTF_PLSQL_API.G_UPDATE,
p_process_setup_tbl => p_process_setup_tbl,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
OZF_UTILITY_PVT.debug_message( 'Private API: Calling Update table handler');
OZF_PROCESS_SETUP_PKG.Update_Row(
p_process_setup_id => l_process_setup_id,
p_object_version_number => p_process_setup_rec.object_version_number,
p_last_update_date => SYSDATE,
p_last_updated_by => FND_GLOBAL.USER_ID,
p_last_update_login => FND_GLOBAL.CONC_LOGIN_ID,
p_org_id => l_org_id,
p_supp_trade_profile_id => p_process_setup_rec.supp_trade_profile_id,
p_process_code => p_process_setup_rec.process_code,
p_enabled_flag => p_process_setup_rec.enabled_flag,
p_automatic_flag => p_process_setup_rec.automatic_flag,
p_attribute_category => p_process_setup_rec.attribute_category,
p_attribute1 => p_process_setup_rec.attribute1,
p_attribute2 => p_process_setup_rec.attribute2,
p_attribute3 => p_process_setup_rec.attribute3,
p_attribute4 => p_process_setup_rec.attribute4,
p_attribute5 => p_process_setup_rec.attribute5,
p_attribute6 => p_process_setup_rec.attribute6,
p_attribute7 => p_process_setup_rec.attribute7,
p_attribute8 => p_process_setup_rec.attribute8,
p_attribute9 => p_process_setup_rec.attribute9,
p_attribute10 => p_process_setup_rec.attribute10,
p_attribute11 => p_process_setup_rec.attribute11,
p_attribute12 => p_process_setup_rec.attribute12,
p_attribute13 => p_process_setup_rec.attribute13,
p_attribute14 => p_process_setup_rec.attribute14,
p_attribute15 => p_process_setup_rec.attribute15);
ROLLBACK TO update_process_setup_pvt;
ROLLBACK TO update_process_setup_pvt;
ROLLBACK TO update_process_setup_pvt;
END Update_process_Setup;
PROCEDURE Update_Process_Setup_Tbl(
P_Api_Version_Number IN NUMBER,
P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
P_Commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2,
P_process_setup_Tbl IN process_setup_tbl_type
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'update_process_setup_tbl';
l_update_pro_setup_tbl process_setup_tbl_type := process_setup_tbl_type();
SAVEPOINT update_process_setup_tbl_pvt;
l_update_pro_setup_tbl.extend;
l_update_pro_setup_tbl(l_up_cnt) := P_process_setup_Rec;
OZF_UTILITY_PVT.debug_message('No of rows to be updated: ' || l_up_cnt);
Update_process_setup (
p_api_version_number => p_api_version_number ,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
p_validation_level => p_validation_level,
x_return_status => x_return_Status,
x_msg_count => x_msg_Count,
x_msg_data => x_msg_Data,
p_process_setup_tbl => l_update_pro_setup_tbl,
x_object_version_number => v_object_version_number
);
ROLLBACK TO update_process_setup_tbl_pvt;
ROLLBACK TO update_process_setup_tbl_pvt;
ROLLBACK TO update_process_setup_tbl_pvt;
END Update_Process_Setup_Tbl;
SELECT COUNT(process_setup_id)
FROM ozf_process_setup_all
WHERE process_code = cv_process_code
AND supp_trade_profile_id = cv_supp_trade_profile_id ;
SELECT COUNT(process_setup_id)
FROM ozf_process_setup_all
WHERE supp_trade_profile_id IS NULL
AND org_id = cv_org_id
AND process_code = cv_process_code ;
ELSE -- for update mode
l_valid_flag := FND_API.g_true;