18:
19: PROCEDURE Initialize_Global( x_return_status OUT NOCOPY Varchar2)
20: IS
21: l_sys_parm_rec ar_system_parameters_all%rowtype;
22: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
23: Begin
24:
25: x_return_status := FND_API.G_RET_STS_SUCCESS;
26:
24:
25: x_return_status := FND_API.G_RET_STS_SUCCESS;
26:
27: IF l_debug_level > 0 THEN
28: oe_debug_pub.add( 'ENTERING PROCEDURE INITIALIZE_GLOBAL' ) ;
29: END IF;
30:
31: l_Sys_Parm_Rec := OE_Sys_Parameters_Pvt.Get_AR_Sys_Params;
32:
46:
47:
48:
49: IF l_debug_level > 0 THEN
50: oe_debug_pub.add('G_AUTO_PARTY_NUMBERING :'||G_AUTO_PARTY_NUMBERING);
51: oe_debug_pub.add('G_AUTO_CUST_NUMBERING :'||G_AUTO_CUST_NUMBERING);
52: oe_debug_pub.add('G_AUTO_LOCATION_NUMBERING :'||G_AUTO_LOCATION_NUMBERING);
53: oe_debug_pub.add('G_AUTO_SITE_NUMBERING :'||G_AUTO_SITE_NUMBERING);
54: oe_debug_pub.add('G_EMAIL_REQUIRED :'||G_EMAIL_REQUIRED);
47:
48:
49: IF l_debug_level > 0 THEN
50: oe_debug_pub.add('G_AUTO_PARTY_NUMBERING :'||G_AUTO_PARTY_NUMBERING);
51: oe_debug_pub.add('G_AUTO_CUST_NUMBERING :'||G_AUTO_CUST_NUMBERING);
52: oe_debug_pub.add('G_AUTO_LOCATION_NUMBERING :'||G_AUTO_LOCATION_NUMBERING);
53: oe_debug_pub.add('G_AUTO_SITE_NUMBERING :'||G_AUTO_SITE_NUMBERING);
54: oe_debug_pub.add('G_EMAIL_REQUIRED :'||G_EMAIL_REQUIRED);
55: oe_debug_pub.add('G_AUTO_CONTACT_NUMBERING :'||G_AUTO_CONTACT_NUMBERING);
48:
49: IF l_debug_level > 0 THEN
50: oe_debug_pub.add('G_AUTO_PARTY_NUMBERING :'||G_AUTO_PARTY_NUMBERING);
51: oe_debug_pub.add('G_AUTO_CUST_NUMBERING :'||G_AUTO_CUST_NUMBERING);
52: oe_debug_pub.add('G_AUTO_LOCATION_NUMBERING :'||G_AUTO_LOCATION_NUMBERING);
53: oe_debug_pub.add('G_AUTO_SITE_NUMBERING :'||G_AUTO_SITE_NUMBERING);
54: oe_debug_pub.add('G_EMAIL_REQUIRED :'||G_EMAIL_REQUIRED);
55: oe_debug_pub.add('G_AUTO_CONTACT_NUMBERING :'||G_AUTO_CONTACT_NUMBERING);
56: oe_debug_pub.add('G_ONT_ADD_CUSTOMER :'||G_ONT_ADD_CUSTOMER);
49: IF l_debug_level > 0 THEN
50: oe_debug_pub.add('G_AUTO_PARTY_NUMBERING :'||G_AUTO_PARTY_NUMBERING);
51: oe_debug_pub.add('G_AUTO_CUST_NUMBERING :'||G_AUTO_CUST_NUMBERING);
52: oe_debug_pub.add('G_AUTO_LOCATION_NUMBERING :'||G_AUTO_LOCATION_NUMBERING);
53: oe_debug_pub.add('G_AUTO_SITE_NUMBERING :'||G_AUTO_SITE_NUMBERING);
54: oe_debug_pub.add('G_EMAIL_REQUIRED :'||G_EMAIL_REQUIRED);
55: oe_debug_pub.add('G_AUTO_CONTACT_NUMBERING :'||G_AUTO_CONTACT_NUMBERING);
56: oe_debug_pub.add('G_ONT_ADD_CUSTOMER :'||G_ONT_ADD_CUSTOMER);
57:
50: oe_debug_pub.add('G_AUTO_PARTY_NUMBERING :'||G_AUTO_PARTY_NUMBERING);
51: oe_debug_pub.add('G_AUTO_CUST_NUMBERING :'||G_AUTO_CUST_NUMBERING);
52: oe_debug_pub.add('G_AUTO_LOCATION_NUMBERING :'||G_AUTO_LOCATION_NUMBERING);
53: oe_debug_pub.add('G_AUTO_SITE_NUMBERING :'||G_AUTO_SITE_NUMBERING);
54: oe_debug_pub.add('G_EMAIL_REQUIRED :'||G_EMAIL_REQUIRED);
55: oe_debug_pub.add('G_AUTO_CONTACT_NUMBERING :'||G_AUTO_CONTACT_NUMBERING);
56: oe_debug_pub.add('G_ONT_ADD_CUSTOMER :'||G_ONT_ADD_CUSTOMER);
57:
58: IF OE_GLOBALS.G_UPDATE_ON_ID THEN
51: oe_debug_pub.add('G_AUTO_CUST_NUMBERING :'||G_AUTO_CUST_NUMBERING);
52: oe_debug_pub.add('G_AUTO_LOCATION_NUMBERING :'||G_AUTO_LOCATION_NUMBERING);
53: oe_debug_pub.add('G_AUTO_SITE_NUMBERING :'||G_AUTO_SITE_NUMBERING);
54: oe_debug_pub.add('G_EMAIL_REQUIRED :'||G_EMAIL_REQUIRED);
55: oe_debug_pub.add('G_AUTO_CONTACT_NUMBERING :'||G_AUTO_CONTACT_NUMBERING);
56: oe_debug_pub.add('G_ONT_ADD_CUSTOMER :'||G_ONT_ADD_CUSTOMER);
57:
58: IF OE_GLOBALS.G_UPDATE_ON_ID THEN
59: oe_debug_pub.add('OE_GLOBALS.G_UPDATE_ON_ID : TRUE');
52: oe_debug_pub.add('G_AUTO_LOCATION_NUMBERING :'||G_AUTO_LOCATION_NUMBERING);
53: oe_debug_pub.add('G_AUTO_SITE_NUMBERING :'||G_AUTO_SITE_NUMBERING);
54: oe_debug_pub.add('G_EMAIL_REQUIRED :'||G_EMAIL_REQUIRED);
55: oe_debug_pub.add('G_AUTO_CONTACT_NUMBERING :'||G_AUTO_CONTACT_NUMBERING);
56: oe_debug_pub.add('G_ONT_ADD_CUSTOMER :'||G_ONT_ADD_CUSTOMER);
57:
58: IF OE_GLOBALS.G_UPDATE_ON_ID THEN
59: oe_debug_pub.add('OE_GLOBALS.G_UPDATE_ON_ID : TRUE');
60: ELSE
55: oe_debug_pub.add('G_AUTO_CONTACT_NUMBERING :'||G_AUTO_CONTACT_NUMBERING);
56: oe_debug_pub.add('G_ONT_ADD_CUSTOMER :'||G_ONT_ADD_CUSTOMER);
57:
58: IF OE_GLOBALS.G_UPDATE_ON_ID THEN
59: oe_debug_pub.add('OE_GLOBALS.G_UPDATE_ON_ID : TRUE');
60: ELSE
61: oe_debug_pub.add('OE_GLOBALS.G_UPDATE_ON_ID : FALSE');
62: END IF;
63:
57:
58: IF OE_GLOBALS.G_UPDATE_ON_ID THEN
59: oe_debug_pub.add('OE_GLOBALS.G_UPDATE_ON_ID : TRUE');
60: ELSE
61: oe_debug_pub.add('OE_GLOBALS.G_UPDATE_ON_ID : FALSE');
62: END IF;
63:
64: oe_debug_pub.add( 'EXITING PROCEDURE INITIALIZE_GLOBAL' ) ;
65:
60: ELSE
61: oe_debug_pub.add('OE_GLOBALS.G_UPDATE_ON_ID : FALSE');
62: END IF;
63:
64: oe_debug_pub.add( 'EXITING PROCEDURE INITIALIZE_GLOBAL' ) ;
65:
66: END IF;
67:
68: Exception
68: Exception
69: WHEN OTHERS THEN
70:
71: IF l_debug_level > 0 THEN
72: oe_debug_pub.add( 'PROBLEM IN CALL TO INITIALIZE_GLOBAL. ABORT PROCESSING'||SQLERRM ) ;
73: END IF;
74: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
75:
76: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
142: x_return_status OUT NOCOPY VARCHAR2,
143: x_msg_count OUT NOCOPY NUMBER,
144: x_msg_data OUT NOCOPY VARCHAR2
145: ) IS
146: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
147:
148:
149: l_sold_to_cust_found boolean := FALSE;
150: l_ship_to_cust_found boolean := FALSE;
196: l_customer_id NUMBER;
197: BEGIN
198:
199: IF l_debug_level > 0 THEN
200: oe_debug_pub.add(' Entering OE_CUSTOMER_INFO_PVT.get_customer_info_ids'||p_customer_info_tbl.count);
201: END IF;
202:
203:
204: Initialize_Global(x_return_status);
303:
304: IF l_debug_level > 0 THEN
305:
306: IF l_sold_to_cust_found THEN
307: oe_debug_pub.add('Sold to customer record passed :'||l_sold_to_cust_index);
308: END IF;
309:
310: IF l_ship_to_cust_found THEN
311: oe_debug_pub.add('Ship to customer record passed :'||l_ship_to_cust_index);
307: oe_debug_pub.add('Sold to customer record passed :'||l_sold_to_cust_index);
308: END IF;
309:
310: IF l_ship_to_cust_found THEN
311: oe_debug_pub.add('Ship to customer record passed :'||l_ship_to_cust_index);
312: END IF;
313:
314: IF l_bill_to_cust_found THEN
315: oe_debug_pub.add('Bill to customer record passed :'||l_bill_to_cust_index);
311: oe_debug_pub.add('Ship to customer record passed :'||l_ship_to_cust_index);
312: END IF;
313:
314: IF l_bill_to_cust_found THEN
315: oe_debug_pub.add('Bill to customer record passed :'||l_bill_to_cust_index);
316: END IF;
317:
318: IF l_deliver_to_cust_found THEN
319: oe_debug_pub.add('Sold to customer record passed :'||l_deliver_to_cust_index);
315: oe_debug_pub.add('Bill to customer record passed :'||l_bill_to_cust_index);
316: END IF;
317:
318: IF l_deliver_to_cust_found THEN
319: oe_debug_pub.add('Sold to customer record passed :'||l_deliver_to_cust_index);
320: END IF;
321:
322: oe_debug_pub.add('Check for Permissions :'||G_ONT_ADD_CUSTOMER);
323: END IF;
318: IF l_deliver_to_cust_found THEN
319: oe_debug_pub.add('Sold to customer record passed :'||l_deliver_to_cust_index);
320: END IF;
321:
322: oe_debug_pub.add('Check for Permissions :'||G_ONT_ADD_CUSTOMER);
323: END IF;
324:
325:
326: IF G_ONT_ADD_CUSTOMER = 'N' THEN /* Nothing allowed */
337:
338: ELSE /* Evering allowed */
339:
340: IF l_debug_level > 0 THEN
341: oe_debug_pub.add('No restriction to create customer/address and contact.Continue...');
342: END IF;
343: END IF;
344:
345: IF l_debug_level > 0 THEN
342: END IF;
343: END IF;
344:
345: IF l_debug_level > 0 THEN
346: oe_debug_pub.add('Start Creating customers (SOLD_TO/SHIP_TO/BILL_TO/DELIVER_TO) if records are passed');
347: END IF;
348:
349: /*
350: 1.Check whether customer_id is sent
359: IF l_sold_to_cust_found
360: THEN
361:
362: IF l_debug_level > 0 THEN
363: oe_debug_pub.add('l_sold_to_customer_rec.customer_id :'||l_sold_to_customer_rec.customer_id);
364: END IF;
365:
366: IF NVL(l_sold_to_customer_rec.customer_id,FND_API.G_MISS_NUM) = FND_API.G_MISS_NUM THEN
367:
377: p_customer_info_tbl(l_sold_to_cust_index).new_account_id := l_new_sold_to_org_id;
378: END IF;
379:
380: IF l_debug_level > 0 THEN
381: oe_debug_pub.add('l_new_sold_to_org_id:'||l_new_sold_to_org_id);
382: END IF;
383:
384: ELSE
385: IF IS_BOTH_ID_VAL_PASSED( p_customer_rec => l_sold_to_customer_rec )
391: );
392: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
393:
394: IF l_debug_level > 0 THEN
395: oe_debug_pub.add ('Updating Customer information failed,returning');
396: END IF;
397:
398: RETURN;
399: END IF;
411: Check_Customer_Fields(l_sold_to_customer_rec,x_return_status);
412:
413: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
414: IF l_debug_level > 0 THEN
415: oe_debug_pub.add ('Check_Customer_Fields failed,returning');
416: END IF;
417:
418: RETURN;
419: END IF;
421: Validate_Customer_Fields(l_sold_to_customer_rec,x_return_status);
422:
423: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
424: IF l_debug_level > 0 THEN
425: oe_debug_pub.add ('Validate_Customer_Fields failed,returning');
426: END IF;
427:
428: RETURN;
429: END IF;
440: );
441:
442:
443: IF l_debug_level > 0 THEN
444: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
445: oe_debug_pub.add(' Create_account : l_new_sold_to_party_id :'||l_new_sold_to_party_id);
446: oe_debug_pub.add(' Create_account : l_new_sold_to_org_id :'||l_new_sold_to_org_id);
447: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
448: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
441:
442:
443: IF l_debug_level > 0 THEN
444: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
445: oe_debug_pub.add(' Create_account : l_new_sold_to_party_id :'||l_new_sold_to_party_id);
446: oe_debug_pub.add(' Create_account : l_new_sold_to_org_id :'||l_new_sold_to_org_id);
447: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
448: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
449: END IF;
442:
443: IF l_debug_level > 0 THEN
444: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
445: oe_debug_pub.add(' Create_account : l_new_sold_to_party_id :'||l_new_sold_to_party_id);
446: oe_debug_pub.add(' Create_account : l_new_sold_to_org_id :'||l_new_sold_to_org_id);
447: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
448: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
449: END IF;
450:
443: IF l_debug_level > 0 THEN
444: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
445: oe_debug_pub.add(' Create_account : l_new_sold_to_party_id :'||l_new_sold_to_party_id);
446: oe_debug_pub.add(' Create_account : l_new_sold_to_org_id :'||l_new_sold_to_org_id);
447: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
448: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
449: END IF;
450:
451: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
444: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
445: oe_debug_pub.add(' Create_account : l_new_sold_to_party_id :'||l_new_sold_to_party_id);
446: oe_debug_pub.add(' Create_account : l_new_sold_to_org_id :'||l_new_sold_to_org_id);
447: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
448: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
449: END IF;
450:
451: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
452: oe_msg_pub.transfer_msg_stack;
462:
463: END IF;
464:
465: IF l_debug_level > 0 THEN
466: oe_debug_pub.add(' Step 1 :Completed ');
467: END IF;
468:
469:
470: /*
481: IF l_ship_to_cust_found
482: THEN
483:
484: IF l_debug_level > 0 THEN
485: oe_debug_pub.add('l_ship_to_customer_rec.customer_id :'||l_ship_to_customer_rec.customer_id);
486: END IF;
487:
488: IF NVL(l_ship_to_customer_rec.customer_id,FND_API.G_MISS_NUM) = FND_API.G_MISS_NUM THEN
489: Check_Duplicate_Customer( p_customer_record => l_ship_to_customer_rec
499: END IF;
500:
501:
502: IF l_debug_level > 0 THEN
503: oe_debug_pub.add('l_new_ship_to_customer_id :'||l_new_ship_to_customer_id);
504: oe_debug_pub.add('l_new_ship_to_party_id :'||l_new_ship_to_party_id);
505: END IF;
506:
507: ELSE
500:
501:
502: IF l_debug_level > 0 THEN
503: oe_debug_pub.add('l_new_ship_to_customer_id :'||l_new_ship_to_customer_id);
504: oe_debug_pub.add('l_new_ship_to_party_id :'||l_new_ship_to_party_id);
505: END IF;
506:
507: ELSE
508: IF IS_BOTH_ID_VAL_PASSED( p_customer_rec => l_ship_to_customer_rec )
512: , x_return_status =>x_return_status
513: );
514: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
515: IF l_debug_level > 0 THEN
516: oe_debug_pub.add('Update_Customer failed ,returning');
517: END IF;
518: RETURN;
519: END IF;
520: END IF;
529: Check_Customer_Fields(l_ship_to_customer_rec,x_return_status);
530:
531: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
532: IF l_debug_level > 0 THEN
533: oe_debug_pub.add('Check_Customer_Fields failed ,returning');
534: END IF;
535:
536: RETURN;
537: END IF;
539: Validate_Customer_Fields(l_ship_to_customer_rec,x_return_status);
540:
541: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
542: IF l_debug_level > 0 THEN
543: oe_debug_pub.add('Validate_Customer_Fields failed ,returning');
544: END IF;
545:
546: RETURN;
547: END IF;
559: x_msg_data => x_msg_data
560: );
561:
562: IF l_debug_level > 0 THEN
563: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
564: oe_debug_pub.add(' Create_account : l_new_ship_to_party_id :'||l_new_ship_to_party_id);
565: oe_debug_pub.add(' Create_account : l_new_ship_to_customer_id :'||l_new_ship_to_customer_id);
566: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
567: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
560: );
561:
562: IF l_debug_level > 0 THEN
563: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
564: oe_debug_pub.add(' Create_account : l_new_ship_to_party_id :'||l_new_ship_to_party_id);
565: oe_debug_pub.add(' Create_account : l_new_ship_to_customer_id :'||l_new_ship_to_customer_id);
566: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
567: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
568: END IF;
561:
562: IF l_debug_level > 0 THEN
563: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
564: oe_debug_pub.add(' Create_account : l_new_ship_to_party_id :'||l_new_ship_to_party_id);
565: oe_debug_pub.add(' Create_account : l_new_ship_to_customer_id :'||l_new_ship_to_customer_id);
566: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
567: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
568: END IF;
569:
562: IF l_debug_level > 0 THEN
563: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
564: oe_debug_pub.add(' Create_account : l_new_ship_to_party_id :'||l_new_ship_to_party_id);
565: oe_debug_pub.add(' Create_account : l_new_ship_to_customer_id :'||l_new_ship_to_customer_id);
566: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
567: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
568: END IF;
569:
570: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
563: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
564: oe_debug_pub.add(' Create_account : l_new_ship_to_party_id :'||l_new_ship_to_party_id);
565: oe_debug_pub.add(' Create_account : l_new_ship_to_customer_id :'||l_new_ship_to_customer_id);
566: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
567: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
568: END IF;
569:
570: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
571: oe_msg_pub.transfer_msg_stack;
577: p_customer_info_tbl(l_ship_to_cust_index).new_account_id := l_new_ship_to_customer_id;
578: END IF;
579:
580: IF l_debug_level > 0 THEN
581: oe_debug_pub.add(' Step 2 :Completed ');
582: END IF;
583:
584:
585: IF l_bill_to_cust_found
585: IF l_bill_to_cust_found
586: THEN
587:
588: IF l_debug_level > 0 THEN
589: oe_debug_pub.add('l_bill_to_customer_rec.customer_id:'||l_bill_to_customer_rec.customer_id);
590: END IF;
591:
592: IF NVL(l_bill_to_customer_rec.customer_id,FND_API.G_MISS_NUM) = FND_API.G_MISS_NUM THEN
593:
604: p_customer_info_tbl(l_bill_to_cust_index).new_account_id := l_new_bill_to_customer_id;
605: END IF;
606:
607: IF l_debug_level > 0 THEN
608: oe_debug_pub.add('l_new_bill_to_customer_id:'||l_new_bill_to_customer_id);
609: oe_debug_pub.add('l_new_bill_to_party_id:'||l_new_bill_to_party_id);
610: END IF;
611: ELSE
612: IF IS_BOTH_ID_VAL_PASSED( p_customer_rec => l_bill_to_customer_rec )
605: END IF;
606:
607: IF l_debug_level > 0 THEN
608: oe_debug_pub.add('l_new_bill_to_customer_id:'||l_new_bill_to_customer_id);
609: oe_debug_pub.add('l_new_bill_to_party_id:'||l_new_bill_to_party_id);
610: END IF;
611: ELSE
612: IF IS_BOTH_ID_VAL_PASSED( p_customer_rec => l_bill_to_customer_rec )
613: AND OE_GLOBALS.G_UPDATE_ON_ID
618: );
619:
620: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
621: IF l_debug_level > 0 THEN
622: oe_debug_pub.add('Update_Customer failed ,returning');
623: END IF;
624: RETURN;
625: END IF;
626:
637: Check_Customer_Fields(l_bill_to_customer_rec,x_return_status);
638:
639: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
640: IF l_debug_level > 0 THEN
641: oe_debug_pub.add('Check_Customer_Fields failed ,returning');
642: END IF;
643:
644: RETURN;
645: END IF;
647: Validate_Customer_Fields(l_bill_to_customer_rec,x_return_status);
648:
649: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
650: IF l_debug_level > 0 THEN
651: oe_debug_pub.add('Validate_Customer_Fields failed ,returning');
652: END IF;
653:
654: RETURN;
655: END IF;
667: x_msg_data => x_msg_data
668: );
669:
670: IF l_debug_level > 0 THEN
671: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
672: oe_debug_pub.add(' Create_account : l_new_bill_to_party_id :'||l_new_bill_to_party_id);
673: oe_debug_pub.add(' Create_account : l_new_bill_to_customer_id :'||l_new_bill_to_customer_id);
674: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
675: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
668: );
669:
670: IF l_debug_level > 0 THEN
671: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
672: oe_debug_pub.add(' Create_account : l_new_bill_to_party_id :'||l_new_bill_to_party_id);
673: oe_debug_pub.add(' Create_account : l_new_bill_to_customer_id :'||l_new_bill_to_customer_id);
674: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
675: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
676: END IF;
669:
670: IF l_debug_level > 0 THEN
671: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
672: oe_debug_pub.add(' Create_account : l_new_bill_to_party_id :'||l_new_bill_to_party_id);
673: oe_debug_pub.add(' Create_account : l_new_bill_to_customer_id :'||l_new_bill_to_customer_id);
674: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
675: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
676: END IF;
677:
670: IF l_debug_level > 0 THEN
671: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
672: oe_debug_pub.add(' Create_account : l_new_bill_to_party_id :'||l_new_bill_to_party_id);
673: oe_debug_pub.add(' Create_account : l_new_bill_to_customer_id :'||l_new_bill_to_customer_id);
674: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
675: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
676: END IF;
677:
678: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
671: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
672: oe_debug_pub.add(' Create_account : l_new_bill_to_party_id :'||l_new_bill_to_party_id);
673: oe_debug_pub.add(' Create_account : l_new_bill_to_customer_id :'||l_new_bill_to_customer_id);
674: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
675: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
676: END IF;
677:
678: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
679: oe_msg_pub.transfer_msg_stack;
687:
688: END IF;
689:
690: IF l_debug_level > 0 THEN
691: oe_debug_pub.add(' Step 3 :Completed ');
692: END IF;
693:
694:
695: IF l_deliver_to_cust_found
695: IF l_deliver_to_cust_found
696: THEN
697:
698: IF l_debug_level > 0 THEN
699: oe_Debug_pub.add('l_deliver_to_customer_rec.customer_id:'||l_deliver_to_customer_rec.customer_id);
700: END IF;
701:
702: IF NVL(l_deliver_to_customer_rec.customer_id,FND_API.G_MISS_NUM) = FND_API.G_MISS_NUM THEN
703:
714: p_customer_info_tbl(l_deliver_to_cust_index).new_account_id := l_new_deliver_to_cust_id;
715: END IF;
716:
717: IF l_debug_level > 0 THEN
718: oe_Debug_pub.add('l_new_deliver_to_cust_id :'||l_new_deliver_to_cust_id);
719: oe_Debug_pub.add('l_new_deliver_to_party_id :'||l_new_deliver_to_party_id);
720: END IF;
721:
722: ELSE
715: END IF;
716:
717: IF l_debug_level > 0 THEN
718: oe_Debug_pub.add('l_new_deliver_to_cust_id :'||l_new_deliver_to_cust_id);
719: oe_Debug_pub.add('l_new_deliver_to_party_id :'||l_new_deliver_to_party_id);
720: END IF;
721:
722: ELSE
723: IF IS_BOTH_ID_VAL_PASSED( p_customer_rec => l_deliver_to_customer_rec )
728: , x_return_status =>x_return_status
729: );
730: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
731: IF l_debug_level > 0 THEN
732: oe_debug_pub.add('Update_Customer failed ,returning');
733: END IF;
734:
735: RETURN;
736: END IF;
748: Check_Customer_Fields(l_deliver_to_customer_rec,x_return_status);
749:
750: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
751: IF l_debug_level > 0 THEN
752: oe_debug_pub.add('Check_Customer_Fields failed ,returning');
753: END IF;
754:
755: RETURN;
756: END IF;
758: Validate_Customer_Fields(l_deliver_to_customer_rec,x_return_status);
759:
760: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
761: IF l_debug_level > 0 THEN
762: oe_debug_pub.add('Validate_Customer_Fields failed ,returning');
763: END IF;
764:
765: RETURN;
766: END IF;
779: );
780:
781:
782: IF l_debug_level > 0 THEN
783: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
784: oe_debug_pub.add(' Create_account : l_new_deliver_to_party_id :'||l_new_bill_to_party_id);
785: oe_debug_pub.add(' Create_account : l_new_deliver_to_cust_id :'||l_new_bill_to_customer_id);
786: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
787: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
780:
781:
782: IF l_debug_level > 0 THEN
783: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
784: oe_debug_pub.add(' Create_account : l_new_deliver_to_party_id :'||l_new_bill_to_party_id);
785: oe_debug_pub.add(' Create_account : l_new_deliver_to_cust_id :'||l_new_bill_to_customer_id);
786: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
787: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
788: END IF;
781:
782: IF l_debug_level > 0 THEN
783: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
784: oe_debug_pub.add(' Create_account : l_new_deliver_to_party_id :'||l_new_bill_to_party_id);
785: oe_debug_pub.add(' Create_account : l_new_deliver_to_cust_id :'||l_new_bill_to_customer_id);
786: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
787: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
788: END IF;
789:
782: IF l_debug_level > 0 THEN
783: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
784: oe_debug_pub.add(' Create_account : l_new_deliver_to_party_id :'||l_new_bill_to_party_id);
785: oe_debug_pub.add(' Create_account : l_new_deliver_to_cust_id :'||l_new_bill_to_customer_id);
786: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
787: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
788: END IF;
789:
790:
783: oe_debug_pub.add(' Create_account : x_return_status :'||x_return_status);
784: oe_debug_pub.add(' Create_account : l_new_deliver_to_party_id :'||l_new_bill_to_party_id);
785: oe_debug_pub.add(' Create_account : l_new_deliver_to_cust_id :'||l_new_bill_to_customer_id);
786: oe_debug_pub.add(' Create_account : x_msg_count :'||x_msg_count);
787: oe_debug_pub.add(' Create_account : x_msg_data :'||x_msg_data);
788: END IF;
789:
790:
791: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
811: x_msg_count => x_msg_count,
812: x_msg_data =>x_msg_data);
813:
814: IF l_debug_level > 0 THEN
815: oe_debug_pub.add('Create_relationships :x_return_status : '||x_return_status);
816: oe_debug_pub.add('Create_relationships :x_msg_data : '||x_msg_count);
817: oe_debug_pub.add('Create_relationships :x_msg_data : '||x_msg_data);
818: END IF;
819:
812: x_msg_data =>x_msg_data);
813:
814: IF l_debug_level > 0 THEN
815: oe_debug_pub.add('Create_relationships :x_return_status : '||x_return_status);
816: oe_debug_pub.add('Create_relationships :x_msg_data : '||x_msg_count);
817: oe_debug_pub.add('Create_relationships :x_msg_data : '||x_msg_data);
818: END IF;
819:
820: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
813:
814: IF l_debug_level > 0 THEN
815: oe_debug_pub.add('Create_relationships :x_return_status : '||x_return_status);
816: oe_debug_pub.add('Create_relationships :x_msg_data : '||x_msg_count);
817: oe_debug_pub.add('Create_relationships :x_msg_data : '||x_msg_data);
818: END IF;
819:
820: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
821: oe_msg_pub.transfer_msg_stack;
1422:
1423:
1424:
1425: IF l_debug_level > 0 THEN
1426: oe_debug_pub.add(' Entering OE_CUSTOMER_INFO_PVT.get_customer_info_ids');
1427: END IF;
1428:
1429:
1430: EXCEPTION
1431:
1432: WHEN OTHERS THEN
1433:
1434: IF l_debug_level > 0 THEN
1435: oe_debug_pub.add('OE_CUSTOMER_INFO_PVT.get_customer_info_ids : Other Errors :'||SQLERRM);
1436: END IF;
1437:
1438: x_return_status := FND_API.G_RET_STS_ERROR;
1439:
1475: l_party_number NUMBER;
1476: x_party_number varchar2(30);
1477: l_cust_account_number varchar2(30);
1478:
1479: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1480:
1481: BEGIN
1482:
1483: IF l_debug_level > 0 THEN
1480:
1481: BEGIN
1482:
1483: IF l_debug_level > 0 THEN
1484: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Create_account');
1485: END IF;
1486:
1487: x_return_status := FND_API.G_RET_STS_SUCCESS;
1488: l_customer_info_rec := p_header_customer_info_rec;
1528: END IF;
1529:
1530:
1531: If l_debug_level >0 then
1532: oe_debug_pub.add('l_party_type :'||l_party_type);
1533: oe_debug_pub.add('l_party_number :'||l_party_number);
1534: oe_debug_pub.add('l_organization_name :'||l_organization_name);
1535: oe_debug_pub.add('l_customer_first_name :'||l_customer_first_name);
1536: oe_debug_pub.add('l_customer_middle_name :'||l_customer_middle_name);
1529:
1530:
1531: If l_debug_level >0 then
1532: oe_debug_pub.add('l_party_type :'||l_party_type);
1533: oe_debug_pub.add('l_party_number :'||l_party_number);
1534: oe_debug_pub.add('l_organization_name :'||l_organization_name);
1535: oe_debug_pub.add('l_customer_first_name :'||l_customer_first_name);
1536: oe_debug_pub.add('l_customer_middle_name :'||l_customer_middle_name);
1537: oe_debug_pub.add('l_customer_last_name :'||l_customer_last_name);
1530:
1531: If l_debug_level >0 then
1532: oe_debug_pub.add('l_party_type :'||l_party_type);
1533: oe_debug_pub.add('l_party_number :'||l_party_number);
1534: oe_debug_pub.add('l_organization_name :'||l_organization_name);
1535: oe_debug_pub.add('l_customer_first_name :'||l_customer_first_name);
1536: oe_debug_pub.add('l_customer_middle_name :'||l_customer_middle_name);
1537: oe_debug_pub.add('l_customer_last_name :'||l_customer_last_name);
1538:
1531: If l_debug_level >0 then
1532: oe_debug_pub.add('l_party_type :'||l_party_type);
1533: oe_debug_pub.add('l_party_number :'||l_party_number);
1534: oe_debug_pub.add('l_organization_name :'||l_organization_name);
1535: oe_debug_pub.add('l_customer_first_name :'||l_customer_first_name);
1536: oe_debug_pub.add('l_customer_middle_name :'||l_customer_middle_name);
1537: oe_debug_pub.add('l_customer_last_name :'||l_customer_last_name);
1538:
1539: End If;
1532: oe_debug_pub.add('l_party_type :'||l_party_type);
1533: oe_debug_pub.add('l_party_number :'||l_party_number);
1534: oe_debug_pub.add('l_organization_name :'||l_organization_name);
1535: oe_debug_pub.add('l_customer_first_name :'||l_customer_first_name);
1536: oe_debug_pub.add('l_customer_middle_name :'||l_customer_middle_name);
1537: oe_debug_pub.add('l_customer_last_name :'||l_customer_last_name);
1538:
1539: End If;
1540:
1533: oe_debug_pub.add('l_party_number :'||l_party_number);
1534: oe_debug_pub.add('l_organization_name :'||l_organization_name);
1535: oe_debug_pub.add('l_customer_first_name :'||l_customer_first_name);
1536: oe_debug_pub.add('l_customer_middle_name :'||l_customer_middle_name);
1537: oe_debug_pub.add('l_customer_last_name :'||l_customer_last_name);
1538:
1539: End If;
1540:
1541:
1608: p_account_description => l_customer_info_rec.account_description
1609: );
1610:
1611: IF l_debug_level > 0 THEN
1612: oe_debug_pub.add('Create_account TCA CALL:x_return_status:'||x_return_status);
1613: oe_debug_pub.add('Create_account TCA CALL:x_msg_count:'||x_msg_count);
1614: oe_debug_pub.add('Create_account TCA CALL:x_msg_data:'||x_msg_data);
1615: oe_debug_pub.add('Create_account TCA CALL:x_cust_account_id:'||x_cust_account_id);
1616: oe_debug_pub.add('Create_account TCA CALL:x_cust_account_number:'||l_cust_account_number);
1609: );
1610:
1611: IF l_debug_level > 0 THEN
1612: oe_debug_pub.add('Create_account TCA CALL:x_return_status:'||x_return_status);
1613: oe_debug_pub.add('Create_account TCA CALL:x_msg_count:'||x_msg_count);
1614: oe_debug_pub.add('Create_account TCA CALL:x_msg_data:'||x_msg_data);
1615: oe_debug_pub.add('Create_account TCA CALL:x_cust_account_id:'||x_cust_account_id);
1616: oe_debug_pub.add('Create_account TCA CALL:x_cust_account_number:'||l_cust_account_number);
1617: END IF;
1610:
1611: IF l_debug_level > 0 THEN
1612: oe_debug_pub.add('Create_account TCA CALL:x_return_status:'||x_return_status);
1613: oe_debug_pub.add('Create_account TCA CALL:x_msg_count:'||x_msg_count);
1614: oe_debug_pub.add('Create_account TCA CALL:x_msg_data:'||x_msg_data);
1615: oe_debug_pub.add('Create_account TCA CALL:x_cust_account_id:'||x_cust_account_id);
1616: oe_debug_pub.add('Create_account TCA CALL:x_cust_account_number:'||l_cust_account_number);
1617: END IF;
1618:
1611: IF l_debug_level > 0 THEN
1612: oe_debug_pub.add('Create_account TCA CALL:x_return_status:'||x_return_status);
1613: oe_debug_pub.add('Create_account TCA CALL:x_msg_count:'||x_msg_count);
1614: oe_debug_pub.add('Create_account TCA CALL:x_msg_data:'||x_msg_data);
1615: oe_debug_pub.add('Create_account TCA CALL:x_cust_account_id:'||x_cust_account_id);
1616: oe_debug_pub.add('Create_account TCA CALL:x_cust_account_number:'||l_cust_account_number);
1617: END IF;
1618:
1619: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1612: oe_debug_pub.add('Create_account TCA CALL:x_return_status:'||x_return_status);
1613: oe_debug_pub.add('Create_account TCA CALL:x_msg_count:'||x_msg_count);
1614: oe_debug_pub.add('Create_account TCA CALL:x_msg_data:'||x_msg_data);
1615: oe_debug_pub.add('Create_account TCA CALL:x_cust_account_id:'||x_cust_account_id);
1616: oe_debug_pub.add('Create_account TCA CALL:x_cust_account_number:'||l_cust_account_number);
1617: END IF;
1618:
1619: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1620: RETURN;
1639: x_msg_data => x_msg_data
1640: );
1641:
1642: IF l_debug_level > 0 THEN
1643: oe_debug_pub.add('create_contact_point EMAIL TCA CALL:x_return_status:'||x_return_status);
1644: oe_debug_pub.add('create_contact_point EMAIL TCA CALL:x_msg_count:'||x_msg_count);
1645: oe_debug_pub.add('create_contact_point EMAIL TCA CALL:x_msg_data:'||x_msg_data);
1646: END IF;
1647:
1640: );
1641:
1642: IF l_debug_level > 0 THEN
1643: oe_debug_pub.add('create_contact_point EMAIL TCA CALL:x_return_status:'||x_return_status);
1644: oe_debug_pub.add('create_contact_point EMAIL TCA CALL:x_msg_count:'||x_msg_count);
1645: oe_debug_pub.add('create_contact_point EMAIL TCA CALL:x_msg_data:'||x_msg_data);
1646: END IF;
1647:
1648:
1641:
1642: IF l_debug_level > 0 THEN
1643: oe_debug_pub.add('create_contact_point EMAIL TCA CALL:x_return_status:'||x_return_status);
1644: oe_debug_pub.add('create_contact_point EMAIL TCA CALL:x_msg_count:'||x_msg_count);
1645: oe_debug_pub.add('create_contact_point EMAIL TCA CALL:x_msg_data:'||x_msg_data);
1646: END IF;
1647:
1648:
1649: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1668: x_msg_data=>x_msg_data
1669: );
1670:
1671: IF l_debug_level > 0 THEN
1672: oe_debug_pub.add('create_contact_point PHONE TCA CALL:x_return_status:'||x_return_status);
1673: oe_debug_pub.add('create_contact_point PHONE TCA CALL:x_msg_count:'||x_msg_count);
1674: oe_debug_pub.add('create_contact_point PHONE TCA CALL:x_msg_data:'||x_msg_data);
1675: END IF;
1676:
1669: );
1670:
1671: IF l_debug_level > 0 THEN
1672: oe_debug_pub.add('create_contact_point PHONE TCA CALL:x_return_status:'||x_return_status);
1673: oe_debug_pub.add('create_contact_point PHONE TCA CALL:x_msg_count:'||x_msg_count);
1674: oe_debug_pub.add('create_contact_point PHONE TCA CALL:x_msg_data:'||x_msg_data);
1675: END IF;
1676:
1677: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1670:
1671: IF l_debug_level > 0 THEN
1672: oe_debug_pub.add('create_contact_point PHONE TCA CALL:x_return_status:'||x_return_status);
1673: oe_debug_pub.add('create_contact_point PHONE TCA CALL:x_msg_count:'||x_msg_count);
1674: oe_debug_pub.add('create_contact_point PHONE TCA CALL:x_msg_data:'||x_msg_data);
1675: END IF;
1676:
1677: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1678: RETURN;
1706: x_return_status OUT NOCOPY VARCHAR2,
1707: x_msg_count OUT NOCOPY NUMBER,
1708: x_msg_data OUT NOCOPY VARCHAR2
1709: ) IS
1710: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1711: l_rel_flag VARCHAR2(1);
1712: BEGIN
1713:
1714: IF l_debug_level > 0 THEN
1711: l_rel_flag VARCHAR2(1);
1712: BEGIN
1713:
1714: IF l_debug_level > 0 THEN
1715: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Create_relationships ');
1716: END IF;
1717:
1718: x_return_status := FND_API.G_RET_STS_SUCCESS;
1719:
1720: l_rel_flag := OE_Sys_Parameters.Value('CUSTOMER_RELATIONSHIPS_FLAG');
1721:
1722: IF l_rel_flag <> 'Y' THEN
1723: IF l_debug_level > 0 THEN
1724: oe_debug_pub.add(' No need to create relationships.system param is not related customers ');
1725: END IF;
1726: RETURN;
1727: END IF;
1728:
1739: ,x_msg_count => x_msg_count
1740: ,x_msg_data => x_msg_data);
1741:
1742: IF l_debug_level > 0 THEN
1743: oe_debug_pub.add('Ship to customer relation creation');
1744: oe_debug_pub.add('Create_relationships TCA CALL:x_return_status:'||x_return_status);
1745: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_count:'||x_msg_count);
1746: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_data:'||x_msg_data);
1747: END IF;
1740: ,x_msg_data => x_msg_data);
1741:
1742: IF l_debug_level > 0 THEN
1743: oe_debug_pub.add('Ship to customer relation creation');
1744: oe_debug_pub.add('Create_relationships TCA CALL:x_return_status:'||x_return_status);
1745: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_count:'||x_msg_count);
1746: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_data:'||x_msg_data);
1747: END IF;
1748:
1741:
1742: IF l_debug_level > 0 THEN
1743: oe_debug_pub.add('Ship to customer relation creation');
1744: oe_debug_pub.add('Create_relationships TCA CALL:x_return_status:'||x_return_status);
1745: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_count:'||x_msg_count);
1746: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_data:'||x_msg_data);
1747: END IF;
1748:
1749: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1742: IF l_debug_level > 0 THEN
1743: oe_debug_pub.add('Ship to customer relation creation');
1744: oe_debug_pub.add('Create_relationships TCA CALL:x_return_status:'||x_return_status);
1745: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_count:'||x_msg_count);
1746: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_data:'||x_msg_data);
1747: END IF;
1748:
1749: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1750: RETURN;
1766: ,x_msg_count => x_msg_count
1767: ,x_msg_data => x_msg_data);
1768:
1769: IF l_debug_level > 0 THEN
1770: oe_debug_pub.add('Invoice to customer relation creation');
1771: oe_debug_pub.add('Create_relationships TCA CALL:x_return_status:'||x_return_status);
1772: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_count:'||x_msg_count);
1773: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_data:'||x_msg_data);
1774: END IF;
1767: ,x_msg_data => x_msg_data);
1768:
1769: IF l_debug_level > 0 THEN
1770: oe_debug_pub.add('Invoice to customer relation creation');
1771: oe_debug_pub.add('Create_relationships TCA CALL:x_return_status:'||x_return_status);
1772: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_count:'||x_msg_count);
1773: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_data:'||x_msg_data);
1774: END IF;
1775:
1768:
1769: IF l_debug_level > 0 THEN
1770: oe_debug_pub.add('Invoice to customer relation creation');
1771: oe_debug_pub.add('Create_relationships TCA CALL:x_return_status:'||x_return_status);
1772: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_count:'||x_msg_count);
1773: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_data:'||x_msg_data);
1774: END IF;
1775:
1776: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1769: IF l_debug_level > 0 THEN
1770: oe_debug_pub.add('Invoice to customer relation creation');
1771: oe_debug_pub.add('Create_relationships TCA CALL:x_return_status:'||x_return_status);
1772: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_count:'||x_msg_count);
1773: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_data:'||x_msg_data);
1774: END IF;
1775:
1776: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1777: RETURN;
1793: ,x_return_status => x_return_status
1794: ,x_msg_count => x_msg_count
1795: ,x_msg_data => x_msg_data);
1796: IF l_debug_level > 0 THEN
1797: oe_debug_pub.add('Deliver to customer relation creation');
1798: oe_debug_pub.add('Create_relationships TCA CALL:x_return_status:'||x_return_status);
1799: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_count:'||x_msg_count);
1800: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_data:'||x_msg_data);
1801: END IF;
1794: ,x_msg_count => x_msg_count
1795: ,x_msg_data => x_msg_data);
1796: IF l_debug_level > 0 THEN
1797: oe_debug_pub.add('Deliver to customer relation creation');
1798: oe_debug_pub.add('Create_relationships TCA CALL:x_return_status:'||x_return_status);
1799: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_count:'||x_msg_count);
1800: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_data:'||x_msg_data);
1801: END IF;
1802:
1795: ,x_msg_data => x_msg_data);
1796: IF l_debug_level > 0 THEN
1797: oe_debug_pub.add('Deliver to customer relation creation');
1798: oe_debug_pub.add('Create_relationships TCA CALL:x_return_status:'||x_return_status);
1799: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_count:'||x_msg_count);
1800: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_data:'||x_msg_data);
1801: END IF;
1802:
1803:
1796: IF l_debug_level > 0 THEN
1797: oe_debug_pub.add('Deliver to customer relation creation');
1798: oe_debug_pub.add('Create_relationships TCA CALL:x_return_status:'||x_return_status);
1799: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_count:'||x_msg_count);
1800: oe_debug_pub.add('Create_relationships TCA CALL:x_msg_data:'||x_msg_data);
1801: END IF;
1802:
1803:
1804: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1807:
1808: END IF;
1809:
1810: IF l_debug_level > 0 THEN
1811: oe_debug_pub.add('Exiting OE_CUSTOMER_INFO_PVT.Create_relationships ');
1812: END IF;
1813:
1814: Exception
1815: WHEN OTHERS THEN
1823: );
1824: END IF;
1825:
1826: IF l_debug_level > 0 THEN
1827: oe_debug_pub.add('Unexpected error in OE_CUSTOMER_INFO_PVT.Create_relationships '||SQLERRM);
1828: END IF;
1829:
1830: End Create_relationships;
1831:
1847: l_return_status Varchar2(1);
1848: l_party_site_number VARCHAR2(360);
1849: x_party_site_number VARCHAR2 (360);
1850: --
1851: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1852: --
1853:
1854: BEGIN
1855:
1855:
1856: x_return_status := FND_API.G_RET_STS_SUCCESS;
1857:
1858: IF l_debug_level > 0 THEN
1859: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Create_Party_Site');
1860: END IF;
1861:
1862:
1863: IF l_debug_level > 0 then
1860: END IF;
1861:
1862:
1863: IF l_debug_level > 0 then
1864: oe_debug_pub.add('Step 1:Create Location');
1865: end if;
1866:
1867: oe_oe_inline_address.Create_Location(
1868: p_country => p_address_rec.country,
1927: x_msg_count => x_msg_count,
1928: x_msg_data => x_msg_data);
1929:
1930: IF l_debug_level > 0 THEN
1931: oe_debug_pub.add('End of Step 1:Create Location :x_return_status:'||x_return_status);
1932: oe_debug_pub.add('End of Step 1:Create Location :x_msg_count:'||x_msg_count);
1933: oe_debug_pub.add('End of Step 1:Create Location :x_msg_data:'||x_msg_data);
1934: oe_debug_pub.add('End of Step 1:Create Location :x_location_id:'||x_location_id);
1935: END IF;
1928: x_msg_data => x_msg_data);
1929:
1930: IF l_debug_level > 0 THEN
1931: oe_debug_pub.add('End of Step 1:Create Location :x_return_status:'||x_return_status);
1932: oe_debug_pub.add('End of Step 1:Create Location :x_msg_count:'||x_msg_count);
1933: oe_debug_pub.add('End of Step 1:Create Location :x_msg_data:'||x_msg_data);
1934: oe_debug_pub.add('End of Step 1:Create Location :x_location_id:'||x_location_id);
1935: END IF;
1936:
1929:
1930: IF l_debug_level > 0 THEN
1931: oe_debug_pub.add('End of Step 1:Create Location :x_return_status:'||x_return_status);
1932: oe_debug_pub.add('End of Step 1:Create Location :x_msg_count:'||x_msg_count);
1933: oe_debug_pub.add('End of Step 1:Create Location :x_msg_data:'||x_msg_data);
1934: oe_debug_pub.add('End of Step 1:Create Location :x_location_id:'||x_location_id);
1935: END IF;
1936:
1937: IF x_return_status <> FND_API.G_RET_STS_SUCCESS then
1930: IF l_debug_level > 0 THEN
1931: oe_debug_pub.add('End of Step 1:Create Location :x_return_status:'||x_return_status);
1932: oe_debug_pub.add('End of Step 1:Create Location :x_msg_count:'||x_msg_count);
1933: oe_debug_pub.add('End of Step 1:Create Location :x_msg_data:'||x_msg_data);
1934: oe_debug_pub.add('End of Step 1:Create Location :x_location_id:'||x_location_id);
1935: END IF;
1936:
1937: IF x_return_status <> FND_API.G_RET_STS_SUCCESS then
1938: return;
1938: return;
1939: END IF;
1940:
1941: IF l_debug_level > 0 THEN
1942: oe_debug_pub.add('Step 2:Create party site');
1943: END IF;
1944:
1945: IF G_AUTO_SITE_NUMBERING = 'Y' THEN
1946: l_party_site_number := NULL;
1961: x_msg_data => x_msg_data
1962: );
1963:
1964: IF l_debug_level > 0 THEN
1965: oe_debug_pub.add('End of Step 2:Create party_site :x_return_status:'||x_return_status);
1966: oe_debug_pub.add('End of Step 2:Create party_site :x_msg_count:'||x_msg_count);
1967: oe_debug_pub.add('End of Step 2:Create party_site :x_msg_data:'||x_msg_data);
1968: oe_debug_pub.add('End of Step 2:Create party_site :x_party_site_id:'||x_party_site_id);
1969: END IF;
1962: );
1963:
1964: IF l_debug_level > 0 THEN
1965: oe_debug_pub.add('End of Step 2:Create party_site :x_return_status:'||x_return_status);
1966: oe_debug_pub.add('End of Step 2:Create party_site :x_msg_count:'||x_msg_count);
1967: oe_debug_pub.add('End of Step 2:Create party_site :x_msg_data:'||x_msg_data);
1968: oe_debug_pub.add('End of Step 2:Create party_site :x_party_site_id:'||x_party_site_id);
1969: END IF;
1970:
1963:
1964: IF l_debug_level > 0 THEN
1965: oe_debug_pub.add('End of Step 2:Create party_site :x_return_status:'||x_return_status);
1966: oe_debug_pub.add('End of Step 2:Create party_site :x_msg_count:'||x_msg_count);
1967: oe_debug_pub.add('End of Step 2:Create party_site :x_msg_data:'||x_msg_data);
1968: oe_debug_pub.add('End of Step 2:Create party_site :x_party_site_id:'||x_party_site_id);
1969: END IF;
1970:
1971:
1964: IF l_debug_level > 0 THEN
1965: oe_debug_pub.add('End of Step 2:Create party_site :x_return_status:'||x_return_status);
1966: oe_debug_pub.add('End of Step 2:Create party_site :x_msg_count:'||x_msg_count);
1967: oe_debug_pub.add('End of Step 2:Create party_site :x_msg_data:'||x_msg_data);
1968: oe_debug_pub.add('End of Step 2:Create party_site :x_party_site_id:'||x_party_site_id);
1969: END IF;
1970:
1971:
1972: IF l_debug_level > 0 THEN
1969: END IF;
1970:
1971:
1972: IF l_debug_level > 0 THEN
1973: oe_debug_pub.add('Exiting OE_CUSTOMER_INFO_PVT.Create_Party_Site');
1974: END IF;
1975:
1976:
1977: EXCEPTION
1978: WHEN OTHERS THEN
1979: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1980:
1981: IF l_debug_level > 0 THEN
1982: oe_debug_pub.add('Unexpected error in OE_CUSTOMER_INFO_PVT.Create_Party_Site '||SQLERRM);
1983: END IF;
1984:
1985: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1986: THEN
2009: l_return_status Varchar2(1);
2010: l_party_site_number VARCHAR2(360);
2011: x_party_site_number VARCHAR2 (360);
2012: --
2013: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2014: --
2015:
2016: BEGIN
2017:
2017:
2018: x_return_status := FND_API.G_RET_STS_SUCCESS;
2019:
2020: IF l_debug_level > 0 THEN
2021: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Create_Cust_Account_Site');
2022: END IF;
2023:
2024: IF l_debug_level > 0 THEN
2025: oe_debug_pub.add('Step 3:Create Account Site');
2021: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Create_Cust_Account_Site');
2022: END IF;
2023:
2024: IF l_debug_level > 0 THEN
2025: oe_debug_pub.add('Step 3:Create Account Site');
2026: END IF;
2027:
2028: oe_oe_inline_address.Create_Account_Site
2029: (
2056: x_msg_data => x_msg_data,
2057: in_created_by_module => G_CREATED_BY_MODULE
2058: );
2059: IF l_debug_level > 0 THEN
2060: oe_debug_pub.add('End of Step 3:Create Account_Site :x_return_status:'||x_return_status);
2061: oe_debug_pub.add('End of Step 3:Create Account_Site :x_msg_count:'||x_msg_count);
2062: oe_debug_pub.add('End of Step 3:Create Account_Site :x_msg_data:'||x_msg_data);
2063: oe_debug_pub.add('End of Step 3:Create Account_Site :x_cust_account_site_id:'||x_cust_account_site_id);
2064: END IF;
2057: in_created_by_module => G_CREATED_BY_MODULE
2058: );
2059: IF l_debug_level > 0 THEN
2060: oe_debug_pub.add('End of Step 3:Create Account_Site :x_return_status:'||x_return_status);
2061: oe_debug_pub.add('End of Step 3:Create Account_Site :x_msg_count:'||x_msg_count);
2062: oe_debug_pub.add('End of Step 3:Create Account_Site :x_msg_data:'||x_msg_data);
2063: oe_debug_pub.add('End of Step 3:Create Account_Site :x_cust_account_site_id:'||x_cust_account_site_id);
2064: END IF;
2065:
2058: );
2059: IF l_debug_level > 0 THEN
2060: oe_debug_pub.add('End of Step 3:Create Account_Site :x_return_status:'||x_return_status);
2061: oe_debug_pub.add('End of Step 3:Create Account_Site :x_msg_count:'||x_msg_count);
2062: oe_debug_pub.add('End of Step 3:Create Account_Site :x_msg_data:'||x_msg_data);
2063: oe_debug_pub.add('End of Step 3:Create Account_Site :x_cust_account_site_id:'||x_cust_account_site_id);
2064: END IF;
2065:
2066: IF l_debug_level > 0 THEN
2059: IF l_debug_level > 0 THEN
2060: oe_debug_pub.add('End of Step 3:Create Account_Site :x_return_status:'||x_return_status);
2061: oe_debug_pub.add('End of Step 3:Create Account_Site :x_msg_count:'||x_msg_count);
2062: oe_debug_pub.add('End of Step 3:Create Account_Site :x_msg_data:'||x_msg_data);
2063: oe_debug_pub.add('End of Step 3:Create Account_Site :x_cust_account_site_id:'||x_cust_account_site_id);
2064: END IF;
2065:
2066: IF l_debug_level > 0 THEN
2067: oe_debug_pub.add('Exiting OE_CUSTOMER_INFO_PVT.Create_Cust_Account_Site');
2063: oe_debug_pub.add('End of Step 3:Create Account_Site :x_cust_account_site_id:'||x_cust_account_site_id);
2064: END IF;
2065:
2066: IF l_debug_level > 0 THEN
2067: oe_debug_pub.add('Exiting OE_CUSTOMER_INFO_PVT.Create_Cust_Account_Site');
2068: END IF;
2069:
2070:
2071: EXCEPTION
2072: WHEN OTHERS THEN
2073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2074:
2075: IF l_debug_level > 0 THEN
2076: oe_debug_pub.add('Unexpected error in OE_CUSTOMER_INFO_PVT.Create_Cust_Account_Site '||SQLERRM);
2077: END IF;
2078:
2079: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2080: THEN
2100: l_location_number VARCHAR2(360);
2101: l_acct_site_uses HZ_CUST_ACCOUNT_SITE_V2PUB.cust_site_use_rec_type;
2102: l_cust_profile_rec HZ_CUSTOMER_PROFILE_V2PUB.customer_profile_rec_type;
2103: p_org_id NUMBER := MO_GLOBAL.get_current_org_id;
2104: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2105:
2106: BEGIN
2107: IF l_debug_level > 0 THEN
2108: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Create_Acct_Site_Uses');
2104: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2105:
2106: BEGIN
2107: IF l_debug_level > 0 THEN
2108: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Create_Acct_Site_Uses');
2109: END IF;
2110:
2111:
2112: l_acct_site_uses.cust_acct_site_id := p_cust_acct_site_id;
2131: x_site_use_id => x_site_use_id
2132: );
2133:
2134: IF l_debug_level > 0 THEN
2135: oe_debug_pub.add('Create_Cust_Site_Use : x_return_status:'||x_return_status);
2136: oe_debug_pub.add('Create_Cust_Site_Use : x_msg_count:'||x_msg_count);
2137: oe_debug_pub.add('Create_Cust_Site_Use : x_msg_data:'||x_msg_data);
2138: oe_debug_pub.add('Create_Cust_Site_Use : x_site_use_id:'||x_site_use_id);
2139: END IF;
2132: );
2133:
2134: IF l_debug_level > 0 THEN
2135: oe_debug_pub.add('Create_Cust_Site_Use : x_return_status:'||x_return_status);
2136: oe_debug_pub.add('Create_Cust_Site_Use : x_msg_count:'||x_msg_count);
2137: oe_debug_pub.add('Create_Cust_Site_Use : x_msg_data:'||x_msg_data);
2138: oe_debug_pub.add('Create_Cust_Site_Use : x_site_use_id:'||x_site_use_id);
2139: END IF;
2140:
2133:
2134: IF l_debug_level > 0 THEN
2135: oe_debug_pub.add('Create_Cust_Site_Use : x_return_status:'||x_return_status);
2136: oe_debug_pub.add('Create_Cust_Site_Use : x_msg_count:'||x_msg_count);
2137: oe_debug_pub.add('Create_Cust_Site_Use : x_msg_data:'||x_msg_data);
2138: oe_debug_pub.add('Create_Cust_Site_Use : x_site_use_id:'||x_site_use_id);
2139: END IF;
2140:
2141:
2134: IF l_debug_level > 0 THEN
2135: oe_debug_pub.add('Create_Cust_Site_Use : x_return_status:'||x_return_status);
2136: oe_debug_pub.add('Create_Cust_Site_Use : x_msg_count:'||x_msg_count);
2137: oe_debug_pub.add('Create_Cust_Site_Use : x_msg_data:'||x_msg_data);
2138: oe_debug_pub.add('Create_Cust_Site_Use : x_site_use_id:'||x_site_use_id);
2139: END IF;
2140:
2141:
2142: IF l_debug_level > 0 THEN
2139: END IF;
2140:
2141:
2142: IF l_debug_level > 0 THEN
2143: oe_debug_pub.add('Exiting OE_CUSTOMER_INFO_PVT.Create_Acct_Site_Uses');
2144: END IF;
2145:
2146: EXCEPTION
2147: WHEN OTHERS THEN
2147: WHEN OTHERS THEN
2148: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2149:
2150: IF l_debug_level > 0 THEN
2151: oe_debug_pub.add('Unexpected error in OE_CUSTOMER_INFO_PVT.Create_Acct_Site_Uses '||SQLERRM);
2152: END IF;
2153:
2154: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2155: THEN
2178: l_location_rec HZ_LOCATION_V2PUB.location_rec_type;
2179: l_return_status VARCHAR2(1);
2180: l_msg_count NUMBER;
2181: l_msg_data VARCHAR2(4000);
2182: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2183: BEGIN
2184:
2185: x_party_site_id := FND_API.G_MISS_NUM;
2186:
2184:
2185: x_party_site_id := FND_API.G_MISS_NUM;
2186:
2187: IF l_debug_level > 0 THEN
2188: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Check_Party_Site_Exists : p_party_id'||p_party_id);
2189: END IF;
2190:
2191:
2192: FOR i in party_location LOOP
2191:
2192: FOR i in party_location LOOP
2193:
2194: IF l_debug_level > 0 THEN
2195: oe_debug_pub.add('Party_site_id :'||i.party_site_id);
2196: oe_debug_pub.add('Location_id :'||i.location_id);
2197: END IF;
2198:
2199:
2192: FOR i in party_location LOOP
2193:
2194: IF l_debug_level > 0 THEN
2195: oe_debug_pub.add('Party_site_id :'||i.party_site_id);
2196: oe_debug_pub.add('Location_id :'||i.location_id);
2197: END IF;
2198:
2199:
2200: HZ_LOCATION_V2PUB.get_location_rec(
2206: x_msg_data => l_msg_data
2207: );
2208:
2209: IF l_debug_level > 0 THEN
2210: oe_debug_pub.add('l_return_status :'||l_return_status);
2211: oe_debug_pub.add('l_msg_data :'||l_msg_data);
2212: END IF;
2213:
2214: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2207: );
2208:
2209: IF l_debug_level > 0 THEN
2210: oe_debug_pub.add('l_return_status :'||l_return_status);
2211: oe_debug_pub.add('l_msg_data :'||l_msg_data);
2212: END IF;
2213:
2214: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2215: x_party_site_id := FND_API.G_MISS_NUM;
2229: AND NVL(l_location_rec.ADDRESS4,FND_API.G_MISS_CHAR) = NVL(p_address_rec.ADDRESS4,FND_API.G_MISS_CHAR)
2230: THEN
2231:
2232: IF l_debug_level > 0 THEN
2233: oe_debug_pub.add(' MATCH FOUND : Party Site Exists');
2234: oe_debug_pub.add(' x_party_site_id:'||i.party_site_id);
2235: oe_debug_pub.add(' Location_id:'||i.location_id);
2236: END IF;
2237:
2230: THEN
2231:
2232: IF l_debug_level > 0 THEN
2233: oe_debug_pub.add(' MATCH FOUND : Party Site Exists');
2234: oe_debug_pub.add(' x_party_site_id:'||i.party_site_id);
2235: oe_debug_pub.add(' Location_id:'||i.location_id);
2236: END IF;
2237:
2238: x_party_site_id := i.party_site_id;
2231:
2232: IF l_debug_level > 0 THEN
2233: oe_debug_pub.add(' MATCH FOUND : Party Site Exists');
2234: oe_debug_pub.add(' x_party_site_id:'||i.party_site_id);
2235: oe_debug_pub.add(' Location_id:'||i.location_id);
2236: END IF;
2237:
2238: x_party_site_id := i.party_site_id;
2239: RETURN;
2243: END LOOP;
2244:
2245:
2246: IF l_debug_level > 0 THEN
2247: oe_debug_pub.add(' No Match found :x_party_site_id :'||x_party_site_id);
2248: oe_debug_pub.add('Exiting OE_CUSTOMER_INFO_PVT.Check_Party_Site_Exists');
2249: END IF;
2250:
2251: EXCEPTION
2244:
2245:
2246: IF l_debug_level > 0 THEN
2247: oe_debug_pub.add(' No Match found :x_party_site_id :'||x_party_site_id);
2248: oe_debug_pub.add('Exiting OE_CUSTOMER_INFO_PVT.Check_Party_Site_Exists');
2249: END IF;
2250:
2251: EXCEPTION
2252: WHEN OTHERS THEN
2250:
2251: EXCEPTION
2252: WHEN OTHERS THEN
2253: IF l_debug_level > 0 THEN
2254: oe_debug_pub.add('Other errors in Check_Party_Site_Exists: '||SQLERRM);
2255: END IF;
2256:
2257: x_party_site_id := FND_API.G_MISS_NUM;
2258:
2263: Procedure Check_Cust_Site_Exists ( p_party_site_id IN NUMBER,
2264: p_cust_account_id IN NUMBER,
2265: x_cust_acct_site_id OUT NOCOPY NUMBER
2266: )IS
2267: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2268: BEGIN
2269:
2270:
2271: IF l_debug_level > 0 THEN
2268: BEGIN
2269:
2270:
2271: IF l_debug_level > 0 THEN
2272: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Check_Cust_Site_Exists');
2273: END IF;
2274:
2275: x_cust_acct_site_id := FND_API.G_MISS_NUM;
2276:
2283:
2284:
2285:
2286: IF l_debug_level > 0 THEN
2287: oe_debug_pub.add('x_cust_acct_site_id :'||x_cust_acct_site_id);
2288: oe_debug_pub.add('Exiting OE_CUSTOMER_INFO_PVT.Check_Cust_Site_Exists');
2289: END IF;
2290:
2291: EXCEPTION
2284:
2285:
2286: IF l_debug_level > 0 THEN
2287: oe_debug_pub.add('x_cust_acct_site_id :'||x_cust_acct_site_id);
2288: oe_debug_pub.add('Exiting OE_CUSTOMER_INFO_PVT.Check_Cust_Site_Exists');
2289: END IF;
2290:
2291: EXCEPTION
2292: WHEN OTHERS THEN
2292: WHEN OTHERS THEN
2293: x_cust_acct_site_id := FND_API.G_MISS_NUM;
2294:
2295: IF l_debug_level > 0 THEN
2296: oe_debug_pub.add('Other Errors :'||SQLERRM);
2297: END IF;
2298: END Check_Cust_Site_Exists;
2299:
2300: /* This function returns the location_id for the given cust_acct_site_id */
2300: /* This function returns the location_id for the given cust_acct_site_id */
2301: Function Get_Location_id( p_cust_acct_site_id IN NUMBER DEFAULT NULL)
2302: RETURN NUMBER IS
2303: l_location_id NUMBER;
2304: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2305: BEGIN
2306:
2307: IF l_debug_level > 0 THEN
2308: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Get_Location_id');
2304: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2305: BEGIN
2306:
2307: IF l_debug_level > 0 THEN
2308: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Get_Location_id');
2309: END IF;
2310:
2311:
2312: SELECT loc.location_id
2319: AND acct_site.cust_acct_site_id = p_cust_acct_site_id ;
2320:
2321:
2322: IF l_debug_level > 0 THEN
2323: oe_debug_pub.add('l_location_id :'||l_location_id);
2324: END IF;
2325:
2326: RETURN l_location_id;
2327:
2327:
2328: EXCEPTION
2329: WHEN OTHERS THEN
2330: IF l_debug_level > 0 THEN
2331: oe_debug_pub.add(' OTHER ERROERS IN OE_CUSTOMER_INFO_PVT.Get_Location_id'|| SQLERRM);
2332: END IF;
2333:
2334: RETURN NULL;
2335: END Get_Location_id;
2379: l_party_id NUMBER;
2380: x_customer_id NUMBER;
2381: l_customer_id NUMBER;
2382:
2383: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2384: l_site_customer_id NUMBER;
2385: x_account_site_id NUMBER;
2386:
2387: BEGIN
2388:
2389: x_return_status := FND_API.G_RET_STS_SUCCESS;
2390:
2391: IF l_debug_level > 0 THEN
2392: oe_debug_pub.add('Entering procedure OE_CUSTOMER_INFO_PVT.Create_Addresses');
2393: oe_debug_pub.add('p_address_usage:'||p_address_usage);
2394: END IF;
2395:
2396: l_addr_rec := p_customer_info_tbl(p_address_rec_index);
2389: x_return_status := FND_API.G_RET_STS_SUCCESS;
2390:
2391: IF l_debug_level > 0 THEN
2392: oe_debug_pub.add('Entering procedure OE_CUSTOMER_INFO_PVT.Create_Addresses');
2393: oe_debug_pub.add('p_address_usage:'||p_address_usage);
2394: END IF;
2395:
2396: l_addr_rec := p_customer_info_tbl(p_address_rec_index);
2397:
2444: );
2445: END IF;
2446:
2447: IF l_debug_level > 0 THEN
2448: oe_debug_pub.add('Update_Location :x_return_status'||x_return_status);
2449: oe_debug_pub.add('Update_Location :x_msg_count'||x_msg_count);
2450: oe_debug_pub.add('Update_Location :x_msg_data'||x_msg_data);
2451: END IF;
2452:
2445: END IF;
2446:
2447: IF l_debug_level > 0 THEN
2448: oe_debug_pub.add('Update_Location :x_return_status'||x_return_status);
2449: oe_debug_pub.add('Update_Location :x_msg_count'||x_msg_count);
2450: oe_debug_pub.add('Update_Location :x_msg_data'||x_msg_data);
2451: END IF;
2452:
2453: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2446:
2447: IF l_debug_level > 0 THEN
2448: oe_debug_pub.add('Update_Location :x_return_status'||x_return_status);
2449: oe_debug_pub.add('Update_Location :x_msg_count'||x_msg_count);
2450: oe_debug_pub.add('Update_Location :x_msg_data'||x_msg_data);
2451: END IF;
2452:
2453: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2454: oe_msg_pub.transfer_msg_stack;
2519:
2520: IF x_account_site_id <> FND_API.G_MISS_NUM THEN
2521:
2522: IF l_debug_level > 0 THEN
2523: oe_debug_pub.add('This site is aleary created ,so check create site usage alone');
2524: END IF;
2525:
2526:
2527: Check_site_usage_exists ( p_cust_acct_site_id => x_account_site_id
2529: ,x_site_use_id => x_site_use_id);
2530:
2531: IF x_site_use_id <> FND_API.G_MISS_NUM THEN
2532: IF l_debug_level > 0 THEN
2533: oe_debug_pub.add(p_address_usage||': Site Usage already exists ');
2534: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses:x_site_use_id'||x_site_use_id);
2535: END IF;
2536: ELSE
2537:
2530:
2531: IF x_site_use_id <> FND_API.G_MISS_NUM THEN
2532: IF l_debug_level > 0 THEN
2533: oe_debug_pub.add(p_address_usage||': Site Usage already exists ');
2534: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses:x_site_use_id'||x_site_use_id);
2535: END IF;
2536: ELSE
2537:
2538: Create_Acct_Site_Uses(
2546:
2547: END IF;
2548:
2549: IF l_debug_level > 0 THEN
2550: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses:x_return_status:'||x_return_status);
2551: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses: x_msg_count :'||x_return_status);
2552: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses: x_msg_data'||x_msg_data);
2553: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses:x_site_use_id'||x_site_use_id);
2554: END IF;
2547: END IF;
2548:
2549: IF l_debug_level > 0 THEN
2550: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses:x_return_status:'||x_return_status);
2551: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses: x_msg_count :'||x_return_status);
2552: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses: x_msg_data'||x_msg_data);
2553: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses:x_site_use_id'||x_site_use_id);
2554: END IF;
2555:
2548:
2549: IF l_debug_level > 0 THEN
2550: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses:x_return_status:'||x_return_status);
2551: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses: x_msg_count :'||x_return_status);
2552: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses: x_msg_data'||x_msg_data);
2553: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses:x_site_use_id'||x_site_use_id);
2554: END IF;
2555:
2556: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2549: IF l_debug_level > 0 THEN
2550: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses:x_return_status:'||x_return_status);
2551: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses: x_msg_count :'||x_return_status);
2552: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses: x_msg_data'||x_msg_data);
2553: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses:x_site_use_id'||x_site_use_id);
2554: END IF;
2555:
2556: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2557: oe_msg_pub.transfer_msg_stack;
2559: END IF;
2560:
2561: ELSE
2562: IF l_debug_level > 0 THEN
2563: oe_debug_pub.add('Create both site and site usage');
2564: END IF;
2565:
2566:
2567: IF x_party_site_id = FND_API.G_MISS_NUM THEN
2582:
2583: END IF;
2584:
2585: IF l_debug_level > 0 THEN
2586: oe_debug_pub.add(p_address_usage||': Create_Party_Site:x_return_status:'||x_return_status);
2587: oe_debug_pub.add(p_address_usage||': Create_Party_Site: x_msg_count :'||x_msg_count);
2588: oe_debug_pub.add(p_address_usage||': Create_Party_Site: x_msg_data'||x_msg_data);
2589: oe_debug_pub.add(p_address_usage||': Create_Party_Site:x_party_site_id'||x_party_site_id);
2590: oe_debug_pub.add(p_address_usage||': Create_Party_Site:x_location_id'||x_location_id);
2583: END IF;
2584:
2585: IF l_debug_level > 0 THEN
2586: oe_debug_pub.add(p_address_usage||': Create_Party_Site:x_return_status:'||x_return_status);
2587: oe_debug_pub.add(p_address_usage||': Create_Party_Site: x_msg_count :'||x_msg_count);
2588: oe_debug_pub.add(p_address_usage||': Create_Party_Site: x_msg_data'||x_msg_data);
2589: oe_debug_pub.add(p_address_usage||': Create_Party_Site:x_party_site_id'||x_party_site_id);
2590: oe_debug_pub.add(p_address_usage||': Create_Party_Site:x_location_id'||x_location_id);
2591: END IF;
2584:
2585: IF l_debug_level > 0 THEN
2586: oe_debug_pub.add(p_address_usage||': Create_Party_Site:x_return_status:'||x_return_status);
2587: oe_debug_pub.add(p_address_usage||': Create_Party_Site: x_msg_count :'||x_msg_count);
2588: oe_debug_pub.add(p_address_usage||': Create_Party_Site: x_msg_data'||x_msg_data);
2589: oe_debug_pub.add(p_address_usage||': Create_Party_Site:x_party_site_id'||x_party_site_id);
2590: oe_debug_pub.add(p_address_usage||': Create_Party_Site:x_location_id'||x_location_id);
2591: END IF;
2592:
2585: IF l_debug_level > 0 THEN
2586: oe_debug_pub.add(p_address_usage||': Create_Party_Site:x_return_status:'||x_return_status);
2587: oe_debug_pub.add(p_address_usage||': Create_Party_Site: x_msg_count :'||x_msg_count);
2588: oe_debug_pub.add(p_address_usage||': Create_Party_Site: x_msg_data'||x_msg_data);
2589: oe_debug_pub.add(p_address_usage||': Create_Party_Site:x_party_site_id'||x_party_site_id);
2590: oe_debug_pub.add(p_address_usage||': Create_Party_Site:x_location_id'||x_location_id);
2591: END IF;
2592:
2593:
2586: oe_debug_pub.add(p_address_usage||': Create_Party_Site:x_return_status:'||x_return_status);
2587: oe_debug_pub.add(p_address_usage||': Create_Party_Site: x_msg_count :'||x_msg_count);
2588: oe_debug_pub.add(p_address_usage||': Create_Party_Site: x_msg_data'||x_msg_data);
2589: oe_debug_pub.add(p_address_usage||': Create_Party_Site:x_party_site_id'||x_party_site_id);
2590: oe_debug_pub.add(p_address_usage||': Create_Party_Site:x_location_id'||x_location_id);
2591: END IF;
2592:
2593:
2594:
2603: );
2604:
2605:
2606: IF l_debug_level > 0 THEN
2607: oe_debug_pub.add(p_address_usage||': Create_Cust_Account_Site:x_return_status:'||x_return_status);
2608: oe_debug_pub.add(p_address_usage||': Create_Cust_Account_Site: x_msg_count :'||x_msg_count);
2609: oe_debug_pub.add(p_address_usage||': Create_Cust_Account_Site: x_msg_data'||x_msg_data);
2610: oe_debug_pub.add(p_address_usage||': Create_Cust_Account_Site:x_ship_account_site_id'||x_ship_account_site_id);
2611: END IF;
2604:
2605:
2606: IF l_debug_level > 0 THEN
2607: oe_debug_pub.add(p_address_usage||': Create_Cust_Account_Site:x_return_status:'||x_return_status);
2608: oe_debug_pub.add(p_address_usage||': Create_Cust_Account_Site: x_msg_count :'||x_msg_count);
2609: oe_debug_pub.add(p_address_usage||': Create_Cust_Account_Site: x_msg_data'||x_msg_data);
2610: oe_debug_pub.add(p_address_usage||': Create_Cust_Account_Site:x_ship_account_site_id'||x_ship_account_site_id);
2611: END IF;
2612:
2605:
2606: IF l_debug_level > 0 THEN
2607: oe_debug_pub.add(p_address_usage||': Create_Cust_Account_Site:x_return_status:'||x_return_status);
2608: oe_debug_pub.add(p_address_usage||': Create_Cust_Account_Site: x_msg_count :'||x_msg_count);
2609: oe_debug_pub.add(p_address_usage||': Create_Cust_Account_Site: x_msg_data'||x_msg_data);
2610: oe_debug_pub.add(p_address_usage||': Create_Cust_Account_Site:x_ship_account_site_id'||x_ship_account_site_id);
2611: END IF;
2612:
2613: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2606: IF l_debug_level > 0 THEN
2607: oe_debug_pub.add(p_address_usage||': Create_Cust_Account_Site:x_return_status:'||x_return_status);
2608: oe_debug_pub.add(p_address_usage||': Create_Cust_Account_Site: x_msg_count :'||x_msg_count);
2609: oe_debug_pub.add(p_address_usage||': Create_Cust_Account_Site: x_msg_data'||x_msg_data);
2610: oe_debug_pub.add(p_address_usage||': Create_Cust_Account_Site:x_ship_account_site_id'||x_ship_account_site_id);
2611: END IF;
2612:
2613: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2614: oe_msg_pub.transfer_msg_stack;
2625: x_msg_data => x_msg_data );
2626:
2627:
2628: IF l_debug_level > 0 THEN
2629: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses:x_return_status:'||x_return_status);
2630: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses: x_msg_count :'||x_return_status);
2631: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses: x_msg_data'||x_msg_data);
2632: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses:x_site_use_id'||x_site_use_id);
2633: END IF;
2626:
2627:
2628: IF l_debug_level > 0 THEN
2629: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses:x_return_status:'||x_return_status);
2630: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses: x_msg_count :'||x_return_status);
2631: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses: x_msg_data'||x_msg_data);
2632: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses:x_site_use_id'||x_site_use_id);
2633: END IF;
2634:
2627:
2628: IF l_debug_level > 0 THEN
2629: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses:x_return_status:'||x_return_status);
2630: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses: x_msg_count :'||x_return_status);
2631: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses: x_msg_data'||x_msg_data);
2632: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses:x_site_use_id'||x_site_use_id);
2633: END IF;
2634:
2635: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2628: IF l_debug_level > 0 THEN
2629: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses:x_return_status:'||x_return_status);
2630: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses: x_msg_count :'||x_return_status);
2631: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses: x_msg_data'||x_msg_data);
2632: oe_debug_pub.add(p_address_usage||': Create_Acct_Site_Uses:x_site_use_id'||x_site_use_id);
2633: END IF;
2634:
2635: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2636: oe_msg_pub.transfer_msg_stack;
2662:
2663:
2664:
2665: IF l_debug_level > 0 THEN
2666: oe_debug_pub.add('Exiting procedure OE_CUSTOMER_INFO_PVT.Create_Addresses');
2667: END IF;
2668:
2669: EXCEPTION
2670: WHEN OTHERS THEN
2682:
2683:
2684: Procedure Check_Customer_Fields (p_customer_record IN OE_ORDER_PUB.CUSTOMER_INFO_REC_TYPE
2685: ,x_return_status OUT NOCOPY VARCHAR2 ) IS
2686: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2687: BEGIN
2688:
2689: x_return_status := FND_API.G_RET_STS_SUCCESS;
2690:
2695: oe_msg_pub.add;
2696: x_return_status := FND_API.G_RET_STS_ERROR;
2697:
2698: IF l_debug_level > 0 THEN
2699: oe_debug_pub.add( 'CUSTOMER TYPE REQUIRED BUT NOT ENTERED' ) ;
2700: END IF;
2701:
2702:
2703: END IF;
2712: oe_msg_pub.add;
2713: x_return_status := FND_API.G_RET_STS_ERROR;
2714:
2715: IF l_debug_level > 0 THEN
2716: oe_debug_pub.add( 'ORGANIZATION NAME REQUIRED BUT NOT ENTERED' ) ;
2717: END IF;
2718:
2719:
2720: END IF;
2731: oe_msg_pub.add;
2732: x_return_status := FND_API.G_RET_STS_ERROR;
2733:
2734: IF l_debug_level > 0 THEN
2735: oe_debug_pub.add( 'PERSON FIRST/LAST NAME REQUIRED BUT NOT ENTERED' ) ;
2736: END IF;
2737:
2738:
2739: END IF;
2747: oe_msg_pub.add;
2748: x_return_status := FND_API.G_RET_STS_ERROR;
2749:
2750: IF l_debug_level > 0 THEN
2751: oe_debug_pub.add( 'EMAIL REQUIRED BUT NOT ENTERED' ) ;
2752: END IF;
2753: END IF;
2754:
2755: IF G_AUTO_PARTY_NUMBERING = 'N' and
2761: oe_msg_pub.add;
2762: x_return_status := FND_API.G_RET_STS_ERROR;
2763:
2764: IF l_debug_level > 0 THEN
2765: oe_debug_pub.add( 'PARTY NUMBER REQUIRED BUT NOT ENTERED' ) ;
2766: END IF;
2767:
2768: End If;
2769:
2776: oe_msg_pub.add;
2777: x_return_status := FND_API.G_RET_STS_ERROR;
2778:
2779: IF l_debug_level > 0 THEN
2780: oe_debug_pub.add( 'CUSTOMER NUMBER REQUIRED BUT NOT ENTERED' ) ;
2781: END IF;
2782:
2783: End If;
2784:
2789:
2790: Procedure Validate_Customer_Fields (p_customer_record IN OE_ORDER_PUB.CUSTOMER_INFO_REC_TYPE
2791: ,x_return_status OUT NOCOPY VARCHAR2 )IS
2792: x_party_id NUMBER;
2793: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2794:
2795: BEGIN
2796: x_return_status := FND_API.G_RET_STS_SUCCESS;
2797:
2811: Procedure Check_Duplicate_Customer ( p_customer_record IN OE_ORDER_PUB.CUSTOMER_INFO_REC_TYPE
2812: , p_type IN VARCHAR2
2813: , x_customer_id OUT NOCOPY VARCHAR2
2814: ) IS
2815: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2816: BEGIN
2817:
2818: IF l_debug_level >0 THEN
2819: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Check_Duplicate_Customer');
2815: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2816: BEGIN
2817:
2818: IF l_debug_level >0 THEN
2819: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Check_Duplicate_Customer');
2820: END IF;
2821: x_customer_id := FND_API.G_MISS_NUM;
2822:
2823: IF p_customer_record.customer_type = 'ORGANIZATION' THEN
2849: END IF;
2850:
2851:
2852: IF l_debug_level >0 THEN
2853: oe_debug_pub.add('Exiting OE_CUSTOMER_INFO_PVT.Check_Duplicate_Customer :'||x_customer_id);
2854: END IF;
2855:
2856: EXCEPTION
2857: WHEN OTHERS THEN
2855:
2856: EXCEPTION
2857: WHEN OTHERS THEN
2858: IF l_debug_level >0 THEN
2859: oe_debug_pub.add('Other errors in OE_CUSTOMER_INFO_PVT.Check_Duplicate_Customer :'||SQLERRM);
2860: END IF;
2861:
2862: END Check_Duplicate_Customer;
2863:
3218: Function Get_Location_id ( p_site_usage_code IN VARCHAR2 DEFAULT NULL
3219: , p_site_use_id IN NUMBER DEFAULT NULL ) RETURN NUMBER
3220: IS
3221: l_location_id NUMBER;
3222: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3223: BEGIN
3224:
3225: SELECT loc.location_id
3226: INTO l_location_id
3234: AND site_uses.site_use_code = p_site_usage_code
3235: AND site_uses.site_use_id = p_site_use_id;
3236:
3237: IF l_debug_level > 0 THEN
3238: oe_debug_pub.add('Get_Location_id :l_location_id :'||l_location_id );
3239: END IF;
3240:
3241: return l_location_id;
3242:
3242:
3243: EXCEPTION
3244: WHEN OTHERS THEN
3245: IF l_debug_level > 0 THEN
3246: oe_debug_pub.add('Unable to retrive the location_id for the site_use_id :'||p_site_use_id||'and site_usage_code :'||p_site_usage_code);
3247: END IF;
3248: FND_MESSAGE.set_name('ONT','OE_INVALID_ATTRIBUTE');
3249: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','SITE_USE_ID');
3250: OE_MSG_PUB.Add;
3269: l_customer_id NUMBER;
3270: l_party_id NUMBER;
3271: l_party_type VARCHAR2(50);
3272: x_profile_id NUMBER;
3273: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3274:
3275: BEGIN
3276:
3277: x_return_status := FND_API.G_RET_STS_SUCCESS;
3276:
3277: x_return_status := FND_API.G_RET_STS_SUCCESS;
3278:
3279: IF l_debug_level > 0 THEN
3280: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Update_Customer ');
3281: END IF;
3282:
3283: IF NOT IS_VALID_ID ( p_customer_id => p_customer_rec.customer_id ) THEN
3284: x_return_status := FND_API.G_RET_STS_ERROR;
3404: RETURN;
3405: END IF;
3406:
3407: IF l_debug_level > 0 THEN
3408: oe_debug_pub.add('Update_Customer :x_return_status:'||x_return_status);
3409: oe_debug_pub.add('Update_Customer:x_msg_count:'||x_msg_count);
3410: oe_debug_pub.add('Update_Customer :x_msg_data:'||x_msg_data);
3411: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Update_Customer ');
3412: END IF;
3405: END IF;
3406:
3407: IF l_debug_level > 0 THEN
3408: oe_debug_pub.add('Update_Customer :x_return_status:'||x_return_status);
3409: oe_debug_pub.add('Update_Customer:x_msg_count:'||x_msg_count);
3410: oe_debug_pub.add('Update_Customer :x_msg_data:'||x_msg_data);
3411: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Update_Customer ');
3412: END IF;
3413:
3406:
3407: IF l_debug_level > 0 THEN
3408: oe_debug_pub.add('Update_Customer :x_return_status:'||x_return_status);
3409: oe_debug_pub.add('Update_Customer:x_msg_count:'||x_msg_count);
3410: oe_debug_pub.add('Update_Customer :x_msg_data:'||x_msg_data);
3411: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Update_Customer ');
3412: END IF;
3413:
3414: EXCEPTION
3407: IF l_debug_level > 0 THEN
3408: oe_debug_pub.add('Update_Customer :x_return_status:'||x_return_status);
3409: oe_debug_pub.add('Update_Customer:x_msg_count:'||x_msg_count);
3410: oe_debug_pub.add('Update_Customer :x_msg_data:'||x_msg_data);
3411: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Update_Customer ');
3412: END IF;
3413:
3414: EXCEPTION
3415: WHEN OTHERS THEN
3441: x_deliver_to_cont_index NUMBER;
3442:
3443: x_cust_account_id NUMBER;
3444: x_party_id NUMBER;
3445: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3446: x_customer_id NUMBER;
3447: l_customer_id NUMBER;
3448: l_site_use_id NUMBER;
3449: BEGIN
3450:
3451: x_return_status := FND_API.G_RET_STS_SUCCESS;
3452:
3453: IF l_debug_level > 0 THEN
3454: oe_debug_pub.add('Entering OE_CUSTMER_INFO_PVT.Create_Contact');
3455: END IF;
3456:
3457: l_contact_rec := p_customer_info_tbl(p_customer_rec_index);
3458:
3490: );
3491: END IF;
3492:
3493: IF l_debug_level > 0 THEN
3494: oe_debug_pub.add('Update_Location :x_return_status'||x_return_status);
3495: oe_debug_pub.add('Update_Location :x_msg_count'||x_msg_count);
3496: oe_debug_pub.add('Update_Location :x_msg_data'||x_msg_data);
3497: END IF;
3498:
3491: END IF;
3492:
3493: IF l_debug_level > 0 THEN
3494: oe_debug_pub.add('Update_Location :x_return_status'||x_return_status);
3495: oe_debug_pub.add('Update_Location :x_msg_count'||x_msg_count);
3496: oe_debug_pub.add('Update_Location :x_msg_data'||x_msg_data);
3497: END IF;
3498:
3499: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3492:
3493: IF l_debug_level > 0 THEN
3494: oe_debug_pub.add('Update_Location :x_return_status'||x_return_status);
3495: oe_debug_pub.add('Update_Location :x_msg_count'||x_msg_count);
3496: oe_debug_pub.add('Update_Location :x_msg_data'||x_msg_data);
3497: END IF;
3498:
3499: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3500: oe_msg_pub.transfer_msg_stack;
3597: x_msg_data =>x_msg_data,
3598: x_contact_id =>x_contact_id,
3599: x_contact_name => out_cont_name );
3600: IF l_debug_level > 0 THEN
3601: oe_debug_pub.add('Create Contact x_return_status :'||x_return_status);
3602: oe_debug_pub.add('Create Contact x_msg_data:'||x_msg_data);
3603: oe_debug_pub.add('Create Contact out_cont_id :'||x_contact_id);
3604: oe_debug_pub.add('Create Contact out_cont_name :'||out_cont_name);
3605:
3598: x_contact_id =>x_contact_id,
3599: x_contact_name => out_cont_name );
3600: IF l_debug_level > 0 THEN
3601: oe_debug_pub.add('Create Contact x_return_status :'||x_return_status);
3602: oe_debug_pub.add('Create Contact x_msg_data:'||x_msg_data);
3603: oe_debug_pub.add('Create Contact out_cont_id :'||x_contact_id);
3604: oe_debug_pub.add('Create Contact out_cont_name :'||out_cont_name);
3605:
3606: END IF;
3599: x_contact_name => out_cont_name );
3600: IF l_debug_level > 0 THEN
3601: oe_debug_pub.add('Create Contact x_return_status :'||x_return_status);
3602: oe_debug_pub.add('Create Contact x_msg_data:'||x_msg_data);
3603: oe_debug_pub.add('Create Contact out_cont_id :'||x_contact_id);
3604: oe_debug_pub.add('Create Contact out_cont_name :'||out_cont_name);
3605:
3606: END IF;
3607:
3600: IF l_debug_level > 0 THEN
3601: oe_debug_pub.add('Create Contact x_return_status :'||x_return_status);
3602: oe_debug_pub.add('Create Contact x_msg_data:'||x_msg_data);
3603: oe_debug_pub.add('Create Contact out_cont_id :'||x_contact_id);
3604: oe_debug_pub.add('Create Contact out_cont_name :'||out_cont_name);
3605:
3606: END IF;
3607:
3608: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3625:
3626:
3627:
3628: IF l_debug_level > 0 THEN
3629: oe_debug_pub.add('Exiting OE_CUSTMER_INFO_PVT.Create_Contact');
3630: END IF;
3631:
3632: EXCEPTION
3633: WHEN OTHERS THEN
3642: );
3643: END IF;
3644:
3645: IF l_debug_level > 0 THEN
3646: oe_debug_pub.add('Create_account Other Errors :'||SQLERRM);
3647: END IF;
3648:
3649: END Create_Contact;
3650:
3652:
3653: Function IS_BOTH_ID_VAL_PASSED ( p_customer_rec IN OE_ORDER_PUB.CUSTOMER_INFO_REC_TYPE)
3654: RETURN BOOLEAN
3655: IS
3656: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3657: BEGIN
3658: IF NVL(p_customer_rec.customer_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
3659: IF NVL(p_customer_rec.organization_name,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR
3660: OR NVL(p_customer_rec.account_description,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR
3665: OR NVL(p_customer_rec.person_title,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR
3666: OR NVL(p_customer_rec.person_name_suffix,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR
3667: THEN
3668: IF l_debug_level > 0 THEN
3669: oe_debug_pub.add('Both ID and Value Passed for Customer record');
3670: END IF;
3671: RETURN TRUE;
3672: END IF;
3673: END IF;
3678:
3679: Function IS_BOTH_ID_VAL_PASSED ( p_address_rec IN OE_ORDER_PUB.CUSTOMER_INFO_REC_TYPE)
3680: RETURN BOOLEAN
3681: IS
3682: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3683: BEGIN
3684:
3685: IF NVL(p_address_rec.site_use_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
3686:
3694: OR NVL(p_address_rec.ADDRESS3,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR
3695: OR NVL(p_address_rec.ADDRESS4,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR
3696: THEN
3697: IF l_debug_level > 0 THEN
3698: oe_debug_pub.add('Both ID and Value Passed for address record');
3699: END IF;
3700:
3701: RETURN TRUE;
3702: END IF;
3708:
3709: Function IS_BOTH_ID_VAL_PASSED ( p_contact_rec IN OE_ORDER_PUB.CUSTOMER_INFO_REC_TYPE)
3710: RETURN BOOLEAN
3711: IS
3712: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3713: BEGIN
3714: IF NVL(p_contact_rec.contact_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
3715: IF NVL(p_contact_rec.person_first_name,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR
3716: OR NVL(p_contact_rec.person_middle_name,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR
3718: OR NVL(p_contact_rec.person_title,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR
3719: OR NVL(p_contact_rec.person_name_suffix,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR
3720: THEN
3721: IF l_debug_level > 0 THEN
3722: oe_debug_pub.add('Both ID and Value Passed for Customer record');
3723: END IF;
3724: RETURN TRUE;
3725: END IF;
3726: END IF;
3733: Function check_relation_exists ( p_customer_id IN NUMBER
3734: ,p_rel_customer_id NUMBER ) RETURN BOOLEAN
3735: IS
3736: l_exists VARCHAR2(1);
3737: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3738: BEGIN
3739:
3740: SELECT 'Y' INTO l_exists
3741: FROM HZ_CUST_ACCT_RELATE
3744: AND STATUS='A';
3745:
3746: IF l_exists = 'Y' THEN
3747: IF l_debug_level > 0 THEN
3748: oe_debug_pub.add('Relation ship already exists between these two customers');
3749: END IF;
3750:
3751: RETURN TRUE;
3752: ELSE
3754: END IF;
3755: EXCEPTION
3756: WHEN OTHERS THEN
3757: IF l_debug_level > 0 THEN
3758: oe_debug_pub.add('Relation ship does not exists .Create it');
3759: END IF;
3760:
3761: RETURN FALSE;
3762:
3878: l_person_rec HZ_PARTY_V2PUB.PERSON_REC_TYPE;
3879: l_party_rec HZ_PARTY_V2PUB.PARTY_REC_TYPE;
3880: x_version_number NUMBER;
3881: l_rel_party_id NUMBER;
3882: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3883: BEGIN
3884:
3885: IF l_debug_level > 0 THEN
3886: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Update_Contact ');
3882: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3883: BEGIN
3884:
3885: IF l_debug_level > 0 THEN
3886: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Update_Contact ');
3887: END IF;
3888: begin
3889:
3890: SELECT party.party_id,REL_PARTY.party_id
3988:
3989:
3990:
3991: IF l_debug_level > 0 THEN
3992: oe_debug_pub.add('Update_Contact :x_return_status:'||x_return_status);
3993: oe_debug_pub.add('Update_Contact :x_msg_count:'||x_msg_count);
3994: oe_debug_pub.add('Update_Contact :x_msg_data:'||x_msg_data);
3995: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Update_Contact ');
3996: END IF;
3989:
3990:
3991: IF l_debug_level > 0 THEN
3992: oe_debug_pub.add('Update_Contact :x_return_status:'||x_return_status);
3993: oe_debug_pub.add('Update_Contact :x_msg_count:'||x_msg_count);
3994: oe_debug_pub.add('Update_Contact :x_msg_data:'||x_msg_data);
3995: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Update_Contact ');
3996: END IF;
3997:
3990:
3991: IF l_debug_level > 0 THEN
3992: oe_debug_pub.add('Update_Contact :x_return_status:'||x_return_status);
3993: oe_debug_pub.add('Update_Contact :x_msg_count:'||x_msg_count);
3994: oe_debug_pub.add('Update_Contact :x_msg_data:'||x_msg_data);
3995: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Update_Contact ');
3996: END IF;
3997:
3998: EXCEPTION
3991: IF l_debug_level > 0 THEN
3992: oe_debug_pub.add('Update_Contact :x_return_status:'||x_return_status);
3993: oe_debug_pub.add('Update_Contact :x_msg_count:'||x_msg_count);
3994: oe_debug_pub.add('Update_Contact :x_msg_data:'||x_msg_data);
3995: oe_debug_pub.add('Entering OE_CUSTOMER_INFO_PVT.Update_Contact ');
3996: END IF;
3997:
3998: EXCEPTION
3999: WHEN OTHERS THEN
4007: );
4008: END IF;
4009:
4010: IF l_debug_level > 0 THEN
4011: oe_debug_pub.add('Update_Contact Other Errors :'||SQLERRM);
4012: END IF;
4013:
4014:
4015: END Update_Contact;