The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT PV_PROGRAM_CONTRACTS_S.NEXTVAL
FROM dual;
SELECT 'X'
FROM PV_PROGRAM_CONTRACTS
WHERE program_contracts_id = l_id;
l_prgm_contracts_rec.last_update_date := SYSDATE;
l_prgm_contracts_rec.last_updated_by := FND_GLOBAL.user_id;
l_prgm_contracts_rec.last_update_login := FND_GLOBAL.conc_login_id;
PV_PRGM_CONTRACTS_PKG.Insert_Row(
px_program_contracts_id => l_prgm_contracts_rec.program_contracts_id
,p_program_id => l_prgm_contracts_rec.program_id
,p_geo_hierarchy_id => l_prgm_contracts_rec.geo_hierarchy_id
,p_contract_id => l_prgm_contracts_rec.contract_id
,p_last_update_date => l_prgm_contracts_rec.last_update_date
,p_last_updated_by => l_prgm_contracts_rec.last_updated_by
,p_creation_date => l_prgm_contracts_rec.creation_date
,p_created_by => l_prgm_contracts_rec.created_by
,p_last_update_login => l_prgm_contracts_rec.last_update_login
,p_object_version_number => l_object_version_number
,p_member_type_code => l_prgm_contracts_rec.member_type_code
);
PROCEDURE Update_Prgm_Contracts(
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_prgm_contracts_rec IN prgm_contracts_rec_type
)
IS
CURSOR c_get_Prgm_Contracts(cv_program_contracts_id NUMBER) IS
SELECT *
FROM PV_PROGRAM_CONTRACTS
WHERE program_contracts_id = cv_program_contracts_id;
l_api_name CONSTANT VARCHAR2(30) := 'Update_Prgm_Contracts';
SAVEPOINT UPDATE_Prgm_Contracts_PVT;
FND_MESSAGE.set_token('MODE','Update');
,p_validation_mode => JTF_PLSQL_API.g_update
,p_prgm_contracts_rec => p_prgm_contracts_rec
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);
Pvx_Utility_Pvt.debug_message('Private API: '||l_full_name||' - Calling update table handler');
PV_PRGM_CONTRACTS_PKG.Update_Row(
p_program_contracts_id => l_tar_prgm_contracts_rec.program_contracts_id
,p_program_id => l_tar_prgm_contracts_rec.program_id
,p_geo_hierarchy_id => l_tar_prgm_contracts_rec.geo_hierarchy_id
,p_contract_id => l_tar_prgm_contracts_rec.contract_id
,p_last_update_date => SYSDATE
,p_last_updated_by => FND_GLOBAL.user_id
,p_last_update_login => FND_GLOBAL.conc_login_id
,p_object_version_number => l_tar_prgm_contracts_rec.object_version_number
,p_member_type_code => l_tar_prgm_contracts_rec.member_type_code
);
ROLLBACK TO UPDATE_Prgm_Contracts_PVT;
ROLLBACK TO UPDATE_Prgm_Contracts_PVT;
ROLLBACK TO UPDATE_Prgm_Contracts_PVT;
END Update_Prgm_Contracts;
PROCEDURE Delete_Prgm_Contracts(
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_program_contracts_id IN NUMBER
,p_object_version_number IN NUMBER
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Prgm_Contracts';
SAVEPOINT DELETE_Prgm_Contracts_PVT;
PVX_UTILITY_PVT.debug_message( 'Private API: Calling delete table handler');
PV_PRGM_CONTRACTS_PKG.Delete_Row(
p_program_contracts_id => p_program_contracts_id
,p_object_version_number => p_object_version_number
);
ROLLBACK TO DELETE_Prgm_Contracts_PVT;
ROLLBACK TO DELETE_Prgm_Contracts_PVT;
ROLLBACK TO DELETE_Prgm_Contracts_PVT;
END Delete_Prgm_Contracts;
SELECT program_contracts_id
FROM PV_PROGRAM_CONTRACTS
WHERE program_contracts_id = px_program_contracts_id
AND object_version_number = p_object_version
FOR UPDATE NOWAIT;
select DECODE(LH.LOCATION_TYPE_CODE, 'AREA1', LH.AREA1_NAME, 'AREA2',LH.AREA2_NAME,
'COUNTRY', LH.COUNTRY_NAME, 'CREGION', LH.COUNTRY_REGION_NAME,
'STATE', LH.STATE_NAME, 'SREGION', LH.STATE_REGION_NAME, 'CITY', LH.CITY_NAME,
'POSTAL_CODE', LH.POSTAL_CODE_START||'-'||LH.POSTAL_CODE_END, to_char(LOCATION_HIERARCHY_ID))
from JTF_LOC_HIERARCHIES_VL LH
where LOCATION_HIERARCHY_ID = l_loc_hie_id;
SELECT program_contracts_id
FROM pv_program_contracts
WHERE program_id = cv_program_id
and geo_hierarchy_id = cv_geo_hierarchy_id
and member_type_code = cv_member_type_code;
IF p_prgm_contracts_rec.last_update_date = Fnd_Api.g_miss_date
OR p_prgm_contracts_rec.last_update_date IS NULL THEN
Fnd_Message.set_name('PV', 'PV_API_MISSING_REQ_COLUMN');
Fnd_Message.set_token('COLUMN','LAST_UPDATE_DATE');
IF p_prgm_contracts_rec.last_updated_by = Fnd_Api.g_miss_num
OR p_prgm_contracts_rec.last_updated_by IS NULL THEN
Fnd_Message.set_name('PV', 'PV_API_MISSING_REQ_COLUMN');
Fnd_Message.set_token('COLUMN','LAST_UPDATED_BY');
IF p_prgm_contracts_rec.last_update_login = Fnd_Api.g_miss_num
OR p_prgm_contracts_rec.last_update_login IS NULL THEN
Fnd_Message.set_name('PV', 'PV_API_MISSING_REQ_COLUMN');
Fnd_Message.set_token('COLUMN','LAST_UPDATE_LOGIN');
SELECT *
FROM PV_PROGRAM_CONTRACTS
WHERE program_contracts_id = p_prgm_contracts_rec.program_contracts_id;
IF p_prgm_contracts_rec.last_update_date IS NULL THEN
x_complete_rec.last_update_date := l_prgm_contracts_rec.last_update_date;
IF p_prgm_contracts_rec.last_updated_by IS NULL THEN
x_complete_rec.last_updated_by := l_prgm_contracts_rec.last_updated_by;
IF p_prgm_contracts_rec.last_update_login IS NULL THEN
x_complete_rec.last_update_login := l_prgm_contracts_rec.last_update_login;