DBA Data[Home] [Help]

PACKAGE: APPS.PO_PDOI_POSTPROC_PVT

Source


1 PACKAGE PO_PDOI_POSTPROC_PVT AUTHID CURRENT_USER AS
2 /* $Header: PO_PDOI_POSTPROC_PVT.pls 120.5.12020000.3 2013/02/11 00:01:47 vegajula ship $ */
3 
4 
5 CURSOR c_doc IS
6   SELECT PHI.interface_header_id                   INTERFACE_HEADER_ID,
7          DFT.document_id                           PO_HEADER_ID,
8          PHI.action                                ACTION,
9          PHI.draft_id                              DRAFT_ID,
10          PHI.approval_status                       INTF_AUTH_STATUS,
11          PHI.effective_date                        INTF_START_DATE,
12          PHI.load_sourcing_rules_flag              LOAD_SOURCING_RULES_FLAG,
13          DECODE(POH.type_lookup_code,
14                 'QUOTATION', POH.status_lookup_code,
15                 POH.authorization_status)          ORIG_AUTH_STATUS,
16          POH.conterms_exist_flag                   ORIG_CONTERMS_EXIST_FLAG,
17          POH.user_hold_flag                        ORIG_USER_HOLD_FLAG,
18          PHI.original_po_header_id                 ORIG_PO_HEADER_ID,
19          -- CLM Partial Funding Changes
20          PHI.PO_HEADER_ID                          PHI_PO_HEADER_ID,
21          COALESCE(PHDA.global_agreement_flag,
22                   POH.global_agreement_flag, 'N')  GA_FLAG,
23          NVL(PHDA.agent_id,
24              POH.agent_id)                         AGENT_ID,
25          NVL(PHDA.encumbrance_required_flag,
26              POH.encumbrance_required_flag)        ENCUMBRANCE_REQUIRED_FLAG,
27          NVL(PHDA.conterms_exist_flag,
28              POH.conterms_exist_flag)              CONTERMS_EXIST_FLAG,
29          NVL(PHDA.type_lookup_code,
30              POH.type_lookup_code)                 DOCUMENT_TYPE,
31          NVL(PHDA.quote_type_lookup_code,
32              POH.quote_type_lookup_code)           DOCUMENT_SUBTYPE,
33          NVL(PHDA.segment1,
34              POH.segment1)                         DOCUMENT_NUM,
35          NVL(PHDA.vendor_id,
36              POH.vendor_id)                        VENDOR_ID,
37          NVL(PV1.vendor_name,
38              PV2.vendor_name)                      VENDOR_NAME,
39          NVL2(PHI.document_num, 'Y', 'N')          DOC_NUM_PROVIDED,  --bug5028275
40          PHDA.clm_source_document_id               CLM_SOURCE_DOCUMENT_ID, --CLM PDOI Integration
41 		 phda.style_id                             STYLE_ID --CLM PDOI Integration
42   FROM po_headers_interface PHI,
43        po_headers_draft_all PHDA,
44        po_headers_all       POH,
45        po_drafts            DFT,
46        po_vendors           PV1,
47        po_vendors           PV2
48   WHERE  PHI.draft_id     = DFT.draft_id
49   AND    DFT.draft_id     = PHDA.draft_id(+)
50   AND    DFT.document_id  = PHDA.po_header_id(+)
51   AND    PHDA.vendor_id   = PV1.vendor_id(+)
52   AND    DFT.document_id  = POH.po_header_id(+)
53   AND    POH.vendor_id    = PV2.vendor_id(+)
54   AND    PHI.processing_id = PO_PDOI_PARAMS.g_processing_id
55   AND    PHI.processing_round_num = PO_PDOI_PARAMS.g_current_round_num;
56 
57 SUBTYPE doc_row_type IS c_doc%ROWTYPE;
58 
59 TYPE src_rule_lines_rec_type IS RECORD
60 ( po_line_id_tbl         PO_TBL_NUMBER,
61   item_id_tbl            PO_TBL_NUMBER,
62   category_id_tbl        PO_TBL_NUMBER,
63   interface_line_id_tbl  PO_TBL_NUMBER,
64   sourcing_rule_name_tbl PO_TBL_VARCHAR60,
65   effective_date_tbl     PO_TBL_DATE,
66   expiration_date_tbl    PO_TBL_DATE
67 );
68 
69 PROCEDURE process;
70 
71 END PO_PDOI_POSTPROC_PVT;