DBA Data[Home] [Help]

PACKAGE: APPS.OE_LINE_ADJ_UTIL

Source


1 PACKAGE OE_Line_Adj_Util AUTHID CURRENT_USER AS
2 /* $Header: OEXULADS.pls 120.2.12020000.1 2012/06/26 09:36:15 appldev ship $ */
3 
4 --  Attributes global constants
5 G_ATTRIBUTE1                  CONSTANT NUMBER := 1;
6 G_ATTRIBUTE10                 CONSTANT NUMBER := 2;
7 G_ATTRIBUTE11                 CONSTANT NUMBER := 3;
8 G_ATTRIBUTE12                 CONSTANT NUMBER := 4;
9 G_ATTRIBUTE13                 CONSTANT NUMBER := 5;
10 G_ATTRIBUTE14                 CONSTANT NUMBER := 6;
11 G_ATTRIBUTE15                 CONSTANT NUMBER := 7;
12 G_ATTRIBUTE2                  CONSTANT NUMBER := 8;
13 G_ATTRIBUTE3                  CONSTANT NUMBER := 9;
14 G_ATTRIBUTE4                  CONSTANT NUMBER := 10;
15 G_ATTRIBUTE5                  CONSTANT NUMBER := 11;
16 G_ATTRIBUTE6                  CONSTANT NUMBER := 12;
17 G_ATTRIBUTE7                  CONSTANT NUMBER := 13;
18 G_ATTRIBUTE8                  CONSTANT NUMBER := 14;
19 G_ATTRIBUTE9                  CONSTANT NUMBER := 15;
20 G_AUTOMATIC                   CONSTANT NUMBER := 16;
21 G_CONTEXT                     CONSTANT NUMBER := 17;
22 G_CREATED_BY                  CONSTANT NUMBER := 18;
23 G_CREATION_DATE               CONSTANT NUMBER := 19;
24 G_DISCOUNT                    CONSTANT NUMBER := 20;
25 G_DISCOUNT_LINE               CONSTANT NUMBER := 21;
26 G_HEADER                      CONSTANT NUMBER := 22;
27 G_LAST_UPDATED_BY             CONSTANT NUMBER := 23;
28 G_LAST_UPDATE_DATE            CONSTANT NUMBER := 24;
29 G_LAST_UPDATE_LOGIN           CONSTANT NUMBER := 25;
30 G_LINE                        CONSTANT NUMBER := 26;
31 G_PERCENT                     CONSTANT NUMBER := 27;
32 G_PRICE_ADJUSTMENT            CONSTANT NUMBER := 28;
33 G_PROGRAM_APPLICATION         CONSTANT NUMBER := 29;
34 G_PROGRAM                     CONSTANT NUMBER := 30;
35 G_PROGRAM_UPDATE_DATE         CONSTANT NUMBER := 31;
36 G_REQUEST                     CONSTANT NUMBER := 32;
37 G_ORIG_SYS_DISCOUNT_REF       CONSTANT NUMBER := 33;
38 G_CHANGE_SEQUENCE_ID          CONSTANT NUMBER := 34;
39 G_MAX_ATTR_ID                 CONSTANT NUMBER := 35;
40 
41 G_LIST_HEADER_ID		CONSTANT NUMBER := 36;
42 G_LIST_LINE_ID		     CONSTANT NUMBER := 37;
43 G_LIST_LINE_TYPE_CODE	CONSTANT NUMBER := 38;
44 G_MODIFIER_MECHANISM_TYPE_CODE CONSTANT NUMBER := 39;
45 G_MODIFIED_FROM		CONSTANT	NUMBER := 40;
46 G_MODIFIED_TO			CONSTANT	NUMBER := 41;
47 G_UPDATED_FLAG			CONSTANT	NUMBER := 42;
48 G_UPDATE_ALLOWED		CONSTANT	NUMBER := 43;
49 G_APPLIED_FLAG			CONSTANT	NUMBER := 44;
50 G_CHANGE_REASON_CODE	CONSTANT  NUMBER := 45;
51 G_CHANGE_REASON_TEXT	CONSTANT	NUMBER := 46;
52 G_OPERAND				CONSTANT	NUMBER := 47;
53 G_ARITHMETIC_OPERATOR	CONSTANT	NUMBER := 48;
54 G_COST_ID	               CONSTANT	NUMBER := 49;
55 G_TAX_CODE	          CONSTANT	NUMBER := 50;
56 G_TAX_EXEMPT_FLAG	     CONSTANT	NUMBER := 51;
57 G_TAX_EXEMPT_NUMBER	     CONSTANT	NUMBER := 52;
58 G_TAX_EXEMPT_REASON_CODE CONSTANT	NUMBER := 53;
59 G_PARENT_ADJUSTMENT_ID   CONSTANT	NUMBER := 54;
60 G_INVOICED_FLAG          CONSTANT	NUMBER := 55;
61 G_ESTIMATED_FLAG         CONSTANT	NUMBER := 56;
62 G_INC_IN_SALES_PERFORMANCE CONSTANT	NUMBER := 57;
63 G_SPLIT_ACTION_CODE      CONSTANT	NUMBER := 58;
64 G_ADJUSTED_AMOUNT		CONSTANT	NUMBER := 59;
65 G_PRICING_PHASE_ID		CONSTANT	NUMBER := 60;
66 G_CHARGE_TYPE_CODE		CONSTANT	NUMBER := 61;
67 G_CHARGE_SUBTYPE_CODE	CONSTANT	NUMBER := 62;
68 G_LIST_LINE_NO                  CONSTANT  NUMBER := 63;
69 G_SOURCE_SYSTEM_CODE            CONSTANT  NUMBER := 64;
70 G_BENEFIT_QTY                   CONSTANT  NUMBER := 65;
71 G_BENEFIT_UOM_CODE              CONSTANT  NUMBER := 66;
72 G_PRINT_ON_INVOICE_FLAG         CONSTANT  NUMBER := 67;
73 G_EXPIRATION_DATE               CONSTANT  NUMBER := 68;
74 G_REBATE_TRANSACTION_TYPE_CODE  CONSTANT  NUMBER := 69;
75 G_REBATE_TRANSACTION_REFERENCE  CONSTANT  NUMBER := 70;
76 G_REBATE_PAYMENT_SYSTEM_CODE    CONSTANT  NUMBER := 71;
77 G_REDEEMED_DATE                 CONSTANT  NUMBER := 72;
78 G_REDEEMED_FLAG                 CONSTANT  NUMBER := 73;
79 G_ACCRUAL_FLAG                  CONSTANT  NUMBER := 74;
80 G_range_break_quantity          CONSTANT  NUMBER := 75;
81 G_accrual_conversion_rate       CONSTANT  NUMBER := 76;
82 G_pricing_group_sequence		  CONSTANT  NUMBER := 77;
83 G_modifier_level_code		  CONSTANT  NUMBER := 78;
84 G_price_break_type_code		  CONSTANT  NUMBER := 79;
85 G_substitution_attribute		  CONSTANT  NUMBER := 80;
86 G_proration_type_code		  CONSTANT  NUMBER := 81;
87 G_CREDIT_OR_CHARGE_FLAG		  CONSTANT  NUMBER := 82;
88 G_INCLUDE_ON_RETURNS_FLAG	  CONSTANT  NUMBER := 83;
89 G_AC_CONTEXT                    CONSTANT  NUMBER := 84;
90 G_AC_ATTRIBUTE1                 CONSTANT  NUMBER := 85;
91 G_AC_ATTRIBUTE2                 CONSTANT  NUMBER := 86;
92 G_AC_ATTRIBUTE3                 CONSTANT  NUMBER := 87;
93 G_AC_ATTRIBUTE4                 CONSTANT  NUMBER := 88;
94 G_AC_ATTRIBUTE5                 CONSTANT  NUMBER := 89;
95 G_AC_ATTRIBUTE6                 CONSTANT  NUMBER := 90;
96 G_AC_ATTRIBUTE7                 CONSTANT  NUMBER := 91;
97 G_AC_ATTRIBUTE8                 CONSTANT  NUMBER := 92;
98 G_AC_ATTRIBUTE9                 CONSTANT  NUMBER := 93;
99 G_AC_ATTRIBUTE10                CONSTANT  NUMBER := 94;
100 G_AC_ATTRIBUTE11                CONSTANT  NUMBER := 95;
101 G_AC_ATTRIBUTE12                CONSTANT  NUMBER := 96;
102 G_AC_ATTRIBUTE13                CONSTANT  NUMBER := 97;
103 G_AC_ATTRIBUTE14                CONSTANT  NUMBER := 98;
104 G_AC_ATTRIBUTE15                CONSTANT  NUMBER := 99;
105 
106 --Manual begin
107 G_OVERRIDE_ALLOWED_FLAG		CONSTANT NUMBER := 106;
108 --Manual end
109 
110 --uom begin
111 G_OPERAND_PER_PQTY              CONSTANT  NUMBER :=107;
112 G_ADJUSTED_AMOUNT_PER_PQTY      CONSTANT  NUMBER :=108;
113 --uom end
114 G_INVOICED_AMOUNT	        CONSTANT NUMBER := 109;
115 
116 -- eBTax Changes
117 G_TAX_RATE                      CONSTANT NUMBER := 110;
118 
119 --bug 2965218
120 G_SEND_ALL_LINES_FOR_DSP        VARCHAR2(1);
121 G_GROUP_PRICING_DSP             VARCHAR2(1);
122 G_CODE_RELEASE_LEVEL            VARCHAR2(10);
123 G_OPM_ITEM_CATCHWEIGHT_USED     VARCHAR2(1);
124 
125 
126 
127 FUNCTION G_MISS_OE_AK_LINE_ADJ_REC
128 RETURN OE_AK_LINE_PRCADJS_V%ROWTYPE;
129 
130 PROCEDURE API_Rec_To_Rowtype_Rec
131 (   p_LINE_ADJ_rec            IN  OE_Order_PUB.LINE_ADJ_Rec_Type
132 ,   x_rowtype_rec                   OUT nocopy OE_AK_LINE_PRCADJS_V%ROWTYPE
133 );
134 
135 PROCEDURE Rowtype_Rec_To_API_Rec
136 (   p_record                        IN  OE_AK_LINE_PRCADJS_V%ROWTYPE
137 ,   x_api_rec                       IN OUT nocopy OE_Order_PUB.LINE_ADJ_Rec_Type
138 );
139 
140 
141 -- Procedure Clear_Dependent_Attr: Overloaded for VIEW%ROWTYPE parameters
142 
143 PROCEDURE Clear_Dependent_Attr
144 (   p_attr_id                     IN  NUMBER := FND_API.G_MISS_NUM
145 ,   p_x_Line_Adj_rec              IN OUT NOCOPY OE_AK_LINE_PRCADJS_V%ROWTYPE
146 ,   p_old_Line_Adj_rec            IN  OE_AK_LINE_PRCADJS_V%ROWTYPE :=
147 								G_MISS_OE_AK_LINE_ADJ_REC
148 -- ,   x_Line_Adj_rec             OUT nocopy OE_AK_LINE_PRCADJS_V%ROWTYPE
149 );
150 
151 --  Procedure Clear_Dependent_Attr
152 
153 PROCEDURE Clear_Dependent_Attr
154 (   p_attr_id                       IN  NUMBER := FND_API.G_MISS_NUM
155 ,   p_x_Line_Adj_rec                IN  out nocopy OE_Order_PUB.Line_Adj_Rec_Type
156 ,   p_old_Line_Adj_rec              IN  OE_Order_PUB.Line_Adj_Rec_Type :=
157                                         OE_Order_PUB.G_MISS_LINE_ADJ_REC
158 );
159 
160 --  Procedure Apply_Attribute_Changes
161 
162 PROCEDURE Apply_Attribute_Changes
163 (   p_x_Line_Adj_rec                  IN  out nocopy OE_Order_PUB.Line_Adj_Rec_Type
164 ,   p_old_Line_Adj_rec              IN  OE_Order_PUB.Line_Adj_Rec_Type :=
165                                         OE_Order_PUB.G_MISS_LINE_ADJ_REC
166 --,   x_Line_Adj_rec                  OUT OE_Order_PUB.Line_Adj_Rec_Type
167 );
168 
169 -- Procedure Complete_Record
170 
171 PROCEDURE Complete_Record
172 (   p_x_Line_Adj_rec                IN OUT NOCOPY OE_Order_PUB.Line_Adj_Rec_Type
173 ,   p_old_Line_Adj_rec              IN  OE_Order_PUB.Line_Adj_Rec_Type
174 );
175 
176 --  Procedure Convert_Miss_To_Null
177 
178 PROCEDURE Convert_Miss_To_Null
179 (   p_x_Line_Adj_rec                  IN OUT NOCOPY OE_Order_PUB.Line_Adj_Rec_Type
180 );
181 
182 --  Procedure Update_Row
183 
184 PROCEDURE Update_Row
185 (   p_Line_Adj_rec                  IN OUT NOCOPY OE_Order_PUB.Line_Adj_Rec_Type
186 );
187 
188 --  Procedure Insert_Row
189 
190 PROCEDURE Insert_Row
191 (   p_Line_Adj_rec                  IN OUT NOCOPY OE_Order_PUB.Line_Adj_Rec_Type
192 );
193 
194 --  Procedure Delete_Row
195 
196 PROCEDURE Delete_Row
197 (   p_price_adjustment_id           IN  NUMBER :=
198                                         FND_API.G_MISS_NUM
199 ,   p_line_id                       IN  NUMBER :=
200                                         FND_API.G_MISS_NUM
201 );
202 
203 --  Procedure Query_Row
204 
205 PROCEDURE Query_Row
206 (   p_price_adjustment_id           IN  NUMBER
207 ,   x_Line_Adj_Rec				 IN OUT NOCOPY  OE_Order_PUB.Line_Adj_Rec_Type
208 );
209 
210 --  Procedure Query_Rows
211 
212 PROCEDURE Query_Rows
213 (   p_price_adjustment_id          IN  NUMBER :=
214                                        FND_API.G_MISS_NUM
215 ,   p_line_id                      IN  NUMBER :=
216                                        FND_API.G_MISS_NUM
217 ,   p_Header_id                    IN  NUMBER :=
218                                         FND_API.G_MISS_NUM
219 ,   p_Line_Level_Header_id         IN  NUMBER :=
220                                         FND_API.G_MISS_NUM
221 ,   x_Line_Adj_Tbl				IN OUT NOCOPY OE_Order_PUB.Line_Adj_Tbl_Type
222 );
223 
224 --  Procedure       lock_Row
225 
226 PROCEDURE Lock_Row
227 ( x_return_status OUT NOCOPY VARCHAR2
228 
229 ,   p_x_Line_Adj_rec                IN OUT NOCOPY OE_Order_PUB.Line_Adj_Rec_Type
230 ,   p_price_adjustment_id           IN NUMBER
231                                         := FND_API.G_MISS_NUM
232 -- ,   x_Line_Adj_rec                  OUT OE_Order_PUB.Line_Adj_Rec_Type
233 );
234 
235 --  Procedure       lock_Rows
236 PROCEDURE Lock_Rows
237 (   p_price_adjustment_id          IN NUMBER
238                                         := FND_API.G_MISS_NUM
239 ,   p_line_id           			IN NUMBER
240                                         := FND_API.G_MISS_NUM
241 ,   x_Line_Adj_tbl                 OUT NOCOPY OE_Order_PUB.Line_Adj_Tbl_Type
242 , x_return_status OUT NOCOPY VARCHAR2
243 
244 );
245 
246 
247 --  Function Get_Values
248 
249 FUNCTION Get_Values
250 (   p_Line_Adj_rec                  IN  OE_Order_PUB.Line_Adj_Rec_Type
251 ,   p_old_Line_Adj_rec              IN  OE_Order_PUB.Line_Adj_Rec_Type :=
252                                         OE_Order_PUB.G_MISS_LINE_ADJ_REC
253 ) RETURN OE_Order_PUB.Line_Adj_Val_Rec_Type;
254 
255 --  Procedure Get_Ids
256 
257 PROCEDURE Get_Ids
258 (   p_x_Line_Adj_rec                IN OUT NOCOPY OE_Order_PUB.Line_Adj_Rec_Type
259 ,   p_Line_Adj_val_rec              IN  OE_Order_PUB.Line_Adj_Val_Rec_Type
260 );
261 
262 
263 PROCEDURE Log_Adj_Requests
264 ( x_return_status OUT NOCOPY VARCHAR2
265 
266 , p_adj_rec		IN	OE_order_pub.line_adj_rec_type
267 , p_old_adj_rec		IN	OE_order_pub.line_Adj_Rec_Type
268 , p_delete_flag		IN	BOOLEAN DEFAULT FALSE
269   );
270 
271 FUNCTION  Convert_Hdr_Adj_To_Line_Adj
272 ( p_header_adj_rec IN OE_Order_PUB.Header_adj_rec_type
273 )RETURN OE_Order_PUB.Line_Adj_Rec_Type;
274 
275 Procedure copy_adjustment_lines(
276 	p_from_line_id			number
277 	,p_to_line_id			number
278 	,p_from_Header_id		number
279 	,p_to_Header_id		number
280 	,p_line_category_code	varchar2
281 	,p_split_by			varchar2 default null
282 	,p_booked_flag			varchar2 default null
283         ,p_mode                         Varchar2 default null
284 --RT{
285         ,p_retrobill_request_id         Number   default null
286 --RT}
287 ,x_return_status out nocopy varchar2
288 
289 	);
290 
291 PROCEDURE Pre_Write_Process
292 ( p_x_line_adj_rec IN OUT NOCOPY OE_ORDER_PUB.line_adj_rec_type,
293 
294       p_old_line_adj_rec IN OE_ORDER_PUB.line_adj_rec_type := OE_ORDER_PUB.G_MISS_LINE_ADJ_REC);
295 
296 
297 Procedure Delete_Prg_Lines(p_line_id In Number, p_operation In Varchar2);
298 
299 Procedure Check_Canceled_PRG(p_old_line_rec in Oe_Order_Pub.line_rec_type,
300                              p_new_line_rec in Oe_Order_Pub.line_rec_type);
301 
302 Procedure Process_Pricing(p_x_new_line_rec  in out nocopy Oe_Order_Pub.line_rec_type,
303                           p_old_line_rec  in Oe_Order_Pub.line_rec_type,
304                           p_no_price_flag in Boolean);
305 
306 Procedure Delete_Changed_Lines_Tbl;
307 
308 Procedure Register_Changed_Lines(p_line_id   in Number,
309                                  p_header_id in Number,
310                                  p_operation in Varchar2);
311 
312 Procedure Get_Service_Lines(p_header_id   IN NUMBER,
313                             x_line_id_tbl OUT NOCOPY OE_ORDER_ADJ_PVT.Index_TBl_Type);
314 
315 /* Added the following procedure to fix the bug 2917690 */
316 Procedure Change_adj_for_uom_change(p_x_line_rec    IN OUT NOCOPY  OE_Order_PUB.Line_Rec_Type
317                                      ) ;
318 
319 Function has_service_lines(p_header_id IN NUMBER) Return Boolean;
320 
321 --G_CHANGED_LINE_TBL OE_ORDER_ADJ_PVT.Index_TBl_Type;
322 --bug 3020702
323 TYPE G_CHANGED_LINE_REC1 IS RECORD
324 (line_id number, header_id number);
325 TYPE G_CHANGED_LINE_TBL1 IS TABLE OF G_CHANGED_LINE_REC1
326 INDEX by BINARY_INTEGER;
327 G_CHANGED_LINE_TBL G_CHANGED_LINE_TBL1;
328 --bug 3020702
329 
330 
331 G_PRG_TBL OE_GLOBALS.Number_Tbl_Type;
332 
333 -- G_BINARY_LIMIT CONSTANT NUMBER:=2147483647; Bug 8631297
334 G_BINARY_LIMIT CONSTANT NUMBER := OE_GLOBALS.G_BINARY_LIMIT; -- Added for bug 8631297
335 Procedure Set_PRG_Cache(p_header_id IN NUMBER);
336 Function Is_PRG_LINE(p_line_id IN NUMBER) RETURN BOOLEAN;
337 Procedure Reset_PRG_Cache;
338 Function Is_Pricing_Related_Change(p_new_line_rec In Oe_Order_Pub.Line_Rec_Type,
339                                    p_old_line_rec   In Oe_Order_Pub.Line_Rec_Type) Return Boolean;
340 END OE_Line_Adj_Util;