3495: Delete
3496: From oe_customer_info_iface_all a
3497: Where customer_info_ref = p_header_customer_rec.Orig_Sys_Customer_Ref
3498: And customer_info_ref Not In (Select Orig_Sys_Customer_Ref
3499: From Oe_Headers_Iface_All b
3500: Where b.Orig_Sys_Customer_Ref = a.customer_info_ref);
3501: End If;
3502:
3503: If p_header_customer_rec.Sold_To_Contact_Ref IS NOT NULL Then
3507: Where customer_info_ref = (Select Parent_Customer_Ref from oe_customer_info_iface_all
3508: where customer_info_ref = p_header_customer_rec.Sold_To_Contact_Ref
3509: and customer_info_type_code = 'CONTACT')
3510: And customer_info_ref Not In (Select Orig_Sys_Customer_Ref
3511: From Oe_Headers_Iface_All b
3512: Where b.Orig_Sys_Customer_Ref = a.customer_info_ref);
3513:
3514: Delete
3515: From oe_customer_info_iface_all a
3514: Delete
3515: From oe_customer_info_iface_all a
3516: Where customer_info_ref = p_header_customer_rec.Sold_To_Contact_Ref
3517: And customer_info_ref Not In (Select Sold_To_Contact_Ref
3518: From Oe_Headers_Iface_All b
3519: Where b.Sold_To_Contact_Ref = a.customer_info_ref);
3520: End If;
3521:
3522: If p_header_customer_rec.Orig_Ship_Address_Ref IS NOT NULL Then
3527: Where customer_info_ref = (Select Parent_Customer_Ref from oe_customer_info_iface_all
3528: where customer_info_ref = p_header_customer_rec.Orig_Ship_Address_Ref
3529: and customer_info_type_code = 'ADDRESS' )
3530: And customer_info_ref Not In (Select Orig_Sys_Customer_Ref
3531: From Oe_Headers_Iface_All b
3532: Where b.Orig_Sys_Customer_Ref = a.customer_info_ref);
3533:
3534: Delete
3535: From oe_customer_info_iface_all a
3534: Delete
3535: From oe_customer_info_iface_all a
3536: Where customer_info_ref = p_header_customer_rec.Orig_Ship_Address_Ref
3537: And customer_info_ref Not In ((Select Orig_Ship_Address_Ref
3538: From Oe_Headers_Iface_All b
3539: Where b.Orig_Ship_Address_Ref = a.customer_info_ref)
3540: UNION ALL
3541: (Select Orig_Ship_Address_Ref
3542: From Oe_Lines_Iface_All c
3551: Where customer_info_ref = (Select Parent_Customer_Ref from oe_customer_info_iface_all
3552: where customer_info_ref = p_header_customer_rec.Orig_Bill_Address_Ref
3553: and customer_info_type_code = 'ADDRESS')
3554: And customer_info_ref Not In (Select Orig_Sys_Customer_Ref
3555: From Oe_Headers_Iface_All b
3556: Where b.Orig_Sys_Customer_Ref = a.customer_info_ref);
3557:
3558:
3559:
3560: Delete
3561: From oe_customer_info_iface_all a
3562: Where customer_info_ref = p_header_customer_rec.Orig_Bill_Address_Ref
3563: And customer_info_ref Not In ((Select Orig_Bill_Address_Ref
3564: From Oe_Headers_Iface_All b
3565: Where b.Orig_Bill_Address_Ref = a.customer_info_ref)
3566: UNION ALL
3567: (Select Orig_Bill_Address_Ref
3568: From Oe_Lines_Iface_All c
3577: Where customer_info_ref = (Select Parent_Customer_Ref from oe_customer_info_iface_all
3578: where customer_info_ref = p_header_customer_rec.Orig_Deliver_Address_Ref
3579: and customer_info_type_code = 'ADDRESS')
3580: And customer_info_ref Not In (Select Orig_Sys_Customer_Ref
3581: From Oe_Headers_Iface_All b
3582: Where b.Orig_Sys_Customer_Ref = a.customer_info_ref);
3583:
3584: Delete
3585: From oe_customer_info_iface_all a
3584: Delete
3585: From oe_customer_info_iface_all a
3586: Where customer_info_ref = p_header_customer_rec.Orig_Deliver_Address_Ref
3587: And customer_info_ref Not In ((Select Orig_Deliver_Address_Ref
3588: From Oe_Headers_Iface_All b
3589: Where b.Orig_Deliver_Address_Ref = a.customer_info_ref)
3590: UNION ALL
3591: (Select Orig_Deliver_Address_Ref
3592: From Oe_Lines_Iface_All c
3600: Where customer_info_ref = (Select Parent_Customer_Ref from oe_customer_info_iface_all
3601: where customer_info_ref = p_header_customer_rec.Ship_To_Contact_Ref
3602: and customer_info_type_code = 'CONTACT')
3603: And customer_info_ref Not In (Select Orig_Sys_Customer_Ref
3604: From Oe_Headers_Iface_All b
3605: Where b.Orig_Sys_Customer_Ref = a.customer_info_ref);
3606:
3607:
3608:
3609: Delete
3610: From oe_customer_info_iface_all a
3611: Where customer_info_ref = p_header_customer_rec.Ship_To_Contact_Ref
3612: And customer_info_ref Not In ((Select Ship_To_Contact_Ref
3613: From Oe_Headers_Iface_All b
3614: Where b.Ship_To_Contact_Ref = a.customer_info_ref)
3615: UNION ALL
3616: (Select Ship_To_Contact_Ref
3617: From Oe_Lines_Iface_All c
3625: Where customer_info_ref = (Select Parent_Customer_Ref from oe_customer_info_iface_all
3626: where customer_info_ref = p_header_customer_rec.Bill_To_Contact_Ref
3627: and customer_info_type_code = 'CONTACT')
3628: And customer_info_ref Not In (Select Orig_Sys_Customer_Ref
3629: From Oe_Headers_Iface_All b
3630: Where b.Orig_Sys_Customer_Ref = a.customer_info_ref);
3631:
3632:
3633: Delete
3633: Delete
3634: From oe_customer_info_iface_all a
3635: Where customer_info_ref = p_header_customer_rec.Bill_To_Contact_Ref
3636: And customer_info_ref Not In ((Select Bill_To_Contact_Ref
3637: From Oe_Headers_Iface_All b
3638: Where b.Bill_To_Contact_Ref = a.customer_info_ref)
3639: UNION ALL
3640: (Select Bill_To_Contact_Ref
3641: From Oe_Lines_Iface_All c
3650: Where customer_info_ref = (Select Parent_Customer_Ref from oe_customer_info_iface_all
3651: where customer_info_ref = p_header_customer_rec.Deliver_To_Contact_Ref
3652: and customer_info_type_code = 'CONTACT')
3653: And customer_info_ref Not In (Select Orig_Sys_Customer_Ref
3654: From Oe_Headers_Iface_All b
3655: Where b.Orig_Sys_Customer_Ref = a.customer_info_ref);
3656:
3657:
3658: Delete
3658: Delete
3659: From oe_customer_info_iface_all a
3660: Where customer_info_ref = p_header_customer_rec.Deliver_To_Contact_Ref
3661: And customer_info_ref Not In ((Select Deliver_To_Contact_Ref
3662: From Oe_Headers_Iface_All b
3663: Where b.Deliver_To_Contact_Ref = a.customer_info_ref)
3664: UNION ALL
3665: (Select Deliver_To_Contact_Ref
3666: From Oe_Lines_Iface_All c
3675: Where customer_info_ref = (Select Parent_Customer_Ref from oe_customer_info_iface_all
3676: where customer_info_ref = p_line_customer_tbl(i).Orig_Ship_Address_Ref
3677: and customer_info_type_code = 'ADDRESS' )
3678: And customer_info_ref Not In (Select Orig_Sys_Customer_Ref
3679: From Oe_Headers_Iface_All b
3680: Where b.Orig_Sys_Customer_Ref = a.customer_info_ref);
3681:
3682:
3683: Delete
3687: From Oe_Lines_Iface_All b
3688: Where b.Orig_Ship_Address_Ref = a.customer_info_ref)
3689: UNION ALL
3690: (Select Orig_Ship_Address_Ref
3691: From Oe_Headers_Iface_All c
3692: Where c.Orig_Ship_Address_Ref = a.customer_info_ref));
3693: End If;
3694:
3695: If p_line_customer_tbl(i).Orig_Bill_Address_Ref IS NOT NULL Then
3699: Where customer_info_ref = (Select Parent_Customer_Ref from oe_customer_info_iface_all
3700: where customer_info_ref = p_line_customer_tbl(i).Orig_Bill_Address_Ref
3701: and customer_info_type_code = 'ADDRESS' )
3702: And customer_info_ref Not In (Select Orig_Sys_Customer_Ref
3703: From Oe_Headers_Iface_All b
3704: Where b.Orig_Sys_Customer_Ref = a.customer_info_ref);
3705:
3706:
3707: Delete
3711: From Oe_Lines_Iface_All b
3712: Where b.Orig_Bill_Address_Ref = a.customer_info_ref)
3713: UNION ALL
3714: (Select Orig_Bill_Address_Ref
3715: From Oe_Headers_Iface_All c
3716: Where c.Orig_Bill_Address_Ref = a.customer_info_ref));
3717: End If;
3718:
3719: If p_line_customer_tbl(i).Orig_Deliver_Address_Ref IS NOT NULL Then
3723: Where customer_info_ref = (Select Parent_Customer_Ref from oe_customer_info_iface_all
3724: where customer_info_ref = p_line_customer_tbl(i).Orig_Deliver_Address_Ref
3725: and customer_info_type_code = 'ADDRESS')
3726: And customer_info_ref Not In (Select Orig_Sys_Customer_Ref
3727: From Oe_Headers_Iface_All b
3728: Where b.Orig_Sys_Customer_Ref = a.customer_info_ref);
3729:
3730:
3731: Delete
3735: From Oe_Lines_Iface_All b
3736: Where b.Orig_Deliver_Address_Ref = a.customer_info_ref)
3737: UNION ALL
3738: (Select Orig_Deliver_Address_Ref
3739: From Oe_Headers_Iface_All c
3740: Where c.Orig_Deliver_Address_Ref = a.customer_info_ref));
3741: End If;
3742:
3743: If p_line_customer_tbl(i).Ship_To_Contact_Ref IS NOT NULL Then
3748: Where customer_info_ref = (Select Parent_Customer_Ref from oe_customer_info_iface_all
3749: where customer_info_ref = p_line_customer_tbl(i).Ship_To_Contact_Ref
3750: and customer_info_type_code = 'CONTACT')
3751: And customer_info_ref Not In (Select Orig_Sys_Customer_Ref
3752: From Oe_Headers_Iface_All b
3753: Where b.Orig_Sys_Customer_Ref = a.customer_info_ref);
3754:
3755:
3756: Delete
3760: From Oe_Lines_Iface_All b
3761: Where b.Ship_To_Contact_Ref = a.customer_info_ref)
3762: UNION ALL
3763: (Select Ship_To_Contact_Ref
3764: From Oe_Headers_Iface_All c
3765: Where c.Ship_To_Contact_Ref = a.customer_info_ref));
3766: End If;
3767:
3768: If p_line_customer_tbl(i).Bill_To_Contact_Ref IS NOT NULL Then
3773: Where customer_info_ref = (Select Parent_Customer_Ref from oe_customer_info_iface_all
3774: where customer_info_ref = p_line_customer_tbl(i).Bill_To_Contact_Ref
3775: and customer_info_type_code = 'CONTACT')
3776: And customer_info_ref Not In (Select Orig_Sys_Customer_Ref
3777: From Oe_Headers_Iface_All b
3778: Where b.Orig_Sys_Customer_Ref = a.customer_info_ref);
3779:
3780:
3781: Delete
3785: From Oe_Lines_Iface_All b
3786: Where b.Bill_To_Contact_Ref = a.customer_info_ref)
3787: UNION ALL
3788: (Select Bill_To_Contact_Ref
3789: From Oe_Headers_Iface_All c
3790: Where c.Bill_To_Contact_Ref = a.customer_info_ref));
3791: End If;
3792:
3793: If p_line_customer_tbl(i).Deliver_To_Contact_Ref IS NOT NULL Then
3797: Where customer_info_ref = (Select Parent_Customer_Ref from oe_customer_info_iface_all
3798: where customer_info_ref = p_line_customer_tbl(i).Deliver_To_Contact_Ref
3799: and customer_info_type_code = 'CONTACT')
3800: And customer_info_ref Not In (Select Orig_Sys_Customer_Ref
3801: From Oe_Headers_Iface_All b
3802: Where b.Orig_Sys_Customer_Ref = a.customer_info_ref);
3803:
3804:
3805:
3810: From Oe_Lines_Iface_All b
3811: Where b.Deliver_To_Contact_Ref = a.customer_info_ref)
3812: UNION ALL
3813: (Select Deliver_To_Contact_Ref
3814: From Oe_Headers_Iface_All c
3815: Where c.Deliver_To_Contact_Ref = a.customer_info_ref));
3816: End If;
3817:
3818: End Loop;