The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE updateApprovalListResponse(itemtype in varchar2,
itemkey in varchar2,
p_transaction_type IN VARCHAR2,
p_document_id IN NUMBER,
p_approver_id IN NUMBER,
p_insertion_type IN VARCHAR2 default null,
p_authority_type IN VARCHAR2 default null,
p_forward_to_id IN NUMBER default null,
p_response IN VARCHAR2);
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
SELECT ame_transaction_type
INTO l_transaction_type
FROM po_document_types
WHERE document_type_code = l_document_type
and document_subtype = l_document_subtype;
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
SELECT ame_transaction_type
INTO l_transaction_type
FROM po_document_types
WHERE document_type_code = 'CHANGE_REQUEST'
and document_subtype = 'REQUISITION' ;
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
l_insertion_type VARCHAR2(30);
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
(l_next_approver.api_insertion is null) and
(l_next_approver.authority is null) and
(l_next_approver.approval_status is null)) THEN
resultout:='COMPLETE:'||'NO_NEXT_APPROVER';
l_insertion_type := l_next_approver.api_insertion;
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
aname => 'AME_INSERTION_TYPE' ,
avalue => l_insertion_type);
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
procedure Update_Approval_List_Response(itemtype in varchar2,
itemkey in varchar2,
actid in number,
funcmode in varchar2,
resultout out NOCOPY varchar2) IS
l_progress VARCHAR2(300) := '000';
l_insertion_type VARCHAR2(30);
l_progress := ' Update_Approval_List_Response: 001- at beginning of function';
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
l_insertion_type := wf_engine.GetItemAttrText(itemtype => itemtype,
itemkey => itemkey,
aname => 'AME_INSERTION_TYPE');
l_progress := 'Update_Approval_List_Response: 010 APP'||
to_char(l_approver_id) || ' RES'||to_char(l_responder_id);
' RESPONSE' || l_value || ' INSERTION? '||
l_insertion_type|| ' AUTHORITY? ' || l_authority_type;
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
updateApprovalListResponse(itemtype=>itemtype,
itemkey=>itemkey,
p_transaction_type=>l_transaction_type,
p_document_id=>l_document_id,
p_approver_id=>l_approver_id,
p_insertion_type=>l_insertion_type,
p_authority_type=>l_authority_type,
p_forward_to_id=>l_forward_to_id,
p_response=>l_value);
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
'Update_Approval_List_Response',l_progress,sqlerrm);
PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'POR_AME_REQAPPRV_PVT.UPDATE_APPROVAL_LIST_RESPONSE');
END Update_Approval_List_Response;
procedure Update_Approver_Timeout(itemtype in varchar2,
itemkey in varchar2,
actid in number,
funcmode in varchar2,
resultout out NOCOPY varchar2) IS
l_progress VARCHAR2(300) := '000';
l_progress := ' Update_Approver_timeout: 001- at beginning of function';
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
updateApprovalListResponse(itemtype=>itemtype,
itemkey=>itemkey,
p_transaction_type=>l_transaction_type,
p_document_id=>l_document_id,
p_approver_id=>l_approver_id,
p_response=>'TIMEOUT');
l_progress := ' Update_Approver_timeout: 002- at end of function';
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
'Update_Approval_List_Response',l_progress,sqlerrm);
PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'POR_AME_REQAPPRV_PVT.UPDATE_APPROVAL_LIST_RESPONSE');
END Update_Approver_Timeout;
PROCEDURE updateApprovalListResponse(itemtype in varchar2,
itemkey in varchar2,
p_transaction_type IN VARCHAR2,
p_document_id IN NUMBER,
p_approver_id IN NUMBER,
p_insertion_type IN VARCHAR2 default null,
p_authority_type IN VARCHAR2 default null,
p_forward_to_id IN NUMBER default null,
p_response IN VARCHAR2) IS
l_progress VARCHAR2(100) := '000';
currentApprover.api_insertion :=p_insertion_type;
ame_api.updateApprovalStatus2(applicationIdIn=>applicationId,
transactionIdIn=>p_document_id,
approvalStatusIn=>ame_util.approvedStatus,
approverPersonIdIn=>p_approver_id,
transactionTypeIn=>p_transaction_type);
ame_api.updateApprovalStatus2(applicationIdIn=>applicationId,
transactionIdIn=>p_document_id,
approvalStatusIn=>ame_util.rejectStatus,
approverPersonIdIn=>p_approver_id,
transactionTypeIn=>p_transaction_type);
(currentApprover.api_insertion = ame_util.apiAuthorityInsertion or
currentApprover.api_insertion = ame_util.oamGenerated)) then
forwardee.api_insertion := ame_util.apiAuthorityInsertion;
forwardee.api_insertion := ame_util.apiInsertion;
ame_api.updateApprovalStatus(applicationIdIn=>applicationId,
transactionIdIn=>p_document_id,
transactionTypeIn=>p_transaction_type,
approverIn=>currentApprover,
forwardeeIn=>forwardee);
(currentApprover.api_insertion = ame_util.apiAuthorityInsertion or
currentApprover.api_insertion = ame_util.oamGenerated)) then
forwardee.api_insertion := ame_util.apiAuthorityInsertion;
forwardee.api_insertion := ame_util.apiInsertion;
ame_api.updateApprovalStatus(applicationIdIn=>applicationId,
transactionIdIn=>p_document_id,
transactionTypeIn=>p_transaction_type,
approverIn=>currentApprover,
forwardeeIn=>forwardee);
ame_api.updateApprovalStatus2(applicationIdIn=>applicationId,
transactionIdIn=>p_document_id,
approvalStatusIn=>ame_util.noResponseStatus,
approverPersonIdIn=>p_approver_id,
transactionTypeIn=>p_transaction_type);
'updateApprovalListResponse',l_progress,sqlerrm);
END updateApprovalListResponse;
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
l_progress := ' DO 2 Roopal Update_Approval_List_Response:- p_itemtype: ' || itemtype || ' l_forward_to_id: ' || l_forward_to_id;
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);
l_progress := ' DO 2 Roopal Update_Approval_List_Response:- l_user_name: ' || l_user_name || ' l_disp_user_name: ' || l_disp_user_name;
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey, l_progress);