DBA Data[Home] [Help]

APPS.CSC_PARTY_MERGE_PKG dependencies on FND_FILE

Line 16: -- -- Replaced calls to arp_message with fnd_file.put_line

12: -- History
13: -- MM-DD-YYYY NAME MODIFICATIONS
14: -- 10-10-2000 dejoseph Created.
15: -- 10-25-2001 dejoseph Made the following corrections:
16: -- -- Replaced calls to arp_message with fnd_file.put_line
17: -- -- Removed logic to stop merge for CSC_CUSTOMERS
18: -- -- Added logic for CSC_CUSTOMERS to handle cases where
19: -- only the From or To party exists in the table.
20: -- -- Does not return an error status for any reason. Instead

Line 113: fnd_file.put_line(fnd_file.log, g_mesg);

109:
110: BEGIN
111:
112: g_mesg := 'CSC_PARTY_MERGE_PKG.CSC_CUSTOMERS_MERGE';
113: fnd_file.put_line(fnd_file.log, g_mesg);
114:
115: x_return_status := CSC_CORE_UTILS_PVT.G_RET_STS_SUCCESS;
116:
117: if (g_merge_reason_code is null) then

Line 136: fnd_file.put_line(fnd_file.log, g_mesg);

132: -- needs to be done. Set Merged To Id is same as Merged From Id and return
133: if p_from_fk_id = p_to_fk_id then
134: x_to_id := p_from_id;
135: g_mesg := 'To and From Parties are the same. Merge not required.';
136: fnd_file.put_line(fnd_file.log, g_mesg);
137: return;
138: end if;
139:
140: -- Please ignore the following comments. Parties in CSC_CUSTOMERS will be

Line 168: fnd_file.put_line(fnd_file.log, g_mesg);

164:
165: if ( get_from_pty%NOTFOUND ) then
166: close get_from_pty;
167: g_mesg := 'From party not defined in CSC_CUSTOMERS. Merge not required.';
168: fnd_file.put_line(fnd_file.log, g_mesg);
169: return;
170: end if;
171:
172: close get_from_pty;

Line 218: fnd_file.put_line(fnd_file.log, g_mesg);

214: exception
215: when others then
216: g_mesg := substr('To party does not exist; The following SQL error occured : '
217: || sqlerrm,1,1000);
218: fnd_file.put_line(fnd_file.log, g_mesg);
219: return;
220: end;
221: end if;
222:

Line 280: fnd_file.put_line(fnd_file.log, g_mesg);

276: when resource_busy then
277: -- x_return_status := CSC_CORE_UTILS_PVT.G_RET_STS_ERROR;
278: g_mesg := 'Could not obtain lock for records in table CSC_CUSTOMERS. Please '
279: || 'retry the Merge operation later.';
280: fnd_file.put_line(fnd_file.log, g_mesg);
281: --arp_message.set_line(g_proc_name || '.' || l_api_name ||
282: --'; Could not obtain lock for records in table ' ||
283: --'CSC_CUSTOMERS for party_id = ' || p_from_fk_id );
284: raise;

Line 289: fnd_file.put_line(fnd_file.log, g_mesg);

285:
286: when others then
287: -- x_return_status := CSC_CORE_UTILS_PVT.G_RET_STS_ERROR;
288: g_mesg := substr(g_proc_name || '.' || l_api_name || ' : ' || sqlerrm,1,1000);
289: fnd_file.put_line(fnd_file.log, g_mesg);
290: --arp_message.set_line(g_proc_name || '.' || l_api_name || ': ' || sqlerrm);
291: raise;
292: end;
293: end if;

Line 298: fnd_file.put_line(fnd_file.log, g_mesg);

294: /***
295: ELSE
296: x_return_status := CSC_CORE_UTILS_PVT.G_RET_STS_ERROR;
297: g_mesg := 'Merge not allowed. Please check criticality of merging parties';
298: fnd_file.put_line(fnd_file.log, g_mesg);
299: --arp_message.set_line(g_proc_name || '.' || l_api_name ||
300: --'; Merge not allowed. Please check criticality of merging parties');
301: return;
302: END IF;

Line 307: fnd_file.put_line(fnd_file.log, g_mesg);

303: ***/
304: EXCEPTION
305: WHEN OTHERS THEN
306: g_mesg := substr(g_proc_name || '.' || l_api_name || ' : ' || sqlerrm,1,1000);
307: fnd_file.put_line(fnd_file.log, g_mesg);
308: raise;
309:
310: END CSC_CUSTOMERS_MERGE;
311:

