DBA Data[Home] [Help]

APPS.CSI_ML_CREATE_PUB dependencies on FND_FILE

Line 87: FND_File.Put_Line(Fnd_File.LOG,'Number of Loops: '||to_char(x_count));

83: AND parallel_worker_id is NULL
84: AND source_system_name = nvl(p_source_system_name,source_system_name);
85:
86: IF(l_debug_level>1) THEN
87: FND_File.Put_Line(Fnd_File.LOG,'Number of Loops: '||to_char(x_count));
88: end if;
89:
90: FOR l_count in 1 .. x_count LOOP
91:

Line 212: FND_File.Put_Line(Fnd_File.LOG,'Updating Status of Inst Children '||

208: l_tbl_count := 0;
209: l_tbl_count := l_instance_tbl.count;
210: l_ext_tbl_count := l_ext_attrib_tbl.count;
211: IF(l_debug_level>1) THEN
212: FND_File.Put_Line(Fnd_File.LOG,'Updating Status of Inst Children '||
213: l_tbl_count);
214: FND_File.Put_Line(Fnd_File.LOG,'Ext Attr Status Recs '||l_ext_tbl_count);
215: FND_File.Put_Line(Fnd_File.LOG,'Before Loop to set Child Status: '||
216: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));

Line 214: FND_File.Put_Line(Fnd_File.LOG,'Ext Attr Status Recs '||l_ext_tbl_count);

