DBA Data[Home] [Help]

APPS.FA_LPITEMS_EXPT_PKG dependencies on FND_FILE

Line 344: FND_File.Put(FND_FILE.LOG, lpad('Export Lease Payments to Payables', 65, ' '));

340: V_Line_Number := 1;
341: V_Source := 'Oracle Assets';
342: V_Line_Type_Lookup_Code := 'ITEM';
343:
344: FND_File.Put(FND_FILE.LOG, lpad('Export Lease Payments to Payables', 65, ' '));
345: FND_File.New_Line(FND_FILE.LOG,2);
346:
347: V_Title := 'Lease Number Lessor Name Lessor Site Amount'||
348: ' Invoice Number Status';

Line 345: FND_File.New_Line(FND_FILE.LOG,2);

341: V_Source := 'Oracle Assets';
342: V_Line_Type_Lookup_Code := 'ITEM';
343:
344: FND_File.Put(FND_FILE.LOG, lpad('Export Lease Payments to Payables', 65, ' '));
345: FND_File.New_Line(FND_FILE.LOG,2);
346:
347: V_Title := 'Lease Number Lessor Name Lessor Site Amount'||
348: ' Invoice Number Status';
349: FND_File.Put(FND_FILE.LOG, V_Title);

Line 349: FND_File.Put(FND_FILE.LOG, V_Title);

345: FND_File.New_Line(FND_FILE.LOG,2);
346:
347: V_Title := 'Lease Number Lessor Name Lessor Site Amount'||
348: ' Invoice Number Status';
349: FND_File.Put(FND_FILE.LOG, V_Title);
350: FND_File.New_Line(FND_FILE.LOG,2);
351: FOR current_item IN post_payment_items LOOP
352:
353: SELECT ap_invoices_interface_s.nextval, ap_invoice_lines_interface_s.nextval

Line 350: FND_File.New_Line(FND_FILE.LOG,2);

346:
347: V_Title := 'Lease Number Lessor Name Lessor Site Amount'||
348: ' Invoice Number Status';
349: FND_File.Put(FND_FILE.LOG, V_Title);
350: FND_File.New_Line(FND_FILE.LOG,2);
351: FOR current_item IN post_payment_items LOOP
352:
353: SELECT ap_invoices_interface_s.nextval, ap_invoice_lines_interface_s.nextval
354: INTO V_Invoice_ID, V_Invoice_Line_ID

Line 400: FND_File.Put(FND_File.Log, V_Msg_Data);

396: V_LE_Name := V_Ptop_LE_Info.Name;
397:
398: exception
399: when others then
400: FND_File.Put(FND_File.Log, V_Msg_Data);
401: FND_File.New_Line(FND_FILE.LOG,1);
402: raise;
403: end;
404:

Line 401: FND_File.New_Line(FND_FILE.LOG,1);

397:
398: exception
399: when others then
400: FND_File.Put(FND_File.Log, V_Msg_Data);
401: FND_File.New_Line(FND_FILE.LOG,1);
402: raise;
403: end;
404:
405:

Line 458: FND_File.New_Line(FND_FILE.LOG,2);

454: AND Payment_Schedule_ID = current_item.Payment_Schedule_ID
455: AND Schedule_Amort_Line_Num = current_item.Amort_Line_Num;
456:
457: if (V_Org_ID <> Temp_Org_ID) then
458: FND_File.New_Line(FND_FILE.LOG,2);
459: FND_File.Put(FND_FILE.LOG, 'Organization Name: '||V_Org_Name);
460: FND_File.New_Line(FND_FILE.LOG,2);
461: end if;
462:

Line 459: FND_File.Put(FND_FILE.LOG, 'Organization Name: '||V_Org_Name);

455: AND Schedule_Amort_Line_Num = current_item.Amort_Line_Num;
456:
457: if (V_Org_ID <> Temp_Org_ID) then
458: FND_File.New_Line(FND_FILE.LOG,2);
459: FND_File.Put(FND_FILE.LOG, 'Organization Name: '||V_Org_Name);
460: FND_File.New_Line(FND_FILE.LOG,2);
461: end if;
462:
463: V_Row := rpad(V_Lease_Number,15,' ')||' ' ||

Line 460: FND_File.New_Line(FND_FILE.LOG,2);

456:
457: if (V_Org_ID <> Temp_Org_ID) then
458: FND_File.New_Line(FND_FILE.LOG,2);
459: FND_File.Put(FND_FILE.LOG, 'Organization Name: '||V_Org_Name);
460: FND_File.New_Line(FND_FILE.LOG,2);
461: end if;
462:
463: V_Row := rpad(V_Lease_Number,15,' ')||' ' ||
464: rpad(substr(V_Vendor_Name,1,20),20,' ')||' '||

Line 469: FND_File.Put(FND_File.Log, V_Row);

465: rpad(V_Vendor_Site_Name,15,' ')||' '||
466: rpad(substr(ltrim(to_char(V_Invoice_Amount,'9999999999999D99')),1,15),15,' ')||' '||
467: rpad(substr(V_Invoice_Num,1,25),25,' ')||' ==> Succeeded';
468:
469: FND_File.Put(FND_File.Log, V_Row);
470: FND_File.New_Line(FND_FILE.LOG,1);
471:
472: END LOOP;
473:

Line 470: FND_File.New_Line(FND_FILE.LOG,1);

466: rpad(substr(ltrim(to_char(V_Invoice_Amount,'9999999999999D99')),1,15),15,' ')||' '||
467: rpad(substr(V_Invoice_Num,1,25),25,' ')||' ==> Succeeded';
468:
469: FND_File.Put(FND_File.Log, V_Row);
470: FND_File.New_Line(FND_FILE.LOG,1);
471:
472: END LOOP;
473:
474: EXCEPTION

Line 481: FND_File.Put(FND_File.Log, V_Row);

477:
478: V_Row := V_Lease_Number||V_Vendor_Name||V_Vendor_Site_Name||
479: to_char(V_Invoice_Amount)|| V_Invoice_Num||'==> Failed';
480:
481: FND_File.Put(FND_File.Log, V_Row);
482: FND_File.New_Line(FND_FILE.LOG,1);
483:
484: FA_SRVR_MSG.ADD_MESSAGE(
485:

Line 482: FND_File.New_Line(FND_FILE.LOG,1);

478: V_Row := V_Lease_Number||V_Vendor_Name||V_Vendor_Site_Name||
479: to_char(V_Invoice_Amount)|| V_Invoice_Num||'==> Failed';
480:
481: FND_File.Put(FND_File.Log, V_Row);
482: FND_File.New_Line(FND_FILE.LOG,1);
483:
484: FA_SRVR_MSG.ADD_MESSAGE(
485:
486: CALLING_FN => 'FA_LPITEMS_EXPT_PKG.Payment_Items_to_AP'