The following lines contain the word 'select', 'insert', 'update' or 'delete':
-- added by Liang in 115.10 for client for update last_update_channel
l_service_request_rec.cust_pref_lang_code := P_service_request_rec.cust_pref_lang_code;
l_service_request_rec.last_update_channel := p_service_request_rec.last_update_channel;
l_notes.delete;
l_contacts.delete;
PROCEDURE Update_ServiceRequest_Wrap(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := null,
p_commit IN VARCHAR2 := null,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_request_id IN NUMBER := NULL,
p_request_number IN VARCHAR2 := NULL,
p_audit_comments IN VARCHAR2 := NULL,
p_object_version_number IN NUMBER,
p_resp_appl_id IN NUMBER := NULL,
p_resp_id IN NUMBER := NULL,
p_last_updated_by IN NUMBER,
p_last_update_login IN NUMBER := NULL,
p_last_update_date IN DATE,
p_service_request_rec IN service_request_rec_type,
p_notes IN notes_table,
p_contacts IN contacts_table,
p_called_by_workflow IN VARCHAR2 := FND_API.G_FALSE,
p_workflow_process_id IN NUMBER := NULL,
x_workflow_process_id OUT NOCOPY NUMBER,
x_interaction_id OUT NOCOPY NUMBER
)
IS
-- l_api_version CONSTANT NUMBER := 2.0;
l_api_name VARCHAR2(255):='Update_ServiceRequest_Wrap';
IEM_SERVICEREQUEST_NOT_UPDATED EXCEPTION;
SAVEPOINT Update_ServiceRequest_Wrap;
l_service_request_rec.last_update_channel := p_service_request_rec.last_update_channel;
l_service_request_rec.last_update_program_code := 'EMAILCENTER';
l_notes.delete;
l_contacts.delete;
CS_ServiceRequest_PUB.Update_ServiceRequest (
p_api_version => l_cs_version_number,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_request_id => p_request_id,
p_request_number => p_request_number,
p_audit_comments => p_audit_comments,
p_object_version_number => p_object_version_number,
p_resp_appl_id => p_resp_appl_id,
p_resp_id => p_resp_id,
p_last_updated_by => p_last_updated_by,
p_last_update_login => p_last_update_login,
p_last_update_date => p_last_update_date,
p_service_request_rec => l_service_request_rec,
p_notes => l_notes,
p_contacts => l_contacts,
p_called_by_workflow => p_called_by_workflow,
p_workflow_process_id => p_workflow_process_id,
x_workflow_process_id => x_workflow_process_id,
x_interaction_id => x_interaction_id );
raise IEM_SERVICEREQUEST_NOT_UPDATED;
WHEN IEM_SERVICEREQUEST_NOT_UPDATED THEN
ROLLBACK TO Update_ServiceRequest_Wrap;
ROLLBACK TO Update_ServiceRequest_Wrap;
ROLLBACK TO Update_ServiceRequest_Wrap;
ROLLBACK TO Update_ServiceRequest_Wrap;
p_sr_record.last_update_channel := 'EMAIL'; --FND_API.G_MISS_CHAR;
PROCEDURE Update_Status_Wrap
( p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_resp_appl_id IN NUMBER := NULL,
p_resp_id IN NUMBER := NULL,
p_user_id IN NUMBER := NULL,
p_login_id IN NUMBER := FND_API.G_MISS_NUM,
p_request_id IN NUMBER := NULL,
p_request_number IN VARCHAR2 := NULL,
p_object_version_number IN NUMBER,
p_status_id IN NUMBER := NULL,
p_status IN VARCHAR2 := NULL,
p_closed_date IN DATE := FND_API.G_MISS_DATE,
p_audit_comments IN VARCHAR2 := NULL,
p_called_by_workflow IN VARCHAR2 := FND_API.G_FALSE,
p_workflow_process_id IN NUMBER := NULL,
p_comments IN VARCHAR2 := NULL,
p_public_comment_flag IN VARCHAR2 := FND_API.G_FALSE,
x_interaction_id OUT NOCOPY NUMBER
)
IS
l_api_name VARCHAR2(255):='Update_Status_Wrap';
IEM_UPDATE_SR_STATUS_FAIL EXCEPTION;
SAVEPOINT Update_Status_Wrap;
CS_SERVICEREQUEST_PUB.Update_Status
( p_api_version => l_cs_version_number,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_resp_appl_id => l_resp_appl_id,
p_resp_id => l_resp_id,
p_user_id => l_user_id,
p_login_id => l_login_id,
p_request_id => l_request_id,
p_request_number => l_request_number,
p_object_version_number => l_object_version_number,
p_status_id => l_status_id,
p_status => l_status,
p_closed_date => l_closed_date,
p_audit_comments => l_audit_comments,
p_called_by_workflow => l_called_by_workflow,
p_workflow_process_id => l_workflow_process_id,
p_comments => l_comments,
p_public_comment_flag => l_public_comment_flag,
x_interaction_id => l_interaction_id
);
raise IEM_UPDATE_SR_STATUS_FAIL;
WHEN IEM_UPDATE_SR_STATUS_FAIL THEN
ROLLBACK TO Update_Status_Wrap;
ROLLBACK TO Update_Status_Wrap;
ROLLBACK TO Update_Status_Wrap;
ROLLBACK TO Update_Status_Wrap;
SELECT party_type
FROM hz_parties a
WHERE a.party_id = p_party_id
AND a.status = 'A'
AND a.party_type IN ('ORGANIZATION','PERSON');
select party_type into l_contact_type
from hz_parties
where party_id = p_contact_id;