The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Update_Xml_Source_Lines_Util (
p_view_name IN VARCHAR2,
p_commit IN VARCHAR2,
p_column_name IN VARCHAR2,
p_prim_key IN NUMBER,
p_xml_elements_data IN varchar2_2000_set_type,
p_xml_elements_col_name IN varchar2_2000_set_type,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
)
IS
l_update_statement VARCHAR2(2000) := ' UPDATE ' || p_view_name
|| ' SET LOAD_STATUS = ''RELOAD'' ';
l_update_statement := l_update_statement || ',' || p_xml_elements_col_name(i)
|| '=:v' || i;
l_update_statement := l_update_statement || ' WHERE '
|| p_column_name || '=:p1';
write_msg(' l_update_statement::' || l_update_statement);
dbms_sql.parse (g_cursor, l_update_statement, dbms_sql.native);
--IF (AMS_DEBUG_HIGH_ON) THENAMS_UTILITY_PVT.debug_message('Error Update_Xml_Source_Lines_Util in cursor execution');END IF;
END Update_Xml_Source_Lines_Util;
PROCEDURE Update_B2C_Xml_Source_lines (
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_xml_element_rec IN AMS_IMP_XML_ELEMENTS%ROWTYPE,
p_xml_element_ids IN num_data_set_type_w,
p_xml_elements_data IN varchar2_2000_set_type,
p_xml_elements_col_name IN varchar2_2000_set_type,
p_commit IN VARCHAR2
)
IS
l_column_name AMS_IMP_XML_ELEMENTS.COLUMN_NAME%TYPE;
l_update_element_id NUMBER;
Update_Xml_Source_Lines_Util (
p_view_name => G_B2C_VIEW_NAME,
p_commit => p_commit,
p_column_name => l_source_system_column_name,
p_prim_key => p_xml_element_rec.IMP_XML_ELEMENT_ID,
p_xml_elements_data => p_xml_elements_data,
p_xml_elements_col_name => p_xml_elements_col_name,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
PROCEDURE Update_B2B_Xml_Source_lines (
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_xml_element_rec IN AMS_IMP_XML_ELEMENTS%ROWTYPE,
p_xml_element_ids IN num_data_set_type_w,
p_xml_elements_data IN varchar2_2000_set_type,
p_xml_elements_col_name IN varchar2_2000_set_type,
p_commit IN VARCHAR2
)
IS
l_column_name AMS_IMP_XML_ELEMENTS.COLUMN_NAME%TYPE;
l_update_element_id NUMBER;
l_update_statement VARCHAR2(2000) := ' UPDATE ' || G_B2B_VIEW_NAME
|| ' SET LOAD_STATUS = ''RELOAD'', ';
Update_Xml_Source_Lines_Util (
p_view_name => G_B2B_VIEW_NAME,
p_commit => p_commit,
p_column_name => l_source_system_column_name,
p_prim_key => p_xml_element_rec.IMP_XML_ELEMENT_ID,
p_xml_elements_data => p_xml_elements_data,
p_xml_elements_col_name => p_xml_elements_col_name,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
l_update_element_id := l_element_rec.imp_xml_element_id;
l_update_statement := l_update_statement || l_column_name
|| ' = :v1 WHERE ' || l_source_system_column_name || ' = :p1';
l_update_statement USING p_xml_element_rec.data, l_update_element_id;
PROCEDURE Update_Error_Xml_Element (
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,
p_xml_element_rec IN xml_element_rec_type,
p_xml_element_ids IN num_data_set_type_w,
p_xml_elements_data IN varchar2_2000_set_type,
p_xml_elements_col_name IN varchar2_2000_set_type,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
x_object_version_number OUT NOCOPY NUMBER
)
IS
CURSOR c_get_xml_element(l_imp_xml_element_id NUMBER) IS
SELECT *
FROM AMS_IMP_XML_ELEMENTS
WHERE imp_xml_element_id = l_imp_xml_element_id;
SELECT IMPORT_TYPE
FROM AMS_IMP_LIST_HEADERS_ALL
WHERE IMPORT_LIST_HEADER_ID = p_header_id;
SELECT IMPORT_LIST_HEADER_ID
FROM AMS_IMP_DOCUMENTS
WHERE imp_document_id = p_imp_xml_doc_id;
L_API_NAME CONSTANT VARCHAR2(30) := 'Update_Error_Xml_Element';
SAVEPOINT Update_Error_Xml_Element;
AMS_UTILITY_PVT.debug_message('Private API: - Open Cursor to Select');
p_token_value => 'Last_Update_Date') ;
p_validation_mode => JTF_PLSQL_API.g_update,
p_xml_element_rec => p_xml_element_rec,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
AMS_UTILITY_PVT.debug_message('Private API: Calling update table handler');
-- Invoke table handler(AMS_IMP_XML_ELEMENTS_PKG.Update_Row)
AMS_IMP_XML_ELEMENTS_PKG.Update_Row (
p_imp_xml_element_id => p_xml_element_rec.imp_xml_element_id,
p_last_updated_by => FND_GLOBAL.user_id,
p_object_version_number => p_xml_element_rec.object_version_number,
-- p_created_by => p_xml_element_rec.created_by,
p_last_update_login => FND_GLOBAL.conc_login_id,
p_last_update_date => SYSDATE,
-- p_creation_date => p_xml_element_rec.creation_date,
p_imp_xml_document_id => p_xml_element_rec.imp_xml_document_id,
p_order_initial => p_xml_element_rec.order_initial,
p_order_final => p_xml_element_rec.order_final,
p_column_name => p_xml_element_rec.column_name,
p_data => p_xml_element_rec.data,
p_num_attr => p_xml_element_rec.num_attr,
p_data_type => p_xml_element_rec.data_type,
p_load_status => 'RELOAD', --p_xml_element_rec.load_status,
p_error_text => NULL); --p_xml_element_rec.error_text);
AMS_UTILITY_PVT.debug_message('Private API: Returned update table handler');
UPDATE ams_imp_xml_elements
SET LOAD_STATUS = 'RELOAD'
WHERE IMP_XML_ELEMENT_ID = l_element_rec.imp_xml_element_id;
UPDATE ams_imp_list_headers_all
SET execute_mode = 'R'
WHERE import_list_header_id = l_header_id.IMPORT_LIST_HEADER_ID;
UPDATE ams_imp_source_lines
SET LOAD_STATUS = 'RELOAD'
WHERE IMPORT_LIST_HEADER_ID = l_header_id.IMPORT_LIST_HEADER_ID;
UPDATE ams_imp_xml_elements
SET DATA = p_xml_elements_data (l_count)
WHERE IMP_XML_ELEMENT_ID = p_xml_element_ids (l_count);
Update_B2B_Xml_Source_lines (
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_xml_element_rec => l_element_rec,
p_xml_element_ids => p_xml_element_ids,
p_xml_elements_data => p_xml_elements_data,
p_xml_elements_col_name => p_xml_elements_col_name,
p_commit => FND_API.G_FALSE);
Update_B2C_Xml_Source_lines (
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_xml_element_rec => l_element_rec,
p_xml_element_ids => p_xml_element_ids,
p_xml_elements_data => p_xml_elements_data ,
p_xml_elements_col_name => p_xml_elements_col_name,
p_commit => FND_API.G_FALSE);
ROLLBACK TO Update_Error_Xml_Element;
ROLLBACK TO Update_Error_Xml_Element;
ROLLBACK TO Update_Error_Xml_Element;
END Update_Error_Xml_Element;
SELECT AMS_IMP_XML_ELEMENTS_s.NEXTVAL
FROM dual;
SELECT 1
FROM AMS_IMP_XML_ELEMENTS
WHERE IMP_XML_ELEMENT_ID = l_id;
AMS_IMP_XML_ELEMENTS_PKG.Insert_Row(
px_imp_xml_element_id => l_imp_xml_element_id,
p_last_updated_by => FND_GLOBAL.user_id,
px_object_version_number => l_object_version_number,
p_created_by => FND_GLOBAL.user_id,
p_last_update_login => FND_GLOBAL.conc_login_id,
p_last_update_date => SYSDATE,
p_creation_date => SYSDATE,
p_imp_xml_document_id => p_xml_element_rec.imp_xml_document_id,
p_order_initial => p_xml_element_rec.order_initial,
p_order_final => p_xml_element_rec.order_final,
p_column_name => p_xml_element_rec.column_name,
p_data => p_xml_element_rec.data,
p_num_attr => p_xml_element_rec.num_attr,
p_data_type => p_xml_element_rec.data_type,
p_load_status => p_xml_element_rec.load_status,
p_error_text => p_xml_element_rec.error_text);
PROCEDURE Update_Xml_Element(
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_xml_element_rec IN xml_element_rec_type,
x_object_version_number OUT NOCOPY NUMBER
)
IS
CURSOR c_get_xml_element(l_imp_xml_element_id NUMBER) IS
SELECT *
FROM AMS_IMP_XML_ELEMENTS
WHERE imp_xml_element_id = l_imp_xml_element_id;
SELECT IMPORT_TYPE
FROM AMS_IMP_LIST_HEADERS_ALL
WHERE IMPORT_LIST_HEADER_ID = p_header_id;
SELECT IMPORT_LIST_HEADER_ID
FROM AMS_IMP_DOCUMENTS
WHERE imp_document_id = p_imp_xml_doc_id;
L_API_NAME CONSTANT VARCHAR2(30) := 'Update_Xml_Element';
SAVEPOINT UPDATE_Xml_Element_PVT;
AMS_UTILITY_PVT.debug_message('Private API: - Open Cursor to Select');
AMS_Utility_PVT.Error_Message(p_message_name => 'API_MISSING_UPDATE_TARGET',
p_token_name => 'INFO',
p_token_value => 'Xml_Element') ;
p_token_value => 'Last_Update_Date') ;
p_validation_mode => JTF_PLSQL_API.g_update,
p_xml_element_rec => p_xml_element_rec,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
AMS_UTILITY_PVT.debug_message('Private API: Calling update table handler');
AMS_IMP_XML_ELEMENTS_PKG.Update_Row (
p_imp_xml_element_id => p_xml_element_rec.imp_xml_element_id,
p_last_updated_by => FND_GLOBAL.user_id,
p_object_version_number => p_xml_element_rec.object_version_number,
-- p_created_by => p_xml_element_rec.created_by,
p_last_update_login => FND_GLOBAL.conc_login_id,
p_last_update_date => SYSDATE,
-- p_creation_date => p_xml_element_rec.creation_date,
p_imp_xml_document_id => p_xml_element_rec.imp_xml_document_id,
p_order_initial => p_xml_element_rec.order_initial,
p_order_final => p_xml_element_rec.order_final,
p_column_name => p_xml_element_rec.column_name,
p_data => p_xml_element_rec.data,
p_num_attr => p_xml_element_rec.num_attr,
p_data_type => p_xml_element_rec.data_type,
p_load_status => 'RELOAD', --p_xml_element_rec.load_status,
p_error_text => NULL); --p_xml_element_rec.error_text);
AMS_UTILITY_PVT.debug_message('Private API: Returned update table handler');
UPDATE ams_imp_list_headers_all
SET execute_mode = 'R'
WHERE import_list_header_id = l_header_id.IMPORT_LIST_HEADER_ID;
--Update_B2B_Xml_Source_lines (
-- x_return_status => l_return_status,
-- x_msg_count => l_msg_count,
-- x_msg_data => l_msg_data,
-- p_xml_element_rec => l_ref_xml_element_rec);
--Update_B2C_Xml_Source_lines (
-- x_return_status => l_return_status,
-- x_msg_count => l_msg_count,
-- x_msg_data => l_msg_data,
-- p_xml_element_rec => l_ref_xml_element_rec);
ROLLBACK TO UPDATE_Xml_Element_PVT;
ROLLBACK TO UPDATE_Xml_Element_PVT;
ROLLBACK TO UPDATE_Xml_Element_PVT;
End Update_Xml_Element;
PROCEDURE Delete_Xml_Element(
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_imp_xml_element_id IN NUMBER,
p_object_version_number IN NUMBER
)
IS
L_API_NAME CONSTANT VARCHAR2(30) := 'Delete_Xml_Element';
SAVEPOINT DELETE_Xml_Element_PVT;
AMS_UTILITY_PVT.debug_message( 'Private API: Calling delete table handler');
AMS_IMP_XML_ELEMENTS_PKG.Delete_Row(
p_IMP_XML_ELEMENT_ID => p_IMP_XML_ELEMENT_ID);
ROLLBACK TO DELETE_Xml_Element_PVT;
ROLLBACK TO DELETE_Xml_Element_PVT;
ROLLBACK TO DELETE_Xml_Element_PVT;
End Delete_Xml_Element;
SELECT IMP_XML_ELEMENT_ID
FROM AMS_IMP_XML_ELEMENTS
WHERE IMP_XML_ELEMENT_ID = p_IMP_XML_ELEMENT_ID
AND object_version_number = p_object_version
FOR UPDATE NOWAIT;
IF p_xml_element_rec.last_updated_by = FND_API.g_miss_num OR p_xml_element_rec.last_updated_by IS NULL THEN
FND_MESSAGE.set_name('AMS', 'AMS_API_MISSING_FIELD');
FND_MESSAGE.set_token('MISS_FIELD','LAST_UPDATED_BY');
IF p_xml_element_rec.last_update_login = FND_API.g_miss_num OR p_xml_element_rec.last_update_login IS NULL THEN
FND_MESSAGE.set_name('AMS', 'AMS_API_MISSING_FIELD');
FND_MESSAGE.set_token('MISS_FIELD','LAST_UPDATE_LOGIN');
IF p_xml_element_rec.last_update_date = FND_API.g_miss_date OR p_xml_element_rec.last_update_date IS NULL THEN
FND_MESSAGE.set_name('AMS', 'AMS_API_MISSING_FIELD');
FND_MESSAGE.set_token('MISS_FIELD','LAST_UPDATE_DATE');
IF p_xml_element_rec.last_updated_by IS NULL THEN
AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_xml_element_NO_last_updated_by');
IF p_xml_element_rec.last_update_login IS NULL THEN
AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_xml_element_NO_last_update_login');
IF p_xml_element_rec.last_update_date IS NULL THEN
AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_xml_element_NO_last_update_date');
SELECT *
FROM ams_imp_xml_elements
WHERE imp_xml_element_id = p_xml_element_rec.imp_xml_element_id;
IF p_xml_element_rec.last_updated_by = FND_API.g_miss_num THEN
x_complete_rec.last_updated_by := l_xml_element_rec.last_updated_by;
IF p_xml_element_rec.last_update_login = FND_API.g_miss_num THEN
x_complete_rec.last_update_login := l_xml_element_rec.last_update_login;
IF p_xml_element_rec.last_update_date = FND_API.g_miss_date THEN
x_complete_rec.last_update_date := l_xml_element_rec.last_update_date;