[Home] [Help]
72: where address_id = p_address_id
73: and customer_id is not null;
74: --
75: begin
76: hr_utility.set_location('Entering:'||l_proc, 5);
77: --
78: if p_customer_id is not null then
79: --
80: hr_utility.set_location('Entering:'||l_proc, 15);
76: hr_utility.set_location('Entering:'||l_proc, 5);
77: --
78: if p_customer_id is not null then
79: --
80: hr_utility.set_location('Entering:'||l_proc, 15);
81: open c_booking_deals;
82: fetch c_booking_deals into l_exists;
83: if c_booking_deals%found then
84: close c_booking_deals;
88: fnd_message.raise_error;
89: end if;
90: close c_booking_deals;
91: --
92: hr_utility.set_location('Entering:'||l_proc, 20);
93: open c_delegate_bookings1;
94: fetch c_delegate_bookings1 into l_exists;
95: if c_delegate_bookings1%found then
96: close c_delegate_bookings1;
100: fnd_message.raise_error;
101: end if;
102: close c_delegate_bookings1;
103: --
104: hr_utility.set_location('Entering:'||l_proc, 25);
105: open c_delegate_bookings2;
106: fetch c_delegate_bookings2 into l_exists;
107: if c_delegate_bookings2%found then
108: close c_delegate_bookings2;
112: fnd_message.raise_error;
113: end if;
114: close c_delegate_bookings2;
115: --
116: hr_utility.set_location('Entering:'||l_proc, 30);
117: open c_event_associations;
118: fetch c_event_associations into l_exists;
119: if c_event_associations%found then
120: close c_event_associations;
124: fnd_message.raise_error;
125: end if;
126: close c_event_associations;
127: --
128: hr_utility.set_location('Entering:'||l_proc, 35);
129: open c_finance_headers1;
130: fetch c_finance_headers1 into l_exists;
131: if c_finance_headers1%found then
132: close c_finance_headers1;
138: close c_finance_headers1;
139: --
140: elsif p_contact_id is not null then
141: --
142: hr_utility.set_location('Entering:'||l_proc, 40);
143: open c_delegate_bookings3;
144: fetch c_delegate_bookings3 into l_exists;
145: if c_delegate_bookings3%found then
146: close c_delegate_bookings3;
150: fnd_message.raise_error;
151: end if;
152: close c_delegate_bookings3;
153: --
154: hr_utility.set_location('Entering:'||l_proc, 45);
155: open c_delegate_bookings4;
156: fetch c_delegate_bookings4 into l_exists;
157: if c_delegate_bookings4%found then
158: close c_delegate_bookings4;
162: fnd_message.raise_error;
163: end if;
164: close c_delegate_bookings4;
165: --
166: hr_utility.set_location('Entering:'||l_proc, 50);
167: open c_delegate_bookings5;
168: fetch c_delegate_bookings5 into l_exists;
169: if c_delegate_bookings5%found then
170: close c_delegate_bookings5;
174: fnd_message.raise_error;
175: end if;
176: close c_delegate_bookings5;
177: --
178: hr_utility.set_location('Entering:'||l_proc, 55);
179: open c_finance_headers2;
180: fetch c_finance_headers2 into l_exists;
181: if c_finance_headers2%found then
182: close c_finance_headers2;
188: close c_finance_headers2;
189: --
190: elsif p_address_id is not null then
191: --
192: hr_utility.set_location('Entering:'||l_proc, 60);
193: open c_delegate_bookings6;
194: fetch c_delegate_bookings6 into l_exists;
195: if c_delegate_bookings6%found then
196: close c_delegate_bookings6;
200: fnd_message.raise_error;
201: end if;
202: close c_delegate_bookings6;
203: --
204: hr_utility.set_location('Entering:'||l_proc, 65);
205: open c_delegate_bookings7;
206: fetch c_delegate_bookings7 into l_exists;
207: if c_delegate_bookings7%found then
208: close c_delegate_bookings7;
212: fnd_message.raise_error;
213: end if;
214: close c_delegate_bookings7;
215: --
216: hr_utility.set_location('Entering:'||l_proc, 70);
217: open c_finance_headers3;
218: fetch c_finance_headers3 into l_exists;
219: if c_finance_headers3%found then
220: close c_finance_headers3;
226: close c_finance_headers3;
227: --
228: end if;
229: --
230: hr_utility.set_location(' Leaving:'||l_proc, 75);
231: end;
232: --
233: end ota_ar_delete;