The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT ozf_na_deduction_rules_b_s.NEXTVAL
FROM dual;
SELECT 1
FROM OZF_NA_DEDUCTION_RULES_B
WHERE na_deduction_rule_id = l_id;
Ozf_Na_Ddn_Rule_Pkg.Insert_Row(
px_na_deduction_rule_id => l_na_deduction_rule_id,
p_transaction_source_code => l_na_ddn_rule_rec.transaction_source_code,
p_transaction_type_code => l_na_ddn_rule_rec.transaction_type_code,
p_deduction_identifier_id => l_na_ddn_rule_rec.deduction_identifier_id,
p_deduction_identifier_org_id => l_na_ddn_rule_rec.deduction_identifier_org_id,
px_object_version_number => l_object_version_number,
p_creation_date => SYSDATE,
p_created_by => FND_GLOBAL.USER_ID,
p_last_update_date => SYSDATE,
p_last_updated_by => FND_GLOBAL.USER_ID,
p_last_update_login => FND_GLOBAL.conc_login_id,
p_name => l_na_ddn_rule_rec.name,
p_description => l_na_ddn_rule_rec.description
);
PROCEDURE Update_Na_Ddn_Rule(
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_na_ddn_rule_rec IN na_ddn_rule_rec_type
)
IS
CURSOR c_get_na_ddn_rule(na_deduction_rule_id NUMBER) IS
SELECT *
FROM OZF_NA_DEDUCTION_RULES_B
WHERE na_deduction_rule_id = p_na_ddn_rule_rec.na_deduction_rule_id;
L_API_NAME CONSTANT VARCHAR2(30) := 'Update_Na_Ddn_Rule';
SAVEPOINT update_na_ddn_rule_pvt;
debug_message('Private API: - Open Cursor to Select');
OZF_Utility_PVT.Error_Message(p_message_name => 'API_MISSING_UPDATE_TARGET',
p_token_name => 'INFO',
p_token_value => 'Na_Ddn_Rule') ;
p_token_value => 'Last_Update_Date') ;
p_validation_mode => JTF_PLSQL_API.g_update,
p_na_ddn_rule_rec => p_na_ddn_rule_rec,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
Ozf_Na_Ddn_Rule_Pkg.Update_Row(
p_na_deduction_rule_id => p_na_ddn_rule_rec.na_deduction_rule_id,
p_transaction_source_code => p_na_ddn_rule_rec.transaction_source_code,
p_transaction_type_code => p_na_ddn_rule_rec.transaction_type_code,
p_deduction_identifier_id => p_na_ddn_rule_rec.deduction_identifier_id,
p_deduction_identifier_org_id => p_na_ddn_rule_rec.deduction_identifier_org_id,
p_object_version_number => p_na_ddn_rule_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_name => p_na_ddn_rule_rec.name,
p_description => p_na_ddn_rule_rec.description
);
ROLLBACK TO UPDATE_Na_Ddn_Rule_PVT;
ROLLBACK TO UPDATE_Na_Ddn_Rule_PVT;
ROLLBACK TO UPDATE_Na_Ddn_Rule_PVT;
End Update_Na_Ddn_Rule;
PROCEDURE Delete_Na_Ddn_Rule(
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_na_deduction_rule_id IN NUMBER,
p_object_version_number IN NUMBER
)
IS
L_API_NAME CONSTANT VARCHAR2(30) := 'Delete_Na_Ddn_Rule';
SAVEPOINT delete_na_ddn_rule_pvt;
debug_message( 'Private API: Calling delete table handler');
Ozf_Na_Ddn_Rule_Pkg.Delete_Row(
p_na_deduction_rule_id => p_na_deduction_rule_id,
p_object_version_number => p_object_version_number );
ROLLBACK TO DELETE_Na_Ddn_Rule_PVT;
ROLLBACK TO DELETE_Na_Ddn_Rule_PVT;
ROLLBACK TO DELETE_Na_Ddn_Rule_PVT;
End Delete_Na_Ddn_Rule;
IF p_na_ddn_rule_rec.last_update_login = FND_API.G_MISS_NUM OR p_na_ddn_rule_rec.last_update_login IS NULL THEN
OZF_Utility_PVT.Error_Message('OZF_API_MISSING_FIELD', 'MISS_FIELD', 'LAST_UPDATE_LOGIN' );
IF p_na_ddn_rule_rec.last_update_login = FND_API.G_MISS_NUM THEN
OZF_Utility_PVT.Error_Message('OZF_API_MISSING_FIELD', 'MISS_FIELD', 'LAST_UPDATE_LOGIN' );
SELECT *
FROM ozf_na_deduction_rules_b
WHERE na_deduction_rule_id = p_na_ddn_rule_rec.na_deduction_rule_id;
IF p_na_ddn_rule_rec.last_update_date IS NULL THEN
x_complete_rec.last_update_date := l_na_ddn_rule_rec.last_update_date;
IF p_na_ddn_rule_rec.last_updated_by IS NULL THEN
x_complete_rec.last_updated_by := l_na_ddn_rule_rec.last_updated_by;
IF p_na_ddn_rule_rec.last_update_login IS NULL THEN
x_complete_rec.last_update_login := l_na_ddn_rule_rec.last_update_login;