The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT ams_list_src_types_s.NEXTVAL
FROM DUAL;
SELECT ams_list_src_fields_s.NEXTVAL
FROM DUAL;
SELECT source_column_name
FROM ams_list_src_fields_vl
WHERE list_source_type_id=p_src_id
ORDER BY LIST_SOURCE_FIELD_ID;
SELECT source_type_code FROM ams_list_src_types_vl
where list_source_type_id = p_src_type_id ;
SELECT import_type, b2b_flag
FROM AMS_IMP_LIST_HEADERS_ALL
WHERE IMPORT_LIST_HEADER_ID = p_import_list_header_id;
SELECT 1
FROM ams_list_src_types_vl
WHERE list_source_name=name;
--SELECT COUNT(1)
--FROM ams_imp_col_mapping ai
--WHERE ai.required_flag = 'Y'
--AND ai.table_name = cur_table_name
--AND NOT EXISTS ( SELECT 'x'
-- FROM ams_list_src_fields al
-- WHERE al.field_table_name = ai.table_name
-- AND al.field_column_name IS NOT NULL
-- AND NVL (al.field_column_name, '') = ai.column_name
-- AND al.list_source_type_id = cur_source_type_id );
SELECT COUNT(1)
FROM ak_region_items_vl ai
WHERE ai.region_code LIKE 'AMS_IMPH_METADATA_0%'
AND ai.required_flag = 'Y'
AND ai.SORTBY_VIEW_ATTRIBUTE_NAME = p_import_type
AND NOT EXISTS ( SELECT 'x'
FROM ams_list_src_fields al
WHERE UPPER(al.field_table_name) = UPPER(ai.view_usage_name)
AND al.field_column_name IS NOT NULL
AND UPPER(al.field_column_name) = UPPER(ai.view_attribute_name)
AND al.list_source_type_id = cur_source_type_id );
--SELECT ai.COL_MAPPING_ID
--FROM ams_imp_col_mapping ai
--WHERE ai.required_flag = 'Y'
--AND ai.table_name = p_table_name
--AND ai.column_name NOT IN ( SELECT al.field_column_name
-- FROM ams_list_src_fields al
-- WHERE al.field_table_name = ai.table_name
-- AND al.field_column_name IS NOT NULL
-- AND al.list_source_type_id = p_source_type_id );
IF px_src_type_id is not null then -- update
FOR l_rec IN c_get_source_col_name(px_src_type_id)
LOOP
l_temp_fields(l_tmp_var):=l_rec.source_column_name;
delete from ams_list_src_types
where list_source_type_id = px_src_type_id ;
delete from ams_list_src_types_tl
where list_source_type_id = px_src_type_id ;
DELETE FROM ams_list_src_fields_tl
WHERE list_source_field_id IN
(SELECT list_source_field_id FROM ams_list_src_fields
WHERE list_source_type_id =px_src_type_id);
delete from ams_list_src_fields
where list_source_type_id = px_src_type_id;
update ams_imp_list_headers_all
set LIST_SOURCE_TYPE_ID = px_src_type_id,
last_update_date= SYSDATE
where IMPORT_LIST_HEADER_ID = p_imp_list_header_id;
INSERT INTO ams_list_src_types (
list_source_type_id,
last_update_date,
last_updated_by,
creation_date,
created_by,
last_update_login,
object_version_number,
list_source_type,
source_type_code,
source_object_name,
master_source_type_flag,
source_object_pk_field,
enabled_flag,
view_application_id,
IMPORT_TYPE
)
values (
l_list_source_type_id,
sysdate,
fnd_global.user_id,
sysdate,
fnd_global.user_id,
fnd_global.conc_login_id,
1,
'IMPORT',
p_source_name,
'DATA FILE',
'Y',
'',
'Y',
530, --CHANGE!!
l_import_type.IMPORT_TYPE
);
insert into ams_list_src_types_tl (
language,
source_lang,
list_source_name,
description,
list_source_type_id,
last_update_date,
last_update_by,
creation_date,
created_by,
last_update_login
)
select
l.language_code,
userenv('LANG'),
p_source_name,
p_source_name,
l_list_source_type_id,
sysdate,
FND_GLOBAL.user_id,
sysdate,
FND_GLOBAL.user_id,
FND_GLOBAL.conc_login_id
from FND_LANGUAGES L
where L.INSTALLED_FLAG in ('I', 'B')
and not exists
(select NULL
from AMS_LIST_SRC_TYPES_TL T
where T.LIST_SOURCE_TYPE_ID = l_list_source_type_id
and T.LANGUAGE = L.LANGUAGE_CODE);
select column_name
into l_list_target_fields(i)
from ams_imp_col_mapping
where table_name = p_table_name
and meaning = p_list_target_fields(i) ;
-- select column_name
-- into l_list_target_fields(i)
-- from ams_imp_col_mapping
-- where table_name = p_table_name
-- and meaning = p_list_target_fields(i) ;
INSERT INTO ams_list_src_fields (
list_source_field_id,
last_update_date,
last_updated_by,
creation_date,
created_by,
last_update_login,
object_version_number,
de_list_source_type_code,
list_source_type_id,
field_table_name,
field_column_name,
source_column_name,
-- source_column_meaning,
enabled_flag,
start_position,
end_position
)
(SELECT
l_list_source_field_id,
sysdate,
fnd_global.user_id,
sysdate,
fnd_global.user_id,
fnd_global.conc_login_id,
1,
p_source_name,
l_list_source_type_id,
p_table_name,
--l_list_target_fields(i),
p_list_target_fields(i),
p_list_src_fields(i) ,
-- p_list_src_fields(i) ,
'Y',
'',
'' from dual);
insert into ams_list_src_fields_tl (
language,
source_lang,
source_column_meaning,
list_source_field_id,
last_update_date,
last_update_by,
creation_date,
created_by,
last_update_login
)
select
l.language_code,
userenv('LANG'),
p_list_src_fields(i),
l_list_source_field_id,
sysdate,
FND_GLOBAL.user_id,
sysdate,
FND_GLOBAL.user_id,
FND_GLOBAL.conc_login_id
from FND_LANGUAGES L
where L.INSTALLED_FLAG in ('I', 'B')
and not exists
(select NULL
from AMS_LIST_SRC_FIELDS_TL T
where T.LIST_source_field_ID = l_list_source_field_id
and T.LANGUAGE = L.LANGUAGE_CODE);
update ams_imp_list_headers_all
set LIST_SOURCE_TYPE_ID = l_list_source_type_id
where IMPORT_LIST_HEADER_ID = p_imp_list_header_id ;