DBA Data[Home] [Help]

APPS.PON_VENDORMERGE_GRP dependencies on FND_FILE

Line 131: fnd_file.put_line (fnd_file.log, l_progress|| 'Start : PON_VENDORMERGE_GRP.MERGE_VENDOR ');

127: || ' p_dup_party_site_id ' || p_dup_party_site_id );
128: END IF;
129: END IF; --}
130:
131: fnd_file.put_line (fnd_file.log, l_progress|| 'Start : PON_VENDORMERGE_GRP.MERGE_VENDOR ');
132: fnd_file.put_line (fnd_file.log, l_progress|| ' p_vendor_id ' || p_vendor_id);
133: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_vendor_id ' || p_dup_vendor_id);
134: fnd_file.put_line (fnd_file.log, l_progress|| ' p_vendor_site_id ' || p_vendor_site_id);
135: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_vendor_site_id ' || p_dup_vendor_site_id);

Line 132: fnd_file.put_line (fnd_file.log, l_progress|| ' p_vendor_id ' || p_vendor_id);

128: END IF;
129: END IF; --}
130:
131: fnd_file.put_line (fnd_file.log, l_progress|| 'Start : PON_VENDORMERGE_GRP.MERGE_VENDOR ');
132: fnd_file.put_line (fnd_file.log, l_progress|| ' p_vendor_id ' || p_vendor_id);
133: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_vendor_id ' || p_dup_vendor_id);
134: fnd_file.put_line (fnd_file.log, l_progress|| ' p_vendor_site_id ' || p_vendor_site_id);
135: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_vendor_site_id ' || p_dup_vendor_site_id);
136: fnd_file.put_line (fnd_file.log, l_progress|| ' p_party_id ' || p_party_id);

Line 133: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_vendor_id ' || p_dup_vendor_id);

129: END IF; --}
130:
131: fnd_file.put_line (fnd_file.log, l_progress|| 'Start : PON_VENDORMERGE_GRP.MERGE_VENDOR ');
132: fnd_file.put_line (fnd_file.log, l_progress|| ' p_vendor_id ' || p_vendor_id);
133: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_vendor_id ' || p_dup_vendor_id);
134: fnd_file.put_line (fnd_file.log, l_progress|| ' p_vendor_site_id ' || p_vendor_site_id);
135: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_vendor_site_id ' || p_dup_vendor_site_id);
136: fnd_file.put_line (fnd_file.log, l_progress|| ' p_party_id ' || p_party_id);
137: fnd_file.put_line (fnd_file.log, l_progress|| ' P_dup_party_id ' || P_dup_party_id);

Line 134: fnd_file.put_line (fnd_file.log, l_progress|| ' p_vendor_site_id ' || p_vendor_site_id);

130:
131: fnd_file.put_line (fnd_file.log, l_progress|| 'Start : PON_VENDORMERGE_GRP.MERGE_VENDOR ');
132: fnd_file.put_line (fnd_file.log, l_progress|| ' p_vendor_id ' || p_vendor_id);
133: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_vendor_id ' || p_dup_vendor_id);
134: fnd_file.put_line (fnd_file.log, l_progress|| ' p_vendor_site_id ' || p_vendor_site_id);
135: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_vendor_site_id ' || p_dup_vendor_site_id);
136: fnd_file.put_line (fnd_file.log, l_progress|| ' p_party_id ' || p_party_id);
137: fnd_file.put_line (fnd_file.log, l_progress|| ' P_dup_party_id ' || P_dup_party_id);
138: fnd_file.put_line (fnd_file.log, l_progress|| ' p_party_site_id ' || p_party_site_id);

Line 135: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_vendor_site_id ' || p_dup_vendor_site_id);

131: fnd_file.put_line (fnd_file.log, l_progress|| 'Start : PON_VENDORMERGE_GRP.MERGE_VENDOR ');
132: fnd_file.put_line (fnd_file.log, l_progress|| ' p_vendor_id ' || p_vendor_id);
133: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_vendor_id ' || p_dup_vendor_id);
134: fnd_file.put_line (fnd_file.log, l_progress|| ' p_vendor_site_id ' || p_vendor_site_id);
135: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_vendor_site_id ' || p_dup_vendor_site_id);
136: fnd_file.put_line (fnd_file.log, l_progress|| ' p_party_id ' || p_party_id);
137: fnd_file.put_line (fnd_file.log, l_progress|| ' P_dup_party_id ' || P_dup_party_id);
138: fnd_file.put_line (fnd_file.log, l_progress|| ' p_party_site_id ' || p_party_site_id);
139: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_party_site_id ' || p_dup_party_site_id );

Line 136: fnd_file.put_line (fnd_file.log, l_progress|| ' p_party_id ' || p_party_id);

