DBA Data[Home] [Help]

APPS.PO_REQAPPROVAL_INIT1 dependencies on PO_ACTION_HISTORY

Line 2789: -- PRE-APPROVED, then insert a SUBMIT action row into PO_ACTION_HISTORY

2785: --
2786: --
2787: -- Ins_actionhist_submit
2788: -- When we start the workflow, if the document status is NOT 'IN PROCESS' or
2789: -- PRE-APPROVED, then insert a SUBMIT action row into PO_ACTION_HISTORY
2790: -- to signal the submission of the document for approval.
2791: -- Also, insert an additional row with a NULL ACTION_CODE (to simulate a
2792: -- forward-to since the DOC status is IN PROCESS. The code in the DOC-MANAGER
2793: -- looks for this row.

Line 2806: l_note PO_ACTION_HISTORY.note%TYPE;

2802: IS
2803: l_doc_id NUMBER;
2804: l_doc_type VARCHAR2(25);
2805: l_doc_subtype VARCHAR2(25);
2806: l_note PO_ACTION_HISTORY.note%TYPE;
2807: l_employee_id NUMBER;
2808: l_orgid NUMBER;
2809: x_progress VARCHAR2(100);
2810: l_doc_string VARCHAR2(200);

Line 5363: FROM po_action_history

5359: l_draft_type PO_DRAFTS.DRAFT_TYPE%TYPE; -- PAR Approval
5360: CURSOR action_hist_cursor(doc_id NUMBER , doc_type VARCHAR2)
5361: IS
5362: SELECT MAX(sequence_num)
5363: FROM po_action_history
5364: WHERE object_id = doc_id
5365: AND object_type_code = doc_type;
5366: -- Mod Project
5367: CURSOR action_hist_mod_cursor(draft_id NUMBER , doc_type VARCHAR2)

Line 5370: FROM po_action_history

5366: -- Mod Project
5367: CURSOR action_hist_mod_cursor(draft_id NUMBER , doc_type VARCHAR2)
5368: IS
5369: SELECT MAX(sequence_num)
5370: FROM po_action_history
5371: WHERE object_id = draft_id
5372: AND object_type_code = doc_type
5373: AND object_sub_type_code IN ('MODIFICATION', 'POST_AWARD_REQUEST'); -- PAR Approval
5374: -- Mod Project

Line 5378: FROM po_action_history

5374: -- Mod Project
5375: CURSOR action_hist_code_cursor (doc_id NUMBER , doc_type VARCHAR2, seq_num NUMBER)
5376: IS
5377: SELECT action_code
5378: FROM po_action_history
5379: WHERE object_id = doc_id
5380: AND object_type_code = doc_type
5381: AND sequence_num = seq_num;
5382: -- Mod Project

Line 5386: FROM po_action_history

5382: -- Mod Project
5383: CURSOR action_hist_code_mod_cursor (draft_id NUMBER , doc_type VARCHAR2, seq_num NUMBER)
5384: IS
5385: SELECT action_code
5386: FROM po_action_history
5387: WHERE object_id = draft_id
5388: AND object_type_code = doc_type
5389: AND object_sub_type_code IN ('MODIFICATION', 'POST_AWARD_REQUEST') -- PAR Approval
5390: AND sequence_num = seq_num;

Line 5484: INTO PO_ACTION_HISTORY

5480: END IF;
5481: x_progress := '006';
5482: IF ((l_sequence_num = 1) OR (l_sequence_num > 1 AND l_action_code IS NOT NULL)) THEN --Bug 13579433
5483: INSERT
5484: INTO PO_ACTION_HISTORY
5485: (
5486: object_id,
5487: object_type_code,
5488: object_sub_type_code,

Line 5532: UPDATE PO_ACTION_HISTORY

5528: ''
5529: );
5530: ELSE
5531: l_sequence_num := l_sequence_num - 1;
5532: UPDATE PO_ACTION_HISTORY
5533: SET object_id = DECODE(l_draft_id,-1,l_doc_id,l_draft_id), --Mod Project
5534: object_type_code = p_doc_type,
5535: object_sub_type_code = l_doc_subtype, --Mod Project
5536: sequence_num = l_sequence_num,

Line 5559: -- Null action code will not be inserted into po_action_history table.

5555: AND object_sub_type_code = l_doc_subtype --Mod Project
5556: AND sequence_num = l_sequence_num;
5557: END IF;
5558: -- iProcurement: Approval History changes.
5559: -- Null action code will not be inserted into po_action_history table.
5560: -- bug4643013
5561: -- Still insert null action during submission except for requisition
5562: -- Null need not be inserted in case of 'PO approval using AME'
5563: --Bug 12664072 Adding nvl condition for l_transaction_type

Line 5567: INTO PO_ACTION_HISTORY

5563: --Bug 12664072 Adding nvl condition for l_transaction_type
5564: -- PAR Approval : Adding PAR transaction type to condition.
5565: IF (p_doc_type <> 'REQUISITION' AND Nvl(l_transaction_type,'NULL') NOT IN('PURCHASE_ORDER','PURCHASE_MOD', 'PURCHASE_PAR')) THEN
5566: INSERT
5567: INTO PO_ACTION_HISTORY
5568: (
5569: object_id,
5570: object_type_code,
5571: object_sub_type_code,

Line 8358: FROM po_action_history pah

8354: SELECT pah.employee_id,
8355: pah.ROWID
8356: INTO l_emp_id,
8357: l_rowid
8358: FROM po_action_history pah
8359: WHERE pah.object_id = p_doc_id
8360: AND pah.object_type_code = p_doc_type
8361: AND pah.object_sub_type_code = p_doc_subtype
8362: AND pah.sequence_num =

Line 8364: FROM po_action_history pah1

8360: AND pah.object_type_code = p_doc_type
8361: AND pah.object_sub_type_code = p_doc_subtype
8362: AND pah.sequence_num =
8363: (SELECT MAX(sequence_num)
8364: FROM po_action_history pah1
8365: WHERE pah1.object_id = p_doc_id
8366: AND pah1.object_type_code = p_doc_type
8367: AND pah1.object_sub_type_code = p_doc_subtype
8368: )

Line 8402: UPDATE po_action_history pah

8398: END IF;
8399: IF l_rowid IS NOT NULL THEN
8400: -- SQL What : Update the No action in the action history.
8401: -- Sql Why : To maintain the NO ACTION message in approver language.
8402: UPDATE po_action_history pah
8403: SET pah.action_code = p_action,
8404: pah.action_date = SYSDATE,
8405: pah.Note = l_note,
8406: pah.last_updated_by = fnd_global.user_id,

Line 8837: L_Doc_Type Po_Action_History.Object_Type_Code%TYPE;

8833: Funcmode IN VARCHAR2,
8834: Resultout OUT NOCOPY VARCHAR2)
8835: IS
8836: L_Doc_Id NUMBER;
8837: L_Doc_Type Po_Action_History.Object_Type_Code%TYPE;
8838: L_Doc_Subtype Po_Action_History.Object_Sub_Type_Code%TYPE;
8839: BEGIN
8840: L_Doc_Type := Wf_Engine.Getitemattrtext (Itemtype => Itemtype, Itemkey => Itemkey, Aname => 'DOCUMENT_TYPE');
8841: L_Doc_Subtype := Wf_Engine.Getitemattrtext(Itemtype => Itemtype, Itemkey => Itemkey, Aname => 'DOCUMENT_SUBTYPE');

Line 8838: L_Doc_Subtype Po_Action_History.Object_Sub_Type_Code%TYPE;

8834: Resultout OUT NOCOPY VARCHAR2)
8835: IS
8836: L_Doc_Id NUMBER;
8837: L_Doc_Type Po_Action_History.Object_Type_Code%TYPE;
8838: L_Doc_Subtype Po_Action_History.Object_Sub_Type_Code%TYPE;
8839: BEGIN
8840: L_Doc_Type := Wf_Engine.Getitemattrtext (Itemtype => Itemtype, Itemkey => Itemkey, Aname => 'DOCUMENT_TYPE');
8841: L_Doc_Subtype := Wf_Engine.Getitemattrtext(Itemtype => Itemtype, Itemkey => Itemkey, Aname => 'DOCUMENT_SUBTYPE');
8842: L_Doc_Id := Wf_Engine.Getitemattrnumber (Itemtype => Itemtype, Itemkey => Itemkey, Aname => 'DOCUMENT_ID');