[Home] [Help]
26:
27: -- Clear_Dependents
28:
29: PROCEDURE Clear_Dependents
30: (p_src_attr_tbl IN OE_GLOBALS.NUMBER_Tbl_Type
31: ,p_initial_header_rec IN OE_AK_ORDER_HEADERS_V%ROWTYPE
32: ,p_old_header_rec IN OE_AK_ORDER_HEADERS_V%ROWTYPE
33: ,p_x_header_rec IN OUT NOCOPY OE_AK_ORDER_HEADERS_V%ROWTYPE
34: ,p_x_instrument_id IN NUMBER DEFAULT NULL
33: ,p_x_header_rec IN OUT NOCOPY OE_AK_ORDER_HEADERS_V%ROWTYPE
34: ,p_x_instrument_id IN NUMBER DEFAULT NULL
35: ,p_old_instrument_id IN NUMBER DEFAULT NULL)
36: IS
37: l_dep_attr_tbl OE_GLOBALS.NUMBER_Tbl_Type;
38:
39: PROCEDURE ACCOUNTING_RULE
40: IS
41: BEGIN
39: PROCEDURE ACCOUNTING_RULE
40: IS
41: BEGIN
42: IF (p_initial_header_rec.accounting_rule_id = FND_API.G_MISS_NUM
43: OR (OE_GLOBALS.Equal(p_initial_header_rec.accounting_rule_id, p_old_header_rec.accounting_rule_id)
44: AND (p_old_header_rec.header_id IS NOT NULL OR
45: p_initial_header_rec.accounting_rule_id IS NOT NULL))
46: ) -- AND condition added to fix 3098878
47: THEN
52: PROCEDURE ACCOUNTING_RULE_DURATION
53: IS
54: BEGIN
55: IF (p_initial_header_rec.accounting_rule_duration = FND_API.G_MISS_NUM
56: OR (OE_GLOBALS.Equal(p_initial_header_rec.accounting_rule_duration, p_old_header_rec.accounting_rule_duration)
57: AND (p_old_header_rec.header_id IS NOT NULL OR
58: p_initial_header_rec.accounting_rule_duration IS NOT NULL))
59: ) -- AND condition added to fix 3098878
60: THEN
64:
65: PROCEDURE AGREEMENT IS
66: BEGIN
67: IF (p_initial_header_rec.agreement_id = FND_API.G_MISS_NUM
68: OR (OE_GLOBALS.Equal(p_initial_header_rec.agreement_id, p_old_header_rec.agreement_id)
69: AND (p_old_header_rec.header_id IS NOT NULL OR
70: p_initial_header_rec.agreement_id IS NOT NULL))
71: ) -- AND condition added to fix 3098878
72: THEN
76:
77: PROCEDURE CONVERSION_RATE IS
78: BEGIN
79: IF (p_initial_header_rec.conversion_rate = FND_API.G_MISS_NUM
80: OR (OE_GLOBALS.Equal(p_initial_header_rec.conversion_rate, p_old_header_rec.conversion_rate)
81: AND (p_old_header_rec.header_id IS NOT NULL OR
82: p_initial_header_rec.conversion_rate IS NOT NULL))
83: ) -- AND condition added to fix 3098878
84: THEN
88:
89: PROCEDURE CONVERSION_RATE_DATE IS
90: BEGIN
91: IF (p_initial_header_rec.conversion_rate_date = FND_API.G_MISS_DATE
92: OR (OE_GLOBALS.Equal(p_initial_header_rec.conversion_rate_date, p_old_header_rec.conversion_rate_date)
93: AND (p_old_header_rec.header_id IS NOT NULL OR
94: p_initial_header_rec.conversion_rate_date IS NOT NULL))
95: ) -- AND condition added to fix 3098878
96: THEN
100:
101: PROCEDURE CONVERSION_TYPE IS
102: BEGIN
103: IF (p_initial_header_rec.conversion_type_code = FND_API.G_MISS_CHAR
104: OR (OE_GLOBALS.Equal(p_initial_header_rec.conversion_type_code, p_old_header_rec.conversion_type_code)
105: AND (p_old_header_rec.header_id IS NOT NULL OR
106: p_initial_header_rec.conversion_type_code IS NOT NULL))
107: ) -- AND condition added to fix 3098878
108: THEN
112:
113: PROCEDURE CREDIT_CARD_EXPIRATION_DATE IS
114: BEGIN
115: IF (p_initial_header_rec.credit_card_expiration_date = FND_API.G_MISS_DATE
116: OR (OE_GLOBALS.Equal(p_initial_header_rec.credit_card_expiration_date, p_old_header_rec.credit_card_expiration_date)
117: AND (p_old_header_rec.header_id IS NOT NULL OR
118: p_initial_header_rec.credit_card_expiration_date IS NOT NULL)
119: AND nvl(g_is_cc_selected_from_LOV,'N') <> 'Y') --bug 5083663
120: ) -- AND condition added to fix 3098878
125:
126: PROCEDURE CREDIT_CARD_HOLDER_NAME IS
127: BEGIN
128: IF (p_initial_header_rec.credit_card_holder_name = FND_API.G_MISS_CHAR
129: OR (OE_GLOBALS.Equal(p_initial_header_rec.credit_card_holder_name, p_old_header_rec.credit_card_holder_name)
130: AND (p_old_header_rec.header_id IS NOT NULL OR
131: p_initial_header_rec.credit_card_holder_name IS NOT NULL)
132: AND nvl(g_is_cc_selected_from_LOV,'N') <> 'Y') --bug 5083663
133: ) -- AND condition added to fix 3098878
138:
139: PROCEDURE CREDIT_CARD_NUMBER IS
140: BEGIN
141: IF (p_initial_header_rec.credit_card_number = FND_API.G_MISS_CHAR
142: OR (OE_GLOBALS.Is_Same_Credit_Card(p_old_header_rec.credit_card_number,p_initial_header_rec.credit_card_number,
143: p_old_instrument_id,p_x_instrument_id)
144: AND (p_old_header_rec.header_id IS NOT NULL OR
145: p_initial_header_rec.credit_card_number IS NOT NULL))
146: ) -- AND condition added to fix 3098878
154: /* Fix Bug # 2297053: Added to clear Credit Card Type */
155: PROCEDURE CREDIT_CARD IS
156: BEGIN
157: IF (p_initial_header_rec.credit_card_code = FND_API.G_MISS_CHAR
158: OR (OE_GLOBALS.Equal(p_initial_header_rec.credit_card_code, p_old_header_rec.credit_card_code)
159: AND (p_old_header_rec.header_id IS NOT NULL OR
160: p_initial_header_rec.credit_card_code IS NOT NULL))
161: ) -- AND condition added to fix 3098878
162: THEN
166:
167: PROCEDURE CHECK_NUMBER IS --For bug 2692314
168: BEGIN
169: IF (p_initial_header_rec.check_number = FND_API.G_MISS_CHAR
170: OR (OE_GLOBALS.Equal(p_initial_header_rec.check_number, p_old_header_rec.check_number)
171: AND (p_old_header_rec.header_id IS NOT NULL OR
172: p_initial_header_rec.check_number IS NOT NULL))
173: ) -- AND condition added to fix 3098878
174: THEN
178:
179: PROCEDURE CUST_PO_NUMBER IS
180: BEGIN
181: IF (p_initial_header_rec.cust_po_number = FND_API.G_MISS_CHAR
182: OR (OE_GLOBALS.Equal(p_initial_header_rec.cust_po_number, p_old_header_rec.cust_po_number)
183: AND (p_old_header_rec.header_id IS NOT NULL OR
184: p_initial_header_rec.cust_po_number IS NOT NULL))
185: ) -- AND condition added to fix 3098878
186: THEN
190:
191: PROCEDURE CUSTOMER_PREFERENCE_SET_CODE IS
192: BEGIN
193: IF (p_initial_header_rec.Customer_Preference_Set_Code = FND_API.G_MISS_CHAR
194: OR (OE_GLOBALS.Equal(p_initial_header_rec.Customer_Preference_Set_Code, p_old_header_rec.Customer_Preference_Set_Code)
195: AND (p_old_header_rec.header_id IS NOT NULL OR
196: p_initial_header_rec.Customer_Preference_Set_Code IS NOT NULL))
197: ) -- AND condition added to fix 3098878
198: THEN
202:
203: PROCEDURE DEFAULT_FULFILLMENT_SET IS
204: BEGIN
205: IF (p_initial_header_rec.Default_Fulfillment_Set = FND_API.G_MISS_CHAR
206: OR (OE_GLOBALS.Equal(p_initial_header_rec.Default_Fulfillment_Set, p_old_header_rec.Default_Fulfillment_Set)
207: AND (p_old_header_rec.header_id IS NOT NULL OR
208: p_initial_header_rec.Default_Fulfillment_Set IS NOT NULL))
209: ) -- AND condition added to fix 3098878
210: THEN
214:
215: PROCEDURE DELIVER_TO_CONTACT IS
216: BEGIN
217: IF (p_initial_header_rec.deliver_to_contact_id = FND_API.G_MISS_NUM
218: OR (OE_GLOBALS.Equal(p_initial_header_rec.deliver_to_contact_id, p_old_header_rec.deliver_to_contact_id)
219: AND (p_old_header_rec.header_id IS NOT NULL OR
220: p_initial_header_rec.deliver_to_contact_id IS NOT NULL))
221: ) -- AND condition added to fix 3098878
222: THEN
226:
227: PROCEDURE DELIVER_TO_ORG IS
228: BEGIN
229: IF (p_initial_header_rec.deliver_to_org_id = FND_API.G_MISS_NUM
230: OR (OE_GLOBALS.Equal(p_initial_header_rec.deliver_to_org_id, p_old_header_rec.deliver_to_org_id)
231: AND (p_old_header_rec.header_id IS NOT NULL OR
232: p_initial_header_rec.deliver_to_org_id IS NOT NULL))
233: ) -- AND condition added to fix 3098878
234: THEN
238:
239: PROCEDURE DEMAND_CLASS IS
240: BEGIN
241: IF (p_initial_header_rec.demand_class_code = FND_API.G_MISS_CHAR
242: OR (OE_GLOBALS.Equal(p_initial_header_rec.demand_class_code, p_old_header_rec.demand_class_code)
243: AND (p_old_header_rec.header_id IS NOT NULL OR
244: p_initial_header_rec.demand_class_code IS NOT NULL))
245: ) -- AND condition added to fix 3098878
246: THEN
250:
251: PROCEDURE FOB_POINT IS
252: BEGIN
253: IF (p_initial_header_rec.fob_point_code = FND_API.G_MISS_CHAR
254: OR (OE_GLOBALS.Equal(p_initial_header_rec.fob_point_code, p_old_header_rec.fob_point_code)
255: AND (p_old_header_rec.header_id IS NOT NULL OR
256: p_initial_header_rec.fob_point_code IS NOT NULL))
257: ) -- AND condition added to fix 3098878
258: THEN
262:
263: PROCEDURE FREIGHT_TERMS IS
264: BEGIN
265: IF (p_initial_header_rec.freight_terms_code = FND_API.G_MISS_CHAR
266: OR (OE_GLOBALS.Equal(p_initial_header_rec.freight_terms_code, p_old_header_rec.freight_terms_code)
267: AND (p_old_header_rec.header_id IS NOT NULL OR
268: p_initial_header_rec.freight_terms_code IS NOT NULL))
269: ) -- AND condition added to fix 3098878
270: THEN
274:
275: PROCEDURE FULFILLMENT_SET_NAME IS
276: BEGIN
277: IF (p_initial_header_rec.Fulfillment_Set_name = FND_API.G_MISS_CHAR
278: OR (OE_GLOBALS.Equal(p_initial_header_rec.Fulfillment_Set_name, p_old_header_rec.Fulfillment_Set_name)
279: AND (p_old_header_rec.header_id IS NOT NULL OR
280: p_initial_header_rec.Fulfillment_Set_name IS NOT NULL))
281: ) -- AND condition added to fix 3098878
282: THEN
286:
287: PROCEDURE INVOICE_TO_CONTACT IS
288: BEGIN
289: IF (p_initial_header_rec.invoice_to_contact_id = FND_API.G_MISS_NUM
290: OR (OE_GLOBALS.Equal(p_initial_header_rec.invoice_to_contact_id, p_old_header_rec.invoice_to_contact_id)
291: AND (p_old_header_rec.header_id IS NOT NULL OR
292: p_initial_header_rec.invoice_to_contact_id IS NOT NULL))
293: ) -- AND condition added to fix 3098878
294: THEN
298:
299: PROCEDURE INVOICE_TO_ORG IS
300: BEGIN
301: IF (p_initial_header_rec.invoice_to_org_id = FND_API.G_MISS_NUM
302: OR (OE_GLOBALS.Equal(p_initial_header_rec.invoice_to_org_id, p_old_header_rec.invoice_to_org_id)
303: AND (p_old_header_rec.header_id IS NOT NULL OR
304: p_initial_header_rec.invoice_to_org_id IS NOT NULL))
305: ) -- AND condition added to fix 3098878
306: THEN
310:
311: PROCEDURE INVOICING_RULE IS
312: BEGIN
313: IF (p_initial_header_rec.invoicing_rule_id = FND_API.G_MISS_NUM
314: OR (OE_GLOBALS.Equal(p_initial_header_rec.invoicing_rule_id, p_old_header_rec.invoicing_rule_id)
315: AND (p_old_header_rec.header_id IS NOT NULL OR
316: p_initial_header_rec.invoicing_rule_id IS NOT NULL))
317: ) -- AND condition added to fix 3098878
318: THEN
322:
323: PROCEDURE LINE_SET_NAME IS
324: BEGIN
325: IF (p_initial_header_rec.Line_Set_name = FND_API.G_MISS_CHAR
326: OR (OE_GLOBALS.Equal(p_initial_header_rec.Line_Set_name, p_old_header_rec.Line_Set_name)
327: AND (p_old_header_rec.header_id IS NOT NULL OR
328: p_initial_header_rec.Line_Set_name IS NOT NULL))
329: ) -- AND condition added to fix 3098878
330: THEN
334:
335: PROCEDURE ORDER_CATEGORY IS
336: BEGIN
337: IF (p_initial_header_rec.order_category_code = FND_API.G_MISS_CHAR
338: OR (OE_GLOBALS.Equal(p_initial_header_rec.order_category_code, p_old_header_rec.order_category_code)
339: AND (p_old_header_rec.header_id IS NOT NULL OR
340: p_initial_header_rec.order_category_code IS NOT NULL))
341: ) -- AND condition added to fix 3098878
342: THEN
347: PROCEDURE ORDER_DATE_TYPE IS
348: BEGIN
349:
350: IF (p_initial_header_rec.order_date_type_code = FND_API.G_MISS_CHAR
351: OR (OE_GLOBALS.Equal(p_initial_header_rec.order_date_type_code, p_old_header_rec.order_date_type_code)
352: AND (p_old_header_rec.header_id IS NOT NULL OR
353: p_initial_header_rec.order_date_type_code IS NOT NULL))
354: ) -- AND condition added to fix 3098878
355: THEN
359:
360: PROCEDURE ORDER_TYPE IS
361: BEGIN
362: IF (p_initial_header_rec.order_type_id = FND_API.G_MISS_NUM
363: OR (OE_GLOBALS.Equal(p_initial_header_rec.order_type_id, p_old_header_rec.order_type_id)
364: AND (p_old_header_rec.header_id IS NOT NULL OR
365: p_initial_header_rec.order_type_id IS NOT NULL))
366: ) -- AND condition added to fix 3098878
367: THEN
372: --Bug 4360599 Added this method to clear the payment Amount
373: PROCEDURE PAYMENT_AMOUNT IS
374: BEGIN
375: IF (p_initial_header_rec.PAYMENT_AMOUNT = FND_API.G_MISS_NUM
376: OR (OE_GLOBALS.Equal(p_initial_header_rec.PAYMENT_AMOUNT, p_old_header_rec.PAYMENT_AMOUNT)
377: AND (p_old_header_rec.header_id IS NOT NULL OR
378: p_initial_header_rec.PAYMENT_AMOUNT IS NOT NULL))
379: ) -- AND condition added to fix 3098878
380: THEN
384:
385: PROCEDURE PAYMENT_TERM IS
386: BEGIN
387: IF (p_initial_header_rec.payment_term_id = FND_API.G_MISS_NUM
388: OR (OE_GLOBALS.Equal(p_initial_header_rec.payment_term_id, p_old_header_rec.payment_term_id)
389: AND (p_old_header_rec.header_id IS NOT NULL OR
390: p_initial_header_rec.payment_term_id IS NOT NULL))
391: ) -- AND condition added to fix 3098878
392: THEN
396:
397: PROCEDURE PRICE_LIST IS
398: BEGIN
399: IF (p_initial_header_rec.price_list_id = FND_API.G_MISS_NUM
400: OR (OE_GLOBALS.Equal(p_initial_header_rec.price_list_id, p_old_header_rec.price_list_id)
401: AND (p_old_header_rec.header_id IS NOT NULL OR
402: p_initial_header_rec.price_list_id IS NOT NULL))
403: ) -- AND condition added to fix 3098878
404: THEN
408:
409: PROCEDURE PRICE_REQUEST_CODE IS -- PROMOTIONS SEP/01 BEGIN
410: BEGIN
411: IF (p_initial_header_rec.price_request_code = FND_API.G_MISS_CHAR
412: OR (OE_GLOBALS.Equal(p_initial_header_rec.price_request_code, p_old_header_rec.price_request_code)
413: AND (p_old_header_rec.header_id IS NOT NULL OR
414: p_initial_header_rec.price_request_code IS NOT NULL))
415: ) -- AND condition added to fix 3098878
416: THEN
420:
421: PROCEDURE REQUEST_DATE IS
422: BEGIN
423: IF (p_initial_header_rec.request_date = FND_API.G_MISS_DATE
424: OR (OE_GLOBALS.Equal(p_initial_header_rec.request_date, p_old_header_rec.request_date)
425: AND (p_old_header_rec.header_id IS NOT NULL OR
426: p_initial_header_rec.request_date IS NOT NULL))
427: ) -- AND condition added to fix 3098878
428: THEN
432:
433: PROCEDURE SALESREP IS
434: BEGIN
435: IF (p_initial_header_rec.salesrep_id = FND_API.G_MISS_NUM
436: OR (OE_GLOBALS.Equal(p_initial_header_rec.salesrep_id, p_old_header_rec.salesrep_id)
437: AND (p_old_header_rec.header_id IS NOT NULL OR
438: p_initial_header_rec.salesrep_id IS NOT NULL))
439: ) -- AND condition added to fix 3098878
440: THEN
444:
445: PROCEDURE SALES_CHANNEL IS
446: BEGIN
447: IF (p_initial_header_rec.sales_channel_code = FND_API.G_MISS_CHAR
448: OR (OE_GLOBALS.Equal(p_initial_header_rec.sales_channel_code, p_old_header_rec.sales_channel_code)
449: AND (p_old_header_rec.header_id IS NOT NULL OR
450: p_initial_header_rec.sales_channel_code IS NOT NULL))
451: ) -- AND condition added to fix 3098878
452: THEN
456:
457: PROCEDURE SHIPMENT_PRIORITY IS
458: BEGIN
459: IF (p_initial_header_rec.shipment_priority_code = FND_API.G_MISS_CHAR
460: OR (OE_GLOBALS.Equal(p_initial_header_rec.shipment_priority_code, p_old_header_rec.shipment_priority_code)
461: AND (p_old_header_rec.header_id IS NOT NULL OR
462: p_initial_header_rec.shipment_priority_code IS NOT NULL))
463: ) -- AND condition added to fix 3098878
464: THEN
468:
469: PROCEDURE SHIPPING_METHOD IS
470: BEGIN
471: IF (p_initial_header_rec.shipping_method_code = FND_API.G_MISS_CHAR
472: OR (OE_GLOBALS.Equal(p_initial_header_rec.shipping_method_code, p_old_header_rec.shipping_method_code)
473: AND (p_old_header_rec.header_id IS NOT NULL OR
474: p_initial_header_rec.shipping_method_code IS NOT NULL))
475: ) -- AND condition added to fix 3098878
476: THEN
480:
481: PROCEDURE SHIP_FROM_ORG IS
482: BEGIN
483: IF (p_initial_header_rec.ship_from_org_id = FND_API.G_MISS_NUM
484: OR (OE_GLOBALS.Equal(p_initial_header_rec.ship_from_org_id, p_old_header_rec.ship_from_org_id)
485: AND (p_old_header_rec.header_id IS NOT NULL OR
486: p_initial_header_rec.ship_from_org_id IS NOT NULL))
487: ) -- AND condition added to fix 3098878
488: THEN
492:
493: PROCEDURE SHIP_TOLERANCE_ABOVE IS
494: BEGIN
495: IF (p_initial_header_rec.ship_tolerance_above = FND_API.G_MISS_NUM
496: OR (OE_GLOBALS.Equal(p_initial_header_rec.ship_tolerance_above, p_old_header_rec.ship_tolerance_above)
497: AND (p_old_header_rec.header_id IS NOT NULL OR
498: p_initial_header_rec.ship_tolerance_above IS NOT NULL))
499: ) -- AND condition added to fix 3098878
500: THEN
504:
505: PROCEDURE SHIP_TOLERANCE_BELOW IS
506: BEGIN
507: IF (p_initial_header_rec.ship_tolerance_below = FND_API.G_MISS_NUM
508: OR (OE_GLOBALS.Equal(p_initial_header_rec.ship_tolerance_below, p_old_header_rec.ship_tolerance_below)
509: AND (p_old_header_rec.header_id IS NOT NULL OR
510: p_initial_header_rec.ship_tolerance_below IS NOT NULL))
511: ) -- AND condition added to fix 3098878
512: THEN
516:
517: PROCEDURE SHIP_TO_CONTACT IS
518: BEGIN
519: IF (p_initial_header_rec.ship_to_contact_id = FND_API.G_MISS_NUM
520: OR (OE_GLOBALS.Equal(p_initial_header_rec.ship_to_contact_id, p_old_header_rec.ship_to_contact_id)
521: AND (p_old_header_rec.header_id IS NOT NULL OR
522: p_initial_header_rec.ship_to_contact_id IS NOT NULL))
523: ) -- AND condition added to fix 3098878
524: THEN
528:
529: PROCEDURE SHIP_TO_ORG IS
530: BEGIN
531: IF (p_initial_header_rec.ship_to_org_id = FND_API.G_MISS_NUM
532: OR (OE_GLOBALS.Equal(p_initial_header_rec.ship_to_org_id, p_old_header_rec.ship_to_org_id)
533: AND (p_old_header_rec.header_id IS NOT NULL OR
534: p_initial_header_rec.ship_to_org_id IS NOT NULL))
535: ) -- AND condition added to fix 3098878
536: THEN
541: -- Fix bug 1753101: sold to contact dependency code added
542: PROCEDURE SOLD_TO_CONTACT IS
543: BEGIN
544: IF (p_initial_header_rec.sold_to_contact_id = FND_API.G_MISS_NUM
545: OR (OE_GLOBALS.Equal(p_initial_header_rec.sold_to_contact_id, p_old_header_rec.sold_to_contact_id)
546: AND (p_old_header_rec.header_id IS NOT NULL OR
547: p_initial_header_rec.sold_to_contact_id IS NOT NULL))
548: ) -- AND condition added to fix 3098878
549: THEN
553:
554: PROCEDURE SOLD_TO_ORG IS
555: BEGIN
556: IF (p_initial_header_rec.sold_to_org_id = FND_API.G_MISS_NUM
557: OR (OE_GLOBALS.Equal(p_initial_header_rec.sold_to_org_id, p_old_header_rec.sold_to_org_id)
558: AND (p_old_header_rec.header_id IS NOT NULL OR
559: p_initial_header_rec.sold_to_org_id IS NOT NULL))
560: ) -- AND condition added to fix 3098878
561: THEN
565:
566: PROCEDURE SOLD_TO_PHONE IS
567: BEGIN
568: IF (p_initial_header_rec.sold_to_phone_id = FND_API.G_MISS_NUM
569: OR (OE_GLOBALS.Equal(p_initial_header_rec.sold_to_phone_id, p_old_header_rec.sold_to_phone_id)
570: AND (p_old_header_rec.header_id IS NOT NULL OR
571: p_initial_header_rec.sold_to_phone_id IS NOT NULL))
572: ) -- AND condition added to fix 3098878
573: THEN
578:
579: PROCEDURE TAX_EXEMPT_NUMBER IS
580: BEGIN
581: IF (p_initial_header_rec.tax_exempt_number = FND_API.G_MISS_CHAR
582: OR (OE_GLOBALS.Equal(p_initial_header_rec.tax_exempt_number, p_old_header_rec.tax_exempt_number)
583: AND (p_old_header_rec.header_id IS NOT NULL OR
584: p_initial_header_rec.tax_exempt_number IS NOT NULL))
585: ) -- AND condition added to fix 3098878
586: THEN
590:
591: PROCEDURE TAX_EXEMPT_REASON IS
592: BEGIN
593: IF (p_initial_header_rec.tax_exempt_reason_code = FND_API.G_MISS_CHAR
594: OR (OE_GLOBALS.Equal(p_initial_header_rec.tax_exempt_reason_code, p_old_header_rec.tax_exempt_reason_code)
595: AND (p_old_header_rec.header_id IS NOT NULL OR
596: p_initial_header_rec.tax_exempt_reason_code IS NOT NULL))
597: ) -- AND condition added to fix 3098878
598: THEN
596: p_initial_header_rec.tax_exempt_reason_code IS NOT NULL))
597: ) -- AND condition added to fix 3098878
598: THEN
599: -- If condition for bug #2892094
600: IF OE_GLOBALS.G_UI_FLAG THEN
601: p_x_header_rec.tax_exempt_reason_code := FND_API.G_MISS_CHAR;
602: END IF;
603: END IF;
604: END TAX_EXEMPT_REASON;
605:
606: PROCEDURE TRANSACTIONAL_CURR IS
607: BEGIN
608: IF (p_initial_header_rec.transactional_curr_code = FND_API.G_MISS_CHAR
609: OR (OE_GLOBALS.Equal(p_initial_header_rec.transactional_curr_code, p_old_header_rec.transactional_curr_code)
610: AND (p_old_header_rec.header_id IS NOT NULL OR
611: p_initial_header_rec.transactional_curr_code IS NOT NULL))
612: ) -- AND condition added to fix 3098878
613: THEN
617:
618: PROCEDURE LATEST_SCHEDULE_LIMIT IS
619: BEGIN
620: IF (p_initial_header_rec.latest_schedule_limit = FND_API.G_MISS_NUM
621: OR (OE_GLOBALS.Equal(p_initial_header_rec.latest_schedule_limit, p_old_header_rec.latest_schedule_limit)
622: AND (p_old_header_rec.header_id IS NOT NULL OR
623: p_initial_header_rec.latest_schedule_limit IS NOT NULL))
624: ) -- AND condition added to fix 3098878
625: THEN
629:
630: PROCEDURE PACKING_INSTRUCTIONS IS -- added for 2665264
631: BEGIN
632: IF (p_initial_header_rec.packing_instructions = FND_API.G_MISS_CHAR
633: OR (OE_GLOBALS.Equal(p_initial_header_rec.packing_instructions, p_old_header_rec.packing_instructions)
634: AND (p_old_header_rec.header_id IS NOT NULL OR
635: p_initial_header_rec.packing_instructions IS NOT NULL))
636: ) -- AND condition added to fix 3098878
637: THEN
641:
642: PROCEDURE SHIPPING_INSTRUCTIONS IS -- added for 2766005
643: BEGIN
644: IF (p_initial_header_rec.shipping_instructions = FND_API.G_MISS_CHAR
645: OR (OE_GLOBALS.Equal(p_initial_header_rec.shipping_instructions, p_old_header_rec.shipping_instructions)
646: AND (p_old_header_rec.header_id IS NOT NULL OR
647: p_initial_header_rec.shipping_instructions IS NOT NULL))
648: ) -- AND condition added to fix 3098878
649: THEN
655:
656: PROCEDURE TRANSACTION_PHASE IS
657: BEGIN
658: -- Transaction phase can only be cleared during CREATE operation
659: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE
660: AND (p_initial_header_rec.transaction_phase_code = FND_API.G_MISS_CHAR
661: OR (OE_GLOBALS.Equal(p_initial_header_rec.transaction_phase_code, p_old_header_rec.transaction_phase_code)
662: AND (p_old_header_rec.header_id IS NOT NULL OR
663: p_initial_header_rec.transaction_phase_code IS NOT NULL))
657: BEGIN
658: -- Transaction phase can only be cleared during CREATE operation
659: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE
660: AND (p_initial_header_rec.transaction_phase_code = FND_API.G_MISS_CHAR
661: OR (OE_GLOBALS.Equal(p_initial_header_rec.transaction_phase_code, p_old_header_rec.transaction_phase_code)
662: AND (p_old_header_rec.header_id IS NOT NULL OR
663: p_initial_header_rec.transaction_phase_code IS NOT NULL))
664: ) -- 2nd AND condition added to fix 3098878
665: THEN
669:
670: PROCEDURE SOLD_TO_SITE_USE IS
671: BEGIN
672: IF (p_initial_header_rec.sold_to_site_use_id = FND_API.G_MISS_NUM
673: OR (OE_GLOBALS.Equal(p_initial_header_rec.sold_to_site_use_id, p_old_header_rec.sold_to_site_use_id)
674: AND (p_old_header_rec.header_id IS NOT NULL OR
675: p_initial_header_rec.sold_to_site_use_id IS NOT NULL))
676: ) -- AND condition added to fix 3098878
677: THEN
681:
682: PROCEDURE QUOTE_DATE IS
683: BEGIN
684: IF (p_initial_header_rec.quote_date = FND_API.G_MISS_DATE
685: OR (OE_GLOBALS.Equal(p_initial_header_rec.quote_date, p_old_header_rec.quote_date)
686: AND (p_old_header_rec.header_id IS NOT NULL OR
687: p_initial_header_rec.quote_date IS NOT NULL))
688: ) -- AND condition added to fix 3098878
689: AND OE_Quote_Util.G_COMPLETE_NEG = 'N'
696:
697: PROCEDURE ORDERED_DATE IS
698: BEGIN
699: IF (p_initial_header_rec.ordered_date = FND_API.G_MISS_DATE
700: OR (OE_GLOBALS.Equal(p_initial_header_rec.ordered_date, p_old_header_rec.ordered_date)
701: AND (p_old_header_rec.header_id IS NOT NULL OR
702: p_initial_header_rec.ordered_date IS NOT NULL))
703: -- bug 3854887
704: AND (p_x_header_rec.transaction_phase_code IS NULL OR
715: --distributed orders
716: PROCEDURE end_customer IS
717: BEGIN
718: IF (p_initial_header_rec.end_customer_id = FND_API.G_MISS_NUM
719: OR OE_GLOBALS.Equal(p_initial_header_rec.end_customer_id
720: , p_old_header_rec.end_customer_id ))
721: THEN
722: p_x_header_rec.end_customer_id := FND_API.G_MISS_NUM;
723: END IF;
725:
726: PROCEDURE end_customer_contact IS
727: BEGIN
728: IF (p_initial_header_rec.end_customer_contact_id = FND_API.G_MISS_NUM
729: OR OE_GLOBALS.Equal(p_initial_header_rec.end_customer_contact_id
730: , p_old_header_rec.end_customer_contact_id ))
731: THEN
732: p_x_header_rec.end_customer_contact_id := FND_API.G_MISS_NUM;
733: END IF;
735:
736: PROCEDURE end_customer_site_use IS
737: BEGIN
738: IF (p_initial_header_rec.end_customer_site_use_id = FND_API.G_MISS_NUM
739: OR OE_GLOBALS.Equal(p_initial_header_rec.end_customer_site_use_id ,
740: p_old_header_rec.end_customer_site_use_id ))
741: THEN
742: p_x_header_rec.end_customer_site_use_id := FND_API.G_MISS_NUM;
743: END IF;
747: PROCEDURE order_firmed_date IS
748: BEGIN
749: IF (p_initial_header_rec.order_firmed_date = FND_API.G_MISS_DATE
750: OR
751: (OE_GLOBALS.equal(p_initial_header_rec.order_firmed_date ,p_old_header_rec.order_firmed_date)
752: AND (p_initial_header_rec.order_firmed_date IS NOT NULL OR p_old_header_rec.order_firmed_date IS NOT NULL))
753: ) THEN
754: p_x_header_rec.order_firmed_date := FND_API.G_MISS_DATE;
755: END IF ;
761: oe_debug_pub.add('Entering OE_HEADER_UTIL.Clear_Dependent',1);
762: IF p_src_attr_tbl.COUNT <> 0 THEN
763:
764: OE_Dependencies.Mark_Dependent
765: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
766: p_source_attr_tbl => p_src_attr_tbl,
767: p_dep_attr_tbl => l_dep_attr_tbl);
768:
769: FOR I IN 1..l_dep_attr_tbl.COUNT LOOP
1512: , p_old_instrument_id IN NUMBER DEFAULT NULL
1513: )
1514: IS
1515: l_index NUMBER :=0;
1516: l_src_attr_tbl OE_GLOBALS.NUMBER_Tbl_Type;
1517: BEGIN
1518:
1519: oe_debug_pub.add('Entering OE_HEADER_UTIL.CLEAR_DEPENDENT_ATTR', 1);
1520:
1527: -- every changed attribute clear its dependent fields.
1528:
1529: ELSE
1530:
1531: IF NOT OE_GLOBALS.Equal(p_x_header_rec.agreement_id,p_old_header_rec.agreement_id)
1532: THEN
1533: l_index := l_index + 1.0;
1534: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_AGREEMENT;
1535: END IF;
1533: l_index := l_index + 1.0;
1534: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_AGREEMENT;
1535: END IF;
1536:
1537: IF NOT OE_GLOBALS.Equal(p_x_header_rec.deliver_to_org_id,p_old_header_rec.deliver_to_org_id)
1538: THEN
1539: l_index := l_index + 1.0;
1540: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_DELIVER_TO_ORG;
1541: END IF;
1539: l_index := l_index + 1.0;
1540: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_DELIVER_TO_ORG;
1541: END IF;
1542:
1543: IF NOT OE_GLOBALS.Equal(p_x_header_rec.invoice_to_contact_id,p_old_header_rec.invoice_to_contact_id)
1544: THEN
1545: l_index := l_index + 1.0;
1546: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_INVOICE_TO_CONTACT;
1547: END IF;
1545: l_index := l_index + 1.0;
1546: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_INVOICE_TO_CONTACT;
1547: END IF;
1548:
1549: IF NOT OE_GLOBALS.Equal(p_x_header_rec.invoice_to_org_id,p_old_header_rec.invoice_to_org_id)
1550: THEN
1551: l_index := l_index + 1.0;
1552: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_INVOICE_TO_ORG;
1553: END IF;
1551: l_index := l_index + 1.0;
1552: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_INVOICE_TO_ORG;
1553: END IF;
1554:
1555: IF NOT OE_GLOBALS.Equal(p_x_header_rec.ordered_date,p_old_header_rec.ordered_date)
1556: THEN
1557: l_index := l_index + 1.0;
1558: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_ORDERED_DATE;
1559: END IF;
1557: l_index := l_index + 1.0;
1558: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_ORDERED_DATE;
1559: END IF;
1560:
1561: IF NOT OE_GLOBALS.Equal(p_x_header_rec.order_type_id,p_old_header_rec.order_type_id)
1562: THEN
1563: l_index := l_index + 1.0;
1564: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_ORDER_TYPE;
1565: END IF;
1563: l_index := l_index + 1.0;
1564: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_ORDER_TYPE;
1565: END IF;
1566:
1567: IF NOT OE_GLOBALS.Equal(p_x_header_rec.payment_type_code,p_old_header_rec.payment_type_code)
1568: THEN
1569: l_index := l_index + 1.0;
1570: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_PAYMENT_TYPE;
1571: END IF;
1570: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_PAYMENT_TYPE;
1571: END IF;
1572:
1573: /* Fix Bug # 2297053: Clear attributes dependent on Credit Card Number */
1574: IF NOT OE_GLOBALS.Is_Same_Credit_Card(p_old_header_rec.credit_card_number,p_x_header_rec.credit_card_number,
1575: p_old_instrument_id,p_x_instrument_id)
1576: THEN
1577: l_index := l_index + 1.0;
1578: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_CREDIT_CARD_NUMBER;
1577: l_index := l_index + 1.0;
1578: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_CREDIT_CARD_NUMBER;
1579: END IF;
1580:
1581: IF NOT OE_GLOBALS.Equal(p_x_header_rec.price_list_id,p_old_header_rec.price_list_id)
1582: THEN
1583: l_index := l_index + 1.0;
1584: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_PRICE_LIST;
1585: END IF;
1583: l_index := l_index + 1.0;
1584: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_PRICE_LIST;
1585: END IF;
1586:
1587: IF NOT OE_GLOBALS.Equal(p_x_header_rec.request_date,p_old_header_rec.request_date)
1588: THEN
1589: l_index := l_index + 1.0;
1590: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_REQUEST_DATE;
1591: END IF;
1589: l_index := l_index + 1.0;
1590: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_REQUEST_DATE;
1591: END IF;
1592:
1593: IF NOT OE_GLOBALS.Equal(p_x_header_rec.ship_from_org_id,p_old_header_rec.ship_from_org_id)
1594: THEN
1595: l_index := l_index + 1.0;
1596: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_SHIP_FROM_ORG;
1597: END IF;
1595: l_index := l_index + 1.0;
1596: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_SHIP_FROM_ORG;
1597: END IF;
1598:
1599: IF NOT OE_GLOBALS.Equal(p_x_header_rec.ship_to_contact_id,p_old_header_rec.ship_to_contact_id)
1600: THEN
1601: l_index := l_index + 1.0;
1602: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_SHIP_TO_CONTACT;
1603: END IF;
1601: l_index := l_index + 1.0;
1602: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_SHIP_TO_CONTACT;
1603: END IF;
1604:
1605: IF NOT OE_GLOBALS.Equal(p_x_header_rec.ship_to_org_id,p_old_header_rec.ship_to_org_id)
1606: THEN
1607: l_index := l_index + 1.0;
1608: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_SHIP_TO_ORG;
1609: END IF;
1607: l_index := l_index + 1.0;
1608: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_SHIP_TO_ORG;
1609: END IF;
1610:
1611: IF NOT OE_GLOBALS.Equal(p_x_header_rec.sold_to_org_id,p_old_header_rec.sold_to_org_id)
1612: THEN
1613: l_index := l_index + 1.0;
1614: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_SOLD_TO_ORG;
1615: END IF;
1613: l_index := l_index + 1.0;
1614: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_SOLD_TO_ORG;
1615: END IF;
1616:
1617: IF NOT OE_GLOBALS.Equal(p_x_header_rec.sold_to_phone_id,p_old_header_rec.sold_to_phone_id)
1618: THEN
1619: l_index := l_index + 1.0;
1620: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_SOLD_TO_PHONE;
1621: END IF;
1619: l_index := l_index + 1.0;
1620: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_SOLD_TO_PHONE;
1621: END IF;
1622:
1623: IF NOT OE_GLOBALS.Equal(p_x_header_rec.tax_exempt_flag,p_old_header_rec.tax_exempt_flag)
1624: THEN
1625: l_index := l_index + 1.0;
1626: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_TAX_EXEMPT;
1627: END IF;
1625: l_index := l_index + 1.0;
1626: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_TAX_EXEMPT;
1627: END IF;
1628:
1629: IF NOT OE_GLOBALS.Equal(p_x_header_rec.transactional_curr_code,p_old_header_rec.transactional_curr_code)
1630: THEN
1631: l_index := l_index + 1.0;
1632: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_TRANSACTIONAL_CURR;
1633: END IF;
1631: l_index := l_index + 1.0;
1632: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_TRANSACTIONAL_CURR;
1633: END IF;
1634:
1635: IF NOT OE_GLOBALS.Equal(p_x_header_rec.blanket_number,p_old_header_rec.blanket_number)
1636: THEN
1637: l_index := l_index + 1.0;
1638: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_BLANKET_NUMBER;
1639: END IF;
1638: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_BLANKET_NUMBER;
1639: END IF;
1640:
1641: -- QUOTING changes
1642: IF NOT OE_GLOBALS.Equal(p_x_header_rec.transaction_phase_code,p_old_header_rec.transaction_phase_code)
1643: THEN
1644: l_index := l_index + 1.0;
1645: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_TRANSACTION_PHASE;
1646: END IF;
1646: END IF;
1647: -- QUOTING changes END
1648:
1649: --distributed order @
1650: IF NOT OE_GLOBALS.Equal(p_x_header_rec.end_customer_id,p_old_header_rec.end_customer_id)
1651: THEN
1652: l_index := l_index + 1.0;
1653: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_END_CUSTOMER;
1654: END IF;
1653: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_END_CUSTOMER;
1654: END IF;
1655:
1656: -- bug 5127922
1657: IF NOT OE_GLOBALS.Equal(p_x_header_rec.sold_to_site_use_id,p_old_header_rec.sold_to_site_use_id)
1658: THEN
1659: l_index := l_index + 1.0;
1660: l_src_attr_tbl(l_index) := OE_HEADER_UTIL.G_SOLD_TO_SITE_USE;
1661: END IF;
1762: oe_debug_pub.add('Entering OE_HEADER_UTIL.APPLY_ATTRIBUTE_CHANGES', 1);
1763:
1764: -- Load out record
1765:
1766: IF NOT OE_GLOBALS.Equal(p_x_header_rec.booked_flag,p_old_header_rec.booked_flag)
1767: THEN
1768: IF p_x_header_rec.booked_flag = 'Y' THEN
1769: p_x_header_rec.flow_status_code := 'BOOKED';
1770: END IF;
1769: p_x_header_rec.flow_status_code := 'BOOKED';
1770: END IF;
1771: END IF;
1772:
1773: IF NOT OE_GLOBALS.Equal(p_x_header_rec.cancelled_flag,p_old_header_rec.cancelled_flag)
1774: THEN
1775: IF p_x_header_rec.cancelled_flag = 'Y' THEN
1776:
1777: Oe_Sales_Can_Util.Check_Constraints(p_x_header_rec,
1797: oe_debug_pub.add('payment type--'||nvl(p_x_header_rec.payment_type_code,'xxx'));
1798: oe_debug_pub.add('Old inv to ...'||p_x_header_rec.invoice_to_org_id);
1799: oe_debug_pub.add('New inv to...'||p_old_header_rec.invoice_to_org_id);
1800:
1801: IF NOT OE_GLOBALS.Equal(p_x_header_rec.invoice_to_org_id,p_old_header_rec.invoice_to_org_id)
1802: THEN
1803: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
1804: --R12 CC Encryption
1805: --Delayed request for deleting the payments when
1799: oe_debug_pub.add('New inv to...'||p_old_header_rec.invoice_to_org_id);
1800:
1801: IF NOT OE_GLOBALS.Equal(p_x_header_rec.invoice_to_org_id,p_old_header_rec.invoice_to_org_id)
1802: THEN
1803: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
1804: --R12 CC Encryption
1805: --Delayed request for deleting the payments when
1806: --invoice to changes
1807: IF p_x_header_rec.payment_type_code in ('ACH','DIRECT_DEBIT','CREDIT_CARD') OR
1817: oe_debug_pub.add('Delete Payment Count count'||l_delete_payment_count);
1818: oe_debug_pub.add('Log delete payment req Flag'||l_log_delete_payment_req);
1819: IF l_log_delete_payment_req = 'Y' THEN
1820: OE_delayed_requests_Pvt.log_request
1821: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER_PAYMENT,
1822: p_entity_id => p_x_Header_rec.header_id,
1823: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
1824: p_requesting_entity_id => p_x_Header_rec.header_id,
1825: p_request_type => OE_GLOBALS.G_DELETE_PAYMENTS,
1819: IF l_log_delete_payment_req = 'Y' THEN
1820: OE_delayed_requests_Pvt.log_request
1821: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER_PAYMENT,
1822: p_entity_id => p_x_Header_rec.header_id,
1823: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
1824: p_requesting_entity_id => p_x_Header_rec.header_id,
1825: p_request_type => OE_GLOBALS.G_DELETE_PAYMENTS,
1826: p_param1 => to_char(p_old_header_rec.invoice_to_org_id),
1827: x_return_status => l_return_status);
1821: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER_PAYMENT,
1822: p_entity_id => p_x_Header_rec.header_id,
1823: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
1824: p_requesting_entity_id => p_x_Header_rec.header_id,
1825: p_request_type => OE_GLOBALS.G_DELETE_PAYMENTS,
1826: p_param1 => to_char(p_old_header_rec.invoice_to_org_id),
1827: x_return_status => l_return_status);
1828:
1829: END IF;--Log delayed req.
1862: oe_debug_pub.add('p_x_header_rec.open_flag:'||p_x_header_rec.open_flag);
1863: oe_debug_pub.add('p_old_header_rec.open_flag:'||p_old_header_rec.open_flag);
1864:
1865:
1866: IF (NOT OE_GLOBALS.Equal(p_x_header_rec.open_flag,
1867: p_old_header_rec.open_flag)) OR
1868: (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
1869: p_x_header_rec.open_flag IS NOT NULL)
1870: --OR cnd for bug 5060064
1864:
1865:
1866: IF (NOT OE_GLOBALS.Equal(p_x_header_rec.open_flag,
1867: p_old_header_rec.open_flag)) OR
1868: (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
1869: p_x_header_rec.open_flag IS NOT NULL)
1870: --OR cnd for bug 5060064
1871: THEN
1872: IF p_x_header_rec.open_flag = 'N' THEN
1878: END IF;
1879:
1880: END IF;
1881:
1882: IF NOT OE_GLOBALS.Equal(p_x_header_rec.order_type_id,p_old_header_rec.order_type_id)
1883: THEN
1884:
1885: -- If the Order Type has changed, we need to sync up the
1886: -- MTL_SALES_ORDERS table.
1883: THEN
1884:
1885: -- If the Order Type has changed, we need to sync up the
1886: -- MTL_SALES_ORDERS table.
1887: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
1888:
1889:
1890: IF p_x_header_rec.payment_type_code = 'CREDIT_CARD' THEN
1891:
1909: END IF;
1910: END IF;
1911: END IF;
1912:
1913: IF (NOT OE_GLOBALS.Equal(p_x_header_rec.salesrep_id,
1914: p_old_header_rec.salesrep_id)) OR
1915: (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
1916: p_x_header_rec.salesrep_id IS NOT NULL )
1917: --OR condition added for bug 5060064
1911: END IF;
1912:
1913: IF (NOT OE_GLOBALS.Equal(p_x_header_rec.salesrep_id,
1914: p_old_header_rec.salesrep_id)) OR
1915: (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
1916: p_x_header_rec.salesrep_id IS NOT NULL )
1917: --OR condition added for bug 5060064
1918: THEN
1919:
1917: --OR condition added for bug 5060064
1918: THEN
1919:
1920: IF NOT (nvl(p_x_header_rec.source_document_type_id,-99) = 2 AND
1921: p_x_header_rec.operation = oe_globals.g_opr_create)THEN
1922: IF p_x_header_rec.salesrep_id IS NOT NULL THEN
1923: IF OE_Validate_Header_Scredit.G_Create_Auto_Sales_Credit = 'Y' THEN
1924: OE_delayed_requests_Pvt.log_request
1925: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
1921: p_x_header_rec.operation = oe_globals.g_opr_create)THEN
1922: IF p_x_header_rec.salesrep_id IS NOT NULL THEN
1923: IF OE_Validate_Header_Scredit.G_Create_Auto_Sales_Credit = 'Y' THEN
1924: OE_delayed_requests_Pvt.log_request
1925: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
1926: p_entity_id => p_x_header_rec.header_id,
1927: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
1928: p_requesting_entity_id => p_x_header_rec.header_id,
1929: p_request_type => OE_GLOBALS.G_DFLT_HSCREDIT_FOR_SREP,
1923: IF OE_Validate_Header_Scredit.G_Create_Auto_Sales_Credit = 'Y' THEN
1924: OE_delayed_requests_Pvt.log_request
1925: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
1926: p_entity_id => p_x_header_rec.header_id,
1927: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
1928: p_requesting_entity_id => p_x_header_rec.header_id,
1929: p_request_type => OE_GLOBALS.G_DFLT_HSCREDIT_FOR_SREP,
1930: p_param1 => p_x_header_rec.header_id,
1931: p_param2 => p_x_header_rec.salesrep_id,
1925: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
1926: p_entity_id => p_x_header_rec.header_id,
1927: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
1928: p_requesting_entity_id => p_x_header_rec.header_id,
1929: p_request_type => OE_GLOBALS.G_DFLT_HSCREDIT_FOR_SREP,
1930: p_param1 => p_x_header_rec.header_id,
1931: p_param2 => p_x_header_rec.salesrep_id,
1932: x_return_status => l_return_status);
1933: END IF;
1936: ELSE
1937: IF OE_Validate_Header_Scredit.G_Create_Auto_Sales_Credit = 'Y' THEN
1938: OE_DELAYED_REQUESTS_PVT.Delete_Request
1939: (
1940: p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
1941: p_entity_id => p_x_header_rec.header_id,
1942: p_request_type => OE_GLOBALS.G_DFLT_HSCREDIT_FOR_SREP,
1943: x_return_status => l_return_status
1944: );
1938: OE_DELAYED_REQUESTS_PVT.Delete_Request
1939: (
1940: p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
1941: p_entity_id => p_x_header_rec.header_id,
1942: p_request_type => OE_GLOBALS.G_DFLT_HSCREDIT_FOR_SREP,
1943: x_return_status => l_return_status
1944: );
1945: END IF;
1946: /* End of bug 4139105 */
1952: NULL;
1953: END IF;
1954: oe_debug_pub.add('Raj3', 1);
1955:
1956: IF NOT OE_GLOBALS.Equal(p_x_header_rec.sold_to_org_id,p_old_header_rec.sold_to_org_id)
1957: THEN
1958: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
1959: AND p_x_header_rec.payment_type_code = 'CREDIT_CARD' THEN
1960:
1954: oe_debug_pub.add('Raj3', 1);
1955:
1956: IF NOT OE_GLOBALS.Equal(p_x_header_rec.sold_to_org_id,p_old_header_rec.sold_to_org_id)
1957: THEN
1958: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
1959: AND p_x_header_rec.payment_type_code = 'CREDIT_CARD' THEN
1960:
1961: -- Set Flag to Log a request for Verify Payment
1962: oe_debug_pub.add('Log Verify Payment Delayed Request in Sold To',3);
1964: l_verify_payment_flag := 'Y';
1965:
1966: END IF;
1967:
1968: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
1969: -- Log request to evaluate Holds.
1970: oe_debug_pub.ADD('Customer update: logging request for eval_hold_source',1);
1971: oe_debug_pub.ADD('Header ID:' || to_char(p_x_header_rec.header_id) ||
1972: 'Entity ID:' || to_char(p_x_header_rec.sold_to_org_id),1);
1970: oe_debug_pub.ADD('Customer update: logging request for eval_hold_source',1);
1971: oe_debug_pub.ADD('Header ID:' || to_char(p_x_header_rec.header_id) ||
1972: 'Entity ID:' || to_char(p_x_header_rec.sold_to_org_id),1);
1973: OE_delayed_requests_Pvt.log_request
1974: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
1975: p_entity_id => p_x_header_rec.header_id,
1976: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
1977: p_requesting_entity_id => p_x_header_rec.header_id,
1978: p_request_type => OE_GLOBALS.G_EVAL_HOLD_SOURCE,
1972: 'Entity ID:' || to_char(p_x_header_rec.sold_to_org_id),1);
1973: OE_delayed_requests_Pvt.log_request
1974: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
1975: p_entity_id => p_x_header_rec.header_id,
1976: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
1977: p_requesting_entity_id => p_x_header_rec.header_id,
1978: p_request_type => OE_GLOBALS.G_EVAL_HOLD_SOURCE,
1979: p_request_unique_key1 => 'CUSTOMER',
1980: p_param1 => 'C',
1974: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
1975: p_entity_id => p_x_header_rec.header_id,
1976: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
1977: p_requesting_entity_id => p_x_header_rec.header_id,
1978: p_request_type => OE_GLOBALS.G_EVAL_HOLD_SOURCE,
1979: p_request_unique_key1 => 'CUSTOMER',
1980: p_param1 => 'C',
1981: p_param2 => p_x_header_rec.sold_to_org_id,
1982: x_return_status => l_return_status);
1985:
1986:
1987: END IF;
1988:
1989: IF NOT OE_GLOBALS.Equal(p_x_header_rec.tax_point_code,p_old_header_rec.tax_point_code)
1990: THEN
1991: NULL;
1992: END IF;
1993:
1990: THEN
1991: NULL;
1992: END IF;
1993:
1994: IF NOT OE_GLOBALS.Equal(p_x_header_rec.transactional_curr_code,p_old_header_rec.transactional_curr_code)
1995: THEN
1996: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
1997: THEN
1998:
1992: END IF;
1993:
1994: IF NOT OE_GLOBALS.Equal(p_x_header_rec.transactional_curr_code,p_old_header_rec.transactional_curr_code)
1995: THEN
1996: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
1997: THEN
1998:
1999: IF p_x_header_rec.payment_type_code = 'CREDIT_CARD' THEN
2000:
2014: END IF;
2015: END IF;
2016: END IF;
2017:
2018: IF NOT OE_GLOBALS.Equal(p_x_header_rec.payment_type_code,p_old_header_rec.payment_type_code)
2019: THEN
2020: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
2021: --R12 CC Encryption
2022: --Credit card processing would
2016: END IF;
2017:
2018: IF NOT OE_GLOBALS.Equal(p_x_header_rec.payment_type_code,p_old_header_rec.payment_type_code)
2019: THEN
2020: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
2021: --R12 CC Encryption
2022: --Credit card processing would
2023: --now be handled in pre_write_process procedure
2024: IF p_x_header_rec.payment_type_code IS NOT NULL
2031:
2032: --R12 CC Encryption
2033: END IF;
2034: END IF;
2035: IF NOT OE_GLOBALS.Equal(p_x_header_rec.payment_amount,p_old_header_rec.payment_amount)
2036: THEN
2037: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2038: AND p_x_header_rec.payment_type_code in ('CASH', 'CHECK')
2039: THEN
2033: END IF;
2034: END IF;
2035: IF NOT OE_GLOBALS.Equal(p_x_header_rec.payment_amount,p_old_header_rec.payment_amount)
2036: THEN
2037: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2038: AND p_x_header_rec.payment_type_code in ('CASH', 'CHECK')
2039: THEN
2040:
2041: -- Set Flag to Log a request for Verify Payment
2047:
2048: END IF;
2049: END IF;
2050:
2051: IF NOT OE_GLOBALS.Equal(p_x_header_rec.check_number,p_old_header_rec.check_number)
2052: THEN
2053: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2054: AND p_x_header_rec.payment_type_code = 'CHECK'
2055: THEN
2049: END IF;
2050:
2051: IF NOT OE_GLOBALS.Equal(p_x_header_rec.check_number,p_old_header_rec.check_number)
2052: THEN
2053: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2054: AND p_x_header_rec.payment_type_code = 'CHECK'
2055: THEN
2056:
2057: -- Set Flag to Log a request for Verify Payment
2064: END IF;
2065: END IF;
2066:
2067:
2068: IF NOT OE_GLOBALS.Equal(p_x_header_rec.credit_card_holder_name,p_old_header_rec.credit_card_holder_name)
2069: THEN
2070: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2071: AND p_x_header_rec.payment_type_code = 'CREDIT_CARD' THEN
2072:
2066:
2067:
2068: IF NOT OE_GLOBALS.Equal(p_x_header_rec.credit_card_holder_name,p_old_header_rec.credit_card_holder_name)
2069: THEN
2070: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2071: AND p_x_header_rec.payment_type_code = 'CREDIT_CARD' THEN
2072:
2073: -- Set Flag to Log a request for Verify Payment
2074: oe_debug_pub.add('Log Verify Payment Delayed Request in CC Holder',3);
2081:
2082: END IF;
2083: END IF;
2084:
2085: IF NOT OE_GLOBALS.Is_Same_Credit_Card(p_old_header_rec.credit_card_number,
2086: p_x_header_rec.credit_card_number,
2087: p_old_header_rec.cc_instrument_id,
2088: p_x_header_rec.cc_instrument_id)
2089: THEN
2086: p_x_header_rec.credit_card_number,
2087: p_old_header_rec.cc_instrument_id,
2088: p_x_header_rec.cc_instrument_id)
2089: THEN
2090: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2091: AND p_x_header_rec.payment_type_code = 'CREDIT_CARD' THEN
2092:
2093: -- Set Flag to Log a request for Verify Payment
2094: oe_debug_pub.add('Log Verify Payment Delayed Request in CC Number',3);
2102: END IF;
2103: END IF;
2104: oe_debug_pub.add('Raj4', 1);
2105:
2106: IF NOT OE_GLOBALS.Equal(p_x_header_rec.credit_card_expiration_date,p_old_header_rec.credit_card_expiration_date)
2107: THEN
2108: /* Fix Bug # 3686048(FP 3659342): Set the Exp Date as the Last Day of the Month */
2109: select last_day(p_x_header_rec.credit_card_expiration_date)
2110: into p_x_header_rec.credit_card_expiration_date from dual;
2108: /* Fix Bug # 3686048(FP 3659342): Set the Exp Date as the Last Day of the Month */
2109: select last_day(p_x_header_rec.credit_card_expiration_date)
2110: into p_x_header_rec.credit_card_expiration_date from dual;
2111:
2112: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2113: AND p_x_header_rec.payment_type_code = 'CREDIT_CARD' THEN
2114:
2115: -- Set Flag to Log a request for Verify Payment
2116: oe_debug_pub.add('Log Verify Payment Delayed Request in CC Exp Date',3);
2123:
2124: END IF;
2125: END IF;
2126:
2127: IF NOT OE_GLOBALS.Equal(p_x_header_rec.credit_card_approval_code,p_old_header_rec.credit_card_approval_code)
2128: THEN
2129: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2130: AND p_x_header_rec.payment_type_code = 'CREDIT_CARD' THEN
2131:
2125: END IF;
2126:
2127: IF NOT OE_GLOBALS.Equal(p_x_header_rec.credit_card_approval_code,p_old_header_rec.credit_card_approval_code)
2128: THEN
2129: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2130: AND p_x_header_rec.payment_type_code = 'CREDIT_CARD' THEN
2131:
2132: -- Set Flag to Log a request for Verify Payment
2133: oe_debug_pub.add('Log Verify Payment Delayed Request in CC Approval',3);
2143:
2144:
2145: /* Fix for 1559906: New Procedure to Copy Freight Charges */
2146:
2147: IF (NOT OE_GLOBALS.Equal(p_x_header_rec.source_document_type_id,
2148: p_old_header_rec.source_document_type_id)) OR
2149: (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE
2150: AND p_x_header_rec.source_document_type_id = 2)
2151: --OR condition added for bug 5060064
2145: /* Fix for 1559906: New Procedure to Copy Freight Charges */
2146:
2147: IF (NOT OE_GLOBALS.Equal(p_x_header_rec.source_document_type_id,
2148: p_old_header_rec.source_document_type_id)) OR
2149: (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE
2150: AND p_x_header_rec.source_document_type_id = 2)
2151: --OR condition added for bug 5060064
2152: THEN
2153: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE
2149: (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE
2150: AND p_x_header_rec.source_document_type_id = 2)
2151: --OR condition added for bug 5060064
2152: THEN
2153: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE
2154: AND p_x_header_rec.source_document_type_id = 2 THEN
2155:
2156: -- Added IF condition for bug 6697401
2157: IF OE_ORDER_COPY_UTIL.G_COPY_REC.line_price_mode =
2162: -- Log a request to copy Freight Charges to the copied order.
2163: oe_debug_pub.add('Log Delayed Request To Copy Charges in SRC Doc Type Id',3);
2164:
2165: OE_delayed_requests_Pvt.log_request(
2166: p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2167: p_entity_id => p_x_header_rec.header_id,
2168: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2169: p_requesting_entity_id => p_x_header_rec.header_id,
2170: p_param1 => p_x_header_rec.order_category_code,
2164:
2165: OE_delayed_requests_Pvt.log_request(
2166: p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2167: p_entity_id => p_x_header_rec.header_id,
2168: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2169: p_requesting_entity_id => p_x_header_rec.header_id,
2170: p_param1 => p_x_header_rec.order_category_code,
2171: p_param2 => p_x_header_rec.source_document_id,
2172: p_request_type => OE_GLOBALS.G_COPY_FREIGHT_CHARGES,
2168: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2169: p_requesting_entity_id => p_x_header_rec.header_id,
2170: p_param1 => p_x_header_rec.order_category_code,
2171: p_param2 => p_x_header_rec.source_document_id,
2172: p_request_type => OE_GLOBALS.G_COPY_FREIGHT_CHARGES,
2173: x_return_status => l_return_status);
2174: END IF; -- bug 6697401
2175: END IF;
2176: END IF;
2175: END IF;
2176: END IF;
2177:
2178: /* Added the following code to fix the bug 2170086 */
2179: IF NOT OE_GLOBALS.Equal(p_x_header_rec.source_document_type_id,p_old_header_rec.source_document_type_id) OR
2180: (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE
2181: AND p_x_header_rec.source_document_type_id = 2 )
2182: --OR condition added for bug 5060064
2183: THEN
2176: END IF;
2177:
2178: /* Added the following code to fix the bug 2170086 */
2179: IF NOT OE_GLOBALS.Equal(p_x_header_rec.source_document_type_id,p_old_header_rec.source_document_type_id) OR
2180: (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE
2181: AND p_x_header_rec.source_document_type_id = 2 )
2182: --OR condition added for bug 5060064
2183: THEN
2184: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE
2180: (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE
2181: AND p_x_header_rec.source_document_type_id = 2 )
2182: --OR condition added for bug 5060064
2183: THEN
2184: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE
2185: AND p_x_header_rec.source_document_type_id = 2 THEN
2186:
2187: -- Log a request to copy header adjustments to the copied order.
2188: oe_debug_pub.add('Log Delayed Request To Copy header adjustments ',3);
2190:
2191: IF OE_ORDER_COPY_UTIL.G_COPY_REC.line_price_mode IN (OE_ORDER_COPY_UTIL.G_CPY_ORIG_PRICE,OE_ORDER_COPY_UTIL.G_CPY_REPRICE_PARTIAL) THEN
2192: oe_debug_pub.add(' Copy as original price');
2193: OE_delayed_requests_Pvt.log_request(
2194: p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2195: p_entity_id => p_x_header_rec.header_id,
2196: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2197: p_requesting_entity_id => p_x_header_rec.header_id,
2198: p_param1 => p_x_header_rec.order_category_code,
2192: oe_debug_pub.add(' Copy as original price');
2193: OE_delayed_requests_Pvt.log_request(
2194: p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2195: p_entity_id => p_x_header_rec.header_id,
2196: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2197: p_requesting_entity_id => p_x_header_rec.header_id,
2198: p_param1 => p_x_header_rec.order_category_code,
2199: p_param2 => p_x_header_rec.source_document_id,
2200: p_request_type => OE_GLOBALS.G_COPY_HEADER_ADJUSTMENTS ,
2196: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2197: p_requesting_entity_id => p_x_header_rec.header_id,
2198: p_param1 => p_x_header_rec.order_category_code,
2199: p_param2 => p_x_header_rec.source_document_id,
2200: p_request_type => OE_GLOBALS.G_COPY_HEADER_ADJUSTMENTS ,
2201: x_return_status => l_return_status);
2202: END IF;
2203: END IF;
2204: END IF;
2204: END IF;
2205:
2206: /* End of the code added to fix the bug 2170086 */
2207: -- Bug 2619506
2208: IF (NOT OE_GLOBALS.Equal(p_x_header_rec.transactional_curr_code,p_old_header_rec.transactional_curr_code)) OR
2209: (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
2210: p_x_header_rec.transactional_curr_code IS NOT NULL)
2211: -- OR condition added for bug 5060064
2212: THEN
2205:
2206: /* End of the code added to fix the bug 2170086 */
2207: -- Bug 2619506
2208: IF (NOT OE_GLOBALS.Equal(p_x_header_rec.transactional_curr_code,p_old_header_rec.transactional_curr_code)) OR
2209: (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
2210: p_x_header_rec.transactional_curr_code IS NOT NULL)
2211: -- OR condition added for bug 5060064
2212: THEN
2213: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2209: (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
2210: p_x_header_rec.transactional_curr_code IS NOT NULL)
2211: -- OR condition added for bug 5060064
2212: THEN
2213: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2214: THEN
2215: If nvl(p_x_header_rec.booked_flag, 'N') <> 'Y' Then
2216: OE_delayed_requests_Pvt.log_request(
2217: p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2213: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2214: THEN
2215: If nvl(p_x_header_rec.booked_flag, 'N') <> 'Y' Then
2216: OE_delayed_requests_Pvt.log_request(
2217: p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2218: p_entity_id => p_x_header_rec.header_id,
2219: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2220: p_requesting_entity_id => p_x_header_rec.header_id,
2221: p_param1 => p_x_header_rec.header_id,
2215: If nvl(p_x_header_rec.booked_flag, 'N') <> 'Y' Then
2216: OE_delayed_requests_Pvt.log_request(
2217: p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2218: p_entity_id => p_x_header_rec.header_id,
2219: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2220: p_requesting_entity_id => p_x_header_rec.header_id,
2221: p_param1 => p_x_header_rec.header_id,
2222: p_param2 => 'BATCH',
2223: p_request_unique_key1 => 'BATCH',
2221: p_param1 => p_x_header_rec.header_id,
2222: p_param2 => 'BATCH',
2223: p_request_unique_key1 => 'BATCH',
2224: p_param3 => 'PRICE_ORDER',
2225: p_request_type => OE_GLOBALS.G_PRICE_ORDER,
2226: x_return_status => l_return_status);
2227: Else
2228: OE_delayed_requests_Pvt.log_request(
2229: p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2225: p_request_type => OE_GLOBALS.G_PRICE_ORDER,
2226: x_return_status => l_return_status);
2227: Else
2228: OE_delayed_requests_Pvt.log_request(
2229: p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2230: p_entity_id => p_x_header_rec.header_id,
2231: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2232: p_requesting_entity_id => p_x_header_rec.header_id,
2233: p_param1 => p_x_header_rec.header_id,
2227: Else
2228: OE_delayed_requests_Pvt.log_request(
2229: p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2230: p_entity_id => p_x_header_rec.header_id,
2231: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2232: p_requesting_entity_id => p_x_header_rec.header_id,
2233: p_param1 => p_x_header_rec.header_id,
2234: p_param2 => 'BATCH,BOOK',
2235: p_request_unique_key1 => 'BATCH,BOOK',
2233: p_param1 => p_x_header_rec.header_id,
2234: p_param2 => 'BATCH,BOOK',
2235: p_request_unique_key1 => 'BATCH,BOOK',
2236: p_param3 => 'PRICE_ORDER',
2237: p_request_type => OE_GLOBALS.G_PRICE_ORDER,
2238: x_return_status => l_return_status);
2239: End If;
2240: End If;
2241: End If;
2240: End If;
2241: End If;
2242:
2243: --ER#7479609 start
2244: IF NOT OE_GLOBALS.Equal(p_x_header_rec.payment_type_code,p_old_header_rec.payment_type_code)
2245: AND p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2246: THEN
2247: OE_Holds_PUB.G_PAYMENT_HOLD_APPLIED := 'N';
2248: OE_Holds_PUB.G_HDR_PAYMENT := 'Y';
2241: End If;
2242:
2243: --ER#7479609 start
2244: IF NOT OE_GLOBALS.Equal(p_x_header_rec.payment_type_code,p_old_header_rec.payment_type_code)
2245: AND p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2246: THEN
2247: OE_Holds_PUB.G_PAYMENT_HOLD_APPLIED := 'N';
2248: OE_Holds_PUB.G_HDR_PAYMENT := 'Y';
2249: oe_debug_pub.ADD('payment type update: logging request for eval_hold_source',1);
2249: oe_debug_pub.ADD('payment type update: logging request for eval_hold_source',1);
2250: oe_debug_pub.ADD('Header ID:' || to_char(p_x_header_rec.header_id) ||
2251: 'Entity ID:' || to_char(p_x_header_rec.payment_type_code),1);
2252: OE_delayed_requests_Pvt.log_request
2253: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2254: p_entity_id => p_x_header_rec.header_id,
2255: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2256: p_requesting_entity_id => p_x_header_rec.header_id,
2257: p_request_type => OE_GLOBALS.G_EVAL_HOLD_SOURCE,
2251: 'Entity ID:' || to_char(p_x_header_rec.payment_type_code),1);
2252: OE_delayed_requests_Pvt.log_request
2253: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2254: p_entity_id => p_x_header_rec.header_id,
2255: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2256: p_requesting_entity_id => p_x_header_rec.header_id,
2257: p_request_type => OE_GLOBALS.G_EVAL_HOLD_SOURCE,
2258: p_request_unique_key1 => 'PAYMENT_TYPE',
2259: p_param1 => 'P',
2253: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2254: p_entity_id => p_x_header_rec.header_id,
2255: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2256: p_requesting_entity_id => p_x_header_rec.header_id,
2257: p_request_type => OE_GLOBALS.G_EVAL_HOLD_SOURCE,
2258: p_request_unique_key1 => 'PAYMENT_TYPE',
2259: p_param1 => 'P',
2260: p_param2 => p_x_header_rec.payment_type_code,
2261: x_return_status => l_return_status);
2262: oe_debug_pub.ADD('after call to log_request: l_return_status: '||l_return_status , 1);
2263:
2264: END IF;
2265:
2266: IF NOT OE_GLOBALS.Equal(p_x_header_rec.transactional_curr_code,p_old_header_rec.transactional_curr_code)
2267: AND p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2268: THEN
2269: oe_debug_pub.ADD('Currency update: logging request for eval_hold_source',1);
2270: oe_debug_pub.ADD('Header ID:' || to_char(p_x_header_rec.header_id) ||
2263:
2264: END IF;
2265:
2266: IF NOT OE_GLOBALS.Equal(p_x_header_rec.transactional_curr_code,p_old_header_rec.transactional_curr_code)
2267: AND p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2268: THEN
2269: oe_debug_pub.ADD('Currency update: logging request for eval_hold_source',1);
2270: oe_debug_pub.ADD('Header ID:' || to_char(p_x_header_rec.header_id) ||
2271: 'Entity ID:' || to_char(p_x_header_rec.transactional_curr_code),1);
2269: oe_debug_pub.ADD('Currency update: logging request for eval_hold_source',1);
2270: oe_debug_pub.ADD('Header ID:' || to_char(p_x_header_rec.header_id) ||
2271: 'Entity ID:' || to_char(p_x_header_rec.transactional_curr_code),1);
2272: OE_delayed_requests_Pvt.log_request
2273: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2274: p_entity_id => p_x_header_rec.header_id,
2275: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2276: p_requesting_entity_id => p_x_header_rec.header_id,
2277: p_request_type => OE_GLOBALS.G_EVAL_HOLD_SOURCE,
2271: 'Entity ID:' || to_char(p_x_header_rec.transactional_curr_code),1);
2272: OE_delayed_requests_Pvt.log_request
2273: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2274: p_entity_id => p_x_header_rec.header_id,
2275: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2276: p_requesting_entity_id => p_x_header_rec.header_id,
2277: p_request_type => OE_GLOBALS.G_EVAL_HOLD_SOURCE,
2278: p_request_unique_key1 => 'CURRENCY',
2279: p_param1 => 'TC',
2273: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2274: p_entity_id => p_x_header_rec.header_id,
2275: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2276: p_requesting_entity_id => p_x_header_rec.header_id,
2277: p_request_type => OE_GLOBALS.G_EVAL_HOLD_SOURCE,
2278: p_request_unique_key1 => 'CURRENCY',
2279: p_param1 => 'TC',
2280: p_param2 => p_x_header_rec.transactional_curr_code,
2281: x_return_status => l_return_status);
2282: oe_debug_pub.ADD('after call to log_request: l_return_status: '||l_return_status , 1);
2283:
2284: END IF;
2285:
2286: IF NOT OE_GLOBALS.Equal(p_x_header_rec.sales_channel_code,p_old_header_rec.sales_channel_code)
2287: AND p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2288: THEN
2289: oe_debug_pub.ADD('sales channel update: logging request for eval_hold_source',1);
2290: oe_debug_pub.ADD('Header ID:' || to_char(p_x_header_rec.header_id) ||
2283:
2284: END IF;
2285:
2286: IF NOT OE_GLOBALS.Equal(p_x_header_rec.sales_channel_code,p_old_header_rec.sales_channel_code)
2287: AND p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2288: THEN
2289: oe_debug_pub.ADD('sales channel update: logging request for eval_hold_source',1);
2290: oe_debug_pub.ADD('Header ID:' || to_char(p_x_header_rec.header_id) ||
2291: 'Entity ID:' || to_char(p_x_header_rec.sales_channel_code),1);
2289: oe_debug_pub.ADD('sales channel update: logging request for eval_hold_source',1);
2290: oe_debug_pub.ADD('Header ID:' || to_char(p_x_header_rec.header_id) ||
2291: 'Entity ID:' || to_char(p_x_header_rec.sales_channel_code),1);
2292: OE_delayed_requests_Pvt.log_request
2293: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2294: p_entity_id => p_x_header_rec.header_id,
2295: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2296: p_requesting_entity_id => p_x_header_rec.header_id,
2297: p_request_type => OE_GLOBALS.G_EVAL_HOLD_SOURCE,
2291: 'Entity ID:' || to_char(p_x_header_rec.sales_channel_code),1);
2292: OE_delayed_requests_Pvt.log_request
2293: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2294: p_entity_id => p_x_header_rec.header_id,
2295: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2296: p_requesting_entity_id => p_x_header_rec.header_id,
2297: p_request_type => OE_GLOBALS.G_EVAL_HOLD_SOURCE,
2298: p_request_unique_key1 => 'SALES_CHANNEL',
2299: p_param1 => 'SC',
2293: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2294: p_entity_id => p_x_header_rec.header_id,
2295: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2296: p_requesting_entity_id => p_x_header_rec.header_id,
2297: p_request_type => OE_GLOBALS.G_EVAL_HOLD_SOURCE,
2298: p_request_unique_key1 => 'SALES_CHANNEL',
2299: p_param1 => 'SC',
2300: p_param2 => p_x_header_rec.sales_channel_code,
2301: x_return_status => l_return_status);
2302: oe_debug_pub.ADD('after call to log_request: l_return_status: '||l_return_status , 1);
2303:
2304: END IF;
2305:
2306: IF NOT OE_GLOBALS.Equal(p_x_header_rec.price_list_id,p_old_header_rec.price_list_id)
2307: AND p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2308: THEN
2309: oe_debug_pub.ADD('price list update: logging request for eval_hold_source',1);
2310: oe_debug_pub.ADD('Header ID:' || to_char(p_x_header_rec.header_id) ||
2303:
2304: END IF;
2305:
2306: IF NOT OE_GLOBALS.Equal(p_x_header_rec.price_list_id,p_old_header_rec.price_list_id)
2307: AND p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2308: THEN
2309: oe_debug_pub.ADD('price list update: logging request for eval_hold_source',1);
2310: oe_debug_pub.ADD('Header ID:' || to_char(p_x_header_rec.header_id) ||
2311: 'Entity ID:' || to_char(p_x_header_rec.price_list_id),1);
2309: oe_debug_pub.ADD('price list update: logging request for eval_hold_source',1);
2310: oe_debug_pub.ADD('Header ID:' || to_char(p_x_header_rec.header_id) ||
2311: 'Entity ID:' || to_char(p_x_header_rec.price_list_id),1);
2312: OE_delayed_requests_Pvt.log_request
2313: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2314: p_entity_id => p_x_header_rec.header_id,
2315: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2316: p_requesting_entity_id => p_x_header_rec.header_id,
2317: p_request_type => OE_GLOBALS.G_EVAL_HOLD_SOURCE,
2311: 'Entity ID:' || to_char(p_x_header_rec.price_list_id),1);
2312: OE_delayed_requests_Pvt.log_request
2313: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2314: p_entity_id => p_x_header_rec.header_id,
2315: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2316: p_requesting_entity_id => p_x_header_rec.header_id,
2317: p_request_type => OE_GLOBALS.G_EVAL_HOLD_SOURCE,
2318: p_request_unique_key1 => 'PRICE_LIST',
2319: p_param1 => 'PL',
2313: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2314: p_entity_id => p_x_header_rec.header_id,
2315: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2316: p_requesting_entity_id => p_x_header_rec.header_id,
2317: p_request_type => OE_GLOBALS.G_EVAL_HOLD_SOURCE,
2318: p_request_unique_key1 => 'PRICE_LIST',
2319: p_param1 => 'PL',
2320: p_param2 => p_x_header_rec.price_list_id,
2321: x_return_status => l_return_status);
2322: oe_debug_pub.ADD('after call to log_request: l_return_status: '||l_return_status , 1);
2323:
2324: END IF;
2325:
2326: IF NOT OE_GLOBALS.Equal(p_x_header_rec.order_type_id,p_old_header_rec.order_type_id)
2327: AND p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2328: THEN
2329: oe_debug_pub.ADD('Order type update: logging request for eval_hold_source',1);
2330: oe_debug_pub.ADD('Header ID:' || to_char(p_x_header_rec.header_id) ||
2323:
2324: END IF;
2325:
2326: IF NOT OE_GLOBALS.Equal(p_x_header_rec.order_type_id,p_old_header_rec.order_type_id)
2327: AND p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
2328: THEN
2329: oe_debug_pub.ADD('Order type update: logging request for eval_hold_source',1);
2330: oe_debug_pub.ADD('Header ID:' || to_char(p_x_header_rec.header_id) ||
2331: 'Entity ID:' || to_char(p_x_header_rec.order_type_id),1);
2329: oe_debug_pub.ADD('Order type update: logging request for eval_hold_source',1);
2330: oe_debug_pub.ADD('Header ID:' || to_char(p_x_header_rec.header_id) ||
2331: 'Entity ID:' || to_char(p_x_header_rec.order_type_id),1);
2332: OE_delayed_requests_Pvt.log_request
2333: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2334: p_entity_id => p_x_header_rec.header_id,
2335: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2336: p_requesting_entity_id => p_x_header_rec.header_id,
2337: p_request_type => OE_GLOBALS.G_EVAL_HOLD_SOURCE,
2331: 'Entity ID:' || to_char(p_x_header_rec.order_type_id),1);
2332: OE_delayed_requests_Pvt.log_request
2333: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2334: p_entity_id => p_x_header_rec.header_id,
2335: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2336: p_requesting_entity_id => p_x_header_rec.header_id,
2337: p_request_type => OE_GLOBALS.G_EVAL_HOLD_SOURCE,
2338: p_request_unique_key1 => 'ORDER_TYPE',
2339: p_param1 => 'OT',
2333: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2334: p_entity_id => p_x_header_rec.header_id,
2335: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2336: p_requesting_entity_id => p_x_header_rec.header_id,
2337: p_request_type => OE_GLOBALS.G_EVAL_HOLD_SOURCE,
2338: p_request_unique_key1 => 'ORDER_TYPE',
2339: p_param1 => 'OT',
2340: p_param2 => p_x_header_rec.order_type_id,
2341: x_return_status => l_return_status);
2349: -- Log a request for Verify Payment
2350: oe_debug_pub.add('Logging Delayed Request for Verify Payment',3);
2351: --
2352: OE_delayed_requests_Pvt.log_request
2353: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2354: p_entity_id => p_x_header_rec.header_id,
2355: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2356: p_requesting_entity_id => p_x_header_rec.header_id,
2357: p_request_type => OE_GLOBALS.G_VERIFY_PAYMENT,
2351: --
2352: OE_delayed_requests_Pvt.log_request
2353: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2354: p_entity_id => p_x_header_rec.header_id,
2355: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2356: p_requesting_entity_id => p_x_header_rec.header_id,
2357: p_request_type => OE_GLOBALS.G_VERIFY_PAYMENT,
2358: x_return_status => l_return_status);
2359:
2353: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2354: p_entity_id => p_x_header_rec.header_id,
2355: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2356: p_requesting_entity_id => p_x_header_rec.header_id,
2357: p_request_type => OE_GLOBALS.G_VERIFY_PAYMENT,
2358: x_return_status => l_return_status);
2359:
2360: END IF;
2361:
2381:
2382: oe_debug_pub.add('logging synch payment delayed request', 1);
2383:
2384: OE_delayed_requests_Pvt.log_request
2385: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2386: p_entity_id => p_x_header_rec.header_id,
2387: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2388: p_requesting_entity_id => p_x_header_rec.header_id,
2389: p_request_type => OE_GLOBALS.G_UPDATE_HDR_PAYMENT,
2383:
2384: OE_delayed_requests_Pvt.log_request
2385: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2386: p_entity_id => p_x_header_rec.header_id,
2387: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2388: p_requesting_entity_id => p_x_header_rec.header_id,
2389: p_request_type => OE_GLOBALS.G_UPDATE_HDR_PAYMENT,
2390: p_param1 => 'UPDATE_PAYMENT',
2391: x_return_status => l_return_status);
2385: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2386: p_entity_id => p_x_header_rec.header_id,
2387: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2388: p_requesting_entity_id => p_x_header_rec.header_id,
2389: p_request_type => OE_GLOBALS.G_UPDATE_HDR_PAYMENT,
2390: p_param1 => 'UPDATE_PAYMENT',
2391: x_return_status => l_return_status);
2392:
2393: END IF; -- if multiple payments enabled and l_payments_upd_flag = 'Y'
2393: END IF; -- if multiple payments enabled and l_payments_upd_flag = 'Y'
2394: -- and l_payment_count = 1
2395: /*-- 3288805
2396: Store the new order_date_type_code--*/
2397: IF (NOT OE_GLOBALS.Equal(p_x_header_rec.order_date_type_code, p_old_header_rec.order_date_type_code)) OR
2398: (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
2399: p_x_header_rec.order_date_type_code IS NOT NULL)
2400: --OR cnd added for bug 5060064
2401: THEN
2394: -- and l_payment_count = 1
2395: /*-- 3288805
2396: Store the new order_date_type_code--*/
2397: IF (NOT OE_GLOBALS.Equal(p_x_header_rec.order_date_type_code, p_old_header_rec.order_date_type_code)) OR
2398: (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
2399: p_x_header_rec.order_date_type_code IS NOT NULL)
2400: --OR cnd added for bug 5060064
2401: THEN
2402: IF ( nvl(OE_Schedule_Util.G_HEADER_ID, 0) = p_x_header_rec.header_id )
3805: BEGIN
3806:
3807: oe_debug_pub.add('Entering OE_HEADER_UTIL.UPDATE_ROW', 1);
3808: --Commented for MOAC start
3809: /*l_org_id := OE_GLOBALS.G_ORG_ID;
3810:
3811: IF l_org_id IS NULL THEN
3812: OE_GLOBALS.Set_Context;
3813: l_org_id := OE_GLOBALS.G_ORG_ID;
3808: --Commented for MOAC start
3809: /*l_org_id := OE_GLOBALS.G_ORG_ID;
3810:
3811: IF l_org_id IS NULL THEN
3812: OE_GLOBALS.Set_Context;
3813: l_org_id := OE_GLOBALS.G_ORG_ID;
3814: END IF;*/
3815: --Commented for MOAC end
3816: -- we need to increment lock_control by 1,
3809: /*l_org_id := OE_GLOBALS.G_ORG_ID;
3810:
3811: IF l_org_id IS NULL THEN
3812: OE_GLOBALS.Set_Context;
3813: l_org_id := OE_GLOBALS.G_ORG_ID;
3814: END IF;*/
3815: --Commented for MOAC end
3816: -- we need to increment lock_control by 1,
3817: -- everytime there is an update on the record.
4079:
4080: oe_debug_pub.add('Entering OE_HEADER_UTIL.INSERT_ROW', 1);
4081:
4082: --MOAC change
4083: OE_GLOBALS.Set_Context;
4084: l_org_id := OE_GLOBALS.G_ORG_ID;
4085: IF l_org_id IS NULL THEN
4086: -- org_id is null, don't do insert. raise an error
4087: If l_debug_level > 0 Then
4080: oe_debug_pub.add('Entering OE_HEADER_UTIL.INSERT_ROW', 1);
4081:
4082: --MOAC change
4083: OE_GLOBALS.Set_Context;
4084: l_org_id := OE_GLOBALS.G_ORG_ID;
4085: IF l_org_id IS NULL THEN
4086: -- org_id is null, don't do insert. raise an error
4087: If l_debug_level > 0 Then
4088: oe_debug_pub.add('Org_Id is NULL',1);
4464: -- aksingh update the operation to NULL and update the cache with
4465: -- record
4466: oe_order_cache.g_header_rec := p_header_rec;
4467: oe_order_cache.g_header_rec.operation := null;
4468: OE_GLOBALS.G_HEADER_CREATED := TRUE;
4469:
4470: -- calling notification framework to update global picture
4471: -- check code release level first. Notification framework is at Pack H level
4472: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110508' THEN
4528: BEGIN
4529:
4530: oe_debug_pub.add('Entering OE_HEADER_UTIL.DELETE_ROW', 1);
4531: --Commented for MOAC start
4532: /*l_org_id := OE_GLOBALS.G_ORG_ID;
4533: IF l_org_id IS NULL THEN
4534: OE_GLOBALS.Set_Context;
4535: l_org_id := OE_GLOBALS.G_ORG_ID;
4536: END IF;*/
4530: oe_debug_pub.add('Entering OE_HEADER_UTIL.DELETE_ROW', 1);
4531: --Commented for MOAC start
4532: /*l_org_id := OE_GLOBALS.G_ORG_ID;
4533: IF l_org_id IS NULL THEN
4534: OE_GLOBALS.Set_Context;
4535: l_org_id := OE_GLOBALS.G_ORG_ID;
4536: END IF;*/
4537: --Commented for MOAC end
4538: -- added for notification framework
4531: --Commented for MOAC start
4532: /*l_org_id := OE_GLOBALS.G_ORG_ID;
4533: IF l_org_id IS NULL THEN
4534: OE_GLOBALS.Set_Context;
4535: l_org_id := OE_GLOBALS.G_ORG_ID;
4536: END IF;*/
4537: --Commented for MOAC end
4538: -- added for notification framework
4539: --check code release level first. Notification framework is at Pack H level
4538: -- added for notification framework
4539: --check code release level first. Notification framework is at Pack H level
4540: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110508' THEN
4541: /* Set the operation on the record so that globals are updated as well */
4542: l_new_header_rec.operation := OE_GLOBALS.G_OPR_DELETE;
4543: l_new_header_rec.header_id := p_header_id;
4544: OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,
4545: p_Header_rec =>l_new_header_rec,
4546: p_header_id => p_header_id,
4593: RAISE FND_API.G_EXC_ERROR;
4594: END IF;
4595: -- BUG 2670775 Reverse Limits End
4596: OE_Atchmt_Util.Delete_Attachments
4597: ( p_entity_code => OE_GLOBALS.G_ENTITY_HEADER
4598: , p_entity_id => p_header_id
4599: , x_return_status => l_return_status
4600: );
4601: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4616: END IF;
4617: OE_Holds_PUB.Delete_Holds(p_header_id => p_header_id);
4618:
4619: OE_Delayed_Requests_Pvt.Delete_Reqs_for_deleted_entity(
4620: p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
4621: p_entity_id => p_header_id,
4622: x_return_status => l_return_status
4623: );
4624: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4858: if l_debug_level > 0 then
4859: oe_debug_pub.add('Entering OE_HEADER_UTIL.QUERY_ROW', 1);
4860: end if;
4861: --Commented for MOAC start
4862: /*l_org_id := OE_GLOBALS.G_ORG_ID;
4863: IF l_org_id IS NULL THEN
4864: OE_GLOBALS.Set_Context;
4865: l_org_id := OE_GLOBALS.G_ORG_ID;
4866: END IF;*/
4860: end if;
4861: --Commented for MOAC start
4862: /*l_org_id := OE_GLOBALS.G_ORG_ID;
4863: IF l_org_id IS NULL THEN
4864: OE_GLOBALS.Set_Context;
4865: l_org_id := OE_GLOBALS.G_ORG_ID;
4866: END IF;*/
4867: --Commented for MOAC end
4868: -- aksingh use global record if exists for header_id
4861: --Commented for MOAC start
4862: /*l_org_id := OE_GLOBALS.G_ORG_ID;
4863: IF l_org_id IS NULL THEN
4864: OE_GLOBALS.Set_Context;
4865: l_org_id := OE_GLOBALS.G_ORG_ID;
4866: END IF;*/
4867: --Commented for MOAC end
4868: -- aksingh use global record if exists for header_id
4869: IF oe_order_cache.g_header_rec.header_id = p_header_id
5381: -- following constants are used to debug lock_order,
5382: -- please do not use them for any other purpose.
5383: -- set G_LOCK_TEST := 'Y', for debugging.
5384:
5385: OE_GLOBALS.G_LOCK_CONST := 0;
5386: --OE_GLOBALS.G_LOCK_TEST := 'Y';
5387: OE_GLOBALS.G_LOCK_TEST := 'N';
5388:
5389: IF OE_GLOBALS.Equal(p_x_header_rec.lock_control,
5382: -- please do not use them for any other purpose.
5383: -- set G_LOCK_TEST := 'Y', for debugging.
5384:
5385: OE_GLOBALS.G_LOCK_CONST := 0;
5386: --OE_GLOBALS.G_LOCK_TEST := 'Y';
5387: OE_GLOBALS.G_LOCK_TEST := 'N';
5388:
5389: IF OE_GLOBALS.Equal(p_x_header_rec.lock_control,
5390: l_lock_control)
5383: -- set G_LOCK_TEST := 'Y', for debugging.
5384:
5385: OE_GLOBALS.G_LOCK_CONST := 0;
5386: --OE_GLOBALS.G_LOCK_TEST := 'Y';
5387: OE_GLOBALS.G_LOCK_TEST := 'N';
5388:
5389: IF OE_GLOBALS.Equal(p_x_header_rec.lock_control,
5390: l_lock_control)
5391: THEN
5385: OE_GLOBALS.G_LOCK_CONST := 0;
5386: --OE_GLOBALS.G_LOCK_TEST := 'Y';
5387: OE_GLOBALS.G_LOCK_TEST := 'N';
5388:
5389: IF OE_GLOBALS.Equal(p_x_header_rec.lock_control,
5390: l_lock_control)
5391: THEN
5392:
5393: oe_debug_pub.add('done comparison, success', 1);
5421: END IF;
5422:
5423: oe_debug_pub.add('Exiting OE_HEADER_UTIL.LOCK_ROW', 1);
5424:
5425: OE_GLOBALS.G_LOCK_TEST := 'N';
5426: EXCEPTION
5427:
5428: WHEN NO_DATA_FOUND THEN
5429:
5439: OE_MSG_PUB.Add;
5440:
5441: END IF;
5442:
5443: OE_GLOBALS.G_LOCK_TEST := 'N';
5444:
5445: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
5446:
5447: x_return_status := FND_API.G_RET_STS_ERROR;
5455: fnd_message.set_name('ONT','OE_LOCK_ROW_ALREADY_LOCKED');
5456: OE_MSG_PUB.Add;
5457:
5458: END IF;
5459: OE_GLOBALS.G_LOCK_TEST := 'N';
5460: WHEN OTHERS THEN
5461:
5462: oe_debug_pub.add('others in lock_header', 1);
5463: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5469: ( G_PKG_NAME
5470: , 'Lock_Row'
5471: );
5472: END IF;
5473: OE_GLOBALS.G_LOCK_TEST := 'N';
5474: END Lock_Row;
5475:
5476: -- Function Get_Values
5477:
5493: l_header_val_rec := OE_Order_PUB.G_MISS_HEADER_VAL_REC;
5494:
5495: IF (p_header_rec.accounting_rule_id IS NULL OR
5496: p_header_rec.accounting_rule_id <> FND_API.G_MISS_NUM) AND
5497: NOT OE_GLOBALS.Equal(p_header_rec.accounting_rule_id,
5498: p_old_header_rec.accounting_rule_id)
5499: THEN
5500: l_header_val_rec.accounting_rule := OE_Id_To_Value.Accounting_Rule
5501: ( p_accounting_rule_id => p_header_rec.accounting_rule_id
5503: END IF;
5504:
5505: IF (p_header_rec.agreement_id IS NULL OR
5506: p_header_rec.agreement_id <> FND_API.G_MISS_NUM) AND
5507: NOT OE_GLOBALS.Equal(p_header_rec.agreement_id,
5508: p_old_header_rec.agreement_id)
5509: THEN
5510: l_header_val_rec.agreement := OE_Id_To_Value.Agreement
5511: ( p_agreement_id => p_header_rec.agreement_id
5513: END IF;
5514:
5515: IF (p_header_rec.conversion_type_code IS NULL OR
5516: p_header_rec.conversion_type_code <> FND_API.G_MISS_CHAR) AND
5517: NOT OE_GLOBALS.Equal(p_header_rec.conversion_type_code,
5518: p_old_header_rec.conversion_type_code)
5519: THEN
5520: l_header_val_rec.conversion_type := OE_Id_To_Value.Conversion_Type
5521: ( p_conversion_type_code => p_header_rec.conversion_type_code
5523: END IF;
5524:
5525: IF (p_header_rec.deliver_to_contact_id IS NULL OR
5526: p_header_rec.deliver_to_contact_id <> FND_API.G_MISS_NUM) AND
5527: NOT OE_GLOBALS.Equal(p_header_rec.deliver_to_contact_id,
5528: p_old_header_rec.deliver_to_contact_id)
5529: THEN
5530: l_header_val_rec.deliver_to_contact := OE_Id_To_Value.Deliver_To_Contact
5531: ( p_deliver_to_contact_id => p_header_rec.deliver_to_contact_id
5533: END IF;
5534:
5535: IF (p_header_rec.deliver_to_org_id IS NULL OR
5536: p_header_rec.deliver_to_org_id <> FND_API.G_MISS_NUM) AND
5537: NOT OE_GLOBALS.Equal(p_header_rec.deliver_to_org_id,
5538: p_old_header_rec.deliver_to_org_id)
5539: THEN
5540: get_customer_details
5541: ( p_org_id => p_header_rec.deliver_to_org_id
5558: END IF;
5559:
5560: IF (p_header_rec.fob_point_code IS NULL OR
5561: p_header_rec.fob_point_code <> FND_API.G_MISS_CHAR) AND
5562: NOT OE_GLOBALS.Equal(p_header_rec.fob_point_code,
5563: p_old_header_rec.fob_point_code)
5564: THEN
5565: l_header_val_rec.fob_point := OE_Id_To_Value.Fob_Point
5566: ( p_fob_point_code => p_header_rec.fob_point_code
5568: END IF;
5569:
5570: IF (p_header_rec.freight_terms_code IS NULL OR
5571: p_header_rec.freight_terms_code <> FND_API.G_MISS_CHAR) AND
5572: NOT OE_GLOBALS.Equal(p_header_rec.freight_terms_code,
5573: p_old_header_rec.freight_terms_code)
5574: THEN
5575: l_header_val_rec.freight_terms := OE_Id_To_Value.Freight_Terms
5576: ( p_freight_terms_code => p_header_rec.freight_terms_code
5578: END IF;
5579:
5580: IF (p_header_rec.freight_carrier_code IS NULL OR
5581: p_header_rec.freight_carrier_code <> FND_API.G_MISS_CHAR) AND
5582: NOT OE_GLOBALS.Equal(p_header_rec.freight_carrier_code,
5583: p_old_header_rec.freight_carrier_code)
5584: THEN
5585: l_header_val_rec.freight_carrier := OE_Id_To_Value.Freight_Carrier
5586: ( p_freight_carrier_code => p_header_rec.freight_carrier_code
5588: );
5589: END IF;
5590: IF (p_header_rec.shipping_method_code IS NULL OR
5591: p_header_rec.shipping_method_code <> FND_API.G_MISS_CHAR) AND
5592: NOT OE_GLOBALS.Equal(p_header_rec.shipping_method_code,
5593: p_old_header_rec.shipping_method_code)
5594: THEN
5595: l_header_val_rec.shipping_method := OE_Id_To_Value.ship_method
5596: ( p_ship_method_code => p_header_rec.shipping_method_code
5598: END IF;
5599:
5600: IF (p_header_rec.invoice_to_contact_id IS NULL OR
5601: p_header_rec.invoice_to_contact_id <> FND_API.G_MISS_NUM) AND
5602: NOT OE_GLOBALS.Equal(p_header_rec.invoice_to_contact_id,
5603: p_old_header_rec.invoice_to_contact_id)
5604: THEN
5605: l_header_val_rec.invoice_to_contact := OE_Id_To_Value.Invoice_To_Contact
5606: ( p_invoice_to_contact_id => p_header_rec.invoice_to_contact_id
5608: END IF;
5609:
5610: IF (p_header_rec.invoice_to_org_id IS NULL OR
5611: p_header_rec.invoice_to_org_id <> FND_API.G_MISS_NUM) AND
5612: NOT OE_GLOBALS.Equal(p_header_rec.invoice_to_org_id,
5613: p_old_header_rec.invoice_to_org_id)
5614: THEN
5615:
5616: get_customer_details
5634: END IF;
5635:
5636: IF (p_header_rec.invoicing_rule_id IS NULL OR
5637: p_header_rec.invoicing_rule_id <> FND_API.G_MISS_NUM) AND
5638: NOT OE_GLOBALS.Equal(p_header_rec.invoicing_rule_id,
5639: p_old_header_rec.invoicing_rule_id)
5640: THEN
5641: l_header_val_rec.invoicing_rule := OE_Id_To_Value.Invoicing_Rule
5642: ( p_invoicing_rule_id => p_header_rec.invoicing_rule_id
5644: END IF;
5645:
5646: IF (p_header_rec.order_source_id IS NULL OR
5647: p_header_rec.order_source_id <> FND_API.G_MISS_NUM) AND
5648: NOT OE_GLOBALS.Equal(p_header_rec.order_source_id,
5649: p_old_header_rec.order_source_id)
5650: THEN
5651: l_header_val_rec.order_source := OE_Id_To_Value.Order_Source
5652: ( p_order_source_id => p_header_rec.order_source_id
5654: END IF;
5655:
5656: IF (p_header_rec.order_date_type_code IS NULL OR
5657: p_header_rec.order_date_type_code <> FND_API.G_MISS_CHAR) AND
5658: NOT OE_GLOBALS.Equal(p_header_rec.order_date_type_code,
5659: p_old_header_rec.order_date_type_code)
5660: THEN
5661: l_header_val_rec.order_date_type := OE_Id_To_Value.Order_Date_Type
5662: ( p_order_date_type_code => p_header_rec.order_date_type_code
5664: END IF;
5665:
5666: IF (p_header_rec.order_type_id IS NULL OR
5667: p_header_rec.order_type_id <> FND_API.G_MISS_NUM) AND
5668: NOT OE_GLOBALS.Equal(p_header_rec.order_type_id,
5669: p_old_header_rec.order_type_id)
5670: THEN
5671: l_header_val_rec.order_type := OE_Id_To_Value.Order_Type
5672: ( p_order_type_id => p_header_rec.order_type_id
5674: END IF;
5675:
5676: IF (p_header_rec.payment_term_id IS NULL OR
5677: p_header_rec.payment_term_id <> FND_API.G_MISS_NUM) AND
5678: NOT OE_GLOBALS.Equal(p_header_rec.payment_term_id,
5679: p_old_header_rec.payment_term_id)
5680: THEN
5681: l_header_val_rec.payment_term := OE_Id_To_Value.Payment_Term
5682: ( p_payment_term_id => p_header_rec.payment_term_id
5684: END IF;
5685:
5686: IF (p_header_rec.price_list_id IS NULL OR
5687: p_header_rec.price_list_id <> FND_API.G_MISS_NUM) AND
5688: NOT OE_GLOBALS.Equal(p_header_rec.price_list_id,
5689: p_old_header_rec.price_list_id)
5690: THEN
5691: l_header_val_rec.price_list := OE_Id_To_Value.Price_List
5692: ( p_price_list_id => p_header_rec.price_list_id
5694: END IF;
5695:
5696: IF (p_header_rec.return_reason_code IS NULL OR
5697: p_header_rec.return_reason_code <> FND_API.G_MISS_CHAR) AND
5698: NOT OE_GLOBALS.Equal(p_header_rec.return_reason_code,
5699: p_old_header_rec.return_reason_code)
5700: THEN
5701: l_header_val_rec.return_reason := OE_Id_To_Value.return_reason
5702: ( p_return_reason_code => p_header_rec.return_reason_code
5704: END IF;
5705:
5706: IF (p_header_rec.salesrep_id IS NULL OR
5707: p_header_rec.salesrep_id <> FND_API.G_MISS_NUM) AND
5708: NOT OE_GLOBALS.Equal(p_header_rec.salesrep_id,
5709: p_old_header_rec.salesrep_id)
5710: THEN
5711: l_header_val_rec.salesrep := OE_Id_To_Value.salesrep
5712: ( p_salesrep_id => p_header_rec.salesrep_id
5714: END IF;
5715:
5716: IF (p_header_rec.sales_channel_code IS NULL OR
5717: p_header_rec.sales_channel_code <> FND_API.G_MISS_CHAR) AND
5718: NOT OE_GLOBALS.Equal(p_header_rec.sales_channel_code,
5719: p_old_header_rec.sales_channel_code)
5720: THEN
5721: l_header_val_rec.sales_channel:= OE_Id_To_Value.sales_channel
5722: ( p_sales_channel_code => p_header_rec.sales_channel_code
5724: END IF;
5725:
5726: IF (p_header_rec.shipment_priority_code IS NULL OR
5727: p_header_rec.shipment_priority_code <> FND_API.G_MISS_CHAR) AND
5728: NOT OE_GLOBALS.Equal(p_header_rec.shipment_priority_code,
5729: p_old_header_rec.shipment_priority_code)
5730: THEN
5731: l_header_val_rec.shipment_priority := OE_Id_To_Value.Shipment_Priority
5732: ( p_shipment_priority_code => p_header_rec.shipment_priority_code
5734: END IF;
5735:
5736: IF (p_header_rec.demand_class_code IS NULL OR
5737: p_header_rec.demand_class_code <> FND_API.G_MISS_CHAR) AND
5738: NOT OE_GLOBALS.Equal(p_header_rec.demand_class_code,
5739: p_old_header_rec.demand_class_code)
5740: THEN
5741: l_header_val_rec.Demand_Class := OE_Id_To_Value.Demand_Class
5742: ( p_demand_class_code => p_header_rec.demand_class_code
5744: END IF;
5745:
5746: IF (p_header_rec.ship_from_org_id IS NULL OR
5747: p_header_rec.ship_from_org_id <> FND_API.G_MISS_NUM) AND
5748: NOT OE_GLOBALS.Equal(p_header_rec.ship_from_org_id,
5749: p_old_header_rec.ship_from_org_id)
5750: THEN
5751: OE_Id_To_Value.Ship_From_Org
5752: ( p_ship_from_org_id => p_header_rec.ship_from_org_id
5760: END IF;
5761:
5762: IF (p_header_rec.ship_to_contact_id IS NULL OR
5763: p_header_rec.ship_to_contact_id <> FND_API.G_MISS_NUM) AND
5764: NOT OE_GLOBALS.Equal(p_header_rec.ship_to_contact_id,
5765: p_old_header_rec.ship_to_contact_id)
5766: THEN
5767: l_header_val_rec.ship_to_contact := OE_Id_To_Value.Ship_To_Contact
5768: ( p_ship_to_contact_id => p_header_rec.ship_to_contact_id
5770: END IF;
5771:
5772: IF (p_header_rec.ship_to_org_id IS NULL OR
5773: p_header_rec.ship_to_org_id <> FND_API.G_MISS_NUM) AND
5774: NOT OE_GLOBALS.Equal(p_header_rec.ship_to_org_id,
5775: p_old_header_rec.ship_to_org_id)
5776: THEN
5777: get_customer_details
5778: ( p_org_id => p_header_rec.ship_to_org_id
5796:
5797:
5798: IF (p_header_rec.sold_to_contact_id IS NULL OR
5799: p_header_rec.sold_to_contact_id <> FND_API.G_MISS_NUM) AND
5800: NOT OE_GLOBALS.Equal(p_header_rec.sold_to_contact_id,
5801: p_old_header_rec.sold_to_contact_id)
5802: THEN
5803: l_header_val_rec.sold_to_contact := OE_Id_To_Value.Sold_To_Contact
5804: ( p_sold_to_contact_id => p_header_rec.sold_to_contact_id
5806: END IF;
5807:
5808: IF (p_header_rec.sold_to_org_id IS NULL OR
5809: p_header_rec.sold_to_org_id <> FND_API.G_MISS_NUM) AND
5810: NOT OE_GLOBALS.Equal(p_header_rec.sold_to_org_id,
5811: p_old_header_rec.sold_to_org_id)
5812: THEN
5813: OE_Id_To_Value.Sold_To_Org
5814: ( p_sold_to_org_id => p_header_rec.sold_to_org_id
5821: END IF;
5822:
5823: IF (p_header_rec.tax_exempt_flag IS NULL OR
5824: p_header_rec.tax_exempt_flag <> FND_API.G_MISS_CHAR) AND
5825: NOT OE_GLOBALS.Equal(p_header_rec.tax_exempt_flag,
5826: p_old_header_rec.tax_exempt_flag)
5827: THEN
5828: l_header_val_rec.tax_exempt := OE_Id_To_Value.Tax_Exempt
5829: ( p_tax_exempt_flag => p_header_rec.tax_exempt_flag
5831: END IF;
5832:
5833: IF (p_header_rec.tax_exempt_reason_code IS NULL OR
5834: p_header_rec.tax_exempt_reason_code <> FND_API.G_MISS_CHAR) AND
5835: NOT OE_GLOBALS.Equal(p_header_rec.tax_exempt_reason_code,
5836: p_old_header_rec.tax_exempt_reason_code)
5837: THEN
5838: l_header_val_rec.tax_exempt_reason := OE_Id_To_Value.Tax_Exempt_Reason
5839: ( p_tax_exempt_reason_code => p_header_rec.tax_exempt_reason_code
5841: END IF;
5842:
5843: IF (p_header_rec.tax_point_code IS NULL OR
5844: p_header_rec.tax_point_code <> FND_API.G_MISS_CHAR) AND
5845: NOT OE_GLOBALS.Equal(p_header_rec.tax_point_code,
5846: p_old_header_rec.tax_point_code)
5847: THEN
5848: l_header_val_rec.tax_point := OE_Id_To_Value.Tax_Point
5849: ( p_tax_point_code => p_header_rec.tax_point_code
5851: END IF;
5852:
5853: IF (p_header_rec.payment_type_code IS NULL OR
5854: p_header_rec.payment_type_code <> FND_API.G_MISS_CHAR) AND
5855: NOT OE_GLOBALS.Equal(p_header_rec.payment_type_code,
5856: p_old_header_rec.payment_type_code)
5857: THEN
5858: l_header_val_rec.payment_type := OE_Id_To_Value.Payment_Type
5859: ( p_payment_type_code => p_header_rec.payment_type_code
5861: END IF;
5862: --R12 CC Encryption
5863: IF (p_header_rec.credit_card_code IS NULL OR
5864: p_header_rec.credit_card_code <> FND_API.G_MISS_CHAR) AND
5865: NOT OE_GLOBALS.Equal(p_header_rec.credit_card_code,
5866: p_old_header_rec.credit_card_code)
5867: THEN
5868: l_header_val_rec.credit_card := OE_Id_To_Value.Credit_Card
5869: ( p_credit_card_code => p_header_rec.credit_card_code
5872: -- QUOTING changes
5873:
5874: IF (p_header_rec.sold_to_site_use_id IS NULL OR
5875: p_header_rec.sold_to_site_use_id <> FND_API.G_MISS_NUM) AND
5876: NOT OE_GLOBALS.Equal(p_header_rec.sold_to_site_use_id,
5877: p_old_header_rec.sold_to_site_use_id)
5878: THEN
5879:
5880: OE_ID_TO_VALUE.CUSTOMER_LOCATION
5893: END IF;
5894:
5895: IF (p_header_rec.transaction_phase_code IS NULL OR
5896: p_header_rec.transaction_phase_code <> FND_API.G_MISS_CHAR) AND
5897: NOT OE_GLOBALS.Equal(p_header_rec.transaction_phase_code,
5898: p_old_header_rec.transaction_phase_code)
5899: THEN
5900: l_header_val_rec.transaction_phase := OE_Id_To_Value.Transaction_Phase
5901: ( p_transaction_phase_code => p_header_rec.transaction_phase_code
5903: END IF;
5904:
5905: IF (p_header_rec.user_status_code IS NULL OR
5906: p_header_rec.user_status_code <> FND_API.G_MISS_CHAR) AND
5907: NOT OE_GLOBALS.Equal(p_header_rec.user_status_code,
5908: p_old_header_rec.user_status_code)
5909: THEN
5910: l_header_val_rec.user_status := OE_Id_To_Value.User_Status
5911: ( p_user_status_code => p_header_rec.user_status_code
5958: -- END BSA pricing
5959:
5960: IF (p_header_rec.ib_owner IS NULL OR
5961: p_header_rec.ib_owner <> FND_API.G_MISS_CHAR) AND
5962: NOT OE_GLOBALS.Equal(p_header_rec.ib_owner,
5963: p_old_header_rec.ib_owner)
5964: THEN
5965: l_header_val_rec.ib_owner_dsp := OE_Id_To_Value.ib_owner
5966: ( p_ib_owner => p_header_rec.ib_owner
5968: END IF;
5969:
5970: IF (p_header_rec.ib_current_location IS NULL OR
5971: p_header_rec.ib_current_location <> FND_API.G_MISS_CHAR) AND
5972: NOT OE_GLOBALS.Equal(p_header_rec.ib_current_location,
5973: p_old_header_rec.ib_current_location)
5974: THEN
5975: l_header_val_rec.ib_current_location_dsp := OE_Id_To_Value.ib_current_location(
5976: p_ib_current_location=>p_header_rec.ib_current_location
5978: END IF;
5979:
5980: IF (p_header_rec.ib_installed_at_location IS NULL OR
5981: p_header_rec.ib_installed_at_location <> FND_API.G_MISS_CHAR) AND
5982: NOT OE_GLOBALS.Equal(p_header_rec.ib_installed_at_location,
5983: p_old_header_rec.ib_installed_at_location)
5984: THEN
5985: l_header_val_rec.ib_installed_at_location_dsp := OE_Id_To_Value.ib_installed_at_location(
5986: p_ib_installed_at_location=>p_header_rec.ib_installed_at_location
6831: -- Retrieve the sold_to_org_id if not passed on the header record. This
6832: -- will be needed by the value_to_id functions for related fields.
6833: -- For e.g. oe_value_to_id.ship_to_org_id requires sold_to_org_id
6834:
6835: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
6836: AND p_x_header_rec.sold_to_org_id = FND_API.G_MISS_NUM
6837: THEN
6838:
6839: SELECT SOLD_TO_ORG_ID
7065: -- Retrieve the org_ids if not passed on the header record. These
7066: -- IDs will be needed by the value_to_id functions for CONTACT fields.
7067: -- For e.g. oe_value_to_id.ship_to_contact_id requires ship_to_org_id
7068:
7069: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
7070: AND ( p_x_header_rec.ship_to_org_id = FND_API.G_MISS_NUM
7071: OR p_x_header_rec.invoice_to_org_id = FND_API.G_MISS_NUM
7072: OR p_x_header_rec.deliver_to_org_id = FND_API.G_MISS_NUM )
7073: THEN
7626: oe_debug_pub.add('Entering OE_HEADER_UTIL.Get_Order_Number',1);
7627: oe_debug_pub.add('Entering OE_HEADER_UTIL.Get_Order_Number',1);
7628: -- Check if Order Number can be updated or not???? bug 4146258
7629: -- Fixed by Srini
7630: IF NOT OE_GLOBALS.EQUAL(p_x_header_rec.order_number,
7631: p_old_header_rec.order_number)
7632: AND p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
7633: AND p_old_header_rec.order_number is not null
7634: AND p_old_header_rec.order_number <> FND_API.G_MISS_NUM
7628: -- Check if Order Number can be updated or not???? bug 4146258
7629: -- Fixed by Srini
7630: IF NOT OE_GLOBALS.EQUAL(p_x_header_rec.order_number,
7631: p_old_header_rec.order_number)
7632: AND p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
7633: AND p_old_header_rec.order_number is not null
7634: AND p_old_header_rec.order_number <> FND_API.G_MISS_NUM
7635: THEN
7636: if p_x_header_rec.booked_flag = 'Y' and
7662: X_Prd_Tbl_Name,
7663: X_Aud_Tbl_Name,
7664: X_Msg_Flag);
7665:
7666: if p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE and
7667: x_doc_sequence_type = 'A'
7668: then
7669: FND_MESSAGE.SET_NAME('ONT','ONT_ORD_NUM_MISMATCH');
7670: OE_MSG_PUB.Add;
7673:
7674: END IF;
7675:
7676: -- QUOTING changes
7677: IF NOT OE_GLOBALS.EQUAL(p_x_header_rec.order_type_id,
7678: p_old_header_rec.order_type_id)
7679: OR (OE_Quote_Util.G_COMPLETE_NEG = 'Y'
7680: AND NOT OE_GLOBALS.EQUAL(p_x_header_rec.transaction_phase_code,
7681: p_old_header_rec.transaction_phase_code)
7676: -- QUOTING changes
7677: IF NOT OE_GLOBALS.EQUAL(p_x_header_rec.order_type_id,
7678: p_old_header_rec.order_type_id)
7679: OR (OE_Quote_Util.G_COMPLETE_NEG = 'Y'
7680: AND NOT OE_GLOBALS.EQUAL(p_x_header_rec.transaction_phase_code,
7681: p_old_header_rec.transaction_phase_code)
7682: )
7683: THEN
7684:
7831: p_old_header_rec.order_number <> FND_API.G_MISS_NUM) AND
7832: OE_Quote_Util.G_COMPLETE_NEG = 'N' THEN
7833: oe_debug_pub.add('Ord_Num Changed, Calling Set_Header_User_Key and WF_ENGINE.SetItemUserKey',1);
7834: OE_Order_WF_Util.Set_Header_User_Key(p_x_header_rec);
7835: WF_ENGINE.SetItemUserKey(OE_Globals.G_WFI_HDR, to_char(p_x_header_rec.header_id),
7836: substrb(fnd_message.get, 1, 240));
7837:
7838: WF_ENGINE.SetItemAttrNumber(OE_Globals.G_WFI_HDR, to_char(p_x_header_rec.header_id),
7839: 'ORDER_NUMBER', p_x_header_rec.order_number); -- Bug 3589688
7834: OE_Order_WF_Util.Set_Header_User_Key(p_x_header_rec);
7835: WF_ENGINE.SetItemUserKey(OE_Globals.G_WFI_HDR, to_char(p_x_header_rec.header_id),
7836: substrb(fnd_message.get, 1, 240));
7837:
7838: WF_ENGINE.SetItemAttrNumber(OE_Globals.G_WFI_HDR, to_char(p_x_header_rec.header_id),
7839: 'ORDER_NUMBER', p_x_header_rec.order_number); -- Bug 3589688
7840: END IF;
7841:
7842: ELSIF p_x_header_rec.transaction_phase_code = 'N' THEN
7868: (p_header_id => p_x_header_rec.header_id
7869: ,p_sales_document_type_code => 'O'
7870: ,p_transaction_number => p_x_header_rec.quote_number
7871: );
7872: WF_ENGINE.SetItemAttrNumber(OE_GLOBALS.G_WFI_NGO, to_char(p_x_header_rec.header_id),
7873: 'TRANSACTION_NUMBER', p_x_header_rec.quote_number); -- Bug 3589688
7874: END IF;
7875:
7876:
7957:
7958: l_return_status VARCHAR2(30);
7959: l_count NUMBER;
7960: /* Variables to call process order */
7961: l_control_rec OE_GLOBALS.Control_Rec_Type;
7962: p_x_old_header_rec OE_ORDER_PUB.Header_Rec_Type:= p_old_header_rec ;
7963: l_msg_count NUMBER;
7964: l_msg_data VARCHAR2(2000);
7965: l_new_order_type varchar2(80);
8001: -- Setting the global for IR ISO Tracking bug 7667702
8002:
8003: /* Start AuditTrail */
8004:
8005: IF (p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE) THEN
8006:
8007: IF OE_GLOBALS.G_AUDIT_REASON_RQD_FLAG = 'Y' THEN
8008: OE_DEBUG_PUB.add('OEXUHDRB: Audit check requires reason', 5);
8009:
8003: /* Start AuditTrail */
8004:
8005: IF (p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE) THEN
8006:
8007: IF OE_GLOBALS.G_AUDIT_REASON_RQD_FLAG = 'Y' THEN
8008: OE_DEBUG_PUB.add('OEXUHDRB: Audit check requires reason', 5);
8009:
8010: IF (p_x_header_rec.change_reason IS NULL
8011: OR p_x_header_rec.change_reason = FND_API.G_MISS_CHAR
8015: IF OE_Versioning_Util.Captured_Reason IS NULL THEN
8016: OE_Versioning_Util.Get_Reason_Info(l_reason_code, l_reason_comments);
8017: IF l_reason_code IS NULL THEN
8018: -- bug 3636884, defaulting reason from group API
8019: IF OE_GLOBALS.G_DEFAULT_REASON THEN
8020: oe_debug_pub.add('Defaulting Audit Reason for Order Header', 1);
8021: p_x_header_rec.change_reason := 'SYSTEM';
8022: ELSE
8023: OE_DEBUG_PUB.add('Reason code for change is missing or invalid', 1);
8040: END IF;
8041:
8042: /* START PREPAYMENT */
8043: IF (p_x_header_rec.payment_term_id IS NOT NULL AND --Bug 4207730
8044: NOT OE_GLOBALS.Equal(p_x_header_rec.payment_term_id,p_old_header_rec.payment_term_id))
8045: THEN
8046: IF OE_PREPAYMENT_UTIL.Is_Prepaid_Order(p_x_header_rec) = 'Y' THEN
8047: FND_MESSAGE.SET_NAME('ONT', 'ONT_USE_HDR_TERMS_FOR_INVOICE');
8048: OE_MSG_PUB.Add;
8050: END IF;
8051: /* END PREPAYMENT */
8052: -- Included to fix bug 1589196 Begin
8053:
8054: IF NOT OE_GLOBALS.Equal(p_x_header_rec.salesrep_id,p_old_header_rec.salesrep_id)
8055: then
8056: IF p_x_header_rec.operation <> OE_GLOBALS.G_OPR_CREATE THEN
8057: OPEN C_HSC_COUNT(p_x_header_rec.header_id);
8058: FETCH C_HSC_COUNT INTO l_sales_crd_cnt, l_sales_crd_id;
8052: -- Included to fix bug 1589196 Begin
8053:
8054: IF NOT OE_GLOBALS.Equal(p_x_header_rec.salesrep_id,p_old_header_rec.salesrep_id)
8055: then
8056: IF p_x_header_rec.operation <> OE_GLOBALS.G_OPR_CREATE THEN
8057: OPEN C_HSC_COUNT(p_x_header_rec.header_id);
8058: FETCH C_HSC_COUNT INTO l_sales_crd_cnt, l_sales_crd_id;
8059: CLOSE C_HSC_COUNT;
8060: if l_sales_crd_cnt > 1 then
8075:
8076: IF (p_x_header_rec.cancelled_flag = 'Y') then
8077:
8078: /* Fix Bug # 3241831: Set Global before Order Cancellation Starts */
8079: IF OE_GLOBALS.G_UI_FLAG = FALSE THEN
8080: oe_debug_pub.add('SET G_ORD_LVL_CAN TO TRUE FOR NON UI ORDER CANCEL');
8081: OE_OE_FORM_CANCEL_LINE.g_ord_lvl_can := TRUE;
8082: END IF;
8083:
8117: -- Please refer to following delayed request params with their meaning
8118: -- useful while logging the delayed request -
8119: --
8120: -- P_entity_code Entity for which delayed request has to be logged.
8121: -- In this project it can be OE_Globals.G_Entity_Line
8122: -- or OE_Globals.G_Entity_Header
8123: -- P_entity_id Primary key of the entity record. In this project,
8124: -- it can be Order Line_id or Header_id
8125: -- P_requesting_entity_code Which entity has requested this delayed request to
8118: -- useful while logging the delayed request -
8119: --
8120: -- P_entity_code Entity for which delayed request has to be logged.
8121: -- In this project it can be OE_Globals.G_Entity_Line
8122: -- or OE_Globals.G_Entity_Header
8123: -- P_entity_id Primary key of the entity record. In this project,
8124: -- it can be Order Line_id or Header_id
8125: -- P_requesting_entity_code Which entity has requested this delayed request to
8126: -- be logged! In this project it will be OE_Globals.
8122: -- or OE_Globals.G_Entity_Header
8123: -- P_entity_id Primary key of the entity record. In this project,
8124: -- it can be Order Line_id or Header_id
8125: -- P_requesting_entity_code Which entity has requested this delayed request to
8126: -- be logged! In this project it will be OE_Globals.
8127: -- G_Entity_Line or OE_Globals.G_Entity_Header
8128: -- P_requesting_entity_id Primary key of the requesting entity. In this
8129: -- project, it is Line_id or Header_id
8130: -- P_request_type Indicates which business logic (or which procedure)
8123: -- P_entity_id Primary key of the entity record. In this project,
8124: -- it can be Order Line_id or Header_id
8125: -- P_requesting_entity_code Which entity has requested this delayed request to
8126: -- be logged! In this project it will be OE_Globals.
8127: -- G_Entity_Line or OE_Globals.G_Entity_Header
8128: -- P_requesting_entity_id Primary key of the requesting entity. In this
8129: -- project, it is Line_id or Header_id
8130: -- P_request_type Indicates which business logic (or which procedure)
8131: -- should be executed. In this project, it is OE_Global
8201: oe_debug_pub.add(' Header level cancellation. Log the IR ISO update delayed request',5);
8202: END IF;
8203:
8204: OE_delayed_requests_Pvt.log_request
8205: ( p_entity_code => OE_GLOBALS.G_ENTITY_HEADER
8206: , p_entity_id => p_x_header_rec.header_id
8207: , p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER
8208: , p_requesting_entity_id => p_x_header_rec.header_id
8209: , p_request_unique_key2 => p_x_header_rec.source_document_id -- Req Hdr_id
8203:
8204: OE_delayed_requests_Pvt.log_request
8205: ( p_entity_code => OE_GLOBALS.G_ENTITY_HEADER
8206: , p_entity_id => p_x_header_rec.header_id
8207: , p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER
8208: , p_requesting_entity_id => p_x_header_rec.header_id
8209: , p_request_unique_key2 => p_x_header_rec.source_document_id -- Req Hdr_id
8210: , p_param2 => 'Y'
8211: , p_request_type => OE_GLOBALS.G_UPDATE_REQUISITION
8207: , p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER
8208: , p_requesting_entity_id => p_x_header_rec.header_id
8209: , p_request_unique_key2 => p_x_header_rec.source_document_id -- Req Hdr_id
8210: , p_param2 => 'Y'
8211: , p_request_type => OE_GLOBALS.G_UPDATE_REQUISITION
8212: , x_return_status => l_return_status
8213: );
8214:
8215: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8233: -- freight carrier field.
8234:
8235: IF (p_x_header_rec.order_category_code <> 'RETURN') THEN
8236:
8237: IF (NOT OE_GLOBALS.Equal(p_x_header_rec.ship_from_org_id,
8238: p_old_header_rec.ship_from_org_id) OR
8239: NOT OE_GLOBALS.Equal(p_x_header_rec.shipping_method_code,
8240: p_old_header_rec.shipping_method_code)) THEN
8241:
8235: IF (p_x_header_rec.order_category_code <> 'RETURN') THEN
8236:
8237: IF (NOT OE_GLOBALS.Equal(p_x_header_rec.ship_from_org_id,
8238: p_old_header_rec.ship_from_org_id) OR
8239: NOT OE_GLOBALS.Equal(p_x_header_rec.shipping_method_code,
8240: p_old_header_rec.shipping_method_code)) THEN
8241:
8242: IF p_x_header_rec.shipping_method_code IS NOT NULL AND
8243: p_x_header_rec.ship_from_org_id IS NOT NULL THEN
8346: l_line_tbl(j).shipping_method_code := NULL;
8347: ELSE
8348: l_line_tbl(j).shipping_method_code := l_modified_from;
8349: END IF;
8350: l_line_tbl(j).operation := OE_GLOBALS.G_OPR_UPDATE;
8351: End If;
8352: end loop;
8353: IF l_line_tbl.count > 0 THEN
8354: OE_GLOBALS.G_PRICING_RECURSION := 'Y';
8350: l_line_tbl(j).operation := OE_GLOBALS.G_OPR_UPDATE;
8351: End If;
8352: end loop;
8353: IF l_line_tbl.count > 0 THEN
8354: OE_GLOBALS.G_PRICING_RECURSION := 'Y';
8355: l_control_rec.controlled_operation := TRUE;
8356: l_control_rec.check_security := TRUE;
8357: l_control_rec.clear_dependents := FALSE;
8358: l_control_rec.default_attributes := FALSE;
8373: RAISE FND_API.G_EXC_ERROR;
8374: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8375: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8376: END IF;
8377: OE_GLOBALS.G_PRICING_RECURSION := 'N';
8378: END IF;
8379: --bug 4190357
8380:
8381: END IF;
8386: END IF;
8387:
8388: -- Log delayed request to create automatic attachments
8389: /*6896311
8390: IF (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE OR
8391: p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE) AND --5893276
8392: 6896311*/
8393: IF (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE ) AND --6896311
8394: l_apply_automatic_atchmt = 'Y' THEN
8387:
8388: -- Log delayed request to create automatic attachments
8389: /*6896311
8390: IF (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE OR
8391: p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE) AND --5893276
8392: 6896311*/
8393: IF (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE ) AND --6896311
8394: l_apply_automatic_atchmt = 'Y' THEN
8395: oe_debug_pub.add('log request to apply atcmt');
8389: /*6896311
8390: IF (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE OR
8391: p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE) AND --5893276
8392: 6896311*/
8393: IF (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE ) AND --6896311
8394: l_apply_automatic_atchmt = 'Y' THEN
8395: oe_debug_pub.add('log request to apply atcmt');
8396: OE_DELAYED_REQUESTS_PVT.Log_Request
8397: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8393: IF (p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE ) AND --6896311
8394: l_apply_automatic_atchmt = 'Y' THEN
8395: oe_debug_pub.add('log request to apply atcmt');
8396: OE_DELAYED_REQUESTS_PVT.Log_Request
8397: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8398: p_entity_id => p_x_header_rec.header_id,
8399: p_request_type => OE_GLOBALS.G_APPLY_AUTOMATIC_ATCHMT,
8400: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8401: p_requesting_entity_id => p_x_header_rec.header_id,
8395: oe_debug_pub.add('log request to apply atcmt');
8396: OE_DELAYED_REQUESTS_PVT.Log_Request
8397: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8398: p_entity_id => p_x_header_rec.header_id,
8399: p_request_type => OE_GLOBALS.G_APPLY_AUTOMATIC_ATCHMT,
8400: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8401: p_requesting_entity_id => p_x_header_rec.header_id,
8402: x_return_status => l_return_status
8403: );
8396: OE_DELAYED_REQUESTS_PVT.Log_Request
8397: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8398: p_entity_id => p_x_header_rec.header_id,
8399: p_request_type => OE_GLOBALS.G_APPLY_AUTOMATIC_ATCHMT,
8400: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8401: p_requesting_entity_id => p_x_header_rec.header_id,
8402: x_return_status => l_return_status
8403: );
8404: END IF;
8403: );
8404: END IF;
8405:
8406: --6896311
8407: IF (p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE ) AND
8408: l_apply_automatic_atchmt = 'Y'
8409: THEN
8410: oe_debug_pub.add('log request to update atcmt');
8411:
8408: l_apply_automatic_atchmt = 'Y'
8409: THEN
8410: oe_debug_pub.add('log request to update atcmt');
8411:
8412: IF NOT OE_GLOBALS.Equal(p_x_header_rec.CUST_PO_NUMBER
8413: ,p_old_header_rec.CUST_PO_NUMBER)
8414: OR NOT OE_GLOBALS.Equal(p_x_header_rec.INVOICE_TO_ORG_ID
8415: ,p_old_header_rec.INVOICE_TO_ORG_ID)
8416: OR NOT OE_GLOBALS.Equal(p_x_header_rec.ORDER_TYPE_ID
8410: oe_debug_pub.add('log request to update atcmt');
8411:
8412: IF NOT OE_GLOBALS.Equal(p_x_header_rec.CUST_PO_NUMBER
8413: ,p_old_header_rec.CUST_PO_NUMBER)
8414: OR NOT OE_GLOBALS.Equal(p_x_header_rec.INVOICE_TO_ORG_ID
8415: ,p_old_header_rec.INVOICE_TO_ORG_ID)
8416: OR NOT OE_GLOBALS.Equal(p_x_header_rec.ORDER_TYPE_ID
8417: ,p_old_header_rec.ORDER_TYPE_ID)
8418: OR NOT OE_GLOBALS.Equal(p_x_header_rec.SHIP_TO_ORG_ID
8412: IF NOT OE_GLOBALS.Equal(p_x_header_rec.CUST_PO_NUMBER
8413: ,p_old_header_rec.CUST_PO_NUMBER)
8414: OR NOT OE_GLOBALS.Equal(p_x_header_rec.INVOICE_TO_ORG_ID
8415: ,p_old_header_rec.INVOICE_TO_ORG_ID)
8416: OR NOT OE_GLOBALS.Equal(p_x_header_rec.ORDER_TYPE_ID
8417: ,p_old_header_rec.ORDER_TYPE_ID)
8418: OR NOT OE_GLOBALS.Equal(p_x_header_rec.SHIP_TO_ORG_ID
8419: ,p_old_header_rec.SHIP_TO_ORG_ID)
8420: OR NOT OE_GLOBALS.Equal(p_x_header_rec.SOLD_TO_ORG_ID
8414: OR NOT OE_GLOBALS.Equal(p_x_header_rec.INVOICE_TO_ORG_ID
8415: ,p_old_header_rec.INVOICE_TO_ORG_ID)
8416: OR NOT OE_GLOBALS.Equal(p_x_header_rec.ORDER_TYPE_ID
8417: ,p_old_header_rec.ORDER_TYPE_ID)
8418: OR NOT OE_GLOBALS.Equal(p_x_header_rec.SHIP_TO_ORG_ID
8419: ,p_old_header_rec.SHIP_TO_ORG_ID)
8420: OR NOT OE_GLOBALS.Equal(p_x_header_rec.SOLD_TO_ORG_ID
8421: ,p_old_header_rec.SOLD_TO_ORG_ID)
8422: OR NOT OE_GLOBALS.Equal(p_x_header_rec.ORDER_CATEGORY_CODE
8416: OR NOT OE_GLOBALS.Equal(p_x_header_rec.ORDER_TYPE_ID
8417: ,p_old_header_rec.ORDER_TYPE_ID)
8418: OR NOT OE_GLOBALS.Equal(p_x_header_rec.SHIP_TO_ORG_ID
8419: ,p_old_header_rec.SHIP_TO_ORG_ID)
8420: OR NOT OE_GLOBALS.Equal(p_x_header_rec.SOLD_TO_ORG_ID
8421: ,p_old_header_rec.SOLD_TO_ORG_ID)
8422: OR NOT OE_GLOBALS.Equal(p_x_header_rec.ORDER_CATEGORY_CODE
8423: ,p_old_header_rec.ORDER_CATEGORY_CODE)
8424: THEN
8418: OR NOT OE_GLOBALS.Equal(p_x_header_rec.SHIP_TO_ORG_ID
8419: ,p_old_header_rec.SHIP_TO_ORG_ID)
8420: OR NOT OE_GLOBALS.Equal(p_x_header_rec.SOLD_TO_ORG_ID
8421: ,p_old_header_rec.SOLD_TO_ORG_ID)
8422: OR NOT OE_GLOBALS.Equal(p_x_header_rec.ORDER_CATEGORY_CODE
8423: ,p_old_header_rec.ORDER_CATEGORY_CODE)
8424: THEN
8425:
8426: l_attr_attach_change := TRUE;
8428: END IF;
8429:
8430: IF l_attr_attach_change THEN
8431: OE_delayed_requests_Pvt.Log_Request
8432: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8433: p_entity_id => p_x_header_rec.header_id,
8434: p_request_type => OE_GLOBALS.G_APPLY_AUTOMATIC_ATCHMT,
8435: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8436: p_requesting_entity_id => p_x_header_rec.header_id,
8430: IF l_attr_attach_change THEN
8431: OE_delayed_requests_Pvt.Log_Request
8432: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8433: p_entity_id => p_x_header_rec.header_id,
8434: p_request_type => OE_GLOBALS.G_APPLY_AUTOMATIC_ATCHMT,
8435: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8436: p_requesting_entity_id => p_x_header_rec.header_id,
8437: x_return_status => l_return_status
8438: );
8431: OE_delayed_requests_Pvt.Log_Request
8432: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8433: p_entity_id => p_x_header_rec.header_id,
8434: p_request_type => OE_GLOBALS.G_APPLY_AUTOMATIC_ATCHMT,
8435: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8436: p_requesting_entity_id => p_x_header_rec.header_id,
8437: x_return_status => l_return_status
8438: );
8439: END IF;
8442:
8443:
8444: -- QUOTING changes
8445: IF nvl(p_x_header_rec.transaction_phase_code,'F') = 'F'
8446: AND NOT OE_GLOBALS.Equal(p_x_header_rec.order_type_id
8447: ,p_old_header_rec.order_type_id)
8448: THEN
8449:
8450: -- If the Order Type has changed, we need to sync up the
8448: THEN
8449:
8450: -- If the Order Type has changed, we need to sync up the
8451: -- MTL_SALES_ORDERS table.
8452: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
8453:
8454: l_source_code := FND_PROFILE.VALUE('ONT_SOURCE_CODE');
8455: -- 3817802 : New api Get_Base_Order_Type is used to get order type based on base lang
8456: l_new_order_type := Get_Base_Order_Type(p_x_header_rec.order_type_id);
8477: END IF;
8478: --included for the create internal requisition Spares Management (Ikon) project mshenoy
8479: -- For all Internal Sales Orders (Source Document Type ID = 10 ) and Create ISO Operations
8480: -- log a Delayed Request for the create Internal Requisition
8481: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
8482: p_x_header_rec.Source_Document_Type_id = 10 AND
8483: p_x_header_rec.Source_Document_id is null AND
8484: p_x_header_rec.Orig_sys_document_ref is null THEN
8485: oe_debug_pub.add('log request to create internal Req for ISO');
8483: p_x_header_rec.Source_Document_id is null AND
8484: p_x_header_rec.Orig_sys_document_ref is null THEN
8485: oe_debug_pub.add('log request to create internal Req for ISO');
8486: OE_delayed_requests_Pvt.Log_Request
8487: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
8488: p_entity_id => p_x_header_rec.header_id,
8489: p_request_type => OE_GLOBALS.G_CREATE_INTERNAL_REQ,
8490: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8491: p_requesting_entity_id => p_x_header_rec.header_id,
8485: oe_debug_pub.add('log request to create internal Req for ISO');
8486: OE_delayed_requests_Pvt.Log_Request
8487: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
8488: p_entity_id => p_x_header_rec.header_id,
8489: p_request_type => OE_GLOBALS.G_CREATE_INTERNAL_REQ,
8490: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8491: p_requesting_entity_id => p_x_header_rec.header_id,
8492: x_return_status => l_return_status );
8493: oe_debug_pub.add(' Return Status log_request Delayed Requests for Int req ' || l_return_status);
8486: OE_delayed_requests_Pvt.Log_Request
8487: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
8488: p_entity_id => p_x_header_rec.header_id,
8489: p_request_type => OE_GLOBALS.G_CREATE_INTERNAL_REQ,
8490: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8491: p_requesting_entity_id => p_x_header_rec.header_id,
8492: x_return_status => l_return_status );
8493: oe_debug_pub.add(' Return Status log_request Delayed Requests for Int req ' || l_return_status);
8494:
8497: -- Fix for bug1167537
8498: -- Clear the header record cached by defaulting APIs so that the
8499: -- default values on the line record are obtained from the
8500: -- updated header record
8501: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
8502: ONT_HEADER_Def_Util.Clear_HEADER_Cache;
8503: END IF;
8504:
8505: -- R12 CC encryption
8502: ONT_HEADER_Def_Util.Clear_HEADER_Cache;
8503: END IF;
8504:
8505: -- R12 CC encryption
8506: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
8507: AND (p_x_header_rec.payment_type_code = 'CREDIT_CARD'
8508: OR p_old_header_rec.payment_type_code = 'CREDIT_CARD') THEN
8509:
8510: IF (NOT OE_GLOBALS.Is_Same_Credit_Card(p_old_header_rec.credit_card_number,
8506: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
8507: AND (p_x_header_rec.payment_type_code = 'CREDIT_CARD'
8508: OR p_old_header_rec.payment_type_code = 'CREDIT_CARD') THEN
8509:
8510: IF (NOT OE_GLOBALS.Is_Same_Credit_Card(p_old_header_rec.credit_card_number,
8511: p_x_header_rec.credit_card_number,
8512: p_old_header_rec.cc_instrument_id,
8513: p_x_header_rec.cc_instrument_id))
8514: OR
8511: p_x_header_rec.credit_card_number,
8512: p_old_header_rec.cc_instrument_id,
8513: p_x_header_rec.cc_instrument_id))
8514: OR
8515: (p_x_header_rec.payment_type_code IS NULL AND NOT OE_GLOBALS.Is_Same_Credit_Card(p_old_header_rec.credit_card_number,p_x_header_rec.credit_card_number,p_old_header_rec.cc_instrument_id, NULL))
8516: THEN
8517:
8518: l_changed_attribute := l_changed_attribute||',' ||'CREDIT_CARD_NUMBER';
8519:
8526: **/
8527:
8528: END IF;
8529:
8530: IF NOT OE_GLOBALS.Equal(p_x_header_rec.credit_card_code,p_old_header_rec.credit_card_code)
8531: THEN
8532:
8533: l_changed_attribute := l_changed_attribute||',' ||'CREDIT_CARD_CODE';
8534:
8541: **/
8542:
8543: END IF;
8544:
8545: IF NOT OE_GLOBALS.Equal(p_x_header_rec.credit_card_holder_name,p_old_header_rec.credit_card_holder_name)
8546: THEN
8547: l_changed_attribute := l_changed_attribute||',' ||'CREDIT_CARD_HOLDER_NAME';
8548:
8549: END IF;
8547: l_changed_attribute := l_changed_attribute||',' ||'CREDIT_CARD_HOLDER_NAME';
8548:
8549: END IF;
8550:
8551: IF NOT OE_GLOBALS.Equal(p_x_header_rec.credit_card_expiration_date,p_old_header_rec.credit_card_expiration_date)
8552: THEN
8553: l_changed_attribute := l_changed_attribute||',' ||'CREDIT_CARD_EXPIRATION_DATE';
8554:
8555: END IF;
8562: (p_validation_entity_id => OE_PC_GLOBALS.G_ENTITY_HEADER);
8563:
8564: --11.5.10 Versioning/Audit Trail updates
8565: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' AND
8566: OE_GLOBALS.G_ROLL_VERSION <> 'N' THEN
8567: IF OE_GLOBALS.G_REASON_CODE IS NULL AND
8568: OE_GLOBALS.G_CAPTURED_REASON IN ('V','A') THEN
8569: IF p_x_header_rec.change_reason <> FND_API.G_MISS_CHAR THEN
8570: OE_GLOBALS.G_REASON_CODE := p_x_header_rec.change_reason;
8563:
8564: --11.5.10 Versioning/Audit Trail updates
8565: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' AND
8566: OE_GLOBALS.G_ROLL_VERSION <> 'N' THEN
8567: IF OE_GLOBALS.G_REASON_CODE IS NULL AND
8568: OE_GLOBALS.G_CAPTURED_REASON IN ('V','A') THEN
8569: IF p_x_header_rec.change_reason <> FND_API.G_MISS_CHAR THEN
8570: OE_GLOBALS.G_REASON_CODE := p_x_header_rec.change_reason;
8571: OE_GLOBALS.G_REASON_COMMENTS := p_x_header_rec.change_comments;
8564: --11.5.10 Versioning/Audit Trail updates
8565: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' AND
8566: OE_GLOBALS.G_ROLL_VERSION <> 'N' THEN
8567: IF OE_GLOBALS.G_REASON_CODE IS NULL AND
8568: OE_GLOBALS.G_CAPTURED_REASON IN ('V','A') THEN
8569: IF p_x_header_rec.change_reason <> FND_API.G_MISS_CHAR THEN
8570: OE_GLOBALS.G_REASON_CODE := p_x_header_rec.change_reason;
8571: OE_GLOBALS.G_REASON_COMMENTS := p_x_header_rec.change_comments;
8572: OE_GLOBALS.G_CAPTURED_REASON := 'Y';
8566: OE_GLOBALS.G_ROLL_VERSION <> 'N' THEN
8567: IF OE_GLOBALS.G_REASON_CODE IS NULL AND
8568: OE_GLOBALS.G_CAPTURED_REASON IN ('V','A') THEN
8569: IF p_x_header_rec.change_reason <> FND_API.G_MISS_CHAR THEN
8570: OE_GLOBALS.G_REASON_CODE := p_x_header_rec.change_reason;
8571: OE_GLOBALS.G_REASON_COMMENTS := p_x_header_rec.change_comments;
8572: OE_GLOBALS.G_CAPTURED_REASON := 'Y';
8573: ELSE
8574: OE_DEBUG_PUB.add('Reason code for versioning is missing', 1);
8567: IF OE_GLOBALS.G_REASON_CODE IS NULL AND
8568: OE_GLOBALS.G_CAPTURED_REASON IN ('V','A') THEN
8569: IF p_x_header_rec.change_reason <> FND_API.G_MISS_CHAR THEN
8570: OE_GLOBALS.G_REASON_CODE := p_x_header_rec.change_reason;
8571: OE_GLOBALS.G_REASON_COMMENTS := p_x_header_rec.change_comments;
8572: OE_GLOBALS.G_CAPTURED_REASON := 'Y';
8573: ELSE
8574: OE_DEBUG_PUB.add('Reason code for versioning is missing', 1);
8575: if OE_GLOBALS.G_UI_FLAG THEN
8568: OE_GLOBALS.G_CAPTURED_REASON IN ('V','A') THEN
8569: IF p_x_header_rec.change_reason <> FND_API.G_MISS_CHAR THEN
8570: OE_GLOBALS.G_REASON_CODE := p_x_header_rec.change_reason;
8571: OE_GLOBALS.G_REASON_COMMENTS := p_x_header_rec.change_comments;
8572: OE_GLOBALS.G_CAPTURED_REASON := 'Y';
8573: ELSE
8574: OE_DEBUG_PUB.add('Reason code for versioning is missing', 1);
8575: if OE_GLOBALS.G_UI_FLAG THEN
8576: raise FND_API.G_EXC_ERROR;
8571: OE_GLOBALS.G_REASON_COMMENTS := p_x_header_rec.change_comments;
8572: OE_GLOBALS.G_CAPTURED_REASON := 'Y';
8573: ELSE
8574: OE_DEBUG_PUB.add('Reason code for versioning is missing', 1);
8575: if OE_GLOBALS.G_UI_FLAG THEN
8576: raise FND_API.G_EXC_ERROR;
8577: end if;
8578: END IF;
8579: END IF;
8579: END IF;
8580:
8581: --log delayed request
8582: oe_debug_pub.add('log versioning request',1);
8583: OE_Delayed_Requests_Pvt.Log_Request(p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
8584: p_entity_id => p_x_header_rec.header_id,
8585: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8586: p_requesting_entity_id => p_x_header_rec.header_id,
8587: p_request_type => OE_GLOBALS.G_VERSION_AUDIT,
8581: --log delayed request
8582: oe_debug_pub.add('log versioning request',1);
8583: OE_Delayed_Requests_Pvt.Log_Request(p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
8584: p_entity_id => p_x_header_rec.header_id,
8585: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8586: p_requesting_entity_id => p_x_header_rec.header_id,
8587: p_request_type => OE_GLOBALS.G_VERSION_AUDIT,
8588: p_param1 => l_changed_attribute,
8589: x_return_status => l_return_status);
8583: OE_Delayed_Requests_Pvt.Log_Request(p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
8584: p_entity_id => p_x_header_rec.header_id,
8585: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8586: p_requesting_entity_id => p_x_header_rec.header_id,
8587: p_request_type => OE_GLOBALS.G_VERSION_AUDIT,
8588: p_param1 => l_changed_attribute,
8589: x_return_status => l_return_status);
8590: END IF;
8591:
8588: p_param1 => l_changed_attribute,
8589: x_return_status => l_return_status);
8590: END IF;
8591:
8592: IF OE_GLOBALS.G_AUDIT_REASON_RQD_FLAG = 'Y' OR
8593: OE_GLOBALS.G_AUDIT_HISTORY_RQD_FLAG = 'Y' THEN
8594: OE_DEBUG_PUB.add('Call oe_order_chg_pvt to record Header Audit History',5);
8595:
8596: --11.5.10 Versioning/Audit Trail updates
8589: x_return_status => l_return_status);
8590: END IF;
8591:
8592: IF OE_GLOBALS.G_AUDIT_REASON_RQD_FLAG = 'Y' OR
8593: OE_GLOBALS.G_AUDIT_HISTORY_RQD_FLAG = 'Y' THEN
8594: OE_DEBUG_PUB.add('Call oe_order_chg_pvt to record Header Audit History',5);
8595:
8596: --11.5.10 Versioning/Audit Trail updates
8597: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' THEN
8594: OE_DEBUG_PUB.add('Call oe_order_chg_pvt to record Header Audit History',5);
8595:
8596: --11.5.10 Versioning/Audit Trail updates
8597: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' THEN
8598: OE_Versioning_Util.Capture_Audit_Info(p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8599: p_entity_id => p_x_header_rec.header_id,
8600: p_hist_type_code => 'UPDATE');
8601: --log delayed request
8602: OE_Delayed_Requests_Pvt.Log_Request(p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
8598: OE_Versioning_Util.Capture_Audit_Info(p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8599: p_entity_id => p_x_header_rec.header_id,
8600: p_hist_type_code => 'UPDATE');
8601: --log delayed request
8602: OE_Delayed_Requests_Pvt.Log_Request(p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
8603: p_entity_id => p_x_header_rec.header_id,
8604: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8605: p_requesting_entity_id => p_x_header_rec.header_id,
8606: p_request_type => OE_GLOBALS.G_VERSION_AUDIT,
8600: p_hist_type_code => 'UPDATE');
8601: --log delayed request
8602: OE_Delayed_Requests_Pvt.Log_Request(p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
8603: p_entity_id => p_x_header_rec.header_id,
8604: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8605: p_requesting_entity_id => p_x_header_rec.header_id,
8606: p_request_type => OE_GLOBALS.G_VERSION_AUDIT,
8607: p_param1 => l_changed_attribute,
8608: x_return_status => l_return_status);
8602: OE_Delayed_Requests_Pvt.Log_Request(p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
8603: p_entity_id => p_x_header_rec.header_id,
8604: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8605: p_requesting_entity_id => p_x_header_rec.header_id,
8606: p_request_type => OE_GLOBALS.G_VERSION_AUDIT,
8607: p_param1 => l_changed_attribute,
8608: x_return_status => l_return_status);
8609: OE_GLOBALS.G_AUDIT_HISTORY_RQD_FLAG := 'N';
8610: ELSE
8605: p_requesting_entity_id => p_x_header_rec.header_id,
8606: p_request_type => OE_GLOBALS.G_VERSION_AUDIT,
8607: p_param1 => l_changed_attribute,
8608: x_return_status => l_return_status);
8609: OE_GLOBALS.G_AUDIT_HISTORY_RQD_FLAG := 'N';
8610: ELSE
8611: OE_CHG_ORDER_PVT.RecordHeaderHist
8612: ( p_header_id => p_x_header_rec.header_id,
8613: p_header_rec => null,
8631: END IF;
8632:
8633: -- QUOTING changes
8634: -- Initialize flow status to DRAFT or ENTERED dependening on transaction phase
8635: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN
8636:
8637: IF nvl(p_x_header_rec.transaction_phase_code,'F') = 'F' THEN
8638: /*
8639: ** Fix Bug # 3484862: iStore will be sending flow status as WORKING
8655: --Log request for deletes AND for update of currency
8656:
8657: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509'
8658: AND NVL(p_x_header_rec.transaction_phase_code,'F') = 'F'
8659: AND (p_x_header_rec.operation = OE_GLOBALS.G_OPR_DELETE OR
8660: (p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
8661: AND NOT OE_GLOBALS.EQUAL(p_x_header_rec.transactional_curr_code
8662: ,p_old_header_rec.transactional_curr_code)))
8663: THEN
8656:
8657: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509'
8658: AND NVL(p_x_header_rec.transaction_phase_code,'F') = 'F'
8659: AND (p_x_header_rec.operation = OE_GLOBALS.G_OPR_DELETE OR
8660: (p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
8661: AND NOT OE_GLOBALS.EQUAL(p_x_header_rec.transactional_curr_code
8662: ,p_old_header_rec.transactional_curr_code)))
8663: THEN
8664: Blkt_Req_For_Curr_Upd_And_Del(p_x_header_rec,p_old_header_rec);
8657: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509'
8658: AND NVL(p_x_header_rec.transaction_phase_code,'F') = 'F'
8659: AND (p_x_header_rec.operation = OE_GLOBALS.G_OPR_DELETE OR
8660: (p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
8661: AND NOT OE_GLOBALS.EQUAL(p_x_header_rec.transactional_curr_code
8662: ,p_old_header_rec.transactional_curr_code)))
8663: THEN
8664: Blkt_Req_For_Curr_Upd_And_Del(p_x_header_rec,p_old_header_rec);
8665: END IF;
8703: l_return_status VARCHAR2(30);
8704: l_msg_count NUMBER;
8705: l_msg_data VARCHAR2(2000);
8706:
8707: l_control_rec OE_GLOBALS.Control_Rec_Type;
8708: l_old_line_tbl OE_Order_PUB.Line_Tbl_Type;
8709: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
8710: l_recursion_mode VARCHAR2(1);
8711: l_operation VARCHAR2(30);
8740: -- later as holds should be applied only to orders in fulfillment phase.
8741:
8742: --Fix bug 1649402
8743: OE_DELAYED_REQUESTS_PVT.Process_Request_for_ReqType
8744: (p_request_type => OE_GLOBALS.G_DFLT_HSCREDIT_FOR_SREP
8745: ,p_delete => FND_API.G_TRUE
8746: ,x_return_status=> l_return_status
8747: );
8748: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8755: -- later as mtl_sales_order records should be created only for
8756: -- orders in fulfillment phase.
8757:
8758: -- QUOTING changes
8759: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE
8760: OR (OE_Quote_Util.G_COMPLETE_NEG = 'Y'
8761: AND NOT OE_GLOBALS.EQUAL(p_x_header_rec.transaction_phase_code,
8762: p_old_header_rec.transaction_phase_code)
8763: )
8757:
8758: -- QUOTING changes
8759: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE
8760: OR (OE_Quote_Util.G_COMPLETE_NEG = 'Y'
8761: AND NOT OE_GLOBALS.EQUAL(p_x_header_rec.transaction_phase_code,
8762: p_old_header_rec.transaction_phase_code)
8763: )
8764: THEN
8765:
8774: /*ER#7479609
8775: oe_debug_pub.add('Before calling eval_post_write_header in HEADER Post Write',1);
8776:
8777: OE_HOLDS_PUB.eval_post_write_header
8778: ( p_entity_code => OE_GLOBALS.G_ENTITY_HEADER
8779: ,p_entity_id => p_x_header_rec.header_id
8780: ,p_hold_entity_code => 'C'
8781: ,p_hold_entity_id => p_x_header_rec.sold_to_org_id
8782: ,x_return_status => l_return_status
8798: if l_debug_level > 0 then
8799: oe_debug_pub.add('Call evaluate_holds_post_write for CREATE');
8800: end if;
8801: OE_Holds_PUB.evaluate_holds_post_write
8802: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER
8803: ,p_entity_id => p_x_header_rec.header_id
8804: ,x_msg_count => l_msg_count
8805: ,x_msg_data => l_msg_data
8806: ,x_return_status => l_return_status
8853: THEN
8854: l_operation := p_x_header_rec.operation;
8855: p_x_header_rec := OE_Order_Cache.g_header_rec;
8856: p_x_header_rec.operation := l_operation;
8857: OE_GLOBALS.G_CASCADING_REQUEST_LOGGED := TRUE;
8858: END IF;
8859:
8860: END IF; -- END for check if CREATE operation
8861: -- QUOTING changes END
8861: -- QUOTING changes END
8862:
8863: -- Close the order if its a complet cancellation at the line and
8864: -- is indeed a cancellation (by constraints)
8865: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
8866: IF oe_sales_can_util.g_order_cancel AND
8867: p_x_header_rec.cancelled_flag = 'Y' AND (p_old_header_rec.cancelled_flag <> 'Y') THEN --7142748
8868: -- Bug 1895144: set recursion mode so that close does
8869: -- not execute any delayed requests
8867: p_x_header_rec.cancelled_flag = 'Y' AND (p_old_header_rec.cancelled_flag <> 'Y') THEN --7142748
8868: -- Bug 1895144: set recursion mode so that close does
8869: -- not execute any delayed requests
8870: BEGIN
8871: l_recursion_mode := OE_GLOBALS.G_RECURSION_MODE;
8872: -- OE_GLOBALS.G_RECURSION_MODE := 'Y';
8873:
8874: -- Log a request to cancel the workflow.
8875: /*
8868: -- Bug 1895144: set recursion mode so that close does
8869: -- not execute any delayed requests
8870: BEGIN
8871: l_recursion_mode := OE_GLOBALS.G_RECURSION_MODE;
8872: -- OE_GLOBALS.G_RECURSION_MODE := 'Y';
8873:
8874: -- Log a request to cancel the workflow.
8875: /*
8876: -- commented to take care of P1 issues in configuration
8875: /*
8876: -- commented to take care of P1 issues in configuration
8877:
8878: OE_delayed_requests_Pvt.log_request
8879: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
8880: p_entity_id => p_x_header_rec.header_id,
8881: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_ALL,
8882: p_requesting_entity_id => p_x_header_rec.header_id,
8883: p_request_type => OE_GLOBALS.G_CANCEL_WF,
8877:
8878: OE_delayed_requests_Pvt.log_request
8879: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
8880: p_entity_id => p_x_header_rec.header_id,
8881: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_ALL,
8882: p_requesting_entity_id => p_x_header_rec.header_id,
8883: p_request_type => OE_GLOBALS.G_CANCEL_WF,
8884: p_param1 => OE_GLOBALS.G_ENTITY_HEADER,
8885: x_return_status => l_return_status);
8879: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
8880: p_entity_id => p_x_header_rec.header_id,
8881: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_ALL,
8882: p_requesting_entity_id => p_x_header_rec.header_id,
8883: p_request_type => OE_GLOBALS.G_CANCEL_WF,
8884: p_param1 => OE_GLOBALS.G_ENTITY_HEADER,
8885: x_return_status => l_return_status);
8886: */
8887:
8880: p_entity_id => p_x_header_rec.header_id,
8881: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_ALL,
8882: p_requesting_entity_id => p_x_header_rec.header_id,
8883: p_request_type => OE_GLOBALS.G_CANCEL_WF,
8884: p_param1 => OE_GLOBALS.G_ENTITY_HEADER,
8885: x_return_status => l_return_status);
8886: */
8887:
8888: -- Commented the code to move the logic to delayed request
8886: */
8887:
8888: -- Commented the code to move the logic to delayed request
8889: -- Uncommented to take care of P1 configuration issues
8890: wf_engine.handleerror(OE_Globals.G_WFI_HDR
8891: ,to_char(p_x_header_rec.header_id)
8892: ,'CLOSE_HEADER',
8893: 'RETRY','CANCEL');
8894:
8891: ,to_char(p_x_header_rec.header_id)
8892: ,'CLOSE_HEADER',
8893: 'RETRY','CANCEL');
8894:
8895: -- OE_GLOBALS.G_RECURSION_MODE := l_recursion_mode;
8896: -- BUG 2013611 - Increment promotional balance in response to cancellation
8897: oe_debug_pub.add('log request to Reverse_Limits for CANCEL in HEADER Post Write',1);
8898: OE_delayed_requests_Pvt.log_request(
8899: p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8895: -- OE_GLOBALS.G_RECURSION_MODE := l_recursion_mode;
8896: -- BUG 2013611 - Increment promotional balance in response to cancellation
8897: oe_debug_pub.add('log request to Reverse_Limits for CANCEL in HEADER Post Write',1);
8898: OE_delayed_requests_Pvt.log_request(
8899: p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8900: p_entity_id => p_x_header_rec.header_id,
8901: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8902: p_requesting_entity_id => p_x_header_rec.header_id,
8903: p_request_unique_key1 => 'HEADER',
8897: oe_debug_pub.add('log request to Reverse_Limits for CANCEL in HEADER Post Write',1);
8898: OE_delayed_requests_Pvt.log_request(
8899: p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8900: p_entity_id => p_x_header_rec.header_id,
8901: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
8902: p_requesting_entity_id => p_x_header_rec.header_id,
8903: p_request_unique_key1 => 'HEADER',
8904: p_param1 => 'CANCEL',
8905: p_param2 => p_x_header_rec.price_request_code,
8906: p_param3 => NULL,
8907: p_param4 => NULL,
8908: p_param5 => NULL,
8909: p_param6 => NULL,
8910: p_request_type => OE_GLOBALS.G_REVERSE_LIMITS,
8911: x_return_status => l_return_status);
8912: oe_debug_pub.add('Request to Reverse_Limits in HEADER Post Write is done',1);
8913: -- BUG 2013611 End
8914: EXCEPTION
8912: oe_debug_pub.add('Request to Reverse_Limits in HEADER Post Write is done',1);
8913: -- BUG 2013611 End
8914: EXCEPTION
8915: WHEN OTHERS THEN
8916: -- OE_GLOBALS.G_RECURSION_MODE := l_recursion_mode;
8917: RAISE;
8918: END;
8919: END IF;
8920: END IF;
8924: ----------------------------------------------------------------
8925: -- Update the customer on the order lines if changed on the
8926: -- order header
8927: ----------------------------------------------------------------
8928: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
8929: AND NOT OE_GLOBALS.EQUAL( p_x_header_rec.sold_to_org_id,
8930: p_old_header_rec.sold_to_org_id )
8931: THEN
8932:
8925: -- Update the customer on the order lines if changed on the
8926: -- order header
8927: ----------------------------------------------------------------
8928: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
8929: AND NOT OE_GLOBALS.EQUAL( p_x_header_rec.sold_to_org_id,
8930: p_old_header_rec.sold_to_org_id )
8931: THEN
8932:
8933: OE_Line_Util.Query_Rows
8942: FOR I IN 1..l_line_tbl.COUNT LOOP
8943: -- IF condition added for bug 5471580
8944: IF nvl(l_line_tbl(I).cancelled_flag, 'N') = 'N' THEN
8945: l_line_tbl(I).sold_to_org_id := p_x_header_rec.sold_to_org_id;
8946: l_line_tbl(I).operation := OE_GLOBALS.G_OPR_UPDATE;
8947: ELSE
8948: l_line_tbl(I).operation := OE_GLOBALS.G_OPR_NONE;
8949: END IF;
8950: END LOOP;
8944: IF nvl(l_line_tbl(I).cancelled_flag, 'N') = 'N' THEN
8945: l_line_tbl(I).sold_to_org_id := p_x_header_rec.sold_to_org_id;
8946: l_line_tbl(I).operation := OE_GLOBALS.G_OPR_UPDATE;
8947: ELSE
8948: l_line_tbl(I).operation := OE_GLOBALS.G_OPR_NONE;
8949: END IF;
8950: END LOOP;
8951:
8952: l_control_rec.controlled_operation := TRUE;
8957: l_control_rec.validate_entity := TRUE;
8958: l_control_rec.write_to_db := TRUE;
8959: l_control_rec.process := FALSE;
8960:
8961: -- OE_GLOBALS.G_RECURSION_MODE := 'Y';
8962:
8963: OE_Order_PVT.Lines
8964: ( p_validation_level => FND_API.G_VALID_LEVEL_NONE
8965: , p_control_rec => l_control_rec
8967: , p_x_old_line_tbl => l_old_line_tbl
8968: , x_return_status => l_return_status
8969: );
8970:
8971: -- OE_GLOBALS.G_RECURSION_MODE := 'N';
8972:
8973: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
8974: RAISE FND_API.G_EXC_ERROR;
8975: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
8990: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
8991: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8992: END IF;
8993: */
8994: OE_GLOBALS.G_CASCADING_REQUEST_LOGGED := TRUE;
8995:
8996: END IF;
8997:
8998: --For bug 3563983. Commented this code and moved this logic to pre-write process.
8997:
8998: --For bug 3563983. Commented this code and moved this logic to pre-write process.
8999: --Line data will not be available for delete operation and this stage.
9000: /* IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509'
9001: AND p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
9002: AND NOT OE_GLOBALS.EQUAL(p_x_header_rec.transactional_curr_code
9003: ,p_old_header_rec.transactional_curr_code)
9004: -- QUOTING changes
9005: AND NVL(p_x_header_rec.transaction_phase_code,'F') = 'F'
8998: --For bug 3563983. Commented this code and moved this logic to pre-write process.
8999: --Line data will not be available for delete operation and this stage.
9000: /* IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509'
9001: AND p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
9002: AND NOT OE_GLOBALS.EQUAL(p_x_header_rec.transactional_curr_code
9003: ,p_old_header_rec.transactional_curr_code)
9004: -- QUOTING changes
9005: AND NVL(p_x_header_rec.transaction_phase_code,'F') = 'F'
9006: THEN
9009:
9010: END IF;*/
9011:
9012: -- QUOTING changes
9013: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
9014: AND p_x_header_rec.transaction_phase_code = 'N'
9015: AND NOT OE_GLOBALS.EQUAL(p_x_header_rec.expiration_date
9016: ,p_old_header_rec.expiration_date)
9017: THEN
9011:
9012: -- QUOTING changes
9013: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
9014: AND p_x_header_rec.transaction_phase_code = 'N'
9015: AND NOT OE_GLOBALS.EQUAL(p_x_header_rec.expiration_date
9016: ,p_old_header_rec.expiration_date)
9017: THEN
9018:
9019: -- Call WF API to re-set expiration date timer
9033: -- Sales Contract changes.
9034: -- Instantiate the contract template for the sales order for create
9035: -- operation.
9036:
9037: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
9038: OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' AND
9039: -- Do not instantiate for copied orders
9040: nvl(p_x_header_rec.source_document_type_id,-1) <> 2 AND
9041: (p_x_header_rec.contract_template_id IS NOT NULL OR
9084: --If Bill to site is changed, then the payment record would
9085: --be deleted through the delayed request. So not calling
9086: --the process order if bill to site has changed.
9087: --bug 4885313
9088: IF NOT OE_GLOBALS.Equal(p_x_header_rec.invoice_to_org_id,p_old_header_rec.invoice_to_org_id)
9089: THEN
9090: --If the user has modified the bill to site and has entered a new
9091: --credit card before saving the record, then the global flag need
9092: --to be set to Y so that the current trxn extension id would be
9092: --to be set to Y so that the current trxn extension id would be
9093: --deleted and a new one created (as the context has changed).
9094: oe_debug_pub.add('Old invoice to'||p_x_header_rec.invoice_to_org_id);
9095: oe_debug_pub.add('New invoice to'||p_old_header_rec.invoice_to_org_id);
9096: IF NOT OE_GLOBALS.Equal(p_old_header_rec.invoice_to_org_id,FND_API.G_MISS_NUM)
9097: AND p_old_header_rec.invoice_to_org_id IS NOT NULL AND
9098: p_x_header_rec.payment_type_code = 'CREDIT_CARD' THEN
9099: OE_Payment_Trxn_Util.g_old_bill_to_site := p_old_header_rec.invoice_to_org_id;
9100: END IF;
9109: --Moreover, when the old payment type code is credit card, then need
9110: --to delete the trxn extension id created for this creditcard
9111: --When the old payment type is not null and the new one is null then
9112: --need to delete the payment record from oe_payments.
9113: IF( ( OE_GLOBALS.Equal(p_x_header_rec.payment_type_code, 'CREDIT_CARD') AND
9114: p_x_header_rec.credit_card_number is not null
9115: )
9116: OR (
9117: OE_GLOBALS.Equal(p_old_header_rec.payment_type_code,'CREDIT_CARD')
9113: IF( ( OE_GLOBALS.Equal(p_x_header_rec.payment_type_code, 'CREDIT_CARD') AND
9114: p_x_header_rec.credit_card_number is not null
9115: )
9116: OR (
9117: OE_GLOBALS.Equal(p_old_header_rec.payment_type_code,'CREDIT_CARD')
9118: )
9119: OR ( p_old_header_rec.payment_type_code IS NOT NULL AND
9120: p_x_header_rec.payment_type_code IS NULL
9121: ))
9123: ( --as the payment record would be inserted from oe_header_payment_util package.
9124: nvl(p_x_header_rec.source_document_type_id,-99) <> 2 OR
9125: ( --To create or update credit cards on copied orders
9126: nvl(p_x_header_rec.source_document_type_id,-99)=2 AND
9127: p_x_header_rec.operation=OE_GLOBALS.G_OPR_UPDATE
9128: )
9129: )
9130:
9131: THEN
9176: l_x_Header_Payment_tbl(1).check_number := p_x_header_rec.check_number;
9177: oe_debug_pub.add('Old payment type'||l_old_payment_type_code);
9178: oe_debug_pub.add('New payment type'||p_x_header_rec.payment_type_code);
9179: oe_debug_pub.add('Header_id'||p_x_header_rec.header_id);
9180: /*IF NOT OE_GLOBALS.Equal(l_old_payment_type_code,p_x_header_rec.payment_type_code) THEN
9181: oe_debug_pub.add('ksurendr: Receipt method id in uhdrb post write'||l_x_Header_Payment_tbl(1).receipt_method_id);
9182: l_x_Header_Payment_tbl(1).receipt_method_id := FND_API.G_MISS_NUM;
9183: END IF;*/
9184:
9188: --is null, then the payment record has been cleared by the user from the
9189: --Others tab and hence it is required to delete this record from oe_payments.
9190: IF l_old_payment_type_code IS NOT NULL
9191: AND p_x_header_rec.payment_type_code IS NULL THEN
9192: l_x_Header_Payment_tbl(1).operation := OE_GLOBALS.G_OPR_DELETE;
9193: -- bug 5035651
9194: ELSIF nvl(p_x_header_rec.cancelled_flag, 'N') <> 'Y' THEN
9195: l_x_Header_Payment_tbl(1).operation := OE_GLOBALS.G_OPR_UPDATE;
9196: ELSE
9191: AND p_x_header_rec.payment_type_code IS NULL THEN
9192: l_x_Header_Payment_tbl(1).operation := OE_GLOBALS.G_OPR_DELETE;
9193: -- bug 5035651
9194: ELSIF nvl(p_x_header_rec.cancelled_flag, 'N') <> 'Y' THEN
9195: l_x_Header_Payment_tbl(1).operation := OE_GLOBALS.G_OPR_UPDATE;
9196: ELSE
9197: l_x_Header_Payment_tbl(1).operation := NULL;
9198: END IF;
9199:
9198: END IF;
9199:
9200: /*
9201: ELSE
9202: l_x_Header_Payment_tbl(1).operation := OE_GLOBALS.G_OPR_UPDATE;
9203: END IF;
9204: */
9205: ELSE
9206: l_x_Header_Payment_tbl(1).operation := OE_GLOBALS.G_OPR_CREATE;
9202: l_x_Header_Payment_tbl(1).operation := OE_GLOBALS.G_OPR_UPDATE;
9203: END IF;
9204: */
9205: ELSE
9206: l_x_Header_Payment_tbl(1).operation := OE_GLOBALS.G_OPR_CREATE;
9207:
9208: --bug 5258767
9209: --Only credit card payment types have the pre-payment records inserted
9210: --from this procedure. The other payment types are taken care by the
9208: --bug 5258767
9209: --Only credit card payment types have the pre-payment records inserted
9210: --from this procedure. The other payment types are taken care by the
9211: --procedure Update_Hdr_Payment in Oe_Prepayment_Pvt.
9212: IF OE_GLOBALS.Equal(p_x_header_rec.payment_type_code, 'CREDIT_CARD') THEN
9213: --Need to check if the payment term present in the header
9214: --has the prepayment check box checked so as to insert the
9215: --prepayment record as well if the other conditions are
9216: --satisfied.
9323: oe_debug_pub.add('Inside prepayment type'||l_old_payment_type_code);
9324: oe_debug_pub.add('New prepayment type'||p_x_header_rec.payment_type_code);
9325: oe_debug_pub.add('Header_id'||p_x_header_rec.header_id);
9326: END IF;
9327: l_x_Header_Payment_tbl(2).operation := OE_GLOBALS.G_OPR_CREATE;
9328: END IF;
9329: END IF;
9330: END IF;
9331: --bug 5258767
9578: FOR c IN lines LOOP
9579:
9580: -- Request to decrement amounts based on old currency code
9581: OE_Delayed_Requests_Pvt.Log_Request
9582: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL
9583: ,p_entity_id => c.line_id
9584: ,p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER
9585: ,p_requesting_entity_id => p_header_rec.header_id
9586: ,p_request_type => OE_GLOBALS.G_PROCESS_RELEASE
9580: -- Request to decrement amounts based on old currency code
9581: OE_Delayed_Requests_Pvt.Log_Request
9582: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL
9583: ,p_entity_id => c.line_id
9584: ,p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER
9585: ,p_requesting_entity_id => p_header_rec.header_id
9586: ,p_request_type => OE_GLOBALS.G_PROCESS_RELEASE
9587: -- Old values
9588: ,p_param1 => c.blanket_number
9582: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL
9583: ,p_entity_id => c.line_id
9584: ,p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER
9585: ,p_requesting_entity_id => p_header_rec.header_id
9586: ,p_request_type => OE_GLOBALS.G_PROCESS_RELEASE
9587: -- Old values
9588: ,p_param1 => c.blanket_number
9589: ,p_param2 => c.blanket_line_number
9590: ,p_param3 => c.ordered_quantity
9608: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9609: END IF;
9610:
9611: --For bug 3563983
9612: IF p_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
9613: THEN
9614: -- Request to increment amounts based on new currency code
9615: OE_Delayed_Requests_Pvt.Log_Request
9616: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL
9612: IF p_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE
9613: THEN
9614: -- Request to increment amounts based on new currency code
9615: OE_Delayed_Requests_Pvt.Log_Request
9616: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL
9617: ,p_entity_id => c.line_id
9618: ,p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER
9619: ,p_requesting_entity_id => p_header_rec.header_id
9620: ,p_request_type => OE_GLOBALS.G_PROCESS_RELEASE
9614: -- Request to increment amounts based on new currency code
9615: OE_Delayed_Requests_Pvt.Log_Request
9616: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL
9617: ,p_entity_id => c.line_id
9618: ,p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER
9619: ,p_requesting_entity_id => p_header_rec.header_id
9620: ,p_request_type => OE_GLOBALS.G_PROCESS_RELEASE
9621: -- Old values
9622: ,p_param1 => null
9616: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL
9617: ,p_entity_id => c.line_id
9618: ,p_requesting_entity_code => OE_GLOBALS.G_ENTITY_HEADER
9619: ,p_requesting_entity_id => p_header_rec.header_id
9620: ,p_request_type => OE_GLOBALS.G_PROCESS_RELEASE
9621: -- Old values
9622: ,p_param1 => null
9623: ,p_param2 => null
9624: ,p_param3 => 0
9649: -- within release min/max limits set on blanket line
9650: IF c.line_set_id IS NOT NULL THEN
9651:
9652: OE_Delayed_Requests_Pvt.Log_Request
9653: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL
9654: ,p_entity_id => c.line_set_id
9655: ,p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE
9656: ,p_requesting_entity_id => c.line_id
9657: ,p_request_type => OE_GLOBALS.G_VALIDATE_RELEASE_SHIPMENTS
9651:
9652: OE_Delayed_Requests_Pvt.Log_Request
9653: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL
9654: ,p_entity_id => c.line_set_id
9655: ,p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE
9656: ,p_requesting_entity_id => c.line_id
9657: ,p_request_type => OE_GLOBALS.G_VALIDATE_RELEASE_SHIPMENTS
9658: ,p_request_unique_key1 => c.blanket_number
9659: ,p_request_unique_key2 => c.blanket_line_number
9653: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL
9654: ,p_entity_id => c.line_set_id
9655: ,p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE
9656: ,p_requesting_entity_id => c.line_id
9657: ,p_request_type => OE_GLOBALS.G_VALIDATE_RELEASE_SHIPMENTS
9658: ,p_request_unique_key1 => c.blanket_number
9659: ,p_request_unique_key2 => c.blanket_line_number
9660: ,p_param1 =>
9661: p_header_rec.transactional_curr_code