132: fnd_file.put_line (fnd_file.log, l_progress|| ' p_vendor_id ' || p_vendor_id);
133: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_vendor_id ' || p_dup_vendor_id);
134: fnd_file.put_line (fnd_file.log, l_progress|| ' p_vendor_site_id ' || p_vendor_site_id);
135: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_vendor_site_id ' || p_dup_vendor_site_id);
136: fnd_file.put_line (fnd_file.log, l_progress|| ' p_party_id ' || p_party_id);
137: fnd_file.put_line (fnd_file.log, l_progress|| ' P_dup_party_id ' || P_dup_party_id);
138: fnd_file.put_line (fnd_file.log, l_progress|| ' p_party_site_id ' || p_party_site_id);
139: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_party_site_id ' || p_dup_party_site_id );
140:

Line 137: fnd_file.put_line (fnd_file.log, l_progress|| ' P_dup_party_id ' || P_dup_party_id);

133: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_vendor_id ' || p_dup_vendor_id);
134: fnd_file.put_line (fnd_file.log, l_progress|| ' p_vendor_site_id ' || p_vendor_site_id);
135: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_vendor_site_id ' || p_dup_vendor_site_id);
136: fnd_file.put_line (fnd_file.log, l_progress|| ' p_party_id ' || p_party_id);
137: fnd_file.put_line (fnd_file.log, l_progress|| ' P_dup_party_id ' || P_dup_party_id);
138: fnd_file.put_line (fnd_file.log, l_progress|| ' p_party_site_id ' || p_party_site_id);
139: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_party_site_id ' || p_dup_party_site_id );
140:
141: -- Standard call to check for call compatibility

Line 138: fnd_file.put_line (fnd_file.log, l_progress|| ' p_party_site_id ' || p_party_site_id);

134: fnd_file.put_line (fnd_file.log, l_progress|| ' p_vendor_site_id ' || p_vendor_site_id);
135: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_vendor_site_id ' || p_dup_vendor_site_id);
136: fnd_file.put_line (fnd_file.log, l_progress|| ' p_party_id ' || p_party_id);
137: fnd_file.put_line (fnd_file.log, l_progress|| ' P_dup_party_id ' || P_dup_party_id);
138: fnd_file.put_line (fnd_file.log, l_progress|| ' p_party_site_id ' || p_party_site_id);
139: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_party_site_id ' || p_dup_party_site_id );
140:
141: -- Standard call to check for call compatibility
142:

Line 139: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_party_site_id ' || p_dup_party_site_id );

135: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_vendor_site_id ' || p_dup_vendor_site_id);
136: fnd_file.put_line (fnd_file.log, l_progress|| ' p_party_id ' || p_party_id);
137: fnd_file.put_line (fnd_file.log, l_progress|| ' P_dup_party_id ' || P_dup_party_id);
138: fnd_file.put_line (fnd_file.log, l_progress|| ' p_party_site_id ' || p_party_site_id);
139: fnd_file.put_line (fnd_file.log, l_progress|| ' p_dup_party_site_id ' || p_dup_party_site_id );
140:
141: -- Standard call to check for call compatibility
142:
143: IF (NOT FND_API.Compatible_API_Call(l_api_version,p_api_version,g_api_name,g_pkg_name)) THEN

Line 148: fnd_file.put_line (fnd_file.log, l_progress|| 'Done compatibility Check ....');

144: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
145: END IF;
146:
147: l_progress := 101;
148: fnd_file.put_line (fnd_file.log, l_progress|| 'Done compatibility Check ....');
149:
150: -- Check p_init_msg_list
151: IF FND_API.to_Boolean(p_init_msg_list) THEN
152: FND_MSG_PUB.initialize;

Line 156: fnd_file.put_line (fnd_file.log, l_progress|| 'Done FND_MSG_PUB.initialize ');

152: FND_MSG_PUB.initialize;
153: END IF;
154:
155: l_progress := 102;
156: fnd_file.put_line (fnd_file.log, l_progress|| 'Done FND_MSG_PUB.initialize ');
157:
158: -- Initialize API return status to success
159: p_return_status := FND_API.G_RET_STS_SUCCESS;
160:

Line 171: fnd_file.put_line (fnd_file.log, l_progress|| 'Done party_id check....');

