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;