398:
399: EXCEPTION
400: WHEN NO_DATA_FOUND
401: THEN
402: fnd_message.set_name ('GCS', 'GCS_AD_TB_INVALID_ID');
403:
404: FND_FILE.PUT_LINE(FND_FILE.LOG, g_pkg_name || '.' || l_api_name || SQLERRM);
405: FND_FILE.NEW_LINE(FND_FILE.LOG);
406:
418: END IF;
419: RETURN -1;
420: WHEN OTHERS
421: THEN
422: fnd_message.set_name ('GCS', SQLERRM);
423:
424: FND_FILE.PUT_LINE(FND_FILE.LOG, g_pkg_name || '.' || l_api_name || SQLERRM);
425: FND_FILE.NEW_LINE(FND_FILE.LOG);
426:
797:
798: EXCEPTION
799: WHEN import_header_error
800: THEN
801: x_errbuf := fnd_message.get;
802: x_retcode := '2';
803:
804: FND_FILE.PUT_LINE(FND_FILE.LOG, g_pkg_name || '.' || l_api_name || ' ERROR : ' || x_errbuf);
805: FND_FILE.NEW_LINE(FND_FILE.LOG);
816: );
817: END IF;
818: WHEN OTHERS
819: THEN
820: fnd_message.set_name ('GCS', SQLERRM);
821: x_errbuf := fnd_message.get;
822: x_retcode := '2';
823:
824: FND_FILE.PUT_LINE(FND_FILE.LOG, g_pkg_name || '.' || l_api_name || ' ERROR : ' || x_errbuf);
817: END IF;
818: WHEN OTHERS
819: THEN
820: fnd_message.set_name ('GCS', SQLERRM);
821: x_errbuf := fnd_message.get;
822: x_retcode := '2';
823:
824: FND_FILE.PUT_LINE(FND_FILE.LOG, g_pkg_name || '.' || l_api_name || ' ERROR : ' || x_errbuf);
825: FND_FILE.NEW_LINE(FND_FILE.LOG);
1137: EXCEPTION
1138: WHEN OTHERS
1139: THEN
1140: ROLLBACK TO gcs_ad_tb_import_start;
1141: fnd_message.set_name ('GCS', SQLERRM);
1142: x_errbuf := fnd_message.get;
1143: x_retcode := '2';
1144:
1145: FND_FILE.PUT_LINE(FND_FILE.LOG, g_pkg_name || '.' || l_api_name || ' ERROR : ' || x_errbuf);
1138: WHEN OTHERS
1139: THEN
1140: ROLLBACK TO gcs_ad_tb_import_start;
1141: fnd_message.set_name ('GCS', SQLERRM);
1142: x_errbuf := fnd_message.get;
1143: x_retcode := '2';
1144:
1145: FND_FILE.PUT_LINE(FND_FILE.LOG, g_pkg_name || '.' || l_api_name || ' ERROR : ' || x_errbuf);
1146: FND_FILE.NEW_LINE(FND_FILE.LOG);