167: END IF; --}
168:
169:
170: l_progress := 103;
171: fnd_file.put_line (fnd_file.log, l_progress|| 'Done party_id check....');
172:
173: -- Raise an Exception if l_dup_party_id = null or l_dup_party_id = -1
174:
175: IF ( p_dup_party_id = null OR p_dup_party_id = null -1) THEN --{

Line 181: fnd_file.put_line (fnd_file.log, l_progress|| 'Done dup_party_id check....');

177: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
178: END IF; --}
179:
180: l_progress := 104;
181: fnd_file.put_line (fnd_file.log, l_progress|| 'Done dup_party_id check....');
182:
183: /*
184: We have Following scenario to deal with Merge routine.
185:

Line 275: fnd_file.put_line (fnd_file.log, l_progress|| ' Done GET_MERGE_TO_VENDOR_INFO ');

271: x_trading_partner_name => x_trading_partner_name,
272: x_vendor_site_code => x_vendor_site_code);
273:
274: l_progress := 105;
275: fnd_file.put_line (fnd_file.log, l_progress|| ' Done GET_MERGE_TO_VENDOR_INFO ');
276:
277: --{
278: IF (p_vendor_id = p_dup_vendor_id and p_vendor_site_id <> p_dup_vendor_site_id) THEN
279: BEGIN --{

Line 281: fnd_file.put_line (fnd_file.log, l_progress|| ' Merge Site From Same Suppliers ');

277: --{
278: IF (p_vendor_id = p_dup_vendor_id and p_vendor_site_id <> p_dup_vendor_site_id) THEN
279: BEGIN --{
280: l_progress := 106;
281: fnd_file.put_line (fnd_file.log, l_progress|| ' Merge Site From Same Suppliers ');
282: /* Case 1*/
283:
284: MERGE_SAME_VENDOR_DIFF_SITES(p_vendor_id => p_vendor_id,
285: p_vendor_site_id => p_vendor_site_id,

Line 301: fnd_file.put_line (fnd_file.log, l_progress|| 'AFter getting active site count '||l_num_active_sites);

297:
298: l_num_active_sites := GET_ACTIVE_SITE_COUNT(p_dup_vendor_id, p_dup_vendor_site_id);
299:
300: l_progress := 108;
301: fnd_file.put_line (fnd_file.log, l_progress|| 'AFter getting active site count '||l_num_active_sites);
302:
303: IF (l_num_active_sites > 0) THEN
304: /* Case 2b*/
305: fnd_file.put_line (fnd_file.log, l_progress|| ' Merge diff Suppliers - Not last Site');

Line 305: fnd_file.put_line (fnd_file.log, l_progress|| ' Merge diff Suppliers - Not last Site');

301: fnd_file.put_line (fnd_file.log, l_progress|| 'AFter getting active site count '||l_num_active_sites);
302:
303: IF (l_num_active_sites > 0) THEN
304: /* Case 2b*/
305: fnd_file.put_line (fnd_file.log, l_progress|| ' Merge diff Suppliers - Not last Site');
306:
307: MERGE_DIFF_VENDOR_AND_SITE(p_trading_partner_id => p_party_id,
308: p_dup_trading_partner_id => p_dup_party_id,
309: p_vendor_id => p_vendor_id,

Line 319: fnd_file.put_line (fnd_file.log, l_progress|| 'After MERGE_DIFF_VENDOR_AND_SITE');

315: x_return_status => p_return_status,
316: x_msg_count => p_msg_count,
317: x_msg_data => p_msg_data);
318: l_progress := 109;
319: fnd_file.put_line (fnd_file.log, l_progress|| 'After MERGE_DIFF_VENDOR_AND_SITE');
320: ELSE
321: /* Case 2a*/
322:
323: fnd_file.put_line (fnd_file.log, l_progress|| ' Merge diff Suppliers - Merge last Site');

Line 323: fnd_file.put_line (fnd_file.log, l_progress|| ' Merge diff Suppliers - Merge last Site');

319: fnd_file.put_line (fnd_file.log, l_progress|| 'After MERGE_DIFF_VENDOR_AND_SITE');
320: ELSE
321: /* Case 2a*/
322:
323: fnd_file.put_line (fnd_file.log, l_progress|| ' Merge diff Suppliers - Merge last Site');
324:
325: MERGE_DIFF_VENDOR_LAST_SITE(p_trading_partner_id => p_party_id,
326: p_dup_trading_partner_id => p_dup_party_id,
327: p_vendor_id => p_vendor_id,

Line 337: fnd_file.put_line (fnd_file.log, l_progress|| 'After Merge diff Suppliers - Merge last Site');

333: x_return_status => p_return_status,
334: x_msg_count => p_msg_count,
335: x_msg_data => p_msg_data);
336: l_progress := 110;
337: fnd_file.put_line (fnd_file.log, l_progress|| 'After Merge diff Suppliers - Merge last Site');
338: END IF;
339:
340: /*
341: After the merge there can be cases where this table

Line 354: fnd_file.put_line (fnd_file.log, l_progress|| 'After UPDATE_SUPPLIER_ACTIVITY ...');

350: x_msg_count => p_msg_count,
351: x_msg_data => p_msg_data);
352:
353: l_progress := 111;
354: fnd_file.put_line (fnd_file.log, l_progress|| 'After UPDATE_SUPPLIER_ACTIVITY ...');
355:
356: EXCEPTION WHEN OTHERS THEN
357: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
358: l_progress := 000;

Line 360: fnd_file.put_line (fnd_file.log, l_progress|| 'In Exception ...'||' SQLERRM = ' || SQLERRM);

356: EXCEPTION WHEN OTHERS THEN
357: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
358: l_progress := 000;
359:
360: fnd_file.put_line (fnd_file.log, l_progress|| 'In Exception ...'||' SQLERRM = ' || SQLERRM);
361: fnd_file.put_line (fnd_file.log, l_progress|| 'In Exception ...'||' SQLCODE = '|| SQLCODE);
362:
363: IF (G_FND_DEBUG = 'Y') THEN
364: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 361: fnd_file.put_line (fnd_file.log, l_progress|| 'In Exception ...'||' SQLCODE = '|| SQLCODE);

357: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
358: l_progress := 000;
359:
360: fnd_file.put_line (fnd_file.log, l_progress|| 'In Exception ...'||' SQLERRM = ' || SQLERRM);
361: fnd_file.put_line (fnd_file.log, l_progress|| 'In Exception ...'||' SQLCODE = '|| SQLCODE);
362:
363: IF (G_FND_DEBUG = 'Y') THEN
364: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
365: FND_LOG.STRING(log_level => FND_LOG.LEVEL_EXCEPTION,

Line 387: fnd_file.put_line (fnd_file.log, l_progress|| ' Before PON_CONTERMS_UTL_PVT.updateDelivOnVendorMerge call.... ');

383: END IF;
384: --}
385:
386: l_progress := 112;
387: fnd_file.put_line (fnd_file.log, l_progress|| ' Before PON_CONTERMS_UTL_PVT.updateDelivOnVendorMerge call.... ');
388:
389: -- if there are any conterms and if
390: -- contracts is installed, then merge the
391: -- deliverables for these 2 vendors

Line 403: fnd_file.put_line (fnd_file.log, l_progress|| ' After PON_CONTERMS_UTL_PVT.updateDelivOnVendorMerge call.... ');

399: p_return_status);
400:
401: l_progress := 112;
402:
403: fnd_file.put_line (fnd_file.log, l_progress|| ' After PON_CONTERMS_UTL_PVT.updateDelivOnVendorMerge call.... ');
404: fnd_file.put_line (fnd_file.log, l_progress|| 'End of PON_VENDORMERGE_GRP.MERGE_VENDOR ');
405:
406: EXCEPTION WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
407: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 404: fnd_file.put_line (fnd_file.log, l_progress|| 'End of PON_VENDORMERGE_GRP.MERGE_VENDOR ');

400:
401: l_progress := 112;
402:
403: fnd_file.put_line (fnd_file.log, l_progress|| ' After PON_CONTERMS_UTL_PVT.updateDelivOnVendorMerge call.... ');
404: fnd_file.put_line (fnd_file.log, l_progress|| 'End of PON_VENDORMERGE_GRP.MERGE_VENDOR ');
405:
406: EXCEPTION WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
407: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
408: l_progress := 1000;

Line 409: fnd_file.put_line (fnd_file.log, l_progress|| 'In Exception ...'||' SQLERRM = ' || SQLERRM);

405:
406: EXCEPTION WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
407: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
408: l_progress := 1000;
409: fnd_file.put_line (fnd_file.log, l_progress|| 'In Exception ...'||' SQLERRM = ' || SQLERRM);
410: fnd_file.put_line (fnd_file.log, l_progress|| 'In Exception ...'||' SQLCODE = '|| SQLCODE);
411:
412: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,
413: p_data => p_msg_data);

Line 410: fnd_file.put_line (fnd_file.log, l_progress|| 'In Exception ...'||' SQLCODE = '|| SQLCODE);

406: EXCEPTION WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
407: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
408: l_progress := 1000;
409: fnd_file.put_line (fnd_file.log, l_progress|| 'In Exception ...'||' SQLERRM = ' || SQLERRM);
410: fnd_file.put_line (fnd_file.log, l_progress|| 'In Exception ...'||' SQLCODE = '|| SQLCODE);
411:
412: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,
413: p_data => p_msg_data);
414: WHEN OTHERS THEN

Line 481: fnd_file.put_line (fnd_file.log, 'In Exception - GET_MERGE_TO_VENDOR_INFO ...'||' SQLERRM = ' || SQLERRM);

477:
478: EXCEPTION WHEN NO_DATA_FOUND THEN
479: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
480:
481: fnd_file.put_line (fnd_file.log, 'In Exception - GET_MERGE_TO_VENDOR_INFO ...'||' SQLERRM = ' || SQLERRM);
482: fnd_file.put_line (fnd_file.log, 'In Exception - GET_MERGE_TO_VENDOR_INFO ...'||' SQLCODE = '|| SQLCODE);
483:
484: IF (G_FND_DEBUG = 'Y') THEN
485: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 482: fnd_file.put_line (fnd_file.log, 'In Exception - GET_MERGE_TO_VENDOR_INFO ...'||' SQLCODE = '|| SQLCODE);

478: EXCEPTION WHEN NO_DATA_FOUND THEN
479: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
480:
481: fnd_file.put_line (fnd_file.log, 'In Exception - GET_MERGE_TO_VENDOR_INFO ...'||' SQLERRM = ' || SQLERRM);
482: fnd_file.put_line (fnd_file.log, 'In Exception - GET_MERGE_TO_VENDOR_INFO ...'||' SQLCODE = '|| SQLCODE);
483:
484: IF (G_FND_DEBUG = 'Y') THEN
485: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
486: FND_LOG.STRING(log_level => FND_LOG.LEVEL_EXCEPTION,

Line 531: fnd_file.put_line (fnd_file.log, l_progress|| 'Start : MERGE_SAME_VENDOR_DIFF_SITES');

527: 4. pon_pf_supplier_formula
528: */
529:
530: l_progress := 301;
531: fnd_file.put_line (fnd_file.log, l_progress|| 'Start : MERGE_SAME_VENDOR_DIFF_SITES');
532:
533: /* Bug 4948321 : FTS for pon_bid_headers due to vendorId comparision.
534: - Retrieve trading_partner_id from ap_suppliers and use that
535: in update query for pon_bid_headers.

Line 559: fnd_file.put_line (fnd_file.log, l_progress|| 'Done : pon_bid_headers');

555: AND pbh2.trading_partner_id = pbh1.trading_partner_id
556: AND pbh2.vendor_site_id = p_vendor_site_id);
557:
558: l_progress := 302;
559: fnd_file.put_line (fnd_file.log, l_progress|| 'Done : pon_bid_headers');
560:
561: -- Bug 5100555
562: -- This is done to update site code for reusable invitation list
563: -- putting separate query to take care of duplication of supplier

Line 597: fnd_file.put_line (fnd_file.log, l_progress|| 'Done : pon_bidding_parties');

593: AND decode(pbp2.vendor_site_code,'-1',p_vendor_site_code,pbp2.vendor_site_code) = p_vendor_site_code
594: AND decode(pbp2.vendor_site_id,-1, p_vendor_site_id,pbp2.vendor_site_id) = p_vendor_site_id);
595:
596: l_progress := 303;
597: fnd_file.put_line (fnd_file.log, l_progress|| 'Done : pon_bidding_parties');
598:
599: UPDATE pon_party_line_exclusions pple1
600: SET pple1.vendor_site_id = p_vendor_site_id,
601: pple1.last_updated_by = -1,

Line 612: fnd_file.put_line (fnd_file.log, l_progress|| 'Done : pon_party_line_exclusions');

608: AND pple2.trading_partner_id = pple1.trading_partner_id
609: AND pple2.vendor_site_id = p_vendor_site_id);
610:
611: l_progress := 304;
612: fnd_file.put_line (fnd_file.log, l_progress|| 'Done : pon_party_line_exclusions');
613:
614: UPDATE pon_pf_supplier_formula ppsf1
615: SET ppsf1.vendor_site_id = p_vendor_site_id
616: WHERE ppsf1.vendor_site_id = p_dup_vendor_site_id

Line 624: fnd_file.put_line (fnd_file.log, l_progress|| 'Done : pon_pf_supplier_formula');

620: AND ppsf2.trading_partner_id = ppsf1.trading_partner_id
621: AND ppsf2.vendor_site_id = p_vendor_site_id);
622:
623: l_progress := 305;
624: fnd_file.put_line (fnd_file.log, l_progress|| 'Done : pon_pf_supplier_formula');
625:
626: EXCEPTION WHEN NO_DATA_FOUND THEN
627: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
628:

Line 629: fnd_file.put_line (fnd_file.log, l_progress || 'In Exception - MERGE_SAME_VENDOR_DIFF_SITES...'||' SQLERRM = ' || SQLERRM);

625:
626: EXCEPTION WHEN NO_DATA_FOUND THEN
627: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
628:
629: fnd_file.put_line (fnd_file.log, l_progress || 'In Exception - MERGE_SAME_VENDOR_DIFF_SITES...'||' SQLERRM = ' || SQLERRM);
630: fnd_file.put_line (fnd_file.log, l_progress || 'In Exception - MERGE_SAME_VENDOR_DIFF_SITES...'||' SQLCODE = '|| SQLCODE);
631:
632: IF (G_FND_DEBUG = 'Y') THEN
633: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 630: fnd_file.put_line (fnd_file.log, l_progress || 'In Exception - MERGE_SAME_VENDOR_DIFF_SITES...'||' SQLCODE = '|| SQLCODE);

626: EXCEPTION WHEN NO_DATA_FOUND THEN
627: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
628:
629: fnd_file.put_line (fnd_file.log, l_progress || 'In Exception - MERGE_SAME_VENDOR_DIFF_SITES...'||' SQLERRM = ' || SQLERRM);
630: fnd_file.put_line (fnd_file.log, l_progress || 'In Exception - MERGE_SAME_VENDOR_DIFF_SITES...'||' SQLCODE = '|| SQLCODE);
631:
632: IF (G_FND_DEBUG = 'Y') THEN
633: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
634: FND_LOG.STRING(log_level => FND_LOG.LEVEL_EXCEPTION,

Line 681: fnd_file.put_line (fnd_file.log, l_progress|| ' Start : MERGE_DIFF_VENDOR_AND_SITE');

677: 5. pon_pf_supplier_formula
678: */
679:
680: l_progress := 500;
681: fnd_file.put_line (fnd_file.log, l_progress|| ' Start : MERGE_DIFF_VENDOR_AND_SITE');
682:
683: UPDATE pon_bid_item_prices pbip1
684: SET pbip1.bid_trading_partner_id = p_trading_partner_id,
685: pbip1.last_updated_by = -1,

Line 703: fnd_file.put_line (fnd_file.log, l_progress|| ' Done: pon_bid_item_prices ');

699: AND pbh2.trading_partner_contact_id = pbh1.trading_partner_contact_id)
700: );
701:
702: l_progress := 501;
703: fnd_file.put_line (fnd_file.log, l_progress|| ' Done: pon_bid_item_prices ');
704:
705: UPDATE pon_bid_headers pbh1
706: SET pbh1.trading_partner_id = p_trading_partner_id,
707: pbh1.trading_partner_name = p_trading_partner_name,

