The following lines contain the word 'select', 'insert', 'update' or 'delete':
select ac.customization_application_id, ac.customization_code,
ac.region_application_id, ac.region_code
from AK_CUSTOMIZATIONS ac, AK_REGIONS ar
where ac.REGION_APPLICATION_ID = application_id
and ac.REGION_CODE = p_region_code
and ac.region_application_id = ar.region_application_id
and ac.region_code = ar.region_code;
select ac.customization_application_id, ac.customization_code,
ac.region_application_id, ac.region_code
from AK_CUSTOMIZATIONS ac, AK_REGIONS ar
where ac.REGION_APPLICATION_ID = application_id
and ac.REGION_CODE = p_region_code
and ac.region_application_id = ar.region_application_id
and ac.region_code = ar.region_code
and ac.responsibility_id = levelpk;
select ac.customization_application_id, ac.customization_code,
ac.region_application_id, ac.region_code
from AK_CUSTOMIZATIONS ac, AK_REGIONS ar
where ac.REGION_APPLICATION_ID = application_id
and ac.REGION_CODE = p_region_code
and ac.region_application_id = ar.region_application_id
and ac.region_code = ar.region_code
and ac.responsibility_id is not null;
select ac.customization_application_id, ac.customization_code,
ac.region_application_id, ac.region_code
from AK_CUSTOMIZATIONS ac, AK_REGIONS ar
where ac.REGION_APPLICATION_ID = application_id
and ac.REGION_CODE = p_region_code
and ac.region_application_id = ar.region_application_id
and ac.region_code = ar.region_code
and ac.org_id = levelpk;
select ac.customization_application_id, ac.customization_code,
ac.region_application_id, ac.region_code
from AK_CUSTOMIZATIONS ac, AK_REGIONS ar
where ac.REGION_APPLICATION_ID = application_id
and ac.REGION_CODE = p_region_code
and ac.region_application_id = ar.region_application_id
and ac.region_code = ar.region_code
and ac.org_id is not null;
select ac.customization_application_id, ac.customization_code,
ac.region_application_id, ac.region_code
from AK_CUSTOMIZATIONS ac, AK_REGIONS ar
where ac.REGION_APPLICATION_ID = application_id
and ac.REGION_CODE = p_region_code
and ac.region_application_id = ar.region_application_id
and ac.region_code = ar.region_code
and ac.site_id = levelpk;
select ac.customization_application_id, ac.customization_code,
ac.region_application_id, ac.region_code
from AK_CUSTOMIZATIONS ac, AK_REGIONS ar
where ac.REGION_APPLICATION_ID = application_id
and ac.REGION_CODE = p_region_code
and ac.region_application_id = ar.region_application_id
and ac.region_code = ar.region_code
and ac.site_id is not null;
select ac.customization_application_id, ac.customization_code,
ac.region_application_id, ac.region_code
from AK_CUSTOMIZATIONS ac, AK_REGIONS ar
where ac.REGION_APPLICATION_ID = application_id
and ac.REGION_CODE = p_region_code
and ac.region_application_id = ar.region_application_id
and ac.region_code = ar.region_code
and ac.function_name = levelpk;
select ac.customization_application_id, ac.customization_code,
ac.region_application_id, ac.region_code
from AK_CUSTOMIZATIONS ac, AK_REGIONS ar
where ac.REGION_APPLICATION_ID = application_id
and ac.REGION_CODE = p_region_code
and ac.region_application_id = ar.region_application_id
and ac.region_code = ar.region_code
and ac.function_name is not null;
select ac.customization_application_id, ac.customization_code,
ac.region_application_id, ac.region_code
from AK_CUSTOMIZATIONS ac, AK_REGIONS ar
where ac.REGION_APPLICATION_ID = application_id
and ac.REGION_CODE = p_region_code
and ac.region_application_id = ar.region_application_id
and ac.region_code = ar.region_code
and ac.localization_code = levelpk;
select ac.customization_application_id, ac.customization_code,
ac.region_application_id, ac.region_code
from AK_CUSTOMIZATIONS ac, AK_REGIONS ar
where ac.REGION_APPLICATION_ID = application_id
and ac.REGION_CODE = p_region_code
and ac.region_application_id = ar.region_application_id
and ac.region_code = ar.region_code
and ac.localization_code is not null;
select region_application_id, region_code
from AK_REGIONS
where region_application_id = region_appl_id_param
and region_code = region_code_param;
select region_application_id, region_code
from AK_REGIONS
where region_application_id = application_id;
select organization_id
from MTL_PARAMETERS
where organization_code = levelpk;
select 'X'
from ak_customizations
where org_id is not null
and rownum = 1;
select responsibility_id
from FND_RESPONSIBILITY
where responsibility_key = levelpk;
select 'X'
from ak_customizations
where responsibility_id is not null
and rownum = 1;
select function_name
from fnd_form_functions
where function_name = levelpk;
select 'X'
from ak_customizations
where function_name is not null
and rownum = 1;
select territory_code
from fnd_territories
where territory_code = levelpk;
select 'X'
from ak_customizations
where localization_code is not null
and rownum = 1;
FND_MESSAGE.SET_NAME('AK','AK_NO_SELECTION');
AK_REGION_PVT.INSERT_REGION_PK_TABLE (
p_return_status => l_return_status,
p_region_application_id => l_region_rec.region_application_id,
p_region_code => l_region_rec.region_code,
p_region_pk_tbl => l_region_pk_tbl);
l_custom_pk_tbl.DELETE;
AK_CUSTOM_PVT.INSERT_CUSTOM_PK_TABLE(
p_return_status => l_return_status,
p_region_application_id => l_custom_rec.region_application_id,
p_region_code => l_custom_rec.region_code,
p_custom_appl_id => l_custom_rec.customization_application_id,
p_custom_code => l_custom_rec.customization_code,
p_custom_pk_tbl => l_custom_pk_tbl);
AK_CUSTOM_PVT.INSERT_CUSTOM_PK_TABLE(
p_return_status => l_return_status,
p_region_application_id => l_custom_rec.region_application_id,
p_region_code => l_custom_rec.region_code,
p_custom_appl_id => l_custom_rec.customization_application_id,
p_custom_code => l_custom_rec.customization_code,
p_custom_pk_tbl => l_custom_pk_tbl);
AK_CUSTOM_PVT.INSERT_CUSTOM_PK_TABLE(
p_return_status => l_return_status,
p_region_application_id => l_custom_rec.region_application_id,
p_region_code => l_custom_rec.region_code,
p_custom_appl_id => l_custom_rec.customization_application_id,
p_custom_code => l_custom_rec.customization_code,
p_custom_pk_tbl => l_custom_pk_tbl);
AK_CUSTOM_PVT.INSERT_CUSTOM_PK_TABLE(
p_return_status => l_return_status,
p_region_application_id => l_custom_rec.region_application_id,
p_region_code => l_custom_rec.region_code,
p_custom_appl_id => l_custom_rec.customization_application_id,
p_custom_code => l_custom_rec.customization_code,
p_custom_pk_tbl => l_custom_pk_tbl);
AK_CUSTOM_PVT.INSERT_CUSTOM_PK_TABLE(
p_return_status => l_return_status,
p_region_application_id => l_custom_rec.region_application_id,
p_region_code => l_custom_rec.region_code,
p_custom_appl_id => l_custom_rec.customization_application_id,
p_custom_code => l_custom_rec.customization_code,
p_custom_pk_tbl => l_custom_pk_tbl);
AK_CUSTOM_PVT.INSERT_CUSTOM_PK_TABLE(
p_return_status => l_return_status,
p_region_application_id => l_custom_rec.region_application_id,
p_region_code => l_custom_rec.region_code,
p_custom_appl_id => l_custom_rec.customization_application_id,
p_custom_code => l_custom_rec.customization_code,
p_custom_pk_tbl => l_custom_pk_tbl);
AK_CUSTOM_PVT.INSERT_CUSTOM_PK_TABLE(
p_return_status => l_return_status,
p_region_application_id => l_custom_rec.region_application_id,
p_region_code => l_custom_rec.region_code,
p_custom_appl_id => l_custom_rec.customization_application_id,
p_custom_code => l_custom_rec.customization_code,
p_custom_pk_tbl => l_custom_pk_tbl);
AK_CUSTOM_PVT.INSERT_CUSTOM_PK_TABLE(
p_return_status => l_return_status,
p_region_application_id => l_custom_rec.region_application_id,
p_region_code => l_custom_rec.region_code,
p_custom_appl_id => l_custom_rec.customization_application_id,
p_custom_code => l_custom_rec.customization_code,
p_custom_pk_tbl => l_custom_pk_tbl);
AK_CUSTOM_PVT.INSERT_CUSTOM_PK_TABLE(
p_return_status => l_return_status,
p_region_application_id => l_custom_rec.region_application_id,
p_region_code => l_custom_rec.region_code,
p_custom_appl_id => l_custom_rec.customization_application_id,
p_custom_code => l_custom_rec.customization_code,
p_custom_pk_tbl => l_custom_pk_tbl);
AK_CUSTOM_PVT.INSERT_CUSTOM_PK_TABLE(
p_return_status => l_return_status,
p_region_application_id => l_custom_rec.region_application_id,
p_region_code => l_custom_rec.region_code,
p_custom_appl_id => l_custom_rec.customization_application_id,
p_custom_code => l_custom_rec.customization_code,
p_custom_pk_tbl => l_custom_pk_tbl);
AK_CUSTOM_PVT.INSERT_CUSTOM_PK_TABLE(
p_return_status => l_return_status,
p_region_application_id => l_custom_rec.region_application_id,
p_region_code => l_custom_rec.region_code,
p_custom_appl_id => l_custom_rec.customization_application_id,
p_custom_code => l_custom_rec.customization_code,
p_custom_pk_tbl => l_custom_pk_tbl);
procedure INSERT_CUSTOM_PK_TABLE (
p_return_status OUT NOCOPY VARCHAR2,
p_region_application_id IN NUMBER,
p_region_code IN VARCHAR2,
p_custom_appl_id IN NUMBER,
p_custom_code IN VARCHAR2,
p_custom_pk_tbl IN OUT NOCOPY AK_CUSTOM_PUB.Custom_PK_Tbl_Type
) is
cursor l_get_custom_list_csr (application_id number, application_code varchar2, custom_appl_id number, custom_code varchar2) is
select ac.customization_application_id, ac.customization_code,
ac.region_application_id, ac.region_code
from AK_CUSTOMIZATIONS ac, AK_REGIONS ar
where ac.REGION_APPLICATION_ID = application_id
and ac.region_code = application_code
and ac.customization_application_id = custom_appl_id
and ac.customization_code = custom_code
and ac.region_application_id = ar.region_application_id
and ac.region_code = ar.region_code;
l_api_name CONSTANT varchar2(30) := 'Insert_Custom_PK_Table';
end INSERT_CUSTOM_PK_TABLE;
select *
from AK_CUSTOMIZATIONS
where REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and CUSTOMIZATION_APPLICATION_ID = p_custom_application_id
and CUSTOMIZATION_CODE = p_custom_code;
select *
from AK_CUSTOMIZATIONS_TL
where REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and CUSTOMIZATION_APPLICATION_ID = p_custom_application_id
and CUSTOMIZATION_CODE = p_custom_code
and LANGUAGE = p_nls_language;
FND_LOAD_UTIL.OWNER_NAME(l_custom_rec.last_updated_by) || '"';
l_databuffer_tbl(l_index) := ' LAST_UPDATE_DATE = "' ||
to_char(l_custom_rec.last_update_date,
AK_ON_OBJECTS_PUB.G_DATE_FORMAT) || '"';
l_databuffer_tbl(l_index) := ' LAST_UPDATE_LOGIN = "' ||
nvl(to_char(l_custom_rec.last_update_login),'') || '"';
l_databuffer_tbl.delete;
select *
from AK_CUSTOM_REGIONS
where REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and CUSTOMIZATION_APPLICATION_ID = p_custom_application_id
and CUSTOMIZATION_CODE = p_custom_code;
select *
from AK_CUSTOM_REGIONS_TL
where REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and CUSTOMIZATION_APPLICATION_ID = p_custom_application_id
and CUSTOMIZATION_CODE = p_custom_code
and PROPERTY_NAME = property_name_param
and LANGUAGE = p_nls_language;
FND_LOAD_UTIL.OWNER_NAME(l_cust_region_rec.last_updated_by) || '"';
l_databuffer_tbl(l_index) := ' LAST_UPDATE_DATE = "' ||
to_char(l_cust_region_rec.last_update_date,
AK_ON_OBJECTS_PUB.G_DATE_FORMAT) || '"';
l_databuffer_tbl(l_index) := ' LAST_UPDATE_LOGIN = "' ||
nvl(to_char(l_cust_region_rec.last_update_login),'') || '"';
l_databuffer_tbl.delete;
select *
from AK_CUSTOM_REGION_ITEMS
where REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and CUSTOMIZATION_APPLICATION_ID = p_custom_application_id
and CUSTOMIZATION_CODE = p_custom_code;
select *
from AK_CUSTOM_REGION_ITEMS_TL
where REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and CUSTOMIZATION_APPLICATION_ID = p_custom_application_id
and CUSTOMIZATION_CODE = p_custom_code
and ATTRIBUTE_APPLICATION_ID = param_attr_appl_id
and ATTRIBUTE_CODE = param_attr_code
and PROPERTY_NAME = param_property_name
and LANGUAGE = p_nls_language;
FND_LOAD_UTIL.OWNER_NAME(l_cust_region_item_rec.last_updated_by) || '"';
l_databuffer_tbl(l_index) := ' LAST_UPDATE_DATE = "' ||
to_char(l_cust_region_item_rec.last_update_date,
AK_ON_OBJECTS_PUB.G_DATE_FORMAT) || '"';
l_databuffer_tbl(l_index) := ' LAST_UPDATE_LOGIN = "' ||
nvl(to_char(l_cust_region_item_rec.last_update_login),'') || '"';
l_databuffer_tbl.delete;
select *
from AK_CRITERIA
where REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and CUSTOMIZATION_APPLICATION_ID = p_custom_application_id
and CUSTOMIZATION_CODE = p_custom_code;
FND_LOAD_UTIL.OWNER_NAME(l_criteria_rec.last_updated_by) || '"';
l_databuffer_tbl(l_index) := ' LAST_UPDATE_DATE = "' ||
to_char(l_criteria_rec.last_update_date,
AK_ON_OBJECTS_PUB.G_DATE_FORMAT) || '"';
l_databuffer_tbl(l_index) := ' LAST_UPDATE_LOGIN = "' ||
nvl(to_char(l_criteria_rec.last_update_login),'') || '"';
p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE)) then
l_error := TRUE;
p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE)) then
l_error := TRUE;
p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE)) then
l_error := TRUE;
select 1
from AK_CUSTOMIZATIONS
where region_application_id = p_region_application_id
and region_code = p_region_code
and customization_application_id = p_custom_application_id
and customization_code = p_custom_code;
select 1
from AK_CUSTOMIZATIONS
where region_application_id = p_region_application_id
and region_code = p_region_code
and customization_application_id = p_custom_application_id
and customization_code = p_custom_code;
select 1
from AK_CUSTOMIZATIONS
where region_application_id = p_region_application_id
and region_code = p_region_code
and customization_application_id = p_custom_application_id
and customization_code = p_custom_code;
p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE)) then
l_error := TRUE;
p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE)) then
l_error := TRUE;
p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
p_last_update_date IN DATE := FND_API.G_MISS_DATE,
p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
p_pass IN NUMBER,
p_copy_redo_flag IN OUT NOCOPY BOOLEAN
) is
l_api_version_number CONSTANT number := 1.0;
l_last_update_date DATE;
l_last_update_login NUMBER;
l_last_updated_by NUMBER;
if (p_last_updated_by <> FND_API.G_MISS_NUM) then
l_last_updated_by := p_last_updated_by;
if (p_last_update_date <> FND_API.G_MISS_DATE) then
l_last_update_date := p_last_update_date;
if (p_last_update_login <> FND_API.G_MISS_NUM) then
l_last_update_login := p_last_update_login;
if AK_ON_OBJECTS_PVT.IS_UPDATEABLE(
p_loader_timestamp => p_loader_timestamp,
p_created_by => l_created_by,
p_creation_date => l_creation_date,
p_last_updated_by => l_last_updated_by,
p_db_last_updated_by => null,
p_last_update_date => l_last_update_date,
p_db_last_update_date => null,
p_last_update_login => l_last_update_login,
p_create_or_update => 'CREATE') then
null;
select userenv('LANG') into l_lang
from dual;
insert into AK_CUSTOMIZATIONS (
CUSTOMIZATION_APPLICATION_ID,
CUSTOMIZATION_CODE,
REGION_APPLICATION_ID,
REGION_CODE,
VERTICALIZATION_ID,
LOCALIZATION_CODE,
ORG_ID,
SITE_ID,
RESPONSIBILITY_ID,
WEB_USER_ID,
DEFAULT_CUSTOMIZATION_FLAG,
CUSTOMIZATION_LEVEL_ID,
DEVELOPER_MODE,
REFERENCE_PATH,
FUNCTION_NAME,
CREATED_BY,
CREATION_DATE,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
START_DATE_ACTIVE,
END_DATE_ACTIVE
) values (
p_custom_appl_id,
p_custom_code,
p_region_appl_id,
p_region_code,
l_verticalization_id,
l_localization_code,
l_org_id,
l_site_id,
l_responsibility_id,
l_web_user_id,
l_default_customization_flag,
p_customization_level_id,
p_developer_mode,
l_reference_path,
l_function_name,
l_created_by,
l_creation_date,
l_last_update_date,
l_last_updated_by,
l_last_update_login,
p_start_date_active,
l_end_date_active);
FND_MESSAGE.SET_NAME('AK','AK_INSERT_CUSTOM_FAILED');
insert into AK_CUSTOMIZATIONS_TL (
CUSTOMIZATION_APPLICATION_ID,
CUSTOMIZATION_CODE,
REGION_APPLICATION_ID,
REGION_CODE,
NAME,
DESCRIPTION,
LANGUAGE,
SOURCE_LANG,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN
) select
p_custom_appl_id,
p_custom_code,
p_region_appl_id,
p_region_code,
p_name,
l_description,
L.LANGUAGE_CODE,
decode(L.LANGUAGE_CODE, l_lang, L.LANGUAGE_CODE, l_lang),
l_created_by,
l_creation_date,
l_last_updated_by,
l_last_update_date,
l_last_update_login
from FND_LANGUAGES L
where L.INSTALLED_FLAG in ('I', 'B')
and not exists
(select NULL
from AK_CUSTOMIZATIONS_TL T
where T.CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and T.CUSTOMIZATION_CODE = p_custom_code
and T.REGION_APPLICATION_ID = p_region_appl_id
and T.REGION_CODE = p_region_code
and T.LANGUAGE = L.LANGUAGE_CODE);
p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
p_last_update_date IN DATE := FND_API.G_MISS_DATE,
p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
p_pass IN NUMBER,
p_copy_redo_flag IN OUT NOCOPY BOOLEAN
) is
l_api_version_number CONSTANT number := 1.0;
l_last_update_date DATE;
l_last_update_login NUMBER;
l_last_updated_by NUMBER;
if (p_last_updated_by <> FND_API.G_MISS_NUM) then
l_last_updated_by := p_last_updated_by;
if (p_last_update_date <> FND_API.G_MISS_DATE) then
l_last_update_date := p_last_update_date;
if (p_last_update_login <> FND_API.G_MISS_NUM) then
l_last_update_login := p_last_update_login;
if AK_ON_OBJECTS_PVT.IS_UPDATEABLE(
p_loader_timestamp => p_loader_timestamp,
p_created_by => l_created_by,
p_creation_date => l_creation_date,
p_last_updated_by => l_last_updated_by,
p_db_last_updated_by => null,
p_last_update_date => l_last_update_date,
p_db_last_update_date => null,
p_last_update_login => l_last_update_login,
p_create_or_update => 'CREATE') then
null;
select userenv('LANG') into l_lang
from dual;
insert into AK_CUSTOM_REGIONS (
CUSTOMIZATION_APPLICATION_ID,
CUSTOMIZATION_CODE,
REGION_APPLICATION_ID,
REGION_CODE,
PROPERTY_NAME,
PROPERTY_VARCHAR2_VALUE,
PROPERTY_NUMBER_VALUE,
CRITERIA_JOIN_CONDITION,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN
) values (
p_custom_appl_id,
p_custom_code,
p_region_appl_id,
p_region_code,
p_property_name,
l_property_varchar2_value,
l_property_number_value,
l_criteria_join_condition,
l_created_by,
l_creation_date,
l_last_updated_by,
l_last_update_date,
l_last_update_login);
FND_MESSAGE.SET_NAME('AK','AK_INSERT_CUST_REGION_FAILED');
insert into AK_CUSTOM_REGIONS_TL (
CUSTOMIZATION_APPLICATION_ID,
CUSTOMIZATION_CODE,
REGION_APPLICATION_ID,
REGION_CODE,
PROPERTY_NAME,
PROPERTY_VARCHAR2_VALUE,
LANGUAGE,
SOURCE_LANG,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN
) select
p_custom_appl_id,
p_custom_code,
p_region_appl_id,
p_region_code,
p_property_name,
l_property_varchar2_value,
L.LANGUAGE_CODE,
decode(L.LANGUAGE_CODE, l_lang, L.LANGUAGE_CODE, l_lang),
l.created_by,
l_creation_date,
l_last_updated_by,
l_last_update_date,
l_last_update_login
from FND_LANGUAGES L
where L.INSTALLED_FLAG in ('I', 'B')
and not exists
(select NULL
from AK_CUSTOM_REGIONS_TL T
where T.CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and T.CUSTOMIZATION_CODE = p_custom_code
and T.REGION_APPLICATION_ID = p_region_appl_id
and T.REGION_CODE = p_region_code
and T.PROPERTY_NAME = p_property_name
and T.LANGUAGE = L.LANGUAGE_CODE);
p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
p_last_update_date IN DATE := FND_API.G_MISS_DATE,
p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
p_pass IN NUMBER,
p_copy_redo_flag IN OUT NOCOPY BOOLEAN
) is
l_api_version_number CONSTANT number := 1.0;
l_last_update_date DATE;
l_last_update_login NUMBER;
l_last_updated_by NUMBER;
if (p_last_updated_by <> FND_API.G_MISS_NUM) then
l_last_updated_by := p_last_updated_by;
if (p_last_update_date <> FND_API.G_MISS_DATE) then
l_last_update_date := p_last_update_date;
if (p_last_update_login <> FND_API.G_MISS_NUM) then
l_last_update_login := p_last_update_login;
if AK_ON_OBJECTS_PVT.IS_UPDATEABLE(
p_loader_timestamp => p_loader_timestamp,
p_created_by => l_created_by,
p_creation_date => l_creation_date,
p_last_updated_by => l_last_updated_by,
p_db_last_updated_by => null,
p_last_update_date => l_last_update_date,
p_db_last_update_date => null,
p_last_update_login => l_last_update_login,
p_create_or_update => 'CREATE') then
null;
select userenv('LANG') into l_lang
from dual;
insert into AK_CUSTOM_REGION_ITEMS (
CUSTOMIZATION_APPLICATION_ID,
CUSTOMIZATION_CODE,
REGION_APPLICATION_ID,
REGION_CODE,
ATTRIBUTE_APPLICATION_ID,
ATTRIBUTE_CODE,
PROPERTY_NAME,
PROPERTY_VARCHAR2_VALUE,
PROPERTY_NUMBER_VALUE,
PROPERTY_DATE_VALUE,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN
) values (
p_custom_appl_id,
p_custom_code,
p_region_appl_id,
p_region_code,
p_attr_appl_id,
p_attr_code,
p_property_name,
l_property_varchar2_value,
l_property_number_value,
l_property_date_value,
l_created_by,
l_creation_date,
l_last_updated_by,
l_last_update_date,
l_last_update_login);
FND_MESSAGE.SET_NAME('AK','AK_INSERT_CUST_REG_ITEM_FAILED');
insert into AK_CUSTOM_REGION_ITEMS_TL (
CUSTOMIZATION_APPLICATION_ID,
CUSTOMIZATION_CODE,
REGION_APPLICATION_ID,
REGION_CODE,
ATTRIBUTE_APPLICATION_ID,
ATTRIBUTE_CODE,
PROPERTY_NAME,
PROPERTY_VARCHAR2_VALUE,
LANGUAGE,
SOURCE_LANG,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN
) select
p_custom_appl_id,
p_custom_code,
p_region_appl_id,
p_region_code,
p_attr_appl_id,
p_attr_code,
p_property_name,
l_property_varchar2_value_tl,
L.LANGUAGE_CODE,
decode(L.LANGUAGE_CODE, l_lang, L.LANGUAGE_CODE, l_lang),
l.created_by,
l_creation_date,
l_last_updated_by,
l_last_update_date,
l_last_update_login
from FND_LANGUAGES L
where L.INSTALLED_FLAG in ('I', 'B')
and not exists
(select NULL
from AK_CUSTOM_REGION_ITEMS_TL T
where T.CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and T.CUSTOMIZATION_CODE = p_custom_code
and T.REGION_APPLICATION_ID = p_region_appl_id
and T.REGION_CODE = p_region_code
and T.ATTRIBUTE_APPLICATION_ID = p_attr_appl_id
and T.ATTRIBUTE_CODE = p_attr_code
and T.PROPERTY_NAME = p_property_name
and T.LANGUAGE = L.LANGUAGE_CODE);
p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
p_last_update_date IN DATE := FND_API.G_MISS_DATE,
p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
p_pass IN NUMBER,
p_copy_redo_flag IN OUT NOCOPY BOOLEAN
) is
l_api_version_number CONSTANT number := 1.0;
l_last_update_date DATE;
l_last_update_login NUMBER;
l_last_updated_by NUMBER;
if (p_last_updated_by <> FND_API.G_MISS_NUM) then
l_last_updated_by := p_last_updated_by;
if (p_last_update_date <> FND_API.G_MISS_DATE) then
l_last_update_date := p_last_update_date;
if (p_last_update_login <> FND_API.G_MISS_NUM) then
l_last_update_login := p_last_update_login;
if AK_ON_OBJECTS_PVT.IS_UPDATEABLE(
p_loader_timestamp => p_loader_timestamp,
p_created_by => l_created_by,
p_creation_date => l_creation_date,
p_last_updated_by => l_last_updated_by,
p_db_last_updated_by => null,
p_last_update_date => l_last_update_date,
p_db_last_update_date => null,
p_last_update_login => l_last_update_login,
p_create_or_update => 'CREATE') then
null;
select userenv('LANG') into l_lang
from dual;
insert into AK_CRITERIA (
CUSTOMIZATION_APPLICATION_ID,
CUSTOMIZATION_CODE,
REGION_APPLICATION_ID,
REGION_CODE,
ATTRIBUTE_APPLICATION_ID,
ATTRIBUTE_CODE,
SEQUENCE_NUMBER,
OPERATION,
VALUE_VARCHAR2,
VALUE_NUMBER,
VALUE_DATE,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
START_DATE_ACTIVE,
END_DATE_ACTIVE
) values (
p_custom_appl_id,
p_custom_code,
p_region_appl_id,
p_region_code,
p_attr_appl_id,
p_attr_code,
p_sequence_number,
p_operation,
l_value_varchar2,
l_value_number,
l_value_date,
l_created_by,
l_creation_date,
l_last_updated_by,
l_last_update_date,
l_last_update_login,
p_start_date_active,
l_end_date_active);
select 1
from AK_CUSTOMIZATIONS
where region_application_id = p_region_application_id
and region_code = p_region_code
and customization_application_id = p_custom_appl_id
and customization_code = p_custom_code;
select 1
from AK_CUSTOM_REGIONS
where region_application_id = p_region_application_id
and region_code = p_region_code
and customization_application_id = p_custom_appl_id
and customization_code = p_custom_code
and property_name = p_property_name;
select 1
from AK_CUSTOM_REGION_ITEMS
where region_application_id = p_region_application_id
and region_code = p_region_code
and customization_application_id = p_custom_appl_id
and customization_code = p_custom_code
and attribute_application_id = p_attribute_appl_id
and attribute_code = p_attribute_code
and property_name = p_property_name;
select 1
from AK_CRITERIA
where region_application_id = p_region_application_id
and region_code = p_region_code
and customization_application_id = p_custom_appl_id
and customization_code = p_custom_code
and attribute_application_id = p_attribute_appl_id
and attribute_code = p_attribute_code
and sequence_number = p_sequence_number;
procedure UPDATE_CUSTOM (
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
p_api_version_number IN NUMBER,
p_init_msg_tbl IN BOOLEAN := FALSE,
p_msg_count OUT NOCOPY NUMBER,
p_msg_data OUT NOCOPY VARCHAR2,
p_return_status OUT NOCOPY VARCHAR2,
p_custom_appl_id IN NUMBER,
p_custom_code IN VARCHAR2,
p_region_application_id IN NUMBER,
p_region_code IN VARCHAR2,
p_verticalization_id IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_localization_code IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_org_id IN NUMBER := FND_API.G_MISS_NUM,
p_site_id IN NUMBER := FND_API.G_MISS_NUM,
p_responsibility_id IN NUMBER := FND_API.G_MISS_NUM,
p_web_user_id IN NUMBER := FND_API.G_MISS_NUM,
p_default_customization_flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_customization_level_id IN NUMBER := FND_API.G_MISS_NUM,
p_developer_mode IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_reference_path IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_function_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_start_date_active IN DATE := FND_API.G_MISS_DATE,
p_end_date_active IN DATE := FND_API.G_MISS_DATE,
p_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_created_by IN NUMBER := FND_API.G_MISS_NUM,
p_creation_date IN DATE := FND_API.G_MISS_DATE,
p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
p_last_update_date IN DATE := FND_API.G_MISS_DATE,
p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
p_pass IN NUMBER,
p_copy_redo_flag IN OUT NOCOPY BOOLEAN
) is
cursor l_get_row_csr is
select *
from AK_CUSTOMIZATIONS
where CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and CUSTOMIZATION_CODE = p_custom_code
and REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
for update of VERTICALIZATION_ID;
select *
from AK_CUSTOMIZATIONS_TL
where CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and CUSTOMIZATION_CODE = p_custom_code
and REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and LANGUAGE = lang_parm
for update of name;
l_api_name CONSTANT varchar2(30) := 'Update_Custom';
l_last_update_date date;
l_last_update_login number;
l_last_updated_by number;
savepoint start_update_custom;
select userenv('LANG') into l_lang
from dual;
p_caller => AK_ON_OBJECTS_PVT.G_UPDATE,
p_pass => p_pass
) then
--dbms_output.put_line(l_api_name || ' validation failed');
if (p_last_updated_by <> FND_API.G_MISS_NUM) then
l_last_updated_by := p_last_updated_by;
if (p_last_update_date <> FND_API.G_MISS_DATE) then
l_last_update_date := p_last_update_date;
if (p_last_update_login <> FND_API.G_MISS_NUM) then
l_last_update_login := p_last_update_login;
if AK_ON_OBJECTS_PVT.IS_UPDATEABLE(
p_loader_timestamp => p_loader_timestamp,
p_created_by => l_created_by,
p_creation_date => l_creation_date,
p_last_updated_by => l_last_updated_by,
p_db_last_updated_by => l_custom_rec.last_updated_by,
p_last_update_date => l_last_update_date,
p_db_last_update_date => l_custom_rec.last_update_date,
p_last_update_login => l_last_update_login,
p_create_or_update => 'UPDATE') then
null;
delete AK_CUSTOM_REGIONS
where REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and CUSTOMIZATION_CODE = p_custom_code;
delete AK_CUSTOM_REGION_ITEMS
where REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and CUSTOMIZATION_CODE = p_custom_code;
update AK_CUSTOMIZATIONS set
VERTICALIZATION_ID = l_custom_rec.verticalization_id,
LOCALIZATION_CODE = l_custom_rec.localization_code,
ORG_ID = l_custom_rec.org_id,
SITE_ID = l_custom_rec.site_id,
RESPONSIBILITY_ID = l_custom_rec.responsibility_id,
WEB_USER_ID = l_custom_rec.web_user_id,
DEFAULT_CUSTOMIZATION_FLAG = l_custom_rec.default_customization_flag,
CUSTOMIZATION_LEVEL_ID = l_custom_rec.customization_level_id,
DEVELOPER_MODE = l_custom_rec.developer_mode,
START_DATE_ACTIVE = l_custom_Rec.start_date_active,
END_DATE_ACTIVE = l_custom_rec.end_date_active,
LAST_UPDATE_DATE = l_last_update_date,
LAST_UPDATED_BY = l_last_updated_by,
LAST_UPDATE_LOGIN = l_last_update_login
where REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and CUSTOMIZATION_CODE = p_custom_code;
FND_MESSAGE.SET_NAME('AK','AK_CUSTOM_UPDATE_FAILED');
delete AK_CUSTOM_REGIONS_TL
where REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and CUSTOMIZATION_CODE = p_custom_code;
delete AK_CUSTOM_REGION_ITEMS_TL
where REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and CUSTOMIZATION_CODE = p_custom_code;
update AK_CUSTOMIZATIONS_TL set
NAME = l_custom_tl_rec.name,
DESCRIPTION = l_custom_tl_rec.description,
LAST_UPDATED_BY = l_last_updated_by,
LAST_UPDATE_DATE = l_last_update_date,
LAST_UPDATE_LOGIN = l_last_update_login,
SOURCE_LANG = l_lang
where REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and CUSTOMIZATION_CODE = p_custom_code
and l_lang in (LANGUAGE, SOURCE_LANG);
FND_MESSAGE.SET_NAME('AK','AK_CUSTOM_UPDATE_FAILED');
FND_MESSAGE.SET_NAME('AK','AK_CUSTOM_UPDATED');
rollback to start_update_custom;
FND_MESSAGE.SET_NAME('AK','AK_CUSTOM_NOT_UPDATED');
rollback to start_update_custom;
end UPDATE_CUSTOM;
procedure UPDATE_CUST_REGION (
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
p_api_version_number IN NUMBER,
p_init_msg_tbl IN BOOLEAN := FALSE,
p_msg_count OUT NOCOPY NUMBER,
p_msg_data OUT NOCOPY VARCHAR2,
p_return_status OUT NOCOPY VARCHAR2,
p_custom_appl_id IN NUMBER,
p_custom_code IN VARCHAR2,
p_region_application_id IN NUMBER,
p_region_code IN VARCHAR2,
p_property_name IN VARCHAR2,
p_property_varchar2_value IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_property_number_value IN NUMBER := FND_API.G_MISS_NUM,
p_criteria_join_condition IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_property_varchar2_value_tl IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_created_by IN NUMBER := FND_API.G_MISS_NUM,
p_creation_date IN DATE := FND_API.G_MISS_DATE,
p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
p_last_update_date IN DATE := FND_API.G_MISS_DATE,
p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
p_pass IN NUMBER,
p_copy_redo_flag IN OUT NOCOPY BOOLEAN
) is
cursor l_get_row_csr is
select *
from AK_CUSTOM_REGIONS
where CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and CUSTOMIZATION_CODE = p_custom_code
and REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and PROPERTY_NAME = p_property_name
for update of PROPERTY_VARCHAR2_VALUE;
select *
from AK_CUSTOM_REGIONS_TL
where CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and CUSTOMIZATION_CODE = p_custom_code
and REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and PROPERTY_NAME = p_property_name
and LANGUAGE = lang_parm
for update of PROPERTY_VARCHAR2_VALUE;
l_api_name CONSTANT varchar2(30) := 'Update_Custom';
l_last_update_date date;
l_last_update_login number;
l_last_updated_by number;
savepoint start_update_cust_region;
select userenv('LANG') into l_lang
from dual;
p_caller => AK_ON_OBJECTS_PVT.G_UPDATE,
p_pass => p_pass
) then
--dbms_output.put_line(l_api_name || ' validation failed');
if (p_last_updated_by <> FND_API.G_MISS_NUM) then
l_last_updated_by := p_last_updated_by;
if (p_last_update_date <> FND_API.G_MISS_DATE) then
l_last_update_date := p_last_update_date;
if (p_last_update_login <> FND_API.G_MISS_NUM) then
l_last_update_login := p_last_update_login;
if AK_ON_OBJECTS_PVT.IS_UPDATEABLE(
p_loader_timestamp => p_loader_timestamp,
p_created_by => l_created_by,
p_creation_date => l_creation_date,
p_last_updated_by => l_last_updated_by,
p_db_last_updated_by => l_cust_region_rec.last_updated_by,
p_last_update_date => l_last_update_date,
p_db_last_update_date => l_cust_region_rec.last_update_date,
p_last_update_login => l_last_update_login,
p_create_or_update => 'UPDATE') then
null;
update AK_CUSTOM_REGIONS set
PROPERTY_VARCHAR2_VALUE = l_cust_region_rec.property_varchar2_value,
PROPERTY_NUMBER_VALUE = l_cust_region_rec.property_number_value,
CRITERIA_JOIN_CONDITION = l_cust_region_rec.criteria_join_condition,
LAST_UPDATE_DATE = l_last_update_date,
LAST_UPDATED_BY = l_last_updated_by,
LAST_UPDATE_LOGIN = l_last_update_login
where REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and CUSTOMIZATION_CODE = p_custom_code
and PROPERTY_NAME = p_property_name;
FND_MESSAGE.SET_NAME('AK','AK_CUST_REGION_UPDATE_FAILED');
update AK_CUSTOM_REGIONS_TL set
PROPERTY_VARCHAR2_VALUE = l_cust_region_tl_rec.property_varchar2_value,
LAST_UPDATE_DATE = l_last_update_date,
LAST_UPDATED_BY = l_last_updated_by,
LAST_UPDATE_LOGIN = l_last_update_login,
SOURCE_LANG = l_lang
where REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and CUSTOMIZATION_CODE = p_custom_code
and PROPERTY_NAME = p_property_name
and l_lang in (LANGUAGE, SOURCE_LANG);
FND_MESSAGE.SET_NAME('AK','AK_CUST_REGION_UPDATE_FAILED');
FND_MESSAGE.SET_NAME('AK','AK_CUST_REGION_UPDATED');
rollback to start_update_cust_region;
FND_MESSAGE.SET_NAME('AK','AK_CUST_REGION_NOT_UPDATED');
rollback to start_update_cust_region;
end UPDATE_CUST_REGION;
procedure UPDATE_CUST_REG_ITEM (
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
p_api_version_number IN NUMBER,
p_init_msg_tbl IN BOOLEAN := FALSE,
p_msg_count OUT NOCOPY NUMBER,
p_msg_data OUT NOCOPY VARCHAR2,
p_return_status OUT NOCOPY VARCHAR2,
p_custom_appl_id IN NUMBER,
p_custom_code IN VARCHAR2,
p_region_application_id IN NUMBER,
p_region_code IN VARCHAR2,
p_attribute_appl_id IN NUMBER,
p_attribute_code IN VARCHAR2,
p_property_name IN VARCHAR2,
p_property_varchar2_value IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_property_number_value IN NUMBER := FND_API.G_MISS_NUM,
p_property_date_value IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_property_varchar2_value_tl IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_created_by IN NUMBER := FND_API.G_MISS_NUM,
p_creation_date IN DATE := FND_API.G_MISS_DATE,
p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
p_last_update_date IN DATE := FND_API.G_MISS_DATE,
p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
p_pass IN NUMBER,
p_copy_redo_flag IN OUT NOCOPY BOOLEAN
) is
cursor l_get_row_csr is
select *
from AK_CUSTOM_REGION_ITEMS
where CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and CUSTOMIZATION_CODE = p_custom_code
and REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and ATTRIBUTE_APPLICATION_ID = p_attribute_appl_id
and ATTRIBUTE_CODE = p_attribute_code
and PROPERTY_NAME = p_property_name
for update of PROPERTY_VARCHAR2_VALUE;
select *
from AK_CUSTOM_REGION_ITEMS_TL
where CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and CUSTOMIZATION_CODE = p_custom_code
and REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and ATTRIBUTE_APPLICATION_ID = p_attribute_appl_id
and ATTRIBUTE_CODE = p_attribute_code
and PROPERTY_NAME = p_property_name
and LANGUAGE = lang_parm
for update of PROPERTY_VARCHAR2_VALUE;
l_api_name CONSTANT varchar2(30) := 'Update_Cust_Reg_Item';
l_last_update_date date;
l_last_update_login number;
l_last_updated_by number;
savepoint start_update_cust_reg_item;
select userenv('LANG') into l_lang
from dual;
p_caller => AK_ON_OBJECTS_PVT.G_UPDATE,
p_pass => p_pass
) then
--dbms_output.put_line(l_api_name || ' validation failed');
if (p_last_updated_by <> FND_API.G_MISS_NUM) then
l_last_updated_by := p_last_updated_by;
if (p_last_update_date <> FND_API.G_MISS_DATE) then
l_last_update_date := p_last_update_date;
if (p_last_update_login <> FND_API.G_MISS_NUM) then
l_last_update_login := p_last_update_login;
if AK_ON_OBJECTS_PVT.IS_UPDATEABLE(
p_loader_timestamp => p_loader_timestamp,
p_created_by => l_created_by,
p_creation_date => l_creation_date,
p_last_updated_by => l_last_updated_by,
p_db_last_updated_by => l_cust_reg_item_rec.last_updated_by,
p_last_update_date => l_last_update_date,
p_db_last_update_date => l_cust_reg_item_rec.last_update_date,
p_last_update_login => l_last_update_login,
p_create_or_update => 'UPDATE') then
null;
update AK_CUSTOM_REGION_ITEMS set
PROPERTY_VARCHAR2_VALUE = l_cust_reg_item_rec.property_varchar2_value,
PROPERTY_NUMBER_VALUE = l_cust_reg_item_rec.property_number_value,
PROPERTY_DATE_VALUE = l_cust_reg_item_rec.property_date_value,
LAST_UPDATE_DATE = l_last_update_date,
LAST_UPDATED_BY = l_last_updated_by,
LAST_UPDATE_LOGIN = l_last_update_login
where REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and CUSTOMIZATION_CODE = p_custom_code
and ATTRIBUTE_APPLICATION_ID = p_attribute_appl_id
and ATTRIBUTE_CODE = p_attribute_code
and PROPERTY_NAME = p_property_name;
FND_MESSAGE.SET_NAME('AK','AK_CUSTOM_ITEM_UPDATE_FAILED');
update AK_CUSTOM_REGION_ITEMS_TL set
PROPERTY_VARCHAR2_VALUE = l_cust_reg_item_tl_rec.property_varchar2_value,
LAST_UPDATE_DATE = l_last_update_date,
LAST_UPDATED_BY = l_last_updated_by,
LAST_UPDATE_LOGIN = l_last_update_login,
SOURCE_LANG = l_lang
where REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and CUSTOMIZATION_CODE = p_custom_code
and ATTRIBUTE_APPLICATION_ID = p_attribute_appl_id
and ATTRIBUTE_CODE = p_attribute_code
and PROPERTY_NAME = p_property_name
and l_lang in (LANGUAGE, SOURCE_LANG);
FND_MESSAGE.SET_NAME('AK','AK_CUSTOM_ITEM_UPDATE_FAILED');
FND_MESSAGE.SET_NAME('AK','AK_CUSTOM_ITEM_UPDATED');
rollback to start_update_cust_reg_item;
FND_MESSAGE.SET_NAME('AK','AK_CUSTOM_ITEM_NOT_UPDATED');
rollback to start_update_cust_reg_item;
end UPDATE_CUST_REG_ITEM;
procedure UPDATE_CRITERIA (
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
p_api_version_number IN NUMBER,
p_init_msg_tbl IN BOOLEAN := FALSE,
p_msg_count OUT NOCOPY NUMBER,
p_msg_data OUT NOCOPY VARCHAR2,
p_return_status OUT NOCOPY VARCHAR2,
p_custom_appl_id IN NUMBER,
p_custom_code IN VARCHAR2,
p_region_application_id IN NUMBER,
p_region_code IN VARCHAR2,
p_attribute_appl_id IN NUMBER,
p_attribute_code IN VARCHAR2,
p_sequence_number IN NUMBER,
p_operation IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_value_varchar2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_value_number IN NUMBER := FND_API.G_MISS_NUM,
p_value_date IN DATE := FND_API.G_MISS_DATE,
p_start_date_active IN DATE := FND_API.G_MISS_DATE,
p_end_date_active IN DATE := FND_API.G_MISS_DATE,
p_created_by IN NUMBER := FND_API.G_MISS_NUM,
p_creation_date IN DATE := FND_API.G_MISS_DATE,
p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
p_last_update_date IN DATE := FND_API.G_MISS_DATE,
p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
p_pass IN NUMBER,
p_copy_redo_flag IN OUT NOCOPY BOOLEAN
) is
cursor l_get_row_csr is
select *
from AK_CRITERIA
where CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and CUSTOMIZATION_CODE = p_custom_code
and REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and ATTRIBUTE_APPLICATION_ID = p_attribute_appl_id
and ATTRIBUTE_CODE = p_attribute_code
and SEQUENCE_NUMBER = p_sequence_number
for update of OPERATION;
l_api_name CONSTANT varchar2(30) := 'Update_Criteria';
l_last_update_date date;
l_last_update_login number;
l_last_updated_by number;
savepoint start_update_criteria;
p_caller => AK_ON_OBJECTS_PVT.G_UPDATE,
p_pass => p_pass
) then
--dbms_output.put_line(l_api_name || ' validation failed');
if (p_last_updated_by <> FND_API.G_MISS_NUM) then
l_last_updated_by := p_last_updated_by;
if (p_last_update_date <> FND_API.G_MISS_DATE) then
l_last_update_date := p_last_update_date;
if (p_last_update_login <> FND_API.G_MISS_NUM) then
l_last_update_login := p_last_update_login;
if AK_ON_OBJECTS_PVT.IS_UPDATEABLE(
p_loader_timestamp => p_loader_timestamp,
p_created_by => l_created_by,
p_creation_date => l_creation_date,
p_last_updated_by => l_last_updated_by,
p_db_last_updated_by => l_criteria_rec.last_updated_by,
p_last_update_date => l_last_update_date,
p_db_last_update_date => l_criteria_rec.last_update_date,
p_last_update_login => l_last_update_login,
p_create_or_update => 'UPDATE') then
null;
update AK_CRITERIA set
OPERATION = l_criteria_rec.operation,
VALUE_VARCHAR2 = l_criteria_rec.value_varchar2,
VALUE_NUMBER = l_criteria_rec.value_number,
VALUE_DATE = l_criteria_rec.value_date,
START_DATE_ACTIVE = l_criteria_rec.start_date_active,
END_DATE_ACTIVE = l_criteria_rec.end_date_active,
LAST_UPDATE_DATE = l_last_update_date,
LAST_UPDATED_BY = l_last_updated_by,
LAST_UPDATE_LOGIN = l_last_update_login
where REGION_APPLICATION_ID = p_region_application_id
and REGION_CODE = p_region_code
and CUSTOMIZATION_APPLICATION_ID = p_custom_appl_id
and CUSTOMIZATION_CODE = p_custom_code
and ATTRIBUTE_APPLICATION_ID = p_attribute_appl_id
and ATTRIBUTE_CODE = p_attribute_code
and SEQUENCE_NUMBER = p_sequence_number;
FND_MESSAGE.SET_NAME('AK','AK_CRITERIA_UPDATE_FAILED');
FND_MESSAGE.SET_NAME('AK','AK_CRITERIA_UPDATED');
rollback to start_update_criteria;
FND_MESSAGE.SET_NAME('AK','AK_CRITERIA_NOT_UPDATED');
rollback to start_update_criteria;
end UPDATE_CRITERIA;