The following lines contain the word 'select', 'insert', 'update' or 'delete':
l_last_update_login NUMBER := fnd_global.login_id;
l_last_update_login NUMBER := fnd_global.login_id;
update pos_supp_pub_history set last_updated_by=l_user_id , last_update_date=sysdate,
last_update_login=l_last_update_login where publication_event_id=p_publication_event_id(i);
l_last_update_login NUMBER := fnd_global.login_id;
INSERT INTO pos_supp_pub_responses
(publication_event_id,
target_system,
request_process_id,
request_process_status,
created_by,
creation_date,
last_updated_by,
last_update_date,
last_update_login)
VALUES
(p_publication_event_id,
p_target_system,
p_pub_req_process_id,
p_pub_req_process_stats,
l_user_id,
SYSDATE,
l_user_id,
SYSDATE,
l_last_update_login);
* Use this routine to Update Supplier Publication Event Response
* @param p_api_version The version of API
* @param p_init_msg_list The Initialization message list
* @param p_commit The commit flag
* @param p_validation_level The validation level
* @param p_publication_event_id The Publication event id
* @param p_party_id The party id
* @param p_target_system The target spoke system id
* @param p_pub_resp_process_id The publication response process id
* @param p_pub_resp_process_stats The publication response process status
* @param p_target_system_resp_date The target system response date
* @param p_error_message The error messages
* @param x_return_status The return status
* @param x_msg_count The message count
* @param x_msg_data The message data
* @rep:scope public
* @rep:lifecycle active
* @rep:displayname Update Supplier Publication Event Response
* @rep:catagory BUSSINESS_ENTITY AP_SUPPLIER
*/
PROCEDURE update_supp_pub_resp(p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2,
p_commit IN VARCHAR2,
p_validation_level IN NUMBER,
p_publication_event_id IN NUMBER,
p_party_id IN NUMBER,
p_target_system IN NUMBER,
p_pub_resp_process_id IN NUMBER,
p_pub_resp_process_stats IN VARCHAR2,
p_target_system_resp_date IN DATE,
p_error_message IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2) IS
l_user_id NUMBER := fnd_global.user_id;
l_last_update_login NUMBER := fnd_global.login_id;
UPDATE pos_supp_pub_responses
SET response_process_id = p_pub_resp_process_id,
response_process_status = p_pub_resp_process_id,
target_system_response_date = p_target_system_resp_date,
error_message = p_error_message,
last_updated_by = l_user_id,
last_update_date = SYSDATE,
last_update_login = l_last_update_login
WHERE publication_event_id = p_publication_event_id
AND target_system = p_target_system
AND publication_event_id = p_publication_event_id
AND party_id = p_party_id;
END update_supp_pub_resp;
SELECT POS_SUPP_NOTIFY_WORKFLOW_S.nextval
FROM dual;
l_parameter_list.DELETE;
get_bo_and_insert(p_party_id,
l_publication_event_id,
p_published_by,
p_publish_detail);
SELECT pos_supp_pub_event_s.nextval
INTO g_curr_supp_publish_event_id
FROM dual;
PROCEDURE get_bo_and_insert(p_party_id IN pos_tbl_number,
p_publication_event_id IN NUMBER,
p_published_by IN NUMBER,
p_publish_detail IN VARCHAR)
IS
l_user_id NUMBER := fnd_global.user_id;
l_last_update_login NUMBER := fnd_global.login_id;
fnd_file.put_line(fnd_file.log,'Inserting the XML Payload into pos_supp_pub_history table');
INSERT INTO pos_supp_pub_history
(publication_event_id,
party_id,
publication_date,
published_by,
publish_detail,
xmlcontent,
created_by,
creation_date,
last_updated_by,
last_update_date,
last_update_login,
request_id)
VALUES
(p_publication_event_id,
p_party_id(i),
SYSDATE, -- p_publication_date,
p_published_by,
p_publish_detail,
l_xml_data,
l_user_id,
SYSDATE,
l_user_id,
SYSDATE,
l_last_update_login,
l_request_id);
END get_bo_and_insert;
SELECT party_id
FROM pos_supp_pub_history
WHERE publication_event_id = p_publication_event_id;