Line 725: fnd_file.put_line (fnd_file.log, l_progress|| ' Done: pon_bid_headers');

721: AND pbh2.trading_partner_id = p_trading_partner_id
722: AND pbh2.trading_partner_contact_id = pbh1.trading_partner_contact_id);
723:
724: l_progress := 502;
725: fnd_file.put_line (fnd_file.log, l_progress|| ' Done: pon_bid_headers');
726:
727: -- Bug 5100555
728: -- This is done to update site code for reusable invitation list
729: -- putting separate query to take care of duplication of supplier

Line 767: fnd_file.put_line (fnd_file.log, l_progress|| ' Done: pon_bidding_parties');

763: AND pbp2.trading_partner_id = p_trading_partner_id
764: AND decode(pbp2.vendor_site_id,-1, p_vendor_site_id,pbp2.vendor_site_id) = p_vendor_site_id);
765:
766: l_progress := 503;
767: fnd_file.put_line (fnd_file.log, l_progress|| ' Done: pon_bidding_parties');
768:
769: UPDATE pon_party_line_exclusions pple1
770: SET pple1.trading_partner_id = p_trading_partner_id,
771: pple1.vendor_site_id = p_vendor_site_id,

Line 783: fnd_file.put_line (fnd_file.log, l_progress|| ' Done: pon_party_line_exclusions');

