{"id":15650,"date":"2017-11-20T12:32:44","date_gmt":"2017-11-20T14:32:44","guid":{"rendered":"http:\/\/orabr.com\/?p=15650"},"modified":"2017-11-20T12:32:44","modified_gmt":"2017-11-20T14:32:44","slug":"chamando-workflow-de-aprovacao-de-po-via-api-plsql","status":"publish","type":"post","link":"https:\/\/orabr.virttus.com\/?p=15650","title":{"rendered":"Chamando WorkFlow de aprova\u00e7\u00e3o de PO via API – PLSQL"},"content":{"rendered":"

PO_REQAPPROVAL_INIT1.START_WF_PROCESS \u00a0–\u00a0API para Aprovar Ordens de Compra, Contratos de Compra Geral e Requisi\u00e7\u00e3o de Compra …<\/p>\n

Algumas vezes, estamos nos perguntando o que exatamente a Oracle est\u00e1 fazendo quando estamos clicando no bot\u00e3o Aprovar no Formul\u00e1rio de Pedido \/ Requisi\u00e7\u00e3o de Compra. E como o bot\u00e3o Aprovar chama o fluxo de trabalho de aprova\u00e7\u00e3o de compras.
\nQuando o bot\u00e3o Aprovar \u00e9 clicado, o formul\u00e1rio de forma modal de aprova\u00e7\u00e3o para compras de aprova\u00e7\u00f5es \u00e9 chamado (este \u00e9 o formul\u00e1rio POXDOAPP.fmb e o arquivo de biblioteca correspondente em anexo POXAPAPC.pll.). Os formul\u00e1rios Enter Requisition e Enter Purchase Order chamam o mesmo formul\u00e1rio de aprova\u00e7\u00e3o.
\nO arquivo de biblioteca POXAPAPC.pll possui um procedimento PO_WF_APPROVE_C.SetUpWorkFlow que chama o procedimento PO_REQAPPROVAL_INIT1.Start_WF_Process no arquivo de pacote POXWPA1B.pls.
\nEste procedimento do lado do servidor chama o fluxo de trabalho e inicia o fluxo de trabalho e processa o documento atrav\u00e9s do fluxo de trabalho …<\/p>\n

\u2014 R12 \u2013 PO \u2013 SAMPLE SCRIPT TO APPROVE PURCHASE ORDER<\/strong><\/span>
\nDECLARE
\nv_item_key VARCHAR2(100);<\/p>\n

Cursor c_po_details is<\/p>\n

SELECT
\npha.po_header_id,
\npha.org_id,
\npha.segment1,
\npha.agent_id,
\npdt.document_subtype,
\npdt.document_type_code,
\npha.authorization_status
\nFROM apps.po_headers_all pha, apps.po_document_types_all pdt
\nWHERE pha.type_lookup_code = pdt.document_subtype
\nAND pha.org_id = pdt.org_id
\nAND pdt.document_type_code = \u2018PO\u2019
\nAND authorization_status in (\u2018INCOMPLETE\u2019, \u2018REQUIRES REAPPROVAL\u2019)
\nAND segment1 = \u201811170000860\u2019; \u2014 Enter the Purchase Order Number
\nBEGIN
\nfnd_global.apps_initialize (user_id => 2083,
\nresp_id => 20707,
\nresp_appl_id => 201);
\nFOR p_rec IN c_po_details
\nLOOP<\/p>\n

mo_global.init (p_rec.document_type_code);
\nmo_global.set_policy_context (\u2018S\u2019, p_rec.org_id);<\/p>\n

SELECT p_rec.po_header_id \u2018-\u2018 to_char(po_wf_itemkey_s.NEXTVAL)
\nINTO v_item_key FROM dual;
\ndbms_output.put_line (\u2018 Calling po_reqapproval_init1.start_wf_process for po_id=>\u2019 p_rec.segment1);<\/p>\n

po_reqapproval_init1.start_wf_process(
\nItemType => \u2018POAPPRV\u2019
\n, ItemKey => v_item_key
\n, WorkflowProcess => \u2018POAPPRV_TOP\u2019
\n, ActionOriginatedFrom => \u2018PO_FORM\u2019
\n, DocumentID => p_rec.po_header_id \u2014 po_header_id
\n, DocumentNumber => p_rec.segment1 \u2014 Purchase Order Number
\n, PreparerID => p_rec.agent_id \u2014 Buyer\/Preparer_id
\n, DocumentTypeCode => p_rec.document_type_code\u2013\u2018PO\u2019
\n, DocumentSubtype => p_rec.document_subtype \u2013\u2018STANDARD\u2019
\n, SubmitterAction => \u2018APPROVE\u2019
\n, forwardToID => NULL
\n, forwardFromID => NULL
\n, DefaultApprovalPathID => NULL
\n, Note => NULL
\n, PrintFlag => \u2018N\u2019
\n, FaxFlag => \u2018N\u2019
\n, FaxNumber => NULL
\n, EmailFlag => \u2018N\u2019
\n, EmailAddress => NULL
\n, CreateSourcingRule => \u2018N\u2019
\n, ReleaseGenMethod => \u2018N\u2019
\n, UpdateSourcingRule => \u2018N\u2019
\n, MassUpdateReleases => \u2018N\u2019
\n, RetroactivePriceChange => \u2018N\u2019
\n, OrgAssignChange => \u2018N\u2019
\n, CommunicatePriceChange => \u2018N\u2019
\n, p_Background_Flag => \u2018N\u2019
\n, p_Initiator => NULL
\n, p_xml_flag => NULL
\n, FpdsngFlag => \u2018N\u2019
\n, p_source_type_code => NULL);
\ncommit;<\/p>\n

DBMS_OUTPUT.PUT_LINE (\u2018The PO which is Approved Now =>\u2019 p_rec.segment1);
\nEND LOOP;
\nEND;<\/p>\n

\u2014 R12 \u2013 PO \u2013 SAMPLE SCRIPT TO APPROVE BLANKET PURCHASE AGREEMENT<\/strong><\/span><\/p>\n

DECLARE<\/p>\n

v_item_key VARCHAR2(100);<\/p>\n

Cursor c_po_details is
\nSELECT
\npha.po_header_id,
\npha.org_id,
\npha.segment1,
\npha.agent_id,
\npdt.document_subtype,
\npdt.document_type_code,
\npha.authorization_status,
\npha.approved_flag,
\npha.wf_item_type,
\npha.wf_item_key
\nFROM apps.po_headers_all pha, apps.po_document_types_all pdt
\nWHERE pha.type_lookup_code = pdt.document_subtype
\nAND pha.org_id = pdt.org_id
\nAND pdt.document_type_code = \u2018PA\u2019
\nAND authorization_status in (\u2018INCOMPLETE\u2019, \u2018REQUIRES REAPPROVAL\u2019)
\nAND segment1 = \u201811170000021\u2019; \u2014 Enter the BPA Number<\/p>\n

BEGIN<\/p>\n

fnd_global.apps_initialize (user_id => 2083,
\nresp_id => 20707,
\nresp_appl_id => 201);<\/p>\n

FOR p_rec IN c_po_details<\/p>\n

LOOP
\nmo_global.init (\u2018PO\u2019);
\nmo_global.set_policy_context (\u2018S\u2019, p_rec.org_id);<\/p>\n

SELECT p_rec.po_header_id \u2018-\u2018 to_char(po_wf_itemkey_s.NEXTVAL)
\nINTO v_item_key FROM dual;<\/p>\n

dbms_output.put_line (\u2018Calling po_reqapproval_init1.start_wf_process for po_id=>\u2019 p_rec.segment1);<\/p>\n

po_reqapproval_init1.start_wf_process(
\nItemType => \u2018POAPPRV\u2019
\n, ItemKey => v_item_key
\n, WorkflowProcess => \u2018POAPPRV_TOP\u2019
\n, ActionOriginatedFrom => \u2018PO_FORM\u2019
\n, DocumentID => p_rec.po_header_id \u2014 po_header_id
\n, DocumentNumber => p_rec.segment1 \u2014 Purchase Order Number
\n, PreparerID => p_rec.agent_id \u2014 Buer\/Preparer_id
\n, DocumentTypeCode => p_rec.document_type_code\u2013\u2018PA\u2019
\n, DocumentSubtype => p_rec.document_subtype \u2013\u2018BLANKET\u2019
\n, SubmitterAction => \u2018APPROVE\u2019
\n, forwardToID => NULL
\n, forwardFromID => NULL
\n, DefaultApprovalPathID => NULL
\n, Note => NULL
\n, PrintFlag => \u2018N\u2019
\n, FaxFlag => \u2018N\u2019
\n, FaxNumber => NULL
\n, EmailFlag => \u2018N\u2019
\n, EmailAddress => NULL
\n, CreateSourcingRule => \u2018N\u2019
\n, ReleaseGenMethod => \u2018N\u2019
\n, UpdateSourcingRule => \u2018N\u2019
\n, MassUpdateReleases => \u2018N\u2019
\n, RetroactivePriceChange => \u2018N\u2019
\n, OrgAssignChange => \u2018N\u2019
\n, CommunicatePriceChange => \u2018N\u2019
\n, p_Background_Flag => \u2018N\u2019
\n, p_Initiator => NULL
\n, p_xml_flag => NULL
\n, FpdsngFlag => \u2018N\u2019
\n, p_source_type_code => NULL);
\ncommit;
\ndbms_output.put_line (\u2018The BPA which is Approved Now =>\u2019 p_rec.segment1);<\/p>\n

END LOOP;
\nEND;<\/p>\n

\u2014 R12 \u2013 PO \u2013 SAMPLE SCRIPT TO APPROVE PURCHASE REQUISITION<\/strong><\/span><\/p>\n

DECLARE<\/p>\n

v_item_key VARCHAR2(100);<\/p>\n

Cursor c_req_details is<\/p>\n

SELECT
\nprh.requisition_header_id,
\nprh.org_id,
\nprh.preparer_id,
\nprh.segment1,
\npdt.document_subtype,
\npdt.document_type_code,
\nprh.authorization_status
\nFROM apps.po_requisition_headers_all prh, apps.po_document_types_all pdt
\nWHERE prh.type_lookup_code = pdt.document_subtype
\nAND prh.org_id = pdt.org_id
\nAND pdt.document_type_code = \u2018REQUISITION\u2019
\nAND NVL (authorization_status, \u2018INCOMPLETE\u2019) = \u2018INCOMPLETE\u2019
\nAND segment1 = \u201821170000200\u2019; \u2014 Enter The Requisition Number
\nBEGIN<\/p>\n

fnd_global.apps_initialize (user_id => 1805,
\nresp_id => 20707,
\nresp_appl_id => 201);<\/p>\n

FOR p_rec IN c_req_details<\/p>\n

LOOP<\/p>\n

mo_global.init (\u2018PO\u2019);
\nmo_global.set_policy_context (\u2018S\u2019, p_rec.org_id);<\/p>\n

SELECT p_rec.requisition_header_id \u2018-\u2018 to_char(po_wf_itemkey_s.NEXTVAL)
\nINTO v_item_key FROM dual;<\/p>\n

dbms_output.put_line (\u2018 Calling po_reqapproval_init1.start_wf_process for requisition =>\u2019 p_rec.segment1);<\/p>\n

po_reqapproval_init1.start_wf_process(
\nItemType => NULL
\n, ItemKey => v_item_key
\n, WorkflowProcess => \u2018POAPPRV_TOP\u2019
\n, ActionOriginatedFrom => \u2018PO_FORM\u2019
\n, DocumentID => p_rec.requisition_header_id \u2014 requisition_header_id
\n, DocumentNumber => p_rec.segment1 \u2014 Requisition Number
\n, PreparerID => p_rec.preparer_id
\n, DocumentTypeCode => p_rec.document_type_code\u2013 REQUISITION
\n, DocumentSubtype => p_rec.document_subtype \u2014 PURCHASE
\n, SubmitterAction => \u2018APPROVE\u2019
\n, forwardToID => NULL
\n, forwardFromID => NULL
\n, DefaultApprovalPathID => NULL
\n, Note => NULL
\n, PrintFlag => \u2018N\u2019
\n, FaxFlag => \u2018N\u2019
\n, FaxNumber => NULL
\n, EmailFlag => \u2018N\u2019
\n, EmailAddress => NULL
\n, CreateSourcingRule => \u2018N\u2019
\n, ReleaseGenMethod => \u2018N\u2019
\n, UpdateSourcingRule => \u2018N\u2019
\n, MassUpdateReleases => \u2018N\u2019
\n, RetroactivePriceChange => \u2018N\u2019
\n, OrgAssignChange => \u2018N\u2019
\n, CommunicatePriceChange => \u2018N\u2019
\n, p_Background_Flag => \u2018N\u2019
\n, p_Initiator => NULL
\n, p_xml_flag => NULL
\n, FpdsngFlag => \u2018N\u2019
\n, p_source_type_code => NULL);<\/p>\n

commit;<\/p>\n

dbms_output.put_line (\u2018The Requisition which is Approved =>\u2019 p_rec.segment1);
\nEND LOOP;
\nEND;<\/HTML><\/HTML><\/p>\n","protected":false},"excerpt":{"rendered":"

PO_REQAPPROVAL_INIT1.START_WF_PROCESS \u00a0–\u00a0API para Aprovar Ordens de Compra, Contratos de Compra Geral e Requisi\u00e7\u00e3o de Compra … Algumas vezes, estamos nos perguntando o que exatamente a… <\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[29,127],"tags":[],"class_list":["post-15650","post","type-post","status-publish","format-standard","hentry","category-base-de-conhecimentos","category-applications"],"_links":{"self":[{"href":"https:\/\/orabr.virttus.com\/index.php?rest_route=\/wp\/v2\/posts\/15650","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/orabr.virttus.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/orabr.virttus.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/orabr.virttus.com\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/orabr.virttus.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=15650"}],"version-history":[{"count":1,"href":"https:\/\/orabr.virttus.com\/index.php?rest_route=\/wp\/v2\/posts\/15650\/revisions"}],"predecessor-version":[{"id":15651,"href":"https:\/\/orabr.virttus.com\/index.php?rest_route=\/wp\/v2\/posts\/15650\/revisions\/15651"}],"wp:attachment":[{"href":"https:\/\/orabr.virttus.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=15650"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/orabr.virttus.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=15650"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/orabr.virttus.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=15650"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}