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