779: AND pple2.trading_partner_id = p_trading_partner_id
780: AND pple2.vendor_site_id =p_vendor_site_id);
781:
782: l_progress := 505;
783: fnd_file.put_line (fnd_file.log, l_progress|| ' Done: pon_party_line_exclusions');
784:
785: UPDATE pon_pf_supplier_formula ppsf1
786: SET ppsf1.trading_partner_id = p_trading_partner_id,
787: ppsf1.vendor_site_id = p_vendor_site_id,

Line 798: fnd_file.put_line (fnd_file.log, l_progress|| ' Done: pon_pf_supplier_formula');

794: WHERE ppsf2.auction_header_id = ppsf1.auction_header_id
795: AND ppsf2.trading_partner_id = p_trading_partner_id
796: AND ppsf2.vendor_site_id = p_vendor_site_id);
797: l_progress := 506;
798: fnd_file.put_line (fnd_file.log, l_progress|| ' Done: pon_pf_supplier_formula');
799:
800: EXCEPTION WHEN NO_DATA_FOUND THEN
801: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
802:

Line 803: fnd_file.put_line (fnd_file.log, l_progress || 'In Exception - MERGE_DIFF_VENDOR_AND_SITE...'||' SQLERRM = ' || SQLERRM);

799:
800: EXCEPTION WHEN NO_DATA_FOUND THEN
801: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
802:
803: fnd_file.put_line (fnd_file.log, l_progress || 'In Exception - MERGE_DIFF_VENDOR_AND_SITE...'||' SQLERRM = ' || SQLERRM);
804: fnd_file.put_line (fnd_file.log, l_progress || 'In Exception - MERGE_DIFF_VENDOR_AND_SITE...'||' SQLCODE = '|| SQLCODE);
805:
806: IF (G_FND_DEBUG = 'Y') THEN
807: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 804: fnd_file.put_line (fnd_file.log, l_progress || 'In Exception - MERGE_DIFF_VENDOR_AND_SITE...'||' SQLCODE = '|| SQLCODE);