Line 348: fnd_file.put_line(fnd_file.log, g_mesg);

344:
345: BEGIN
346: --arp_message.set_line('CSC_PARTY_MERGE_PKG.CSC_CUST_PLANS_MERGE()+');
347: g_mesg := 'CSC_PARTY_MERGE_PKG.CSC_CUST_PLANS_MERGE';
348: fnd_file.put_line(fnd_file.log, g_mesg);
349:
350: x_return_status := CSC_CORE_UTILS_PVT.G_RET_STS_SUCCESS;
351:
352: if (g_merge_reason_code is null) then

Line 372: fnd_file.put_line(fnd_file.log, g_mesg);

368:
369: if p_from_fk_id = p_to_fk_id then
370: x_to_id := p_from_id;
371: g_mesg := 'To and From Parties are the same. Merge not required.';
372: fnd_file.put_line(fnd_file.log, g_mesg);
373: return;
374: end if;
375:
376: -- If the parent has changed(id. Parent is getting merged) then transfer the

Line 500: fnd_file.put_line(fnd_file.log, g_mesg);

496:
497: l_count := l_count+sql%rowcount;
498:
499: g_mesg := 'Number of CSC_CUST_PLANS records transferred = ' || to_char(l_count) ;
500: fnd_file.put_line(fnd_file.log, g_mesg);
501:
502: --arp_message.set_line('Number of CSC_CUST_PLANS records transferred = ' ||
503: --to_char(sql%rowcount) );
504:

Line 509: fnd_file.put_line(fnd_file.log, g_mesg);

505:
506: if ( ( l_count > 0 ) AND (audit_count > 0) ) then
507: g_mesg := 'Number of CSC_CUST_PLANS_AUDIT records inserted coresponding to the '
508: || 'CSC_CUST_PLANS records transferred = ' || to_char(audit_count) ;
509: fnd_file.put_line(fnd_file.log, g_mesg);
510: end if;
511:
512: -- if ( l_count > 0 ) then
513: -- insert into csc_cust_plans_audit (

Line 533: -- fnd_file.put_line(fnd_file.log, g_mesg);

529: -- where party_id = p_to_fk_id );
530:
531: -- g_mesg := 'Number of CSC_CUST_PLANS_AUDIT records inserted coresponding to the '
532: -- || 'CSC_CUST_PLANS records transferred = ' || to_char(sql%rowcount) ;
533: -- fnd_file.put_line(fnd_file.log, g_mesg);
534:
535: --arp_message.set_line('Number of CSC_CUST_PLANS_AUDIT records inserted ' ||
536: --'coresponding to the CSC_CUST_PLANS records ' ||
537: --'transferred = ' || to_char(sql%rowcount) );

Line 562: fnd_file.put_line(fnd_file.log, g_mesg);

558:
559: l_count := sql%rowcount;
560:
561: g_mesg := 'Number of CSC_CUST_PLANS records merged = ' || to_char(l_count) ;
562: fnd_file.put_line(fnd_file.log, g_mesg);
563:
564: --arp_message.set_line('Number of CSC_CUST_PLANS records merged = ' ||
565: --to_char(sql%rowcount) );
566:

Line 589: fnd_file.put_line(fnd_file.log, g_mesg);

585: where party_id = p_to_fk_id );
586:
587: g_mesg := 'Number of CSC_CUST_PLANS_AUDIT records inserted coresponding to the '
588: || 'CSC_CUST_PLANS records merged = ' || to_char(sql%rowcount) ;
589: fnd_file.put_line(fnd_file.log, g_mesg);
590: --arp_message.set_line('Number of CSC_CUST_PLANS_AUDIT records inserted ' ||
591: --'coresponding to the CSC_CUST_PLANS records ' ||
592: --'merged = ' || to_char(sql%rowcount) );
593: end if;

Line 602: fnd_file.put_line(fnd_file.log, g_mesg);