210: l_ext_tbl_count := l_ext_attrib_tbl.count;
211: IF(l_debug_level>1) THEN
212: FND_File.Put_Line(Fnd_File.LOG,'Updating Status of Inst Children '||
213: l_tbl_count);
214: FND_File.Put_Line(Fnd_File.LOG,'Ext Attr Status Recs '||l_ext_tbl_count);
215: FND_File.Put_Line(Fnd_File.LOG,'Before Loop to set Child Status: '||
216: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
217: END IF;
218:

Line 215: FND_File.Put_Line(Fnd_File.LOG,'Before Loop to set Child Status: '||

211: IF(l_debug_level>1) THEN
212: FND_File.Put_Line(Fnd_File.LOG,'Updating Status of Inst Children '||
213: l_tbl_count);
214: FND_File.Put_Line(Fnd_File.LOG,'Ext Attr Status Recs '||l_ext_tbl_count);
215: FND_File.Put_Line(Fnd_File.LOG,'Before Loop to set Child Status: '||
216: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
217: END IF;
218:
219: j := 1;

Line 221: FND_File.Put_Line(Fnd_File.LOG,'After Loop to set Child Status: '||

217: END IF;
218:
219: j := 1;
220: IF(l_debug_level>1) THEN
221: FND_File.Put_Line(Fnd_File.LOG,'After Loop to set Child Status: '||
222: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
223: END IF;
224: COMMIT;
225: END LOOP; -- End of For Loop

Line 234: FND_File.Put_Line(Fnd_File.LOG,'After Log Errors: '||

230: l_return_status,
231: l_error_message);
232:
233: IF(l_debug_level>1) THEN
234: FND_File.Put_Line(Fnd_File.LOG,'After Log Errors: '||
235: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
236: END IF;
237:
238: COMMIT;

Line 243: FND_File.Put_Line(Fnd_File.LOG,'Resolve IDs Errored out...');

239:
240: EXCEPTION
241: WHEN RESOLVE_ERROR THEN
242: IF(l_debug_level>1) THEN
243: FND_File.Put_Line(Fnd_File.LOG,'Resolve IDs Errored out...');
244: FND_File.Put_Line(Fnd_File.LOG,l_error_message);
245: END IF;
246: x_return_status := l_fnd_error;
247: x_msg_data := l_error_message;

Line 244: FND_File.Put_Line(Fnd_File.LOG,l_error_message);

240: EXCEPTION
241: WHEN RESOLVE_ERROR THEN
242: IF(l_debug_level>1) THEN
243: FND_File.Put_Line(Fnd_File.LOG,'Resolve IDs Errored out...');
244: FND_File.Put_Line(Fnd_File.LOG,l_error_message);
245: END IF;
246: x_return_status := l_fnd_error;
247: x_msg_data := l_error_message;
248: WHEN fnd_api.g_exc_error THEN

Line 251: FND_File.Put_Line(Fnd_File.LOG,'In EXPECTED Exception in:'||l_api_name);

247: x_msg_data := l_error_message;
248: WHEN fnd_api.g_exc_error THEN
249: ROLLBACK to create_instances;
250: IF(l_debug_level>1) THEN
251: FND_File.Put_Line(Fnd_File.LOG,'In EXPECTED Exception in:'||l_api_name);
252: FND_File.Put_Line(Fnd_File.LOG,l_error_message);
253: END IF;
254: x_return_status := l_fnd_error;
255: x_msg_data := l_error_message;

Line 252: FND_File.Put_Line(Fnd_File.LOG,l_error_message);

248: WHEN fnd_api.g_exc_error THEN
249: ROLLBACK to create_instances;
250: IF(l_debug_level>1) THEN
251: FND_File.Put_Line(Fnd_File.LOG,'In EXPECTED Exception in:'||l_api_name);
252: FND_File.Put_Line(Fnd_File.LOG,l_error_message);
253: END IF;
254: x_return_status := l_fnd_error;
255: x_msg_data := l_error_message;
256:

Line 260: FND_File.Put_Line(Fnd_File.LOG,'In WHEN OTHERS Exception in:'||l_api_name);

256:
257: WHEN others THEN
258: ROLLBACK to create_instances;
259: IF(l_debug_level>1) THEN
260: FND_File.Put_Line(Fnd_File.LOG,'In WHEN OTHERS Exception in:'||l_api_name);
261: END IF;
262: l_sql_error := SQLERRM;
263: fnd_message.set_name('CSI','CSI_ML_UNEXP_SQL_ERROR');
264: fnd_message.set_token('API_NAME',l_api_name);

Line 267: FND_File.Put_Line(Fnd_File.LOG,x_msg_data);

263: fnd_message.set_name('CSI','CSI_ML_UNEXP_SQL_ERROR');
264: fnd_message.set_token('API_NAME',l_api_name);
265: fnd_message.set_token('SQL_ERROR',SQLERRM);
266: x_msg_data := fnd_message.get;
267: FND_File.Put_Line(Fnd_File.LOG,x_msg_data);
268: x_return_status := l_fnd_unexpected;
269:
270: END create_instances;
271:

Line 338: FND_File.Put_Line(Fnd_File.LOG,'Start Time of Pub: '||

334:
335: BEGIN
336:
337: IF(l_debug_level>1) THEN
338: FND_File.Put_Line(Fnd_File.LOG,'Start Time of Pub: '||
339: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
340: END IF;
341: x_return_status := l_fnd_success;
342:

Line 350: FND_File.Put_Line(Fnd_File.LOG,'After Commit Profile: '||

346: SELECT nvl(FND_PROFILE.VALUE('CSI_OPEN_INTERFACE_COMMIT_RECS'),1000)
347: INTO l_commit_recs
348: FROM dual;
349:
350: FND_File.Put_Line(Fnd_File.LOG,'After Commit Profile: '||
351: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
352:
353: l_txn_from_date := to_date(p_txn_from_date, 'YYYY/MM/DD HH24:MI:SS');
354: l_txn_to_date := to_date(p_txn_to_date, 'YYYY/MM/DD HH24:MI:SS');

Line 369: FND_File.Put_Line(Fnd_File.LOG,'After Fiqure out Loops: '||

365: AND source_system_name = nvl(p_source_system_name,source_system_name)
366: AND parallel_worker_id = p_worker_id;
367:
368: IF(l_debug_level>1) THEN
369: FND_File.Put_Line(Fnd_File.LOG,'After Fiqure out Loops: '||
370: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
371: FND_File.Put_Line(Fnd_File.LOG,'Number of Loops: '||to_char(x_count));
372: END IF;
373:

Line 371: FND_File.Put_Line(Fnd_File.LOG,'Number of Loops: '||to_char(x_count));

367:
368: IF(l_debug_level>1) THEN
369: FND_File.Put_Line(Fnd_File.LOG,'After Fiqure out Loops: '||
370: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
371: FND_File.Put_Line(Fnd_File.LOG,'Number of Loops: '||to_char(x_count));
372: END IF;
373:
374: SAVEPOINT OUTER_LOOP_CR_PARALLEL_INST;
375:

Line 402: FND_File.Put_Line(Fnd_File.LOG,'After setting INST IFACE to X: '||

398: AND rownum <= l_commit_recs;
399:
400: IF(l_debug_level>1) THEN
401:
402: FND_File.Put_Line(Fnd_File.LOG,'After setting INST IFACE to X: '||
403: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
404: END IF;
405:
406: l_inst_id_tbl.delete;

Line 416: FND_File.Put_Line(Fnd_File.LOG,'After ID PL/SQL Table Create: '||

412:
413: COMMIT;
414:
415: IF(l_debug_level>1) THEN
416: FND_File.Put_Line(Fnd_File.LOG,'After ID PL/SQL Table Create: '||
417: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
418: END IF;
419:
420: l_tbl_count := 0;

Line 423: FND_File.Put_Line(Fnd_File.LOG,'Records Found: '||l_tbl_count);

419:
420: l_tbl_count := 0;
421: l_tbl_count := l_inst_id_tbl.count;
422: IF(l_debug_level>1) THEN
423: FND_File.Put_Line(Fnd_File.LOG,'Records Found: '||l_tbl_count);
424: FND_File.Put_Line(Fnd_File.LOG,'After Looping Child Tables: '||
425: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
426:
427: -- Resolve all ID fields from Descriptive Fields

Line 424: FND_File.Put_Line(Fnd_File.LOG,'After Looping Child Tables: '||

420: l_tbl_count := 0;
421: l_tbl_count := l_inst_id_tbl.count;
422: IF(l_debug_level>1) THEN
423: FND_File.Put_Line(Fnd_File.LOG,'Records Found: '||l_tbl_count);
424: FND_File.Put_Line(Fnd_File.LOG,'After Looping Child Tables: '||
425: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
426:
427: -- Resolve all ID fields from Descriptive Fields
428: FND_File.Put_Line(Fnd_File.LOG,'Before Resolve IDs: '||

Line 428: FND_File.Put_Line(Fnd_File.LOG,'Before Resolve IDs: '||

424: FND_File.Put_Line(Fnd_File.LOG,'After Looping Child Tables: '||
425: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
426:
427: -- Resolve all ID fields from Descriptive Fields
428: FND_File.Put_Line(Fnd_File.LOG,'Before Resolve IDs: '||
429: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
430: END IF;
431: IF l_tbl_count>0 -- Added
432: THEN

Line 441: FND_File.Put_Line(Fnd_File.LOG,'After Resolve IDs: '||

437: p_worker_id,
438: l_return_status,
439: l_error_message);
440: IF(l_debug_level>1) THEN
441: FND_File.Put_Line(Fnd_File.LOG,'After Resolve IDs: '||
442: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
443: END IF;
444:
445: IF NOT l_return_status = l_fnd_success THEN

Line 452: FND_File.Put_Line(Fnd_File.LOG,'Before PL/SQL Table Create: '||

448: END IF;
449:
450: -- After getting IDs now create PL/SQL Tables
451: IF(l_debug_level>1) THEN
452: FND_File.Put_Line(Fnd_File.LOG,'Before PL/SQL Table Create: '||
453: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
454: END IF;
455:
456: SAVEPOINT create_parallel_instances;

Line 475: FND_File.Put_Line(Fnd_File.LOG,'After PL/SQL Table Create: '||

471: l_asset_assignment_tbl,
472: l_return_status,
473: l_error_message);
474: IF(l_debug_level>1) THEN
475: FND_File.Put_Line(Fnd_File.LOG,'After PL/SQL Table Create: '||
476: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
477: END IF;
478:
479: IF NOT l_return_status = l_fnd_success THEN

Line 484: FND_File.Put_Line(Fnd_File.LOG,'Before Contact Loop: '||

480: RAISE fnd_api.g_exc_error;
481: END IF;
482:
483: IF(l_debug_level>1) THEN
484: FND_File.Put_Line(Fnd_File.LOG,'Before Contact Loop: '||
485: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
486:
487: -- commented the following unnecessary code
488: /*

Line 504: FND_File.Put_Line(Fnd_File.LOG,'After Contact Loop: '||

500: END LOOP;
501: END LOOP;
502: END IF;
503: */
504: FND_File.Put_Line(Fnd_File.LOG,'After Contact Loop: '||
505: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
506:
507: FND_File.Put_Line(Fnd_File.LOG,'Before GRP API: '||
508: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));

Line 507: FND_File.Put_Line(Fnd_File.LOG,'Before GRP API: '||

503: */
504: FND_File.Put_Line(Fnd_File.LOG,'After Contact Loop: '||
505: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
506:
507: FND_File.Put_Line(Fnd_File.LOG,'Before GRP API: '||
508: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
509: END IF;
510: csi_item_instance_grp.create_item_instance
511: (p_api_version => l_api_version,

Line 542: FND_File.Put_Line(Fnd_File.LOG,'After GRP API: '||

538: END LOOP;
539: RAISE fnd_api.g_exc_error;
540: END IF;
541: IF(l_debug_level>1) THEN
542: FND_File.Put_Line(Fnd_File.LOG,'After GRP API: '||
543: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
544: END IF;
545: l_tbl_count := 0;
546: l_tbl_count := l_instance_tbl.count;

Line 549: FND_File.Put_Line(Fnd_File.LOG,'Updating Status of Inst Children '||

545: l_tbl_count := 0;
546: l_tbl_count := l_instance_tbl.count;
547: l_ext_tbl_count := l_ext_attrib_tbl.count;
548: IF(l_debug_level>1) THEN
549: FND_File.Put_Line(Fnd_File.LOG,'Updating Status of Inst Children '||
550: l_tbl_count);
551: FND_File.Put_Line(Fnd_File.LOG,'Ext Attr Status Recs '||l_ext_tbl_count);
552: FND_File.Put_Line(Fnd_File.LOG,'Before Loop to set Child Status: '||
553: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));

Line 551: FND_File.Put_Line(Fnd_File.LOG,'Ext Attr Status Recs '||l_ext_tbl_count);

547: l_ext_tbl_count := l_ext_attrib_tbl.count;
548: IF(l_debug_level>1) THEN
549: FND_File.Put_Line(Fnd_File.LOG,'Updating Status of Inst Children '||
550: l_tbl_count);
551: FND_File.Put_Line(Fnd_File.LOG,'Ext Attr Status Recs '||l_ext_tbl_count);
552: FND_File.Put_Line(Fnd_File.LOG,'Before Loop to set Child Status: '||
553: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
554:
555: FND_File.Put_Line(Fnd_File.LOG,'After Loop to set Child Status: '||

Line 552: FND_File.Put_Line(Fnd_File.LOG,'Before Loop to set Child Status: '||

548: IF(l_debug_level>1) THEN
549: FND_File.Put_Line(Fnd_File.LOG,'Updating Status of Inst Children '||
550: l_tbl_count);
551: FND_File.Put_Line(Fnd_File.LOG,'Ext Attr Status Recs '||l_ext_tbl_count);
552: FND_File.Put_Line(Fnd_File.LOG,'Before Loop to set Child Status: '||
553: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
554:
555: FND_File.Put_Line(Fnd_File.LOG,'After Loop to set Child Status: '||
556: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));

Line 555: FND_File.Put_Line(Fnd_File.LOG,'After Loop to set Child Status: '||

551: FND_File.Put_Line(Fnd_File.LOG,'Ext Attr Status Recs '||l_ext_tbl_count);
552: FND_File.Put_Line(Fnd_File.LOG,'Before Loop to set Child Status: '||
553: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
554:
555: FND_File.Put_Line(Fnd_File.LOG,'After Loop to set Child Status: '||
556: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
557: END IF;
558: END IF; -- End addition
559: COMMIT;

Line 567: FND_File.Put_Line(Fnd_File.LOG,'In Inner Loop Exception in:'||l_api_name);

563: WHEN fnd_api.g_exc_error THEN
564: ROLLBACK to create_parallel_instances;
565:
566: IF(l_debug_level>1) THEN
567: FND_File.Put_Line(Fnd_File.LOG,'In Inner Loop Exception in:'||l_api_name);
568: END IF;
569: j := 1;
570:
571: FOR j in l_inst_id_tbl.FIRST .. l_inst_id_tbl.LAST LOOP

Line 577: FND_File.Put_Line(Fnd_File.LOG,l_error_message);

573: SET parallel_worker_id = -1
574: WHERE inst_interface_id = l_inst_id_tbl(j).inst_interface_id;
575: END LOOP;
576: COMMIT;
577: FND_File.Put_Line(Fnd_File.LOG,l_error_message);
578: x_return_status := l_fnd_error;
579: x_msg_data := l_error_message;
580:
581: END; -- Bug 11073343

Line 593: FND_File.Put_Line(Fnd_File.LOG,'After Log Errors: '||

589: l_return_status,
590: l_error_message);
591:
592: IF(l_debug_level>1) THEN
593: FND_File.Put_Line(Fnd_File.LOG,'After Log Errors: '||
594: to_char(sysdate,'DD-MON-YYYY HH:MI:SS:SS'));
595: END IF;
596: COMMIT;
597:

Line 601: FND_File.Put_Line(Fnd_File.LOG,'Resolve Parallel IDs Errored out...');

597:
598: EXCEPTION
599: WHEN RESOLVE_ERROR THEN
600: IF(l_debug_level>1) THEN
601: FND_File.Put_Line(Fnd_File.LOG,'Resolve Parallel IDs Errored out...');
602: END IF;
603: j := 1;
604: FOR j in l_inst_id_tbl.FIRST .. l_inst_id_tbl.LAST LOOP
605:

Line 616: FND_File.Put_Line(Fnd_File.LOG,'In EXPECTED Exception in:'||l_api_name);

612: WHEN fnd_api.g_exc_error THEN
613: ROLLBACK to OUTER_LOOP_CR_PARALLEL_INST;
614:
615: IF(l_debug_level>1) THEN
616: FND_File.Put_Line(Fnd_File.LOG,'In EXPECTED Exception in:'||l_api_name);
617: END IF;
618: j := 1;
619: FOR j in l_inst_id_tbl.FIRST .. l_inst_id_tbl.LAST LOOP
620:

Line 628: FND_File.Put_Line(Fnd_File.LOG,l_error_message);

624:
625: END LOOP;
626: COMMIT;
627:
628: FND_File.Put_Line(Fnd_File.LOG,l_error_message);
629: x_return_status := l_fnd_error;
630: x_msg_data := l_error_message;
631:
632: WHEN others THEN

Line 635: FND_File.Put_Line(Fnd_File.LOG,'In WHEN OTHERS Exception in:'||l_api_name);

631:
632: WHEN others THEN
633: ROLLBACK to OUTER_LOOP_CR_PARALLEL_INST;
634:
635: FND_File.Put_Line(Fnd_File.LOG,'In WHEN OTHERS Exception in:'||l_api_name);
636:
637: j := 1;
638: FOR j in l_inst_id_tbl.FIRST .. l_inst_id_tbl.LAST LOOP
639:

Line 652: FND_File.Put_Line(Fnd_File.LOG,substr(x_msg_data,1,200));

648: fnd_message.set_name('CSI','CSI_ML_UNEXP_SQL_ERROR');
649: fnd_message.set_token('API_NAME',l_api_name);
650: fnd_message.set_token('SQL_ERROR',SQLERRM);
651: x_msg_data := fnd_message.get;
652: FND_File.Put_Line(Fnd_File.LOG,substr(x_msg_data,1,200));
653: x_return_status := l_fnd_unexpected;
654:
655: END create_parallel_instances;
656:

Line 692: FND_File.Put_Line(Fnd_File.LOG,'Start of: '||l_api_name);

688:
689: BEGIN
690:
691: IF(l_debug_level>1) THEN
692: FND_File.Put_Line(Fnd_File.LOG,'Start of: '||l_api_name);
693: END IF;
694:
695: x_return_status := l_fnd_success;
696:

Line 702: FND_File.Put_Line(Fnd_File.LOG,'In EXPECTED Exception in:'||l_api_name);

698: WHEN fnd_api.g_exc_error THEN
699: ROLLBACK to create_relationships;
700:
701: IF(l_debug_level>1) THEN
702: FND_File.Put_Line(Fnd_File.LOG,'In EXPECTED Exception in:'||l_api_name);
703: FND_File.Put_Line(Fnd_File.LOG,l_error_message);
704: END IF;
705: x_return_status := l_fnd_error;
706: x_msg_data := l_error_message;

Line 703: FND_File.Put_Line(Fnd_File.LOG,l_error_message);

699: ROLLBACK to create_relationships;
700:
701: IF(l_debug_level>1) THEN
702: FND_File.Put_Line(Fnd_File.LOG,'In EXPECTED Exception in:'||l_api_name);
703: FND_File.Put_Line(Fnd_File.LOG,l_error_message);
704: END IF;
705: x_return_status := l_fnd_error;
706: x_msg_data := l_error_message;
707:

Line 711: FND_File.Put_Line(Fnd_File.LOG,'In WHEN OTHERS Exception in:'||l_api_name);

707:
708: WHEN others THEN
709: ROLLBACK to create_relationships;
710: IF(l_debug_level>1) THEN
711: FND_File.Put_Line(Fnd_File.LOG,'In WHEN OTHERS Exception in:'||l_api_name);
712: END IF;
713: l_sql_error := SQLERRM;
714: fnd_message.set_name('CSI','CSI_ML_UNEXP_SQL_ERROR');
715: fnd_message.set_token('API_NAME',l_api_name);

Line 719: FND_File.Put_Line(Fnd_File.LOG,x_msg_data);

715: fnd_message.set_token('API_NAME',l_api_name);
716: fnd_message.set_token('SQL_ERROR',SQLERRM);
717: x_msg_data := fnd_message.get;
718: IF(l_debug_level>1) THEN
719: FND_File.Put_Line(Fnd_File.LOG,x_msg_data);
720: END IF;
721: x_return_status := l_fnd_unexpected;
722:
723: END create_relationships;