800: EXCEPTION WHEN NO_DATA_FOUND THEN
801: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
802:
803: fnd_file.put_line (fnd_file.log, l_progress || 'In Exception - MERGE_DIFF_VENDOR_AND_SITE...'||' SQLERRM = ' || SQLERRM);
804: fnd_file.put_line (fnd_file.log, l_progress || 'In Exception - MERGE_DIFF_VENDOR_AND_SITE...'||' SQLCODE = '|| SQLCODE);
805:
806: IF (G_FND_DEBUG = 'Y') THEN
807: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
808: FND_LOG.STRING(log_level => FND_LOG.LEVEL_EXCEPTION,

Line 861: fnd_file.put_line (fnd_file.log, l_progress|| 'Start : MERGE_DIFF_VENDOR_LAST_SITE ');

857: 11. pon_acknowledgements
858: */
859:
860: l_progress := 701;
861: fnd_file.put_line (fnd_file.log, l_progress|| 'Start : MERGE_DIFF_VENDOR_LAST_SITE ');
862:
863: UPDATE pon_bid_item_prices pbip1
864: SET pbip1.bid_trading_partner_id = p_trading_partner_id,
865: pbip1.last_updated_by = -1,

Line 884: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_bid_item_prices ');

880: );
881:
882:
883: l_progress := 702;
884: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_bid_item_prices ');
885:
886: UPDATE pon_acknowledgements
887: SET trading_partner_id = p_trading_partner_id,
888: last_updated_by = -1,