598: -- x_return_status := CSC_CORE_UTILS_PVT.G_RET_STS_ERROR;
599: g_mesg := substr(g_proc_name || '.' || l_api_name || '; Could not obtain lock for '
600: || 'records in table CSC_CUST_PLANS for party_id = ' || p_from_fk_id
601: || sqlerrm, 1, 1000);
602: fnd_file.put_line(fnd_file.log, g_mesg);
603:
604: --arp_message.set_line(g_proc_name || '.' || l_api_name ||
605: --'; Could not obtain lock for records in table ' ||
606: --'CSC_CUST_PLANS for party_id = ' || p_from_fk_id );

Line 612: fnd_file.put_line(fnd_file.log, g_mesg);

608:
609: when OTHERS then
610: --x_return_status := CSC_CORE_UTILS_PVT.G_RET_STS_UNEXP_ERROR;
611: g_mesg := substr(g_proc_name || '.' || l_api_name || ': ' || sqlerrm,1,1000);
612: fnd_file.put_line(fnd_file.log, g_mesg);
613:
614: --arp_message.set_line(g_proc_name || '.' || l_api_name || ': ' || sqlerrm);
615: raise;
616:

Line 654: fnd_file.put_line(fnd_file.log, g_mesg);

650:
651: BEGIN
652: --arp_message.set_line('CSC_PARTY_MERGE_PKG.CSC_CUSTOMIZED_PLANS_MERGE()+');
653: g_mesg := 'CSC_PARTY_MERGE_PKG.CSC_CUSTOMIZED_PLANS_MERGE';
654: fnd_file.put_line(fnd_file.log, g_mesg);
655:
656: x_return_status := CSC_CORE_UTILS_PVT.G_RET_STS_SUCCESS;
657:
658: if (g_merge_reason_code is null) then

Line 678: fnd_file.put_line(fnd_file.log, g_mesg);

674:
675: if p_from_fk_id = p_to_fk_id then
676: x_to_id := p_from_id;
677: g_mesg := 'To and From Parties are the same. Merge not required.';
678: fnd_file.put_line(fnd_file.log, g_mesg);
679: return;
680: end if;
681:
682: -- If the parent has changed(id. Parent is getting merged) then transfer the

Line 713: fnd_file.put_line(fnd_file.log, g_mesg);

709:
710: l_count := sql%rowcount;
711:
712: g_mesg := 'Number of CSC_CUSTOMIZED_PLANS records transferred = ' || to_char(l_count) ;
713: fnd_file.put_line(fnd_file.log, g_mesg);
714:
715: --arp_message.set_line('Number of CSC_CUSTOMIZED_PLANS records transferred = ' ||
716: --to_char(sql%rowcount) );
717:

Line 733: fnd_file.put_line(fnd_file.log, g_mesg);

729:
730: l_count := sql%rowcount;
731:
732: g_mesg := 'Number of CSC_CUSTOMIZED_PLANS records deleted = ' || to_char(l_count);
733: fnd_file.put_line(fnd_file.log, g_mesg);
734:
735: --arp_message.set_line('Number of CSC_CUSTOMIZED_PLANS records deleted = ' ||
736: --to_char(sql%rowcount) );
737:

Line 746: fnd_file.put_line(fnd_file.log, g_mesg);

742: -- x_return_status := CSC_CORE_UTILS_PVT.G_RET_STS_ERROR;
743: g_mesg := g_proc_name || '.' || l_api_name || '; Could not obtain lock for '
744: || 'records in table CSC_CUSTOMIZED_PLANS for party_id = '
745: || p_from_fk_id;
746: fnd_file.put_line(fnd_file.log, g_mesg);
747:
748: --arp_message.set_line(g_proc_name || '.' || l_api_name ||
749: --'; Could not obtain lock for records in table ' ||
750: --'CSC_CUSTOMIZED_PLANS for party_id = ' || p_from_fk_id );

Line 756: fnd_file.put_line(fnd_file.log, g_mesg);

752:
753: when OTHERS then
754: -- x_return_status := CSC_CORE_UTILS_PVT.G_RET_STS_UNEXP_ERROR;
755: g_mesg := substr( g_proc_name || '.' || l_api_name || ': ' || sqlerrm, 1, 1000 );
756: fnd_file.put_line(fnd_file.log, g_mesg);
757: -- arp_message.set_line(g_proc_name || '.' || l_api_name || ': ' || sqlerrm);
758: raise;
759:
760: END CSC_CUSTOMIZED_PLANS_MERGE;