eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE: APPS.PO_ADVANCED_PRICE_PVT

Source


1 PACKAGE PO_ADVANCED_PRICE_PVT AUTHID CURRENT_USER AS
2 /* $Header: POXQPRVS.pls 120.5.12010000.4 2009/06/26 14:33:50 ababujan ship $*/
3 
4 
5   g_NO_VALID_PERIOD_EXC EXCEPTION;
6   g_SUBMISSION_CHECK_EXC EXCEPTION;
7 
8 -------------------------------------------------------------------------------
9 -- Package types
10 -------------------------------------------------------------------------------
11 -- Header record type
12   TYPE Header_Rec_Type IS RECORD
13   (org_id PO_HEADERS.org_id%TYPE
14    , p_order_header_id PO_HEADERS.po_header_id%TYPE
15    , supplier_id PO_HEADERS.vendor_id%TYPE
16    , supplier_site_id PO_HEADERS.vendor_site_id%TYPE
17    , creation_date PO_HEADERS.creation_date%TYPE
18    , order_type VARCHAR2(20) -- REQUISITION/PO
19    , ship_to_location_id PO_HEADERS.ship_to_location_id%TYPE
20    , ship_to_org_id PO_HEADERS.org_id%TYPE
21 -- New Attributes for Receiving
22 -- <FSC R12 START>
23    , shipment_header_id RCV_SHIPMENT_HEADERS.shipment_header_id%TYPE
24    , hazard_class RCV_SHIPMENT_HEADERS.hazard_class%TYPE
25    , hazard_code RCV_SHIPMENT_HEADERS.hazard_code%TYPE
26    , shipped_date RCV_SHIPMENT_HEADERS.shipped_date%TYPE
27    , shipment_num RCV_SHIPMENT_HEADERS.shipment_num%TYPE
28    , carrier_method RCV_SHIPMENT_HEADERS.carrier_method%TYPE
29    , packaging_code RCV_SHIPMENT_HEADERS.packaging_code%TYPE
30    , freight_carrier_code RCV_SHIPMENT_HEADERS.freight_carrier_code%TYPE
31    , freight_terms RCV_SHIPMENT_HEADERS.freight_terms%TYPE
32    , currency_code RCV_SHIPMENT_HEADERS.currency_code%TYPE
33    , rate RCV_SHIPMENT_HEADERS.conversion_rate%TYPE
34    , rate_type RCV_SHIPMENT_HEADERS.conversion_rate_type%TYPE
35    , source_org_id RCV_SHIPMENT_HEADERS.organization_id%TYPE
36    , expected_receipt_date RCV_SHIPMENT_HEADERS.expected_receipt_date%TYPE
37 --  <FSC R12 END>
38    );
39 
40 --  Line record type
41   TYPE Line_Rec_Type IS RECORD
42   (order_line_id PO_LINES.po_line_id%TYPE
43    , agreement_type PO_HEADERS.type_lookup_code%TYPE
44    , agreement_id PO_HEADERS.po_header_id%TYPE
45    , agreement_line_id PO_LINES.po_line_id%TYPE --<R12 GBPA Adv Pricing>
46    , supplier_id PO_HEADERS.vendor_id%TYPE
47    , supplier_site_id PO_HEADERS.vendor_site_id%TYPE
48    , ship_to_location_id PO_LINE_LOCATIONS.ship_to_location_id%TYPE
49    , ship_to_org_id PO_LINE_LOCATIONS.ship_to_organization_id%TYPE
50    , supplier_item_num PO_LINES.vendor_product_num%TYPE
51    , item_revision PO_LINES.item_revision%TYPE
52    , item_id PO_LINES.item_id%TYPE
53    , category_id PO_LINES.category_id%TYPE
54    , rate PO_HEADERS.rate%TYPE
55    , rate_type PO_HEADERS.rate_type%TYPE
56    , currency_code PO_HEADERS.currency_code%TYPE
57    , need_by_date PO_LINE_LOCATIONS.need_by_date%TYPE
58 -- <FSC R12 START>
59 -- New Attributes for Receiving
60    , shipment_line_id RCV_SHIPMENT_LINES.shipment_line_id%TYPE
61    , primary_unit_of_measure RCV_SHIPMENT_LINES.primary_unit_of_measure%TYPE
62    , to_organization_id RCV_SHIPMENT_LINES.to_organization_id%TYPE
63    , unit_of_measure RCV_SHIPMENT_LINES.unit_of_measure%TYPE
64    , source_document_code RCV_SHIPMENT_LINES.source_document_code%TYPE
65    , unit_price RCV_SHIPMENT_LINES.shipment_unit_price%TYPE
66    , quantity RCV_SHIPMENT_LINES.quantity_received%TYPE
67    , order_type VARCHAR2(20) DEFAULT NULL-- REQUISITION/PO/GBPA --added for Enhanced Pricing
68 --  <FSC R12 END>
69    );
70 
71 -- <FSC R12 START>
72 -- QP Result Record to capture information returned by QP.
73 -- Record to keep the freight charge info per line
74   TYPE Freight_Charges_Rec_Type IS RECORD
75   (
76    charge_type_code QP_PREQ_LDETS_TMP_T.charge_type_code%TYPE,
77    freight_charge QP_PREQ_LDETS_TMP_T.ORDER_QTY_ADJ_AMT%TYPE,
78    pricing_status_code QP_PREQ_LDETS_TMP_T.pricing_status_code%TYPE,
79    pricing_status_text QP_PREQ_LDETS_TMP_T.pricing_status_text%TYPE
80    );
81 
82   TYPE Freight_Charges_Rec_Tbl_Type IS TABLE OF Freight_Charges_Rec_Type;
83 
84 --Record to keep the price/charge info per line.
85   TYPE Qp_Price_Result_Rec_Type IS RECORD
86   (
87    line_index QP_PREQ_LDETS_TMP_T.line_index%TYPE,
88    line_id NUMBER,
89    base_unit_price NUMBER,
90    adjusted_price NUMBER,
91    freight_charge_rec_tbl freight_charges_rec_tbl_type,
92    pricing_status_code QP_PREQ_LDETS_TMP_T.pricing_status_code%TYPE,
93    pricing_status_text QP_PREQ_LDETS_TMP_T.pricing_status_text%TYPE
94    );
95 
96   TYPE Qp_Price_Result_Rec_Tbl_Type IS TABLE OF Qp_Price_Result_Rec_Type;
97 
98   TYPE Line_Tbl_Type IS TABLE OF Line_Rec_Type;
99 -- <FSC R12 END>
100 -------------------------------------------------------------------------------
101 -- Global package variables
102 -------------------------------------------------------------------------------
103 
104 --Global Variables for Attribute Mapping during Pricing
105   G_HDR Header_Rec_Type;
106   G_LINE Line_Rec_Type;
107 
108 -------------------------------------------------------------------------------
109 -- Package procedures
110 -------------------------------------------------------------------------------
111 
112   PROCEDURE get_advanced_price
113   (p_org_id IN NUMBER
114    , p_supplier_id IN NUMBER
115    , p_supplier_site_id IN NUMBER
116    , p_creation_date IN DATE
117    , p_order_type IN VARCHAR2
118    , p_ship_to_location_id IN NUMBER
119    , p_ship_to_org_id IN NUMBER
120    , p_order_header_id IN NUMBER
121    , p_order_line_id IN NUMBER
122    , p_item_revision IN VARCHAR2 -- Bug 3330884
123    , p_item_id IN NUMBER
124    , p_category_id IN NUMBER
125    , p_supplier_item_num IN VARCHAR2
126    , p_agreement_type IN VARCHAR2
127    , p_agreement_id IN NUMBER
128    , p_agreement_line_id IN NUMBER DEFAULT NULL --<R12 GBPA Adv Pricing>
129    , p_rate IN NUMBER
130    , p_rate_type IN VARCHAR2
131    , p_currency_code IN VARCHAR2
132    , p_need_by_date IN DATE
133    , p_quantity IN NUMBER
134    , p_uom IN VARCHAR2
135    , p_unit_price IN NUMBER
136    --<Enhanced Pricing Start>
137    , p_draft_id IN NUMBER DEFAULT NULL
138     --Bug:8598002 renamed p_retro_pricing to p_pricing_call_src, to distinguish calls from retro and auto creation
139    , p_pricing_call_src IN VARCHAR2 DEFAULT NULL --parameter to identify calls from retro and auto creation
140    --<Enhanced Pricing End>
141    , x_base_unit_price OUT NOCOPY NUMBER
142    , x_unit_price OUT NOCOPY NUMBER
143    , x_return_status OUT NOCOPY VARCHAR2
144    );
145 
146 
147   FUNCTION is_valid_qp_line_type
148   (p_line_type_id IN NUMBER
149    ) RETURN BOOLEAN;
150 
151   -- <FSC R12 START>
152   PROCEDURE get_advanced_price
153     (p_header_rec IN Header_Rec_Type
154     , p_line_rec_tbl IN Line_Tbl_Type
155     , p_request_type IN VARCHAR2
156     , p_pricing_event IN VARCHAR2
157     , p_has_header_pricing IN BOOLEAN
158     , p_return_price_flag IN BOOLEAN
159     , p_return_freight_flag IN BOOLEAN
160     , x_price_tbl OUT NOCOPY Qp_Price_Result_Rec_Tbl_Type
161     , x_return_status OUT NOCOPY VARCHAR2);
162   -- <FSC R12 END>
163 
164   --<Enhanced Pricing Start:>
165   PROCEDURE call_pricing_manual_modifier
166     (p_org_id IN NUMBER
167     , p_supplier_id IN NUMBER
168     , p_supplier_site_id IN NUMBER
169     , p_creation_date IN DATE
170     , p_order_type IN VARCHAR2
171     , p_ship_to_location_id IN NUMBER
172     , p_ship_to_org_id IN NUMBER
173     , p_order_header_id IN NUMBER
174     , p_order_line_id IN NUMBER
175     , p_item_revision IN VARCHAR2
176     , p_item_id IN NUMBER
177     , p_category_id IN NUMBER
178     , p_supplier_item_num IN VARCHAR2
179     , p_agreement_type IN VARCHAR2
180     , p_agreement_id IN NUMBER
181     , p_agreement_line_id IN NUMBER DEFAULT NULL --<R12 GBPA Adv Pricing>
182     , p_rate IN NUMBER
183     , p_rate_type IN VARCHAR2
184     , p_currency_code IN VARCHAR2
185     , p_need_by_date IN DATE
186     , p_quantity IN NUMBER
187     , p_uom IN VARCHAR2
188     , p_unit_price IN NUMBER
189     , x_return_status OUT NOCOPY VARCHAR2
190     );
191   --<Enhanced Pricing End>
192 
193 END PO_ADVANCED_PRICE_PVT;