DBA Data[Home] [Help]

APPS.FND_IREP_DEFERRED_LOADER dependencies on FND_FILE

Line 50: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Looking for recently uploaded files . . . ');

46: WHERE load_status = 'R' and REQUEST_ID is not Null
47: ORDER BY 4,3,2;
48:
49: begin
50: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Looking for recently uploaded files . . . ');
51: OPEN PendingFiles;
52: FETCH PendingFiles BULK COLLECT
53: INTO LDT_RowID_Array, LDT_Array, ReqID_Array, BatchID_Array;
54: CLOSE PendingFiles;

Line 57: FND_FILE.PUT_LINE(FND_FILE.LOG, ' No files to process.');

53: INTO LDT_RowID_Array, LDT_Array, ReqID_Array, BatchID_Array;
54: CLOSE PendingFiles;
55:
56: if (LDT_Array.COUNT = 0) then
57: FND_FILE.PUT_LINE(FND_FILE.LOG, ' No files to process.');
58: return;
59: end if;
60:
61: prevReqID := -99999;

Line 63: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Found ' || to_char(LDT_Array.COUNT)

59: end if;
60:
61: prevReqID := -99999;
62: kount := 0;
63: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Found ' || to_char(LDT_Array.COUNT)
64: || ' possible files to process.');
65:
66: for i in 1..LDT_Array.COUNT loop
67: tempReqID := ReqID_Array(i);

Line 128: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Processed ' || to_char(kount)

124: end if;
125: end loop;
126:
127:
128: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Processed ' || to_char(kount)
129: || ' files to completion.');
130: commit;
131: end;
132:

Line 173: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Loading rows . . . ');

169: elsif (workerNum > 5000) then
170: workerNum := 5000;
171: end if;
172:
173: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Loading rows . . . ');
174: OPEN curLoadFile;
175: FETCH curLoadFile BULK COLLECT
176: INTO LDT_RowID_Array, LDT_Array;
177: CLOSE curLoadFile;

