DBA Data[Home] [Help]

APPS.HZ_PURGE dependencies on FND_FILE

Line 444: FND_FILE.close;

440: EXCEPTION
441: WHEN FND_API.G_EXC_ERROR THEN
442: retcode := 2;
443: errbuf := errbuf || logerror||SQLERRM;
444: FND_FILE.close;
445: update hz_purge_batches set status='IDENTIFICATION_ERROR' where batch_id=to_number(batchid);
446: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
447: retcode := 2;
448: errbuf := errbuf || logerror||SQLERRM;

Line 449: FND_FILE.close;

445: update hz_purge_batches set status='IDENTIFICATION_ERROR' where batch_id=to_number(batchid);
446: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
447: retcode := 2;
448: errbuf := errbuf || logerror||SQLERRM;
449: FND_FILE.close;
450: update hz_purge_batches set status='IDENTIFICATION_ERROR' where batch_id=to_number(batchid);
451: WHEN OTHERS THEN
452: retcode := 2;
453: errbuf := errbuf || logerror||SQLERRM;

Line 454: FND_FILE.close;

450: update hz_purge_batches set status='IDENTIFICATION_ERROR' where batch_id=to_number(batchid);
451: WHEN OTHERS THEN
452: retcode := 2;
453: errbuf := errbuf || logerror||SQLERRM;
454: FND_FILE.close;
455: update hz_purge_batches set status='IDENTIFICATION_ERROR' where batch_id=to_number(batchid);
456: END;
457:
458: /* To check if a single party has any transactions */

Line 823: fnd_file.close;

819:
820: DELETE from HZ_PARTIES where party_id in
821: (select candidate_party_id from hz_purge_candidates where batch_id=batchid and status='IDENTIFIED');
822: log(' HZ_PARTIES : Deleted '||SQL%ROWCOUNT||' rows',conc_prg);
823: fnd_file.close;
824:
825: --if the purged party is of type 'RELATIONSHIP' then set the corresponding value in the hz_relationships to null
826:
827: execute immediate 'update hz_relationships set party_id=null where party_id in

Line 881: FND_FILE.close;

877: EXCEPTION
878: WHEN FND_API.G_EXC_ERROR THEN
879: retcode := 2;
880: errbuf := errbuf || logerror||SQLERRM;
881: FND_FILE.close;
882: update hz_purge_batches set status='PURGE_ERROR' where batch_id=batchid;
883: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
884: retcode := 2;
885: errbuf := errbuf || logerror||SQLERRM;

Line 886: FND_FILE.close;

882: update hz_purge_batches set status='PURGE_ERROR' where batch_id=batchid;
883: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
884: retcode := 2;
885: errbuf := errbuf || logerror||SQLERRM;
886: FND_FILE.close;
887: update hz_purge_batches set status='PURGE_ERROR' where batch_id=batchid;
888: WHEN OTHERS THEN
889: retcode := 2;
890: errbuf := errbuf || logerror||SQLERRM;

Line 891: FND_FILE.close;

887: update hz_purge_batches set status='PURGE_ERROR' where batch_id=batchid;
888: WHEN OTHERS THEN
889: retcode := 2;
890: errbuf := errbuf || logerror||SQLERRM;
891: FND_FILE.close;
892: update hz_purge_batches set status='PURGE_ERROR' where batch_id=batchid;
893:
894: END;
895:

Line 921: --fnd_file.put_names('delparty.log',null,'/sqlcom/outbound');

917:
918: -- initialize API return status to success.
919: x_return_status := FND_API.G_RET_STS_SUCCESS;
920: ---please enter the directory as the third parameter to which the file needs to be copied.
921: --fnd_file.put_names('delparty.log',null,'/sqlcom/outbound');
922:
923: insert into hz_purge_candidates(BATCH_ID,CANDIDATE_PARTY_ID,PARTY_NAME,PARTY_NUMBER,ADDRESSES,PHONE_NUMBERS,COUNTRY,STATUS,CREATION_DATE,
924: LAST_UPDATE_LOGIN,LAST_UPDATE_DATE,LAST_UPDATED_BY,CREATED_BY)
925: select to_number('-1'), a.party_id, substr(a.party_name,1,250), a.party_number,

Line 1108: --fnd_file.close;

1104:
1105: /* update status to 'PURGED' in hz_purge_candidates for the purged parties */
1106: update hz_purge_candidates set status='PURGED' where candidate_party_id=p_party_id;
1107:
1108: --fnd_file.close;
1109: hz_common_pub.enable_cont_source_security;
1110: -- standard call to get message count and if count is 1, get message info.
1111: FND_MSG_PUB.Count_And_Get(
1112: p_encoded => FND_API.G_FALSE,

Line 1196: FND_FILE.NEW_LINE(FND_FILE.log, 1);

1192: newline IN BOOLEAN DEFAULT TRUE) IS
1193: BEGIN
1194: IF message = 'NEWLINE' THEN
1195: if con_prg is not null and con_prg=true then
1196: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1197: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
1198: end if;
1199: ELSE
1200: FND_FILE.put_line(fnd_file.log,message);

Line 1197: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);

1193: BEGIN
1194: IF message = 'NEWLINE' THEN
1195: if con_prg is not null and con_prg=true then
1196: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1197: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
1198: end if;
1199: ELSE
1200: FND_FILE.put_line(fnd_file.log,message);
1201: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, message);

Line 1200: FND_FILE.put_line(fnd_file.log,message);

1196: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1197: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
1198: end if;
1199: ELSE
1200: FND_FILE.put_line(fnd_file.log,message);
1201: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, message);
1202: END IF;
1203: EXCEPTION
1204: WHEN OTHERS THEN

Line 1201: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, message);

1197: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
1198: end if;
1199: ELSE
1200: FND_FILE.put_line(fnd_file.log,message);
1201: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, message);
1202: END IF;
1203: EXCEPTION
1204: WHEN OTHERS THEN
1205: NULL;