1256: message IN VARCHAR2,
1257: newline IN BOOLEAN DEFAULT TRUE) IS
1258: BEGIN
1259: IF message = 'NEWLINE' THEN
1260: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
1261: ELSIF (newline) THEN
1262: FND_FILE.put_line(fnd_file.output,message);
1263: ELSE
1264: FND_FILE.put(fnd_file.output,message);
1258: BEGIN
1259: IF message = 'NEWLINE' THEN
1260: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
1261: ELSIF (newline) THEN
1262: FND_FILE.put_line(fnd_file.output,message);
1263: ELSE
1264: FND_FILE.put(fnd_file.output,message);
1265: END IF;
1266: END out;
1260: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
1261: ELSIF (newline) THEN
1262: FND_FILE.put_line(fnd_file.output,message);
1263: ELSE
1264: FND_FILE.put(fnd_file.output,message);
1265: END IF;
1266: END out;
1267:
1268: /**
1273: newline IN BOOLEAN DEFAULT TRUE
1274: ) IS
1275: BEGIN
1276: IF message = 'NEWLINE' THEN
1277: FND_FILE.NEW_LINE(FND_FILE.LOG, 1);
1278: ELSIF (newline) THEN
1279: FND_FILE.put_line(fnd_file.log,message);
1280: ELSE
1281: FND_FILE.put(fnd_file.log,message);
1275: BEGIN
1276: IF message = 'NEWLINE' THEN
1277: FND_FILE.NEW_LINE(FND_FILE.LOG, 1);
1278: ELSIF (newline) THEN
1279: FND_FILE.put_line(fnd_file.log,message);
1280: ELSE
1281: FND_FILE.put(fnd_file.log,message);
1282: END IF;
1283: END log;
1277: FND_FILE.NEW_LINE(FND_FILE.LOG, 1);
1278: ELSIF (newline) THEN
1279: FND_FILE.put_line(fnd_file.log,message);
1280: ELSE
1281: FND_FILE.put(fnd_file.log,message);
1282: END IF;
1283: END log;
1284:
1285: /**
1513: END IF;
1514: END IF;
1515:
1516: IF l_party_id <> 0 AND l_party_id IS NOT NULL THEN
1517: fnd_file.put_line(fnd_file.log,'pt 11');
1518: SAVEPOINT contact_point_sync;
1519: fnd_file.put_line(fnd_file.log,'pt 12');
1520: BEGIN
1521: sync_contact_point (l_contact_point_id,'C');
1515:
1516: IF l_party_id <> 0 AND l_party_id IS NOT NULL THEN
1517: fnd_file.put_line(fnd_file.log,'pt 11');
1518: SAVEPOINT contact_point_sync;
1519: fnd_file.put_line(fnd_file.log,'pt 12');
1520: BEGIN
1521: sync_contact_point (l_contact_point_id,'C');
1522:
1523:
1530: END IF;
1531:
1532: EXCEPTION
1533: WHEN OTHERS THEN
1534: fnd_file.put_line(fnd_file.log,'Error here1 '||SQLERRM);
1535: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_SQL_ERROR');
1536: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1537: FND_MSG_PUB.ADD;
1538: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;