1306: message IN VARCHAR2,
1307: newline IN BOOLEAN DEFAULT TRUE) IS
1308: BEGIN
1309: IF message = 'NEWLINE' THEN
1310: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
1311: ELSIF (newline) THEN
1312: FND_FILE.put_line(fnd_file.output,message);
1313: ELSE
1314: FND_FILE.put(fnd_file.output,message);
1308: BEGIN
1309: IF message = 'NEWLINE' THEN
1310: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
1311: ELSIF (newline) THEN
1312: FND_FILE.put_line(fnd_file.output,message);
1313: ELSE
1314: FND_FILE.put(fnd_file.output,message);
1315: END IF;
1316: END out;
1310: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
1311: ELSIF (newline) THEN
1312: FND_FILE.put_line(fnd_file.output,message);
1313: ELSE
1314: FND_FILE.put(fnd_file.output,message);
1315: END IF;
1316: END out;
1317:
1318: /**
1323: newline IN BOOLEAN DEFAULT TRUE
1324: ) IS
1325: BEGIN
1326: IF message = 'NEWLINE' THEN
1327: FND_FILE.NEW_LINE(FND_FILE.LOG, 1);
1328: ELSIF (newline) THEN
1329: FND_FILE.put_line(fnd_file.log,message);
1330: ELSE
1331: FND_FILE.put(fnd_file.log,message);
1325: BEGIN
1326: IF message = 'NEWLINE' THEN
1327: FND_FILE.NEW_LINE(FND_FILE.LOG, 1);
1328: ELSIF (newline) THEN
1329: FND_FILE.put_line(fnd_file.log,message);
1330: ELSE
1331: FND_FILE.put(fnd_file.log,message);
1332: END IF;
1333: END log;
1327: FND_FILE.NEW_LINE(FND_FILE.LOG, 1);
1328: ELSIF (newline) THEN
1329: FND_FILE.put_line(fnd_file.log,message);
1330: ELSE
1331: FND_FILE.put(fnd_file.log,message);
1332: END IF;
1333: END log;
1334:
1335: /**
1597: END IF;
1598: END IF;
1599:
1600: IF l_party_id <> 0 AND l_party_id IS NOT NULL THEN
1601: fnd_file.put_line(fnd_file.log,'pt 11');
1602: SAVEPOINT contact_point_sync;
1603: fnd_file.put_line(fnd_file.log,'pt 12');
1604: BEGIN
1605: sync_contact_point (l_contact_point_id,'C');
1599:
1600: IF l_party_id <> 0 AND l_party_id IS NOT NULL THEN
1601: fnd_file.put_line(fnd_file.log,'pt 11');
1602: SAVEPOINT contact_point_sync;
1603: fnd_file.put_line(fnd_file.log,'pt 12');
1604: BEGIN
1605: sync_contact_point (l_contact_point_id,'C');
1606:
1607:
1614: END IF;
1615:
1616: EXCEPTION
1617: WHEN OTHERS THEN
1618: fnd_file.put_line(fnd_file.log,'Error here1 '||SQLERRM);
1619: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_SQL_ERROR');
1620: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1621: FND_MSG_PUB.ADD;
1622: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;