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 869: FND_FILE.close;

865: EXCEPTION
866: WHEN FND_API.G_EXC_ERROR THEN
867: retcode := 2;
868: errbuf := errbuf || logerror||SQLERRM;
869: FND_FILE.close;
870: update hz_purge_batches set status='PURGE_ERROR' where batch_id=batchid;
871: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
872: retcode := 2;
873: errbuf := errbuf || logerror||SQLERRM;

Line 874: FND_FILE.close;

870: update hz_purge_batches set status='PURGE_ERROR' where batch_id=batchid;
871: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
872: retcode := 2;
873: errbuf := errbuf || logerror||SQLERRM;
874: FND_FILE.close;
875: update hz_purge_batches set status='PURGE_ERROR' where batch_id=batchid;
876: WHEN OTHERS THEN
877: retcode := 2;
878: errbuf := errbuf || logerror||SQLERRM;

Line 879: FND_FILE.close;

875: update hz_purge_batches set status='PURGE_ERROR' where batch_id=batchid;
876: WHEN OTHERS THEN
877: retcode := 2;
878: errbuf := errbuf || logerror||SQLERRM;
879: FND_FILE.close;
880: update hz_purge_batches set status='PURGE_ERROR' where batch_id=batchid;
881:
882: END;
883:

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

905:
906: -- initialize API return status to success.
907: x_return_status := FND_API.G_RET_STS_SUCCESS;
908: ---please enter the directory as the third parameter to which the file needs to be copied.
909: --fnd_file.put_names('delparty.log',null,'/sqlcom/outbound');
910:
911: insert into hz_purge_candidates(BATCH_ID,CANDIDATE_PARTY_ID,PARTY_NAME,PARTY_NUMBER,ADDRESSES,PHONE_NUMBERS,COUNTRY,STATUS,CREATION_DATE,
912: LAST_UPDATE_LOGIN,LAST_UPDATE_DATE,LAST_UPDATED_BY,CREATED_BY)
913: select to_number('-1'), a.party_id, substr(a.party_name,1,250), a.party_number,

Line 1091: --fnd_file.close;

1087:
1088: /* update status to 'PURGED' in hz_purge_candidates for the purged parties */
1089: update hz_purge_candidates set status='PURGED' where candidate_party_id=p_party_id;
1090:
1091: --fnd_file.close;
1092: hz_common_pub.enable_cont_source_security;
1093: -- standard call to get message count and if count is 1, get message info.
1094: FND_MSG_PUB.Count_And_Get(
1095: p_encoded => FND_API.G_FALSE,

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

1175: newline IN BOOLEAN DEFAULT TRUE) IS
1176: BEGIN
1177: IF message = 'NEWLINE' THEN
1178: if con_prg is not null and con_prg=true then
1179: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1180: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
1181: end if;
1182: ELSE
1183: FND_FILE.put_line(fnd_file.log,message);

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

1176: BEGIN
1177: IF message = 'NEWLINE' THEN
1178: if con_prg is not null and con_prg=true then
1179: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1180: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
1181: end if;
1182: ELSE
1183: FND_FILE.put_line(fnd_file.log,message);
1184: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, message);

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

1179: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1180: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
1181: end if;
1182: ELSE
1183: FND_FILE.put_line(fnd_file.log,message);
1184: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, message);
1185: END IF;
1186: EXCEPTION
1187: WHEN OTHERS THEN

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

1180: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
1181: end if;
1182: ELSE
1183: FND_FILE.put_line(fnd_file.log,message);
1184: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, message);
1185: END IF;
1186: EXCEPTION
1187: WHEN OTHERS THEN
1188: NULL;