377: message IN VARCHAR2,
378: newline IN BOOLEAN DEFAULT TRUE) IS
379: BEGIN
380: IF message = 'NEWLINE' THEN
381: FND_FILE.NEW_LINE(FND_FILE.LOG, 1);
382: ELSIF (newline) THEN
383: FND_FILE.put_line(fnd_file.log,message);
384: ELSE
385: FND_FILE.put(fnd_file.log,message);
379: BEGIN
380: IF message = 'NEWLINE' THEN
381: FND_FILE.NEW_LINE(FND_FILE.LOG, 1);
382: ELSIF (newline) THEN
383: FND_FILE.put_line(fnd_file.log,message);
384: ELSE
385: FND_FILE.put(fnd_file.log,message);
386: END IF;
387: END log;
381: FND_FILE.NEW_LINE(FND_FILE.LOG, 1);
382: ELSIF (newline) THEN
383: FND_FILE.put_line(fnd_file.log,message);
384: ELSE
385: FND_FILE.put(fnd_file.log,message);
386: END IF;
387: END log;
388:
389:
613: LOOP
614: call_status := FND_CONCURRENT.GET_REQUEST_STATUS(
615: req_id, null,null,rphase,rstatus,dphase,dstatus,message);
616: IF dstatus = 'TERMINATING' THEN
617: FND_FILE.put_line(FND_FILE.log,'Aborted by User');
618: RAISE USER_TERMINATE;
619: END IF;
620: FETCH p_party_cur BULK COLLECT INTO
621: H_P_PARTY_ID