Line 894: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_acknowledgements');

890: WHERE trading_partner_id = p_dup_trading_partner_id ;
891:
892:
893: l_progress := 703;
894: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_acknowledgements');
895:
896: UPDATE pon_bid_headers pbh1
897: SET pbh1.trading_partner_id = p_trading_partner_id,
898: pbh1.trading_partner_name = p_trading_partner_name,

Line 917: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_bid_headers');

913: AND pbh2.trading_partner_id = p_trading_partner_id
914: AND pbh2.trading_partner_contact_id = pbh1.trading_partner_contact_id);
915:
916: l_progress := 704;
917: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_bid_headers');
918:
919: SELECT pvs.vendor_site_code
920: INTO l_dup_vendor_site_code
921: FROM po_vendors pv, po_vendor_sites_all pvs

Line 954: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_bidding_parties');

950: AND decode(pbp2.vendor_site_code,'-1',p_vendor_site_code,pbp2.vendor_site_code) = p_vendor_site_code
951: AND pbp2.vendor_site_id = decode(pbp1.vendor_site_id,-1,-1,p_vendor_site_id));
952:
953: l_progress := 705;
954: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_bidding_parties');
955:
956: UPDATE pon_party_line_exclusions pple1
957: SET pple1.trading_partner_id = p_trading_partner_id,
958: pple1.vendor_site_id = decode(pple1.vendor_site_id,-1,-1,p_vendor_site_id)

Line 968: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_party_line_exclusions');

964: AND pple2.trading_partner_id = p_trading_partner_id
965: AND pple2.vendor_site_id =decode(pple2.vendor_site_id,-1,-1,p_vendor_site_id));
966:
967: l_progress := 707;
968: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_party_line_exclusions');
969:
970: UPDATE pon_pf_supplier_formula ppsf1
971: SET ppsf1.trading_partner_id = p_trading_partner_id,
972: ppsf1.vendor_site_id = decode(ppsf1.vendor_site_id,-1,-1,p_vendor_site_id),

Line 984: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_pf_supplier_formula');

980: AND ppsf2.trading_partner_id = p_trading_partner_id
981: AND ppsf2.vendor_site_id = decode(ppsf1.vendor_site_id,-1,-1,p_vendor_site_id));
982:
983: l_progress := 708;
984: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_pf_supplier_formula');
985:
986: /*
987: We are comparing w.r.t AUCTION_HEADER_ID_ORIG_AMEND becuase
988: the UK is definied on this field.

Line 1002: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_supplier_access');

998: WHERE psa2.auction_header_id_orig_amend = psa1.auction_header_id_orig_amend
999: AND psa2.supplier_trading_partner_id = p_trading_partner_id);
1000:
1001: l_progress := 709;
1002: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_supplier_access');
1003:
1004: /*
1005: We are comparing w.r.t AUCTION_HEADER_ID_ORIG_AMEND becuase
1006: the UK is definied on this field.

Line 1022: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_supplier_activities');

1018: AND psa2.last_activity_time = psa1.last_activity_time
1019: AND psa2.trading_partner_id = p_trading_partner_id);
1020:
1021: l_progress := 709;
1022: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_supplier_activities');
1023:
1024: /* Who columns are not in update as we don't have it on table */
1025:
1026: UPDATE pon_threads pt

