[Home] [Help]
PACKAGE: APPS.PO_CO_TOLERANCES_GRP
Source
1 PACKAGE PO_CO_TOLERANCES_GRP AS
2 /* $Header: PO_CO_TOLERANCES_GRP.pls 120.4.12010000.2 2008/11/03 10:14:59 rojain ship $ */
3
4 --<R12 REQUESTER DRIVEN PROCUREMENT START>
5 -------------------------------------------------------------------
6 --GLOBAL VARIABLES: Change Order Type
7 --
8 --DESCRIPTION : These variables correspond to the Tolerances
9 -- Change order type lookup codes
10 --
11 --CHANGE History: Created SVASAMSE
12 -------------------------------------------------------------------
13 -- For Supplier Change Order Tolerances
14 G_SUPP_CHG_APP CONSTANT VARCHAR2(20) := 'SCO';
15
16 -- For iP, Requisition Change Auto-Approval Tolerances
17 G_RCO_REQ_APP CONSTANT VARCHAR2(20) := 'RCO_REQ_APP';
18
19 -- For iP, Buyer Auto-Approval Tolerances
20 -- This includes the Routing flag
21 G_RCO_BUY_APP CONSTANT VARCHAR2(20) := 'RCO_BUYER_APP';
22
23 -- For iP, Internal Requisition Change Auto-Approval Tolerances
24 G_RCO_INT_REQ_APP CONSTANT VARCHAR2(20) := 'RCO_INT_REQ_APP';
25
26 -- For PO
27 G_CHG_AGREEMENTS CONSTANT VARCHAR2(20) := 'CO_AGREEMENTS';
28 G_CHG_RELEASES CONSTANT VARCHAR2(20) := 'CO_RELEASES';
29 G_CHG_ORDERS CONSTANT VARCHAR2(20) := 'CO_ORDERS';
30
31
32 -------------------------------------------------------------------
33 --GLOBAL VARIABLES: Tolerances
34 --
35 --DESCRIPTION : These variables correspond to the Tolerance names
36 -- lookup codes.
37 --
38 --CHANGE History: Created SVASAMSE
39 -------------------------------------------------------------------
40 G_DOCUMENT_AMOUNT_VALUE CONSTANT VARCHAR2(40) := 'DOCUMENT_AMOUNT_VALUE';
41 G_DOCUMENT_AMOUNT_PERCENT CONSTANT VARCHAR2(40) := 'DOCUMENT_AMOUNT_PERCENT';
42
43 G_REQUISITION_AMOUNT_VALUE CONSTANT VARCHAR2(40) := 'REQUISITION_AMOUNT_VALUE';
44 G_REQUISITION_AMOUNT_PERCENT CONSTANT VARCHAR2(40) := 'REQUISITION_AMOUNT_PERCENT';
45
46 G_LINE_AMOUNT_VALUE CONSTANT VARCHAR2(40) := 'LINE_AMOUNT_VALUE';
47 G_LINE_AMOUNT_PERCENT CONSTANT VARCHAR2(40) := 'LINE_AMOUNT_PERCENT';
48
49 G_REQ_LINE_AMOUNT_VALUE CONSTANT VARCHAR2(40) := 'REQ_LINE_AMOUNT_VALUE';
50 G_REQ_LINE_AMOUNT_PERCENT CONSTANT VARCHAR2(40) := 'REQ_LINE_AMOUNT_PERCENT';
51
52 G_SHIPMENT_AMOUNT_VALUE CONSTANT VARCHAR2(40) := 'SHIPMENT_AMOUNT_VALUE';
53 G_SHIPMENT_AMOUNT_PERCENT CONSTANT VARCHAR2(40) := 'SHIPMENT_AMOUNT_PERCENT';
54 G_PAY_ITEM_AMOUNT_VALUE CONSTANT VARCHAR2(40) := 'PAY_ITEM_AMOUNT_VALUE'; -- <Complex Work R12>
55 G_PAY_ITEM_AMOUNT_PERCENT CONSTANT VARCHAR2(40) := 'PAY_ITEM_AMOUNT_PERCENT'; -- <Complex Work R12>
56
57
58
59 G_DISTRIBUTION_AMOUNT_PERCENT CONSTANT VARCHAR2(40) := 'DISTRIBUTION_AMOUNT_PERCENT';
60
61 G_UNIT_PRICE CONSTANT VARCHAR2(40) := 'UNIT_PRICE';
62 G_SHIPMENT_PRICE CONSTANT VARCHAR2(40) := 'SHIPMENT_PRICE';
63 G_PAY_ITEM_PRICE CONSTANT VARCHAR2(40) := 'PAY_ITEM_PRICE'; -- <Complex Work R12>
64 G_PRC_BRK_PRICE CONSTANT VARCHAR2(40) := 'PRC_BRK_PRICE';
65 G_PRC_BRK_QTY CONSTANT VARCHAR2(40) := 'PRC_BRK_QTY';
66 G_PRICE_LIMIT CONSTANT VARCHAR2(40) := 'PRICE_LIMIT';
67 G_HEADER_AMOUNT_AGREED CONSTANT VARCHAR2(40) := 'HEADER_AMOUNT_AGREED';
68 G_HEADER_AMOUNT_LIMIT CONSTANT VARCHAR2(40) := 'HEADER_AMOUNT_LIMIT';
69 G_PO_AMOUNT CONSTANT VARCHAR2(40) := 'PO_AMOUNT';
70 G_LINE_QTY_AGREED CONSTANT VARCHAR2(40) := 'LINE_QTY_AGREED';
71 G_LINE_AMOUNT_AGREED CONSTANT VARCHAR2(40) := 'LINE_AMOUNT_AGREED';
72
73 G_SHIPMENT_QTY CONSTANT VARCHAR2(40) := 'SHIPMENT_QTY';
74 G_PAY_ITEM_QTY CONSTANT VARCHAR2(40) := 'PAY_ITEM_QTY'; -- <Complex Work R12>
75 G_LINE_QTY CONSTANT VARCHAR2(40) := 'LINE_QTY';
76 G_REQUISITION_LINE_QTY CONSTANT VARCHAR2(40) := 'REQUISITION_LINE_QTY';
77 G_DISTRIBUTION_QTY CONSTANT VARCHAR2(40) := 'DISTRIBUTION_QTY';
78
79 G_START_DATE CONSTANT VARCHAR2(40) := 'START_DATE';
80 G_END_DATE CONSTANT VARCHAR2(40) := 'END_DATE';
81 G_NEED_BY_DATE CONSTANT VARCHAR2(40) := 'NEED_BY_DATE';
82 G_PROMISED_DATE CONSTANT VARCHAR2(40) := 'PROMISED_DATE';
83
84 -- For iP, routing flag
85 G_RCO_BUYER_APPROVAL_FLAG CONSTANT VARCHAR2(40) := 'RCO_ROUTING';
86
87 -- For SCO, routing flags
88 G_PROMISED_DATE_APPROVAL_FLAG CONSTANT VARCHAR2(40) := 'PROMISED_DATE_APPROVAL';
89 G_SHIPMENT_QTY_APPROVAL_FLAG CONSTANT VARCHAR2(40) := 'SHIPMENT_QTY_APPROVAL';
90 G_PRICE_APPROVAL_FLAG CONSTANT VARCHAR2(40) := 'PRICE_APPROVAL';
91
92 -------------------------------------------------------------------
93 --GLOBAL VARIABLES: PL/SQL Table
94 --
95 --DESCRIPTION : Tolerances table used to store the data retrieved
96 --
97 --CHANGE History: Created SVASAMSE
98 -------------------------------------------------------------------
99 -- Record used in retrieving the max increment and max decrecment values
100 TYPE tolerances_rec_type IS RECORD (
101 TOLERANCE_NAME VARCHAR2(30),
102 MAX_INCREMENT NUMBER,
103 MAX_DECREMENT NUMBER,
104 ENABLED_FLAG VARCHAR2(1)
105 );
106
107 -- Table of the tolerances record
108 TYPE tolerances_tbl_type IS TABLE OF tolerances_rec_type INDEX BY BINARY_INTEGER;
109
110 ------------------------------------------------------------------------------
111 --Start of Comments
112 --Name: GET_TOLERANCES
113 --Pre-reqs:
114 -- None
115 --Modifies:
116 -- None
117 --Locks:
118 -- None
119 --Function:
120 -- 1. This procedure will retrieve the tolerances of a
121 -- given change order type and operating unit.
122 --Parameters:
123 --IN:
124 -- p_api_version
125 -- Used to determine compatibility of API and calling program
126 -- p_init_msg_list
127 -- True/False parameter to initialize message list
128 -- p_organization_id
129 -- Operating Unit Id
130 -- p_change_order_type
131 -- Change Order Type for which the tolerances should be retrieved.
132 --OUT:
133 -- x_tolerances_tbl
134 -- Table containing the tolerances and their values
135 -- x_return_status
136 -- The standard OUT parameter giving return status of the API call.
137 -- FND_API.G_RET_STS_ERROR - for expected error
138 -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
139 -- FND_API.G_RET_STS_SUCCESS - for success
140 -- x_msg_count
141 -- The count of number of messages added to the message list in this call
142 -- x_msg_data
143 -- If the count is 1 then x_msg_data contains the message returned
144 --End of Comment
145 -------------------------------------------------------------------------------
146 procedure GET_TOLERANCES(p_api_version IN NUMBER,
147 p_init_msg_list IN VARCHAR2,
148 p_organization_id IN NUMBER,
149 p_change_order_type IN VARCHAR2,
150 x_tolerances_tbl IN OUT NOCOPY tolerances_tbl_type,
151 x_return_status OUT NOCOPY VARCHAR2,
152 x_msg_count OUT NOCOPY NUMBER,
153 x_msg_data OUT NOCOPY VARCHAR2);
154
155 --<R12 REQUESTER DRIVEN PROCUREMENT END>
156
157 END;