DBA Data[Home] [Help]

PACKAGE BODY: APPS.OE_TRANSACTION_TYPES_PKG

Source


1 package body OE_TRANSACTION_TYPES_PKG as
2 /* $Header: OEXUTRNB.pls 120.5.12020000.4 2013/01/31 08:08:29 spothula ship $ */
3 procedure INSERT_ROW (
4   X_ROWID in out nocopy VARCHAR2,
5   X_ORG_ID in number,
6   X_TRANSACTION_TYPE_ID in NUMBER,
7   X_TRANSACTION_TYPE_CODE in VARCHAR2,
8   X_ORDER_CATEGORY_CODE in VARCHAR2,
9   X_START_DATE_ACTIVE in DATE,
10   X_END_DATE_ACTIVE in DATE,
11   X_REQUEST_ID in NUMBER,
12   X_CURRENCY_CODE in VARCHAR2,
13   X_CONVERSION_TYPE_CODE in VARCHAR2,
14   X_CUST_TRX_TYPE_ID in NUMBER,
15   X_COST_OF_GOODS_SOLD_ACCOUNT in NUMBER,
16   X_ENTRY_CREDIT_CHECK_RULE_ID in NUMBER,
17   X_SHIPPING_CREDIT_CHECK_RULE_I in NUMBER,
18   X_PICKING_CREDIT_CHECK_RULE_ID in NUMBER,
19   X_PACKING_CREDIT_CHECK_RULE_ID in NUMBER,
20   X_PRICE_LIST_ID in NUMBER,
21   X_ENFORCE_LINE_PRICES_FLAG in VARCHAR2,
22   X_WAREHOUSE_ID in NUMBER,
23   X_DEMAND_CLASS_CODE in VARCHAR2,
24   X_SHIPMENT_PRIORITY_CODE in VARCHAR2,
25   X_SHIPPING_METHOD_CODE in VARCHAR2,
26   X_FREIGHT_TERMS_CODE in VARCHAR2,
27   X_FOB_POINT_CODE in VARCHAR2,
28   X_SHIP_SOURCE_TYPE_CODE in VARCHAR2,
29   X_AGREEMENT_TYPE_CODE in VARCHAR2,
30   X_AGREEMENT_REQUIRED_FLAG in VARCHAR2,
31   X_PO_REQUIRED_FLAG in VARCHAR2,
32   X_INVOICING_RULE_ID in NUMBER,
33   X_INVOICING_CREDIT_METHOD_CODE in VARCHAR2,
34   X_ACCOUNTING_RULE_ID in NUMBER,
35   X_ACCOUNTING_CREDIT_METHOD_COD in VARCHAR2,
36   X_INVOICE_SOURCE_ID in VARCHAR2,
37   X_NON_DELIVERY_INVOICE_SOURCE_ in VARCHAR2,
38   X_DEFAULT_INBOUND_LINE_TYPE_ID in NUMBER,
39   X_DEFAULT_OUTBOUND_LINE_TYPE_I in NUMBER,
40   X_INSPECTION_REQUIRED_FLAG in VARCHAR2,
41   X_DEPOT_REPAIR_CODE in VARCHAR2,
42   X_AUTO_SCHEDULING_FLAG in VARCHAR2,
43   X_SCHEDULING_LEVEL_CODE in VARCHAR2,
44   X_CONTEXT in VARCHAR2,
45   X_ATTRIBUTE1 in VARCHAR2,
46   X_ATTRIBUTE2 in VARCHAR2,
47   X_ATTRIBUTE3 in VARCHAR2,
48   X_ATTRIBUTE4 in VARCHAR2,
49   X_ATTRIBUTE5 in VARCHAR2,
50   X_ATTRIBUTE6 in VARCHAR2,
51   X_ATTRIBUTE7 in VARCHAR2,
52   X_ATTRIBUTE8 in VARCHAR2,
53   X_ATTRIBUTE9 in VARCHAR2,
54   X_ATTRIBUTE10 in VARCHAR2,
55   X_ATTRIBUTE11 in VARCHAR2,
56   X_ATTRIBUTE12 in VARCHAR2,
57   X_ATTRIBUTE13 in VARCHAR2,
58   X_ATTRIBUTE14 in VARCHAR2,
59   X_ATTRIBUTE15 in VARCHAR2,
60   X_NAME in VARCHAR2,
61   X_DESCRIPTION in VARCHAR2,
62   X_LAYOUT_TEMPLATE_ID in number,
63   X_CREATION_DATE in DATE,
64   X_CREATED_BY in NUMBER,
65   X_LAST_UPDATE_DATE in DATE,
66   X_LAST_UPDATED_BY in NUMBER,
67   X_LAST_UPDATE_LOGIN in NUMBER,
68   X_SALES_DOCUMENT_TYPE_CODE in VARCHAR2,
69   X_TAX_CALCULATION_EVENT IN VARCHAR2 := NULL,
70   X_MIN_MARGIN_PERCENT IN NUMBER,
71   X_DEFAULT_FULFILLMENT_SET  IN VARCHAR2 DEFAULT NULL,
72   X_DEFAULT_LINE_SET_CODE    IN VARCHAR2 DEFAULT NULL,
73   X_def_transaction_phase_code     in VARCHAR2 default null,
74   X_quote_num_as_ord_num_flag  in VARCHAR2 default null,
75   X_CONTRACT_TEMPLATE_ID in number,
76   X_CREDIT_CARD_REV_REAUTH_CODE in VARCHAR2 default null, --CC Reversal ER#16014135
77   X_use_ame_approval IN VARCHAR2 default null-- AME ER 16084377
78 
79 ) is
80   cursor C is select ROWID from OE_TRANSACTION_TYPES_ALL
81     where TRANSACTION_TYPE_ID = X_TRANSACTION_TYPE_ID
82     ;
83 begin
84   insert into OE_TRANSACTION_TYPES_ALL (
85     TRANSACTION_TYPE_ID,
86     TRANSACTION_TYPE_CODE,
87     ORG_ID,
88     ORDER_CATEGORY_CODE,
89     START_DATE_ACTIVE,
90     END_DATE_ACTIVE,
91     REQUEST_ID,
92     CURRENCY_CODE,
93     CONVERSION_TYPE_CODE,
94     CUST_TRX_TYPE_ID,
95     COST_OF_GOODS_SOLD_ACCOUNT,
96     ENTRY_CREDIT_CHECK_RULE_ID,
97     SHIPPING_CREDIT_CHECK_RULE_ID,
98     PICKING_CREDIT_CHECK_RULE_ID,
99     PACKING_CREDIT_CHECK_RULE_ID,
100     PRICE_LIST_ID,
101     ENFORCE_LINE_PRICES_FLAG,
102     WAREHOUSE_ID,
103     DEMAND_CLASS_CODE,
104     SHIPMENT_PRIORITY_CODE,
105     SHIPPING_METHOD_CODE,
106     FREIGHT_TERMS_CODE,
107     FOB_POINT_CODE,
108     SHIP_SOURCE_TYPE_CODE,
109     AGREEMENT_TYPE_CODE,
110     AGREEMENT_REQUIRED_FLAG,
111     PO_REQUIRED_FLAG,
112     INVOICING_RULE_ID,
113     INVOICING_CREDIT_METHOD_CODE,
114     ACCOUNTING_RULE_ID,
115     ACCOUNTING_CREDIT_METHOD_CODE,
116     INVOICE_SOURCE_ID,
117     NON_DELIVERY_INVOICE_SOURCE_ID,
118     DEFAULT_INBOUND_LINE_TYPE_ID,
119     DEFAULT_OUTBOUND_LINE_TYPE_ID,
120     INSPECTION_REQUIRED_FLAG,
121     DEPOT_REPAIR_CODE,
122     AUTO_SCHEDULING_FLAG,
123     SCHEDULING_LEVEL_CODE,
124     CONTEXT,
125     ATTRIBUTE1,
126     ATTRIBUTE2,
127     ATTRIBUTE3,
128     ATTRIBUTE4,
129     ATTRIBUTE5,
130     ATTRIBUTE6,
131     ATTRIBUTE7,
132     ATTRIBUTE8,
133     ATTRIBUTE9,
134     ATTRIBUTE10,
135     ATTRIBUTE11,
136     ATTRIBUTE12,
137     ATTRIBUTE13,
138     ATTRIBUTE14,
139     ATTRIBUTE15,
140     LAYOUT_TEMPLATE_ID,
141     CREATION_DATE,
142     CREATED_BY,
143     LAST_UPDATE_DATE,
144     LAST_UPDATED_BY,
145     LAST_UPDATE_LOGIN,
146     SALES_DOCUMENT_TYPE_CODE,
147     TAX_CALCULATION_EVENT_CODE,
148     MIN_MARGIN_PERCENT,
149     DEFAULT_FULFILLMENT_SET,
150     DEFAULT_LINE_SET_CODE,
151     def_transaction_phase_code,
152     quote_num_as_ord_num_flag,
153     contract_template_id ,
154     credit_card_rev_reauth_code, --CC Reversal ER#16014135
155     use_ame_approval -- ame er 16084377
156   ) values (
157     X_TRANSACTION_TYPE_ID,
158     X_TRANSACTION_TYPE_CODE,
159     X_ORG_ID,
160     X_ORDER_CATEGORY_CODE,
161     X_START_DATE_ACTIVE,
162     X_END_DATE_ACTIVE,
163     X_REQUEST_ID,
164     X_CURRENCY_CODE,
165     X_CONVERSION_TYPE_CODE,
166     X_CUST_TRX_TYPE_ID,
167     X_COST_OF_GOODS_SOLD_ACCOUNT,
168     X_ENTRY_CREDIT_CHECK_RULE_ID,
169     X_SHIPPING_CREDIT_CHECK_RULE_I,
170     X_PICKING_CREDIT_CHECK_RULE_ID,
171     X_PACKING_CREDIT_CHECK_RULE_ID,
172     X_PRICE_LIST_ID,
173     Nvl(X_ENFORCE_LINE_PRICES_FLAG, 'N'),
174     X_WAREHOUSE_ID,
175     X_DEMAND_CLASS_CODE,
176     X_SHIPMENT_PRIORITY_CODE,
177     X_SHIPPING_METHOD_CODE,
178     X_FREIGHT_TERMS_CODE,
179     X_FOB_POINT_CODE,
180     X_SHIP_SOURCE_TYPE_CODE,
181     X_AGREEMENT_TYPE_CODE,
182     X_AGREEMENT_REQUIRED_FLAG,
183     X_PO_REQUIRED_FLAG,
184     X_INVOICING_RULE_ID,
185     X_INVOICING_CREDIT_METHOD_CODE,
186     X_ACCOUNTING_RULE_ID,
187     X_ACCOUNTING_CREDIT_METHOD_COD,
188     X_INVOICE_SOURCE_ID,
189     X_NON_DELIVERY_INVOICE_SOURCE_,
190     X_DEFAULT_INBOUND_LINE_TYPE_ID,
191     X_DEFAULT_OUTBOUND_LINE_TYPE_I,
192     X_INSPECTION_REQUIRED_FLAG,
193     X_DEPOT_REPAIR_CODE,
194     X_AUTO_SCHEDULING_FLAG,
195     X_SCHEDULING_LEVEL_CODE,
196     X_CONTEXT,
197     X_ATTRIBUTE1,
198     X_ATTRIBUTE2,
199     X_ATTRIBUTE3,
200     X_ATTRIBUTE4,
201     X_ATTRIBUTE5,
202     X_ATTRIBUTE6,
203     X_ATTRIBUTE7,
204     X_ATTRIBUTE8,
205     X_ATTRIBUTE9,
206     X_ATTRIBUTE10,
207     X_ATTRIBUTE11,
208     X_ATTRIBUTE12,
209     X_ATTRIBUTE13,
210     X_ATTRIBUTE14,
211     X_ATTRIBUTE15,
212     X_LAYOUT_TEMPLATE_ID,
213     X_CREATION_DATE,
214     X_CREATED_BY,
215     X_LAST_UPDATE_DATE,
216     X_LAST_UPDATED_BY,
217     X_LAST_UPDATE_LOGIN,
218     nvl(X_SALES_DOCUMENT_TYPE_CODE,'O'),
219     X_TAX_CALCULATION_EVENT,
220     X_MIN_MARGIN_PERCENT,
221     X_DEFAULT_FULFILLMENT_SET,
222     X_DEFAULT_LINE_SET_CODE,
223     X_def_transaction_phase_code,
224     X_quote_num_as_ord_num_flag,
225     X_CONTRACT_TEMPLATE_ID,
226     X_CREDIT_CARD_REV_REAUTH_CODE, --CC Reversal ER#16014135
227     X_use_ame_approval  -- AME ER 16084377
228   );
229 
230   insert into OE_TRANSACTION_TYPES_TL (
231     TRANSACTION_TYPE_ID,
232     NAME,
233     DESCRIPTION,
234     CREATION_DATE,
235     CREATED_BY,
236     LAST_UPDATE_DATE,
237     LAST_UPDATED_BY,
238     LAST_UPDATE_LOGIN,
239     PROGRAM_APPLICATION_ID,
240     PROGRAM_ID,
241     REQUEST_ID,
242     LANGUAGE,
243     SOURCE_LANG
244   ) select
245     X_TRANSACTION_TYPE_ID,
246     X_NAME,
247     X_DESCRIPTION,
248     X_CREATION_DATE,
249     X_CREATED_BY,
250     X_LAST_UPDATE_DATE,
251     X_LAST_UPDATED_BY,
252     X_LAST_UPDATE_LOGIN,
253     NULL,
254     NULL,
255     NULL,
256     L.LANGUAGE_CODE,
257     userenv('LANG')
258   from FND_LANGUAGES L
259   where L.INSTALLED_FLAG in ('I', 'B')
260   and not exists
261     (select NULL
262     from OE_TRANSACTION_TYPES_TL T
263     where T.TRANSACTION_TYPE_ID = X_TRANSACTION_TYPE_ID
264     and T.LANGUAGE = L.LANGUAGE_CODE);
265 
266   open c;
267   fetch c into X_ROWID;
268   if (c%notfound) then
269     close c;
270     raise no_data_found;
271   end if;
272   close c;
273 
274 end INSERT_ROW;
275 
276 procedure LOCK_ROW (
277   X_TRANSACTION_TYPE_ID in NUMBER,
278   X_TRANSACTION_TYPE_CODE in VARCHAR2,
279   X_ORDER_CATEGORY_CODE in VARCHAR2,
280   X_START_DATE_ACTIVE in DATE,
281   X_END_DATE_ACTIVE in DATE,
282   X_REQUEST_ID in NUMBER,
283   X_CURRENCY_CODE in VARCHAR2,
284   X_CONVERSION_TYPE_CODE in VARCHAR2,
285   X_CUST_TRX_TYPE_ID in NUMBER,
286   X_COST_OF_GOODS_SOLD_ACCOUNT in NUMBER,
287   X_ENTRY_CREDIT_CHECK_RULE_ID in NUMBER,
288   X_SHIPPING_CREDIT_CHECK_RULE_I in NUMBER,
289   X_PICKING_CREDIT_CHECK_RULE_ID in NUMBER,
290   X_PACKING_CREDIT_CHECK_RULE_ID in NUMBER,
291   X_PRICE_LIST_ID in NUMBER,
292   X_ENFORCE_LINE_PRICES_FLAG in VARCHAR2,
293   X_WAREHOUSE_ID in NUMBER,
294   X_DEMAND_CLASS_CODE in VARCHAR2,
295   X_SHIPMENT_PRIORITY_CODE in VARCHAR2,
296   X_SHIPPING_METHOD_CODE in VARCHAR2,
297   X_FREIGHT_TERMS_CODE in VARCHAR2,
298   X_FOB_POINT_CODE in VARCHAR2,
299   X_SHIP_SOURCE_TYPE_CODE in VARCHAR2,
300   X_AGREEMENT_TYPE_CODE in VARCHAR2,
301   X_AGREEMENT_REQUIRED_FLAG in VARCHAR2,
302   X_PO_REQUIRED_FLAG in VARCHAR2,
303   X_INVOICING_RULE_ID in NUMBER,
304   X_INVOICING_CREDIT_METHOD_CODE in VARCHAR2,
305   X_ACCOUNTING_RULE_ID in NUMBER,
306   X_ACCOUNTING_CREDIT_METHOD_COD in VARCHAR2,
307   X_INVOICE_SOURCE_ID in VARCHAR2,
308   X_NON_DELIVERY_INVOICE_SOURCE_ in VARCHAR2,
309   X_DEFAULT_INBOUND_LINE_TYPE_ID in NUMBER,
310   X_DEFAULT_OUTBOUND_LINE_TYPE_I in NUMBER,
311   X_INSPECTION_REQUIRED_FLAG in VARCHAR2,
312   X_DEPOT_REPAIR_CODE in VARCHAR2,
313   X_AUTO_SCHEDULING_FLAG in VARCHAR2,
314   X_SCHEDULING_LEVEL_CODE in VARCHAR2,
315   X_CONTEXT in VARCHAR2,
316   X_ATTRIBUTE1 in VARCHAR2,
317   X_ATTRIBUTE2 in VARCHAR2,
318   X_ATTRIBUTE3 in VARCHAR2,
319   X_ATTRIBUTE4 in VARCHAR2,
320   X_ATTRIBUTE5 in VARCHAR2,
321   X_ATTRIBUTE6 in VARCHAR2,
322   X_ATTRIBUTE7 in VARCHAR2,
323   X_ATTRIBUTE8 in VARCHAR2,
324   X_ATTRIBUTE9 in VARCHAR2,
325   X_ATTRIBUTE10 in VARCHAR2,
326   X_ATTRIBUTE11 in VARCHAR2,
327   X_ATTRIBUTE12 in VARCHAR2,
328   X_ATTRIBUTE13 in VARCHAR2,
329   X_ATTRIBUTE14 in VARCHAR2,
330   X_ATTRIBUTE15 in VARCHAR2,
331   X_NAME in VARCHAR2,
332   X_DESCRIPTION in VARCHAR2,
333   X_LAYOUT_TEMPLATE_ID in number,
334   X_TAX_CALCULATION_EVENT IN VARCHAR2 := NULL,
335   X_MIN_MARGIN_PERCENT IN NUMBER,
336   X_DEFAULT_FULFILLMENT_SET    in VARCHAR2 default null,
337   X_DEFAULT_LINE_SET_CODE      in VARCHAR2 default null,
338   X_def_transaction_phase_code     in VARCHAR2 default null,
339   X_quote_num_as_ord_num_flag  in VARCHAR2 default null,
340   X_CONTRACT_TEMPLATE_ID in number,
341   X_CREDIT_CARD_REV_REAUTH_CODE in VARCHAR2 default null, --CC Reversal ER#16014135
342   X_use_ame_approval IN VARCHAR2 default null -- AME ER 16084377
343 ) is
344   cursor c is select
345       TRANSACTION_TYPE_CODE,
346       ORDER_CATEGORY_CODE,
347       START_DATE_ACTIVE,
348       END_DATE_ACTIVE,
349       REQUEST_ID,
350       CURRENCY_CODE,
351       CONVERSION_TYPE_CODE,
352       CUST_TRX_TYPE_ID,
353       COST_OF_GOODS_SOLD_ACCOUNT,
354       ENTRY_CREDIT_CHECK_RULE_ID,
355       SHIPPING_CREDIT_CHECK_RULE_ID,
356       PICKING_CREDIT_CHECK_RULE_ID,
357       PACKING_CREDIT_CHECK_RULE_ID,
358       PRICE_LIST_ID,
359       ENFORCE_LINE_PRICES_FLAG,
360       WAREHOUSE_ID,
361       DEMAND_CLASS_CODE,
362       SHIPMENT_PRIORITY_CODE,
363       SHIPPING_METHOD_CODE,
364       FREIGHT_TERMS_CODE,
365       FOB_POINT_CODE,
366       SHIP_SOURCE_TYPE_CODE,
367       AGREEMENT_TYPE_CODE,
368       AGREEMENT_REQUIRED_FLAG,
369       PO_REQUIRED_FLAG,
370       INVOICING_RULE_ID,
371       INVOICING_CREDIT_METHOD_CODE,
372       ACCOUNTING_RULE_ID,
373       ACCOUNTING_CREDIT_METHOD_CODE,
374       INVOICE_SOURCE_ID,
375       NON_DELIVERY_INVOICE_SOURCE_ID,
376       DEFAULT_INBOUND_LINE_TYPE_ID,
377       DEFAULT_OUTBOUND_LINE_TYPE_ID,
378       INSPECTION_REQUIRED_FLAG,
379       DEPOT_REPAIR_CODE,
380       AUTO_SCHEDULING_FLAG,
381       SCHEDULING_LEVEL_CODE,
382       CONTEXT,
383       ATTRIBUTE1,
384       ATTRIBUTE2,
385       ATTRIBUTE3,
386       ATTRIBUTE4,
387       ATTRIBUTE5,
388       ATTRIBUTE6,
389       ATTRIBUTE7,
390       ATTRIBUTE8,
391       ATTRIBUTE9,
392       ATTRIBUTE10,
393       ATTRIBUTE11,
394       ATTRIBUTE12,
395       ATTRIBUTE13,
396       ATTRIBUTE14,
397       ATTRIBUTE15,
398       LAYOUT_TEMPLATE_ID,
399       TAX_CALCULATION_EVENT_CODE,
400       MIN_MARGIN_PERCENT,
401       DEFAULT_FULFILLMENT_SET,
402       DEFAULT_LINE_SET_CODE,
403       def_transaction_phase_code,
404       quote_num_as_ord_num_flag,
405       CONTRACT_TEMPLATE_ID ,
406       CREDIT_CARD_REV_REAUTH_CODE, --CC Reversal ER#16014135
407       use_ame_approval --ame er 16084377
408     from OE_TRANSACTION_TYPES_ALL
409     where TRANSACTION_TYPE_ID = X_TRANSACTION_TYPE_ID
410     for update of TRANSACTION_TYPE_ID nowait;
411   recinfo c%rowtype;
412 
413   cursor c1 is select
414       NAME,
415       DESCRIPTION,
416       decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
417     from OE_TRANSACTION_TYPES_TL
418     where TRANSACTION_TYPE_ID = X_TRANSACTION_TYPE_ID
419     and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
420     for update of TRANSACTION_TYPE_ID nowait;
421 begin
422   open c;
423   fetch c into recinfo;
424   if (c%notfound) then
425     close c;
426     fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
427     app_exception.raise_exception;
428   end if;
429   close c;
430   if (    (recinfo.TRANSACTION_TYPE_CODE = X_TRANSACTION_TYPE_CODE)
431       AND ((recinfo.ORDER_CATEGORY_CODE = X_ORDER_CATEGORY_CODE)
432            OR ((recinfo.ORDER_CATEGORY_CODE is null) AND (X_ORDER_CATEGORY_CODE is null)))
433       AND (recinfo.START_DATE_ACTIVE = X_START_DATE_ACTIVE)
434       AND ((recinfo.END_DATE_ACTIVE = X_END_DATE_ACTIVE)
435            OR ((recinfo.END_DATE_ACTIVE is null) AND (X_END_DATE_ACTIVE is null)))
436       AND ((recinfo.REQUEST_ID = X_REQUEST_ID)
437            OR ((recinfo.REQUEST_ID is null) AND (X_REQUEST_ID is null)))
438       AND ((recinfo.CURRENCY_CODE = X_CURRENCY_CODE)
439            OR ((recinfo.CURRENCY_CODE is null) AND (X_CURRENCY_CODE is null)))
440       AND ((recinfo.CONVERSION_TYPE_CODE = X_CONVERSION_TYPE_CODE)
441            OR ((recinfo.CONVERSION_TYPE_CODE is null) AND (X_CONVERSION_TYPE_CODE is null)))
442       AND ((recinfo.CUST_TRX_TYPE_ID = X_CUST_TRX_TYPE_ID)
443            OR ((recinfo.CUST_TRX_TYPE_ID is null) AND (X_CUST_TRX_TYPE_ID is null)))
444       AND ((recinfo.COST_OF_GOODS_SOLD_ACCOUNT = X_COST_OF_GOODS_SOLD_ACCOUNT)
445            OR ((recinfo.COST_OF_GOODS_SOLD_ACCOUNT is null) AND (X_COST_OF_GOODS_SOLD_ACCOUNT is null)))
446       AND ((recinfo.ENTRY_CREDIT_CHECK_RULE_ID = X_ENTRY_CREDIT_CHECK_RULE_ID)
447            OR ((recinfo.ENTRY_CREDIT_CHECK_RULE_ID is null) AND (X_ENTRY_CREDIT_CHECK_RULE_ID is null)))
448       AND ((recinfo.SHIPPING_CREDIT_CHECK_RULE_ID = X_SHIPPING_CREDIT_CHECK_RULE_I)
449            OR ((recinfo.SHIPPING_CREDIT_CHECK_RULE_ID is null) AND (X_SHIPPING_CREDIT_CHECK_RULE_I is null)))
450       AND ((recinfo.PICKING_CREDIT_CHECK_RULE_ID = X_PICKING_CREDIT_CHECK_RULE_ID)
451            OR ((recinfo.PICKING_CREDIT_CHECK_RULE_ID is null) AND (X_PICKING_CREDIT_CHECK_RULE_ID is null)))
452       AND ((recinfo.PACKING_CREDIT_CHECK_RULE_ID = X_PACKING_CREDIT_CHECK_RULE_ID)
453            OR ((recinfo.PACKING_CREDIT_CHECK_RULE_ID is null) AND (X_PACKING_CREDIT_CHECK_RULE_ID is null)))
454       AND ((recinfo.PRICE_LIST_ID = X_PRICE_LIST_ID)
455            OR ((recinfo.PRICE_LIST_ID is null) AND (X_PRICE_LIST_ID is null)))
456       AND ((recinfo.ENFORCE_LINE_PRICES_FLAG = X_ENFORCE_LINE_PRICES_FLAG)
457            OR ((recinfo.ENFORCE_LINE_PRICES_FLAG is null) AND (X_ENFORCE_LINE_PRICES_FLAG is null)))
458       AND ((recinfo.WAREHOUSE_ID = X_WAREHOUSE_ID)
459            OR ((recinfo.WAREHOUSE_ID is null) AND (X_WAREHOUSE_ID is null)))
460       AND ((recinfo.DEMAND_CLASS_CODE = X_DEMAND_CLASS_CODE)
461            OR ((recinfo.DEMAND_CLASS_CODE is null) AND (X_DEMAND_CLASS_CODE is null)))
462       AND ((recinfo.SHIPMENT_PRIORITY_CODE = X_SHIPMENT_PRIORITY_CODE)
463            OR ((recinfo.SHIPMENT_PRIORITY_CODE is null) AND (X_SHIPMENT_PRIORITY_CODE is null)))
464       AND ((recinfo.SHIPPING_METHOD_CODE = X_SHIPPING_METHOD_CODE)
465            OR ((recinfo.SHIPPING_METHOD_CODE is null) AND (X_SHIPPING_METHOD_CODE is null)))
466       AND ((recinfo.FREIGHT_TERMS_CODE = X_FREIGHT_TERMS_CODE)
467            OR ((recinfo.FREIGHT_TERMS_CODE is null) AND (X_FREIGHT_TERMS_CODE is null)))
468       AND ((recinfo.FOB_POINT_CODE = X_FOB_POINT_CODE)
469            OR ((recinfo.FOB_POINT_CODE is null) AND (X_FOB_POINT_CODE is null)))
470       AND ((recinfo.SHIP_SOURCE_TYPE_CODE = X_SHIP_SOURCE_TYPE_CODE)
471            OR ((recinfo.SHIP_SOURCE_TYPE_CODE is null) AND (X_SHIP_SOURCE_TYPE_CODE is null)))
472       AND ((recinfo.AGREEMENT_TYPE_CODE = X_AGREEMENT_TYPE_CODE)
473            OR ((recinfo.AGREEMENT_TYPE_CODE is null) AND (X_AGREEMENT_TYPE_CODE is null)))
474       AND (recinfo.AGREEMENT_REQUIRED_FLAG = X_AGREEMENT_REQUIRED_FLAG)
475       AND ((recinfo.PO_REQUIRED_FLAG = X_PO_REQUIRED_FLAG)
476            OR ((recinfo.PO_REQUIRED_FLAG is null) AND (X_PO_REQUIRED_FLAG is null)))
477       AND ((recinfo.INVOICING_RULE_ID = X_INVOICING_RULE_ID)
478            OR ((recinfo.INVOICING_RULE_ID is null) AND (X_INVOICING_RULE_ID is null)))
479       AND ((recinfo.INVOICING_CREDIT_METHOD_CODE = X_INVOICING_CREDIT_METHOD_CODE)
480            OR ((recinfo.INVOICING_CREDIT_METHOD_CODE is null) AND (X_INVOICING_CREDIT_METHOD_CODE is null)))
481       AND ((recinfo.ACCOUNTING_RULE_ID = X_ACCOUNTING_RULE_ID)
482            OR ((recinfo.ACCOUNTING_RULE_ID is null) AND (X_ACCOUNTING_RULE_ID is null)))
483       AND ((recinfo.ACCOUNTING_CREDIT_METHOD_CODE = X_ACCOUNTING_CREDIT_METHOD_COD)
484            OR ((recinfo.ACCOUNTING_CREDIT_METHOD_CODE is null) AND (X_ACCOUNTING_CREDIT_METHOD_COD is null)))
485       AND ((recinfo.INVOICE_SOURCE_ID = X_INVOICE_SOURCE_ID)
486            OR ((recinfo.INVOICE_SOURCE_ID is null) AND (X_INVOICE_SOURCE_ID is null)))
487       AND ((recinfo.NON_DELIVERY_INVOICE_SOURCE_ID = X_NON_DELIVERY_INVOICE_SOURCE_)
488            OR ((recinfo.NON_DELIVERY_INVOICE_SOURCE_ID is null) AND (X_NON_DELIVERY_INVOICE_SOURCE_ is null)))
489       AND ((recinfo.DEFAULT_INBOUND_LINE_TYPE_ID = X_DEFAULT_INBOUND_LINE_TYPE_ID)
490            OR ((recinfo.DEFAULT_INBOUND_LINE_TYPE_ID is null) AND (X_DEFAULT_INBOUND_LINE_TYPE_ID is null)))
491       AND ((recinfo.DEFAULT_OUTBOUND_LINE_TYPE_ID = X_DEFAULT_OUTBOUND_LINE_TYPE_I)
492            OR ((recinfo.DEFAULT_OUTBOUND_LINE_TYPE_ID is null) AND (X_DEFAULT_OUTBOUND_LINE_TYPE_I is null)))
493       AND ((recinfo.INSPECTION_REQUIRED_FLAG = X_INSPECTION_REQUIRED_FLAG)
494            OR ((recinfo.INSPECTION_REQUIRED_FLAG is null) AND (X_INSPECTION_REQUIRED_FLAG is null)))
495       AND ((recinfo.DEPOT_REPAIR_CODE = X_DEPOT_REPAIR_CODE)
496            OR ((recinfo.DEPOT_REPAIR_CODE is null) AND (X_DEPOT_REPAIR_CODE is null)))
497       AND ((recinfo.AUTO_SCHEDULING_FLAG = X_AUTO_SCHEDULING_FLAG)
498            OR ((recinfo.AUTO_SCHEDULING_FLAG is null) AND (X_AUTO_SCHEDULING_FLAG is null)))
499       AND ((recinfo.SCHEDULING_LEVEL_CODE = X_SCHEDULING_LEVEL_CODE)
500            OR ((recinfo.SCHEDULING_LEVEL_CODE is null) AND (X_SCHEDULING_LEVEL_CODE is null)))
501       AND ((recinfo.CONTEXT = X_CONTEXT)
502            OR ((recinfo.CONTEXT is null) AND (X_CONTEXT is null)))
503       AND ((recinfo.ATTRIBUTE1 = X_ATTRIBUTE1)
504            OR ((recinfo.ATTRIBUTE1 is null) AND (X_ATTRIBUTE1 is null)))
505       AND ((recinfo.ATTRIBUTE2 = X_ATTRIBUTE2)
506            OR ((recinfo.ATTRIBUTE2 is null) AND (X_ATTRIBUTE2 is null)))
507       AND ((recinfo.ATTRIBUTE3 = X_ATTRIBUTE3)
508            OR ((recinfo.ATTRIBUTE3 is null) AND (X_ATTRIBUTE3 is null)))
509       AND ((recinfo.ATTRIBUTE4 = X_ATTRIBUTE4)
510            OR ((recinfo.ATTRIBUTE4 is null) AND (X_ATTRIBUTE4 is null)))
511       AND ((recinfo.ATTRIBUTE5 = X_ATTRIBUTE5)
512            OR ((recinfo.ATTRIBUTE5 is null) AND (X_ATTRIBUTE5 is null)))
513       AND ((recinfo.ATTRIBUTE6 = X_ATTRIBUTE6)
514            OR ((recinfo.ATTRIBUTE6 is null) AND (X_ATTRIBUTE6 is null)))
515       AND ((recinfo.ATTRIBUTE7 = X_ATTRIBUTE7)
516            OR ((recinfo.ATTRIBUTE7 is null) AND (X_ATTRIBUTE7 is null)))
517       AND ((recinfo.ATTRIBUTE8 = X_ATTRIBUTE8)
518            OR ((recinfo.ATTRIBUTE8 is null) AND (X_ATTRIBUTE8 is null)))
519       AND ((recinfo.ATTRIBUTE9 = X_ATTRIBUTE9)
520            OR ((recinfo.ATTRIBUTE9 is null) AND (X_ATTRIBUTE9 is null)))
521       AND ((recinfo.ATTRIBUTE10 = X_ATTRIBUTE10)
522            OR ((recinfo.ATTRIBUTE10 is null) AND (X_ATTRIBUTE10 is null)))
523       AND ((recinfo.ATTRIBUTE11 = X_ATTRIBUTE11)
524            OR ((recinfo.ATTRIBUTE11 is null) AND (X_ATTRIBUTE11 is null)))
525       AND ((recinfo.ATTRIBUTE12 = X_ATTRIBUTE12)
526            OR ((recinfo.ATTRIBUTE12 is null) AND (X_ATTRIBUTE12 is null)))
527       AND ((recinfo.ATTRIBUTE13 = X_ATTRIBUTE13)
528            OR ((recinfo.ATTRIBUTE13 is null) AND (X_ATTRIBUTE13 is null)))
529       AND ((recinfo.ATTRIBUTE14 = X_ATTRIBUTE14)
530            OR ((recinfo.ATTRIBUTE14 is null) AND (X_ATTRIBUTE14 is null)))
531       AND ((recinfo.ATTRIBUTE15 = X_ATTRIBUTE15)
532            OR ((recinfo.ATTRIBUTE15 is null) AND (X_ATTRIBUTE15 is null)))
533       AND ((recinfo.LAYOUT_TEMPLATE_ID = X_LAYOUT_TEMPLATE_ID)
534            OR ((recinfo.LAYOUT_TEMPLATE_ID is null) AND (X_LAYOUT_TEMPLATE_ID is null)))
535       AND ((recinfo.TAX_CALCULATION_EVENT_CODE = X_TAX_CALCULATION_EVENT)
536            OR ((recinfo.TAX_CALCULATION_EVENT_CODE is null) AND (X_TAX_CALCULATION_EVENT is null)))
537       AND ((recinfo.MIN_MARGIN_PERCENT = X_MIN_MARGIN_PERCENT)
538            OR ((recinfo.MIN_MARGIN_PERCENT is null) AND (X_MIN_MARGIN_PERCENT is null)))
539       AND ((recinfo.DEFAULT_FULFILLMENT_SET = X_DEFAULT_FULFILLMENT_SET)
540            OR ((recinfo.DEFAULT_FULFILLMENT_SET is null) AND (X_DEFAULT_FULFILLMENT_SET  is null)))
541       AND ((recinfo.DEFAULT_LINE_SET_CODE = X_DEFAULT_LINE_SET_CODE)
542            OR ((recinfo.DEFAULT_LINE_SET_CODE is null) AND (X_DEFAULT_LINE_SET_CODE  is null)))
543       AND ((recinfo.DEF_transaction_phase_code = X_DEf_transaction_phase_code)
544            OR ((recinfo.DEF_transaction_phase_code is null) AND (X_DEF_transaction_phase_code  is null)))
545       AND ((recinfo.quote_num_as_ord_num_flag = X_quote_num_as_ord_num_flag)
546            OR ((recinfo.quote_num_as_ord_num_flag is null) AND (X_quote_num_as_ord_num_flag  is null)))
547       AND ((recinfo.CONTRACT_TEMPLATE_ID = X_CONTRACT_TEMPLATE_ID)
548            OR ((recinfo.CONTRACT_TEMPLATE_ID is null) AND (X_CONTRACT_TEMPLATE_ID is null)))
549       AND ((recinfo.CREDIT_CARD_REV_REAUTH_CODE = X_CREDIT_CARD_REV_REAUTH_CODE) --CC Reversal ER#16014135
550            OR ((recinfo.CREDIT_CARD_REV_REAUTH_CODE is null) AND (X_CREDIT_CARD_REV_REAUTH_CODE is null)))	--CC Reversal ER#16014135
551       AND ((recinfo.use_ame_approval = X_use_ame_approval) -- AME ER 16084377
552            OR ((recinfo.use_ame_approval is null) AND (X_use_ame_approval is null)))
553   ) then
554     null;
555   else
556     fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
557     app_exception.raise_exception;
558   end if;
559 
560   for tlinfo in c1 loop
561     if (tlinfo.BASELANG = 'Y') then
562       if (    (tlinfo.NAME = X_NAME)
563           AND ((tlinfo.DESCRIPTION = X_DESCRIPTION)
564                OR ((tlinfo.DESCRIPTION is null) AND (X_DESCRIPTION is null)))
565       ) then
566         null;
567       else
568         fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
569         app_exception.raise_exception;
570       end if;
571     end if;
572   end loop;
573   return;
574 end LOCK_ROW;
575 
576 procedure UPDATE_ROW (
577   X_TRANSACTION_TYPE_ID in NUMBER,
578   X_TRANSACTION_TYPE_CODE in VARCHAR2,
579   X_ORDER_CATEGORY_CODE in VARCHAR2,
580   X_START_DATE_ACTIVE in DATE,
581   X_END_DATE_ACTIVE in DATE,
582   X_REQUEST_ID in NUMBER,
583   X_CURRENCY_CODE in VARCHAR2,
584   X_CONVERSION_TYPE_CODE in VARCHAR2,
585   X_CUST_TRX_TYPE_ID in NUMBER,
586   X_COST_OF_GOODS_SOLD_ACCOUNT in NUMBER,
587   X_ENTRY_CREDIT_CHECK_RULE_ID in NUMBER,
588   X_SHIPPING_CREDIT_CHECK_RULE_I in NUMBER,
589   X_PICKING_CREDIT_CHECK_RULE_ID in NUMBER,
590   X_PACKING_CREDIT_CHECK_RULE_ID in NUMBER,
591   X_PRICE_LIST_ID in NUMBER,
592   X_ENFORCE_LINE_PRICES_FLAG in VARCHAR2,
593   X_WAREHOUSE_ID in NUMBER,
594   X_DEMAND_CLASS_CODE in VARCHAR2,
595   X_SHIPMENT_PRIORITY_CODE in VARCHAR2,
596   X_SHIPPING_METHOD_CODE in VARCHAR2,
597   X_FREIGHT_TERMS_CODE in VARCHAR2,
598   X_FOB_POINT_CODE in VARCHAR2,
599   X_SHIP_SOURCE_TYPE_CODE in VARCHAR2,
600   X_AGREEMENT_TYPE_CODE in VARCHAR2,
601   X_AGREEMENT_REQUIRED_FLAG in VARCHAR2,
602   X_PO_REQUIRED_FLAG in VARCHAR2,
603   X_INVOICING_RULE_ID in NUMBER,
604   X_INVOICING_CREDIT_METHOD_CODE in VARCHAR2,
605   X_ACCOUNTING_RULE_ID in NUMBER,
606   X_ACCOUNTING_CREDIT_METHOD_COD in VARCHAR2,
607   X_INVOICE_SOURCE_ID in VARCHAR2,
608   X_NON_DELIVERY_INVOICE_SOURCE_ in VARCHAR2,
609   X_DEFAULT_INBOUND_LINE_TYPE_ID in NUMBER,
610   X_DEFAULT_OUTBOUND_LINE_TYPE_I in NUMBER,
611   X_INSPECTION_REQUIRED_FLAG in VARCHAR2,
612   X_DEPOT_REPAIR_CODE in VARCHAR2,
613   X_AUTO_SCHEDULING_FLAG in VARCHAR2,
614   X_SCHEDULING_LEVEL_CODE in VARCHAR2,
615   X_CONTEXT in VARCHAR2,
616   X_ATTRIBUTE1 in VARCHAR2,
617   X_ATTRIBUTE2 in VARCHAR2,
618   X_ATTRIBUTE3 in VARCHAR2,
619   X_ATTRIBUTE4 in VARCHAR2,
620   X_ATTRIBUTE5 in VARCHAR2,
621   X_ATTRIBUTE6 in VARCHAR2,
622   X_ATTRIBUTE7 in VARCHAR2,
623   X_ATTRIBUTE8 in VARCHAR2,
624   X_ATTRIBUTE9 in VARCHAR2,
625   X_ATTRIBUTE10 in VARCHAR2,
626   X_ATTRIBUTE11 in VARCHAR2,
627   X_ATTRIBUTE12 in VARCHAR2,
628   X_ATTRIBUTE13 in VARCHAR2,
629   X_ATTRIBUTE14 in VARCHAR2,
630   X_ATTRIBUTE15 in VARCHAR2,
631   X_NAME in VARCHAR2,
632   X_DESCRIPTION in VARCHAR2,
633   X_LAYOUT_TEMPLATE_ID in number,
634   X_LAST_UPDATE_DATE in DATE,
635   X_LAST_UPDATED_BY in NUMBER,
636   X_LAST_UPDATE_LOGIN in NUMBER,
637   X_TAX_CALCULATION_EVENT IN VARCHAR2 default null,
638   X_MIN_MARGIN_PERCENT IN NUMBER,
639   X_DEFAULT_FULFILLMENT_SET  in VARCHAR2 default null,
640   X_DEFAULT_LINE_SET_CODE    in VARCHAR2 default null,
641   X_def_transaction_phase_code     in VARCHAR2 default null,
642   X_quote_num_as_ord_num_flag  in VARCHAR2 default null,
643   X_CONTRACT_TEMPLATE_ID in number,
644   X_CREDIT_CARD_REV_REAUTH_CODE in VARCHAR2 default null ,--CC Reversal ER#16014135
645   X_use_ame_approval IN VARCHAR2 default null -- AME ER 16084377
646 ) is
647 begin
648   update OE_TRANSACTION_TYPES_ALL set
649     TRANSACTION_TYPE_CODE = X_TRANSACTION_TYPE_CODE,
650     ORDER_CATEGORY_CODE = X_ORDER_CATEGORY_CODE,
651     START_DATE_ACTIVE = X_START_DATE_ACTIVE,
652     END_DATE_ACTIVE = X_END_DATE_ACTIVE,
653     REQUEST_ID = X_REQUEST_ID,
654     CURRENCY_CODE = X_CURRENCY_CODE,
655     CONVERSION_TYPE_CODE = X_CONVERSION_TYPE_CODE,
656     CUST_TRX_TYPE_ID = X_CUST_TRX_TYPE_ID,
657     COST_OF_GOODS_SOLD_ACCOUNT = X_COST_OF_GOODS_SOLD_ACCOUNT,
658     ENTRY_CREDIT_CHECK_RULE_ID = X_ENTRY_CREDIT_CHECK_RULE_ID,
659     SHIPPING_CREDIT_CHECK_RULE_ID = X_SHIPPING_CREDIT_CHECK_RULE_I,
660     PICKING_CREDIT_CHECK_RULE_ID = X_PICKING_CREDIT_CHECK_RULE_ID,
661     PACKING_CREDIT_CHECK_RULE_ID = X_PACKING_CREDIT_CHECK_RULE_ID,
662     PRICE_LIST_ID = X_PRICE_LIST_ID,
663     ENFORCE_LINE_PRICES_FLAG = Nvl(X_ENFORCE_LINE_PRICES_FLAG, 'N'),
664     WAREHOUSE_ID = X_WAREHOUSE_ID,
665     DEMAND_CLASS_CODE = X_DEMAND_CLASS_CODE,
666     SHIPMENT_PRIORITY_CODE = X_SHIPMENT_PRIORITY_CODE,
667     SHIPPING_METHOD_CODE = X_SHIPPING_METHOD_CODE,
668     FREIGHT_TERMS_CODE = X_FREIGHT_TERMS_CODE,
669     FOB_POINT_CODE = X_FOB_POINT_CODE,
670     SHIP_SOURCE_TYPE_CODE = X_SHIP_SOURCE_TYPE_CODE,
671     AGREEMENT_TYPE_CODE = X_AGREEMENT_TYPE_CODE,
672     AGREEMENT_REQUIRED_FLAG = X_AGREEMENT_REQUIRED_FLAG,
673     PO_REQUIRED_FLAG = X_PO_REQUIRED_FLAG,
674     INVOICING_RULE_ID = X_INVOICING_RULE_ID,
675     INVOICING_CREDIT_METHOD_CODE = X_INVOICING_CREDIT_METHOD_CODE,
676     ACCOUNTING_RULE_ID = X_ACCOUNTING_RULE_ID,
677     ACCOUNTING_CREDIT_METHOD_CODE = X_ACCOUNTING_CREDIT_METHOD_COD,
678     INVOICE_SOURCE_ID = X_INVOICE_SOURCE_ID,
679     NON_DELIVERY_INVOICE_SOURCE_ID = X_NON_DELIVERY_INVOICE_SOURCE_,
680     DEFAULT_INBOUND_LINE_TYPE_ID = X_DEFAULT_INBOUND_LINE_TYPE_ID,
681     DEFAULT_OUTBOUND_LINE_TYPE_ID = X_DEFAULT_OUTBOUND_LINE_TYPE_I,
682     INSPECTION_REQUIRED_FLAG = X_INSPECTION_REQUIRED_FLAG,
683     DEPOT_REPAIR_CODE = X_DEPOT_REPAIR_CODE,
684     AUTO_SCHEDULING_FLAG = X_AUTO_SCHEDULING_FLAG,
685     SCHEDULING_LEVEL_CODE = X_SCHEDULING_LEVEL_CODE,
686     CONTEXT = X_CONTEXT,
687     ATTRIBUTE1 = X_ATTRIBUTE1,
688     ATTRIBUTE2 = X_ATTRIBUTE2,
689     ATTRIBUTE3 = X_ATTRIBUTE3,
690     ATTRIBUTE4 = X_ATTRIBUTE4,
691     ATTRIBUTE5 = X_ATTRIBUTE5,
692     ATTRIBUTE6 = X_ATTRIBUTE6,
693     ATTRIBUTE7 = X_ATTRIBUTE7,
694     ATTRIBUTE8 = X_ATTRIBUTE8,
695     ATTRIBUTE9 = X_ATTRIBUTE9,
696     ATTRIBUTE10 = X_ATTRIBUTE10,
697     ATTRIBUTE11 = X_ATTRIBUTE11,
698     ATTRIBUTE12 = X_ATTRIBUTE12,
699     ATTRIBUTE13 = X_ATTRIBUTE13,
700     ATTRIBUTE14 = X_ATTRIBUTE14,
701     ATTRIBUTE15 = X_ATTRIBUTE15,
702     LAYOUT_TEMPLATE_ID = X_LAYOUT_TEMPLATE_ID,
703     LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
704     LAST_UPDATED_BY = X_LAST_UPDATED_BY,
705     LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
706     TAX_CALCULATION_EVENT_CODE = X_TAX_CALCULATION_EVENT,
707     MIN_MARGIN_PERCENT = X_MIN_MARGIN_PERCENT,
708     DEFAULT_FULFILLMENT_SET =  X_DEFAULT_FULFILLMENT_SET,
709     DEFAULT_LINE_SET_CODE   = X_DEFAULT_LINE_SET_CODE,
710     def_transaction_phase_code = X_def_transaction_phase_code,
711     quote_num_as_ord_num_flag = X_quote_num_as_ord_num_flag,
712     CONTRACT_TEMPLATE_ID = X_CONTRACT_TEMPLATE_ID,
713     CREDIT_CARD_REV_REAUTH_CODE = X_CREDIT_CARD_REV_REAUTH_CODE, --CC Reversal ER#16014135
714     use_ame_approval = X_use_ame_approval --ame er 16084377
715   where TRANSACTION_TYPE_ID = X_TRANSACTION_TYPE_ID;
716 
717   if (sql%notfound) then
718     raise no_data_found;
719   end if;
720 
721   update OE_TRANSACTION_TYPES_TL set
722     NAME = X_NAME,
723     DESCRIPTION = X_DESCRIPTION,
724     LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
725     LAST_UPDATED_BY = X_LAST_UPDATED_BY,
726     LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
727     SOURCE_LANG = userenv('LANG')
728   where TRANSACTION_TYPE_ID = X_TRANSACTION_TYPE_ID
729   and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
730 
731   if (sql%notfound) then
732     raise no_data_found;
733   end if;
734 end UPDATE_ROW;
735 
736 procedure DELETE_ROW (
737   X_TRANSACTION_TYPE_ID in NUMBER
738 ) is
739 begin
740   delete from OE_TRANSACTION_TYPES_TL
741   where TRANSACTION_TYPE_ID = X_TRANSACTION_TYPE_ID;
742 
743   if (sql%notfound) then
744     raise no_data_found;
745   end if;
746 
747   delete from OE_TRANSACTION_TYPES_ALL
748   where TRANSACTION_TYPE_ID = X_TRANSACTION_TYPE_ID;
749 
750   if (sql%notfound) then
751     raise no_data_found;
752   end if;
753 end DELETE_ROW;
754 
755 procedure ADD_LANGUAGE
756 is
757 begin
758   delete from OE_TRANSACTION_TYPES_TL T
759   where not exists
760     (select NULL
761     from OE_TRANSACTION_TYPES_ALL B
762     where B.TRANSACTION_TYPE_ID = T.TRANSACTION_TYPE_ID
763     );
764 
765   update OE_TRANSACTION_TYPES_TL T set (
766       NAME,
767       DESCRIPTION
768     ) = (select
769       B.NAME,
770       B.DESCRIPTION
771     from OE_TRANSACTION_TYPES_TL B
772     where B.TRANSACTION_TYPE_ID = T.TRANSACTION_TYPE_ID
773     and B.LANGUAGE = T.SOURCE_LANG)
774   where (
775       T.TRANSACTION_TYPE_ID,
776       T.LANGUAGE
777   ) in (select
778       SUBT.TRANSACTION_TYPE_ID,
779       SUBT.LANGUAGE
780     from OE_TRANSACTION_TYPES_TL SUBB, OE_TRANSACTION_TYPES_TL SUBT
781     where SUBB.TRANSACTION_TYPE_ID = SUBT.TRANSACTION_TYPE_ID
782     and SUBB.LANGUAGE = SUBT.SOURCE_LANG
783     and (SUBB.NAME <> SUBT.NAME
784       or SUBB.DESCRIPTION <> SUBT.DESCRIPTION
785       or (SUBB.DESCRIPTION is null and SUBT.DESCRIPTION is not null)
786       or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
787   ));
788 
789   insert into OE_TRANSACTION_TYPES_TL (
790     TRANSACTION_TYPE_ID,
791     NAME,
792     DESCRIPTION,
793     CREATION_DATE,
794     CREATED_BY,
795     LAST_UPDATE_DATE,
796     LAST_UPDATED_BY,
797     LAST_UPDATE_LOGIN,
798     PROGRAM_APPLICATION_ID,
799     PROGRAM_ID,
800     REQUEST_ID,
801     LANGUAGE,
802     SOURCE_LANG
803   ) select
804     B.TRANSACTION_TYPE_ID,
805     B.NAME,
806     B.DESCRIPTION,
807     B.CREATION_DATE,
808     B.CREATED_BY,
809     B.LAST_UPDATE_DATE,
810     B.LAST_UPDATED_BY,
811     B.LAST_UPDATE_LOGIN,
812     B.PROGRAM_APPLICATION_ID,
813     B.PROGRAM_ID,
814     B.REQUEST_ID,
815     L.LANGUAGE_CODE,
816     B.SOURCE_LANG
817   from OE_TRANSACTION_TYPES_TL B, FND_LANGUAGES L
818   where L.INSTALLED_FLAG in ('I', 'B')
819   and B.LANGUAGE = userenv('LANG')
820   and not exists
821     (select NULL
822     from OE_TRANSACTION_TYPES_TL T
823     where T.TRANSACTION_TYPE_ID = B.TRANSACTION_TYPE_ID
824     and T.LANGUAGE = L.LANGUAGE_CODE);
825 end ADD_LANGUAGE;
826 
827 procedure Load_Row (
828   X_TRANSACTION_TYPE_ID in NUMBER,
829   X_TRANSACTION_TYPE_CODE in VARCHAR2,
830   X_ORDER_CATEGORY_CODE in VARCHAR2,
831   X_START_DATE_ACTIVE in DATE,
832   X_END_DATE_ACTIVE in DATE,
833   X_REQUEST_ID in NUMBER,
834   X_CURRENCY_CODE in VARCHAR2,
835   X_CONVERSION_TYPE_CODE in VARCHAR2,
836   X_CUST_TRX_TYPE_ID in NUMBER,
837   X_COST_OF_GOODS_SOLD_ACCOUNT in NUMBER,
838   X_ENTRY_CREDIT_CHECK_RULE_ID in NUMBER,
839   X_SHIPPING_CREDIT_CHECK_RULE_I in NUMBER,
840   X_PICKING_CREDIT_CHECK_RULE_ID in NUMBER,
841   X_PACKING_CREDIT_CHECK_RULE_ID in NUMBER,
842   X_PRICE_LIST_ID in NUMBER,
843   X_ENFORCE_LINE_PRICES_FLAG in VARCHAR2,
844   X_WAREHOUSE_ID in NUMBER,
845   X_DEMAND_CLASS_CODE in VARCHAR2,
846   X_SHIPMENT_PRIORITY_CODE in VARCHAR2,
847   X_SHIPPING_METHOD_CODE in VARCHAR2,
848   X_FREIGHT_TERMS_CODE in VARCHAR2,
849   X_FOB_POINT_CODE in VARCHAR2,
850   X_SHIP_SOURCE_TYPE_CODE in VARCHAR2,
851   X_AGREEMENT_TYPE_CODE in VARCHAR2,
852   X_AGREEMENT_REQUIRED_FLAG in VARCHAR2,
853   X_PO_REQUIRED_FLAG in VARCHAR2,
854   X_INVOICING_RULE_ID in NUMBER,
855   X_INVOICING_CREDIT_METHOD_CODE in VARCHAR2,
856   X_ACCOUNTING_RULE_ID in NUMBER,
857   X_ACCOUNTING_CREDIT_METHOD_COD in VARCHAR2,
858   X_INVOICE_SOURCE_ID in VARCHAR2,
859   X_NON_DELIVERY_INVOICE_SOURCE_ in VARCHAR2,
860   X_DEFAULT_INBOUND_LINE_TYPE_ID in NUMBER,
861   X_DEFAULT_OUTBOUND_LINE_TYPE_I in NUMBER,
862   X_INSPECTION_REQUIRED_FLAG in VARCHAR2,
863   X_DEPOT_REPAIR_CODE in VARCHAR2,
864   X_AUTO_SCHEDULING_FLAG in VARCHAR2,
865   X_SCHEDULING_LEVEL_CODE in VARCHAR2,
866   X_CONTEXT in VARCHAR2,
867   X_ATTRIBUTE1 in VARCHAR2,
868   X_ATTRIBUTE2 in VARCHAR2,
869   X_ATTRIBUTE3 in VARCHAR2,
870   X_ATTRIBUTE4 in VARCHAR2,
871   X_ATTRIBUTE5 in VARCHAR2,
872   X_ATTRIBUTE6 in VARCHAR2,
873   X_ATTRIBUTE7 in VARCHAR2,
874   X_ATTRIBUTE8 in VARCHAR2,
875   X_ATTRIBUTE9 in VARCHAR2,
876   X_ATTRIBUTE10 in VARCHAR2,
877   X_ATTRIBUTE11 in VARCHAR2,
878   X_ATTRIBUTE12 in VARCHAR2,
879   X_ATTRIBUTE13 in VARCHAR2,
880   X_ATTRIBUTE14 in VARCHAR2,
881   X_ATTRIBUTE15 in VARCHAR2,
882   X_NAME in VARCHAR2,
883   X_DESCRIPTION in VARCHAR2,
884   X_LAYOUT_TEMPLATE_ID in number,
885   X_CREATION_DATE in DATE,
886   X_CREATED_BY in NUMBER,
887   X_LAST_UPDATE_DATE in DATE,
888   X_LAST_UPDATED_BY in NUMBER,
889   X_LAST_UPDATE_LOGIN in NUMBER,
890   X_TAX_CALCULATION_EVENT IN VARCHAR2,
891   X_DEFAULT_FULFILLMENT_SET     in VARCHAR2 default null,
892   X_DEFAULT_LINE_SET_CODE       in VARCHAR2 default null,
893   X_def_transaction_phase_code     in VARCHAR2 default null,
894   X_quote_num_as_ord_num_flag  in VARCHAR2 default null,
895   X_CONTRACT_TEMPLATE_ID in number ,
896   X_CREDIT_CARD_REV_REAUTH_CODE in VARCHAR2 default null, --CC Reversal ER#16014135
897   x_use_ame_approval IN VARCHAR2 default null -- AME ER 16084377
898 ) is
899 BEGIN
900 
901 NULL;
902 END Load_Row;
903 
904 
905 Procedure Translate_Row(Transaction_type_id NUMBER,
906 				    Name VARCHAR2,
907 				    Description VARCHAR2) IS
908 p_Transaction_type_id number := Transaction_type_id;
909 p_name varchar2(80) := Name;
910 p_desc varchar2(2000) := Description;
911 
912 begin
913 update oe_transaction_types_tl
914 set name = nvl(p_name,name),
915 description = nvl(p_Desc,description),
916 source_lang = userenv('LANG')
917 where Transaction_type_id = p_Transaction_type_id and
918 userenv('LANG') IN (source_lang,language) ;
919 NULL;
920 exception
921 when others then
922 null;
923 END;
924 
925 Procedure Is_Manual( p_application_id IN NUMBER,
926                          p_entity_short_name in VARCHAR2,
927                          p_validation_entity_short_name in VARCHAR2,
928                          p_validation_tmplt_short_name in VARCHAR2,
929                          p_record_set_tmplt_short_name in VARCHAR2,
930                          p_scope in VARCHAR2,
931                          p_result OUT NOCOPY /* file.sql.39 change */ NUMBER ) IS
932 lseqtype varchar2(1);
933 l_order_type_id number := oe_header_security.g_record.order_type_id;
934 BEGIN
935 lseqtype := oe_header_util.Get_ord_seq_type(l_order_type_id);
936 
937 IF lseqtype = 'M' THEN
938           p_result := 1 ;
939 ELSE
940 		p_result := 0;
941 END IF;
942 
943 
944 
945 EXCEPTION
946 	when no_data_found then
947 			p_result := 0;
948 
949 End Is_Manual;
950 
951 
952 Procedure Val_Ord_Change( p_application_id IN NUMBER,
953                          p_entity_short_name in VARCHAR2,
954                          p_validation_entity_short_name in VARCHAR2,
955                          p_validation_tmplt_short_name in VARCHAR2,
956                          p_record_set_tmplt_short_name in VARCHAR2,
957                          p_scope in VARCHAR2,
958                          p_result OUT NOCOPY /* file.sql.39 change */ NUMBER ) IS
959 lexists varchar2(30);
960 l_header_id number;
961 BEGIN
962 
963   -- { Start fix for the bug 2375056
964   If p_validation_entity_short_name = 'LINE' Then
965      l_header_id := oe_line_security.g_record.header_id;
966      IF OE_GLOBALS.G_HEADER_CREATED THEN
967         p_result := 0;
968         RETURN;
969      END IF;
970   Else
971      l_header_id := oe_header_security.g_record.header_id;
972   End If;
973   -- End fix for the bug 2375056}
974 
975 
976   Select 'EXISTS' into
977   lexists
978   from oe_order_lines_all
979   where header_id = l_header_id and
980   rownum = 1;
981 
982   p_result := 1 ;
983 
984 
985 EXCEPTION
986 
987 	when no_data_found then
988 			p_result := 0;
989 
990 End Val_Ord_Change;
991 
992 
993 Procedure Validate_lang_tbl (p_transaction_id IN number,
994                              p_language IN varchar2,
995                              p_name     IN varchar2,
996                              p_description IN varchar2
997                              ) -- bug 6321217 new procedure added
998 IS
999 l_count number:=0;
1000 l_name varchar2(30);
1001 BEGIN
1002 SELECT  name INTO l_name
1003  FROM oe_transaction_types_tl
1004 WHERE LANGUAGE = p_language
1005 AND  transaction_type_id =  p_transaction_id;
1006 
1007  IF l_name <> p_name THEN
1008   SELECT Count (oh.header_id) INTO l_count
1009   FROM oe_order_headers_all oh
1010   WHERE oh.order_type_id = p_transaction_id
1011   AND ROWNUM=1;
1012 
1013     IF l_count = 0 THEN
1014      SELECT Count (ob.header_id) INTO l_count
1015       FROM oe_blanket_headers_all ob
1016      WHERE ob.order_type_id = p_transaction_id
1017      AND ROWNUM=1;
1018     END IF;
1019    IF l_count > 0 THEN
1020     FND_MESSAGE.SET_NAME('ONT','OE_OE_TYPE_IN_USE');
1021     app_exception.raise_exception;
1022    ELSE
1023      select count(transaction_type_id) into l_count
1024      from oe_transaction_types_tl
1025      where UPPER(name) = UPPER(p_name)
1026      and LANGUAGE = p_language
1027      and transaction_type_id <> p_transaction_id;
1028 
1029     if l_count > 0 then
1030      FND_MESSAGE.SET_NAME('ONT','OE_OTHER_NAME_ALREADY_IN_USE');
1031       app_exception.raise_exception;
1032     end if;
1033    END IF;
1034  END IF;
1035 Exception
1036  When no_data_found  then
1037   null;
1038 
1039 END Validate_lang_tbl;
1040 
1041 end OE_TRANSACTION_TYPES_PKG;