Line 1031: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_threads');

1027: SET pt.owner_party_id = p_trading_partner_id
1028: WHERE pt.owner_party_id = p_dup_trading_partner_id;
1029:
1030: l_progress := 710;
1031: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_threads');
1032:
1033: /* Who columns are not in update as we don't have it on table */
1034:
1035: UPDATE pon_thread_entries pte

Line 1043: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_thread_entries');

1039: WHERE pte.vendor_id = p_dup_vendor_id
1040: AND pte.from_company_id = p_dup_trading_partner_id;
1041:
1042: l_progress := 711;
1043: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_thread_entries');
1044:
1045: /* Who columns are not in update as we don't have it on table */
1046:
1047: UPDATE pon_te_recipients ptr

Line 1053: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_te_recipients');

1049: ptr.to_company_name = p_trading_partner_name
1050: WHERE ptr.to_company_id = p_dup_trading_partner_id;
1051:
1052: l_progress := 712;
1053: fnd_file.put_line (fnd_file.log, l_progress|| 'Done pon_te_recipients');
1054:
1055:
1056: EXCEPTION WHEN NO_DATA_FOUND THEN
1057: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1059: fnd_file.put_line (fnd_file.log, l_progress|| 'In exception - MERGE_DIFF_VENDOR_LAST_SITE SQLERRM '||SQLERRM);

1055:
1056: EXCEPTION WHEN NO_DATA_FOUND THEN
1057: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1058:
1059: fnd_file.put_line (fnd_file.log, l_progress|| 'In exception - MERGE_DIFF_VENDOR_LAST_SITE SQLERRM '||SQLERRM);
1060: fnd_file.put_line (fnd_file.log, l_progress|| 'In exception - MERGE_DIFF_VENDOR_LAST_SITE SQLCODE'||SQLCODE);
1061:
1062: IF (G_FND_DEBUG = 'Y') THEN
1063: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1060: fnd_file.put_line (fnd_file.log, l_progress|| 'In exception - MERGE_DIFF_VENDOR_LAST_SITE SQLCODE'||SQLCODE);

1056: EXCEPTION WHEN NO_DATA_FOUND THEN
1057: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1058:
1059: fnd_file.put_line (fnd_file.log, l_progress|| 'In exception - MERGE_DIFF_VENDOR_LAST_SITE SQLERRM '||SQLERRM);
1060: fnd_file.put_line (fnd_file.log, l_progress|| 'In exception - MERGE_DIFF_VENDOR_LAST_SITE SQLCODE'||SQLCODE);
1061:
1062: IF (G_FND_DEBUG = 'Y') THEN
1063: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1064: FND_LOG.STRING(log_level => FND_LOG.LEVEL_EXCEPTION,

Line 1156: fnd_file.put_line (fnd_file.log, 'In exception - UPDATE_SUPPLIER_ACTIVITY SQLERRM '||SQLERRM);

1152:
1153: EXCEPTION WHEN NO_DATA_FOUND THEN
1154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1155:
1156: fnd_file.put_line (fnd_file.log, 'In exception - UPDATE_SUPPLIER_ACTIVITY SQLERRM '||SQLERRM);
1157: fnd_file.put_line (fnd_file.log, 'In exception - UPDATE_SUPPLIER_ACTIVITY SQLCODE'||SQLCODE);
1158:
1159: IF (G_FND_DEBUG = 'Y') THEN
1160: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1157: fnd_file.put_line (fnd_file.log, 'In exception - UPDATE_SUPPLIER_ACTIVITY SQLCODE'||SQLCODE);

1153: EXCEPTION WHEN NO_DATA_FOUND THEN
1154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1155:
1156: fnd_file.put_line (fnd_file.log, 'In exception - UPDATE_SUPPLIER_ACTIVITY SQLERRM '||SQLERRM);
1157: fnd_file.put_line (fnd_file.log, 'In exception - UPDATE_SUPPLIER_ACTIVITY SQLCODE'||SQLCODE);
1158:
1159: IF (G_FND_DEBUG = 'Y') THEN
1160: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1161: FND_LOG.STRING(log_level => FND_LOG.LEVEL_EXCEPTION,