Line 178: FND_FILE.PUT_LINE(FND_FILE.LOG, ' '

174: OPEN curLoadFile;
175: FETCH curLoadFile BULK COLLECT
176: INTO LDT_RowID_Array, LDT_Array;
177: CLOSE curLoadFile;
178: FND_FILE.PUT_LINE(FND_FILE.LOG, ' '
179: || to_char(LDT_Array.COUNT)
180: || ' rows loaded.');
181:
182: if (LDT_Array.COUNT

Line 188: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Opening ' || workerNum || ' batches.');

184: end if;
185:
186: if (LDT_Array.COUNT > 0) then
187: -- Get n batch_id's from FNDBLOAD
188: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Opening ' || workerNum || ' batches.');
189: for i in 1..workerNum loop
190: BatchID_Array(i-1) := FND_LOADER_OPEN_INTERFACE_PKG.INSERT_BATCH;
191: end loop;
192:

Line 193: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Assigning files to batches.');

189: for i in 1..workerNum loop
190: BatchID_Array(i-1) := FND_LOADER_OPEN_INTERFACE_PKG.INSERT_BATCH;
191: end loop;
192:
193: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Assigning files to batches.');
194:
195: for i in 1..LDT_Array.COUNT loop
196: -- Add row to batch with batch id = id_kount
197: FND_LOADER_OPEN_INTERFACE_PKG.ADD_ROW_TO_BATCH(

Line 215: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Submitting requests for batches.');

211: end if;
212:
213: -- Submit n FNDBLOAD CP requests (FND_REQUEST.SUBMIT) with
214: -- batch id's = id_0 through id_n-1
215: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Submitting requests for batches.');
216:
217: for i in 0..BatchID_Array.COUNT-1 loop
218: requestID := FND_REQUEST.SUBMIT_REQUEST
219: (

Line 288: FND_FILE.NEW_LINE(FND_FILE.LOG);

284: from fnd_oracle_userid
285: where oracle_id = 0;
286:
287: -- Populate ad_processed_files_temp table with list of files
288: FND_FILE.NEW_LINE(FND_FILE.LOG);
289: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Getting All Files from AD.');
290:
291: AD_POST_PATCH.GET_ALL_FILES
292: (

Line 289: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Getting All Files from AD.');

285: where oracle_id = 0;
286:
287: -- Populate ad_processed_files_temp table with list of files
288: FND_FILE.NEW_LINE(FND_FILE.LOG);
289: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Getting All Files from AD.');
290:
291: AD_POST_PATCH.GET_ALL_FILES
292: (
293: P_Appltop_id => appltop_id,

Line 300: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Populating FND_IREP_DEFERRED_LOAD_FILES.');

296: P_file_extension_list => '(''ildt'')'
297: );
298:
299: -- Populate fnd_irep_deferred_load_files table
300: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Populating FND_IREP_DEFERRED_LOAD_FILES.');
301: insert into FND_IREP_DEFERRED_LOAD_FILES
302: (
303: FILE_PRODUCT, FILE_PATH, FILE_NAME,
304: FILE_VERSION, LOAD_STATUS, CREATED_BY, CREATION_DATE,

Line 337: FND_FILE.NEW_LINE(FND_FILE.LOG);

333: and FND_IREP_LOADER_PRIVATE.COMPARE_VERSIONS(
334: F1.FILE_VERSION,F2.FILE_VERSION) = '<');
335:
336: -- Upload batch for files which have status N (New)
337: FND_FILE.NEW_LINE(FND_FILE.LOG);
338: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Uploading new files.');
339: UploadBatch('N');
340: dbms_lock.sleep(60);
341:

Line 338: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Uploading new files.');

334: F1.FILE_VERSION,F2.FILE_VERSION) = '<');
335:
336: -- Upload batch for files which have status N (New)
337: FND_FILE.NEW_LINE(FND_FILE.LOG);
338: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Uploading new files.');
339: UploadBatch('N');
340: dbms_lock.sleep(60);
341:
342: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 342: FND_FILE.NEW_LINE(FND_FILE.LOG);

338: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Uploading new files.');
339: UploadBatch('N');
340: dbms_lock.sleep(60);
341:
342: FND_FILE.NEW_LINE(FND_FILE.LOG);
343: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Processing completed files.');
344: cleanup_batches;
345:
346: -- On very rare occasions a file will get stuck as listed in running mode

Line 343: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Processing completed files.');

339: UploadBatch('N');
340: dbms_lock.sleep(60);
341:
342: FND_FILE.NEW_LINE(FND_FILE.LOG);
343: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Processing completed files.');
344: cleanup_batches;
345:
346: -- On very rare occasions a file will get stuck as listed in running mode
347: -- If we see something that is in R and hasn't been updated in a day,

Line 357: FND_FILE.NEW_LINE(FND_FILE.LOG);

353: where LOAD_STATUS = 'R'
354: and LAST_UPDATE_DATE < SYSDATE - 1;
355:
356: -- Repeat upload batch for files which have status E (Error)
357: FND_FILE.NEW_LINE(FND_FILE.LOG);
358: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Re-uploading erroring files.');
359: UploadBatch('E');
360: dbms_lock.sleep(60);
361:

Line 358: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Re-uploading erroring files.');

354: and LAST_UPDATE_DATE < SYSDATE - 1;
355:
356: -- Repeat upload batch for files which have status E (Error)
357: FND_FILE.NEW_LINE(FND_FILE.LOG);
358: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Re-uploading erroring files.');
359: UploadBatch('E');
360: dbms_lock.sleep(60);
361:
362: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 362: FND_FILE.NEW_LINE(FND_FILE.LOG);

358: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Re-uploading erroring files.');
359: UploadBatch('E');
360: dbms_lock.sleep(60);
361:
362: FND_FILE.NEW_LINE(FND_FILE.LOG);
363: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Processing completed files.');
364: cleanup_batches;
365:
366: -- Do pl/sql post processing on new rows (inheritance, etc.)

Line 363: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Processing completed files.');

359: UploadBatch('E');
360: dbms_lock.sleep(60);
361:
362: FND_FILE.NEW_LINE(FND_FILE.LOG);
363: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Processing completed files.');
364: cleanup_batches;
365:
366: -- Do pl/sql post processing on new rows (inheritance, etc.)
367: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 367: FND_FILE.NEW_LINE(FND_FILE.LOG);

363: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Processing completed files.');
364: cleanup_batches;
365:
366: -- Do pl/sql post processing on new rows (inheritance, etc.)
367: FND_FILE.NEW_LINE(FND_FILE.LOG);
368: FND_FILE.PUT_LINE(FND_FILE.LOG, 'PL/SQL post processing.');
369: fnd_irep_loader_private.iRepPostProcess;
370:
371: -- Submit java cleanup program. [FND/FNDIRLPP]

Line 368: FND_FILE.PUT_LINE(FND_FILE.LOG, 'PL/SQL post processing.');

364: cleanup_batches;
365:
366: -- Do pl/sql post processing on new rows (inheritance, etc.)
367: FND_FILE.NEW_LINE(FND_FILE.LOG);
368: FND_FILE.PUT_LINE(FND_FILE.LOG, 'PL/SQL post processing.');
369: fnd_irep_loader_private.iRepPostProcess;
370:
371: -- Submit java cleanup program. [FND/FNDIRLPP]
372: FND_FILE.PUT_LINE(FND_FILE.LOG,

Line 372: FND_FILE.PUT_LINE(FND_FILE.LOG,

368: FND_FILE.PUT_LINE(FND_FILE.LOG, 'PL/SQL post processing.');
369: fnd_irep_loader_private.iRepPostProcess;
370:
371: -- Submit java cleanup program. [FND/FNDIRLPP]
372: FND_FILE.PUT_LINE(FND_FILE.LOG,
373: 'Submitting Request for java post processing.');
374: requestID := FND_REQUEST.SUBMIT_REQUEST
375: (
376: APPLICATION => 'FND',

Line 383: FND_FILE.PUT_LINE(FND_FILE.LOG, errbuf);

379:
380: if (requestID <= 0) then
381: retcode := '2';
382: errbuf := 'CP Submission failed: ' ||fnd_message.get;
383: FND_FILE.PUT_LINE(FND_FILE.LOG, errbuf);
384: else
385: -- Return 0 for successful completion.
386: errbuf := '';
387: retcode := '0';

Line 388: FND_FILE.PUT_LINE(FND_FILE.LOG, 'CP Submission succeeded. Request ID = '

384: else
385: -- Return 0 for successful completion.
386: errbuf := '';
387: retcode := '0';
388: FND_FILE.PUT_LINE(FND_FILE.LOG, 'CP Submission succeeded. Request ID = '
389: || to_char(requestID));
390: end if;
391:
392: -- Lets see if there are still some running rows, if so resubmit.

Line 400: FND_FILE.PUT_LINE(FND_FILE.LOG,

396: where LOAD_STATUS = 'R';
397:
398: if (kount > 0) then
399: dbms_lock.sleep(120);
400: FND_FILE.PUT_LINE(FND_FILE.LOG,
401: 'Loading not Complete. Resubmitting . . .');
402: result_buf := fnd_adpatch.Post_Patch(appltop_id, errMsg);
403: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Submission result = '||result_buf||
404: '. Message = '||errMsg);

Line 403: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Submission result = '||result_buf||

399: dbms_lock.sleep(120);
400: FND_FILE.PUT_LINE(FND_FILE.LOG,
401: 'Loading not Complete. Resubmitting . . .');
402: result_buf := fnd_adpatch.Post_Patch(appltop_id, errMsg);
403: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Submission result = '||result_buf||
404: '. Message = '||errMsg);
405: end if;
406:
407: commit;

Line 422: FND_FILE.NEW_LINE(FND_FILE.LOG);

418: end if;
419: -- Return 2 for error.
420: retcode := '2';
421:
422: FND_FILE.NEW_LINE(FND_FILE.LOG);
423: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error: ' || errbuf);
424:
425: if (errStack is not null) then
426: FND_FILE.PUT_LINE(FND_FILE.LOG, errStack);

Line 423: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error: ' || errbuf);

419: -- Return 2 for error.
420: retcode := '2';
421:
422: FND_FILE.NEW_LINE(FND_FILE.LOG);
423: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error: ' || errbuf);
424:
425: if (errStack is not null) then
426: FND_FILE.PUT_LINE(FND_FILE.LOG, errStack);
427: end if;

Line 426: FND_FILE.PUT_LINE(FND_FILE.LOG, errStack);

422: FND_FILE.NEW_LINE(FND_FILE.LOG);
423: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error: ' || errbuf);
424:
425: if (errStack is not null) then
426: FND_FILE.PUT_LINE(FND_FILE.LOG, errStack);
427: end if;
428:
429: end SubmitConcurrent;
430: