APPS.FV_DC_ASSIGN_FINANCE_CHRG dependencies on FND_LOG

Line 257: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

253: -- at the porition of the invoice that is late. But when calculating
254: -- for one time charges we want the total amount of the invoice not just
255: -- the amount for the schedule that is late.
256:
257: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
258: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
259: 'cust_trx_id ='||customer_trx_id);
260: END IF;
261:

Line 258: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

254: -- for one time charges we want the total amount of the invoice not just
255: -- the amount for the schedule that is late.
256:
257: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
258: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
259: 'cust_trx_id ='||customer_trx_id);
260: END IF;
261:
262: ct_id := customer_trx_id;

Line 270: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

266: from ar_payment_schedules
267: where customer_trx_id = ct_id
268: and class = 'INV';
269:
270: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
271: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
272: 'amt_due_remain='||amt_due);
273: END IF;
274:

Line 271: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

267: where customer_trx_id = ct_id
268: and class = 'INV';
269:
270: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
271: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
272: 'amt_due_remain='||amt_due);
273: END IF;
274:
275: else

Line 279: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

275: else
276: amt_due := amount_due_remaining;
277: end if;
278:
279: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
280: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
281: 'amt_due_remain='||amt_due);
282: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
283: 'last_date ='||last_date);

Line 280: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

276: amt_due := amount_due_remaining;
277: end if;
278:
279: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
280: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
281: 'amt_due_remain='||amt_due);
282: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
283: 'last_date ='||last_date);
284: END IF;

Line 282: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

278:
279: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
280: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
281: 'amt_due_remain='||amt_due);
282: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
283: 'last_date ='||last_date);
284: END IF;
285:
286: accrued_amount := round(amt_due * rate_amount *

Line 293: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,

289: return accrued_amount;
290: exception
291: when others then
292: error_message := SQLERRM;
293: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,
294: l_module_name||'.final_exception',error_message);
295: RAISE;
296:
297: end accrue_charges;

Line 320: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,

316: when no_data_found then
317: return null;
318: when others then
319: error_message := SQLERRM;
320: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,
321: l_module_name||'.final_exception',error_message);
322: RAISE;
323: end check_last_accrual;
324:

Line 360: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

356: v_split_term:=FALSE;
357: return FALSE;
358: ELSE
359: -- a debit memo is being created for the invoice and charge type
360: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
361: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
362: 'This is a possible Split Term');
363: END IF;
364: v_split_term := TRUE;

Line 361: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

357: return FALSE;
358: ELSE
359: -- a debit memo is being created for the invoice and charge type
360: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
361: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
362: 'This is a possible Split Term');
363: END IF;
364: v_split_term := TRUE;
365: return TRUE;

Line 370: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,

366: END IF;
367:
368: when others then
369: error_message := 'check_dm'||'-'||sqlerrm;
370: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,
371: l_module_name||'.final_exception',error_message);
372: raise ORACLE_ERROR;
373: end;
374:

Line 425: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,

421: 'This Process Again';
422: else
423: error_message := 'get_global_info'||'-'||statement_no||sqlerrm;
424: end if;
425: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,
426: l_module_name||'.no_data_found',error_message);
427: raise ORACLE_ERROR;
428: when others then
429: error_message := 'get_global_info'||'-'||statement_no||'-'||sqlerrm;

Line 430: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,

426: l_module_name||'.no_data_found',error_message);
427: raise ORACLE_ERROR;
428: when others then
429: error_message := 'get_global_info'||'-'||statement_no||'-'||sqlerrm;
430: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,
431: l_module_name||'.final_exception',error_message);
432: raise ORACLE_ERROR;
433: end;
434:

Line 456: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,

452:
453: when others then
454: error_message := 'get_additional_invoice_info'||'-'||statement_no||
455: '-'||sqlerrm;
456: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,
457: l_module_name||'.final_exception',error_message);
458: raise ORACLE_ERROR;
459: end;
460:

Line 478: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,

474:
475: exception
476: when others then
477: error_message := SQLERRM;
478: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,
479: l_module_name||'.final_exception',error_message);
480: raise ORACLE_ERROR;
481: END fnd_ar_billto_adr_id;
482:

Line 530: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,

526: END IF;
527: exception
528: when others then
529: error_message := SQLERRM;
530: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,
531: l_module_name||'.final_exception',error_message);
532: raise ORACLE_ERROR;
533: END create_record_temp ;
534: /* ************************************************************* */

Line 702: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,

698:
699: exception
700: when others then
701: error_message := SQLERRM;
702: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,
703: l_module_name||'.final_exception',error_message);
704: raise ORACLE_ERROR;
705: END;
706:

Line 713: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

709: IS
710: l_module_name VARCHAR2(200) ;
711: BEGIN
712: l_module_name := g_module_name || 'insert_debit_memo_line';
713: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
714: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
715: 'Creating DM '||fc_dm_rec.TRX_NUMBER);
716: END IF;
717:

Line 714: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

710: l_module_name VARCHAR2(200) ;
711: BEGIN
712: l_module_name := g_module_name || 'insert_debit_memo_line';
713: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
714: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
715: 'Creating DM '||fc_dm_rec.TRX_NUMBER);
716: END IF;
717:
718:

Line 847: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,

843:
844: exception
845: when others then
846: error_message := SQLERRM;
847: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,
848: l_module_name||'.final_exception',error_message);
849: raise ORACLE_ERROR;
850: END insert_debit_memo_line;
851:

Line 890: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,

886:
887: exception
888: when others then
889: error_message := SQLERRM;
890: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,
891: l_module_name||'.final_exception',error_message);
892: raise ORACLE_ERROR;
893: END map_debit_memo_dist;
894:

Line 916: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,

912:
913: exception
914: when others then
915: error_message := SQLERRM;
916: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,
917: l_module_name||'.final_exception',error_message);
918: raise ORACLE_ERROR;
919: END update_debit_memo_dist;
920:

Line 960: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,

956: fc_dm_dist_rec.LAST_UPDATE_DATE);
957: exception
958: when others then
959: error_message := SQLERRM;
960: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,
961: l_module_name||'.final_exception',error_message);
962: raise ORACLE_ERROR;
963: END insert_debit_memo_dist;
964:

Line 1028: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,

1024:
1025: exception
1026: when others then
1027: error_message := 'create_new_dm'||'-'||statement_no||'-'||sqlerrm;
1028: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,
1029: l_module_name||'.final_exception',error_message);
1030: raise ORACLE_ERROR;
1031: end;
1032:

Line 1053: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1049: v_message varchar2(80);
1050:
1051: begin
1052: l_module_name := g_module_name || 'adjust_existing_dm';
1053: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1054: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,
1055: l_module_name,'adjust_existing_dm');
1056: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1057: 'existing dm trx_id= '||existing_trx_id);

Line 1054: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,

1050:
1051: begin
1052: l_module_name := g_module_name || 'adjust_existing_dm';
1053: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1054: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,
1055: l_module_name,'adjust_existing_dm');
1056: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1057: 'existing dm trx_id= '||existing_trx_id);
1058: END IF;

Line 1056: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1052: l_module_name := g_module_name || 'adjust_existing_dm';
1053: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1054: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,
1055: l_module_name,'adjust_existing_dm');
1056: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1057: 'existing dm trx_id= '||existing_trx_id);
1058: END IF;
1059:
1060: statement_no := 'A';

Line 1098: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1094: where customer_trx_id = existing_trx_id
1095: and class = 'DM';
1096: -- finding the payment_schedule_id for the existing dm.
1097:
1098: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1099: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1100: 'existing pay_sch_id = '||existing_pay_schedule_id);
1101: END IF;
1102:

Line 1099: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1095: and class = 'DM';
1096: -- finding the payment_schedule_id for the existing dm.
1097:
1098: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1099: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1100: 'existing pay_sch_id = '||existing_pay_schedule_id);
1101: END IF;
1102:
1103:

Line 1120: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1116: error_message := 'B.1 '||sqlerrm;
1117: raise ORACLE_ERROR;
1118: END;
1119:
1120: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1121: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1122: 'v_adjustment_id = '||v_adjustment_id);
1123: END IF;
1124:

Line 1121: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1117: raise ORACLE_ERROR;
1118: END;
1119:
1120: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1121: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1122: 'v_adjustment_id = '||v_adjustment_id);
1123: END IF;
1124:
1125: v_user_id := to_number(fnd_profile.value('USER_ID'));

Line 1142: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1138: error_message := 'B.2 '||sqlerrm;
1139: raise ORACLE_ERROR;
1140: END;
1141:
1142: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1143: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1144: 'v_conc_program_id = '||v_conc_program_id);
1145: END IF;
1146:

Line 1143: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1139: raise ORACLE_ERROR;
1140: END;
1141:
1142: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1143: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1144: 'v_conc_program_id = '||v_conc_program_id);
1145: END IF;
1146:
1147: /*

Line 1161: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1157: select ar_adjustment_number_s.nextval
1158: into v_adjustment_number
1159: from dual;
1160:
1161: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1162: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1163: 'Calling INSERT_ADJUST_COVER to adjust'||
1164: ' payment_schedule_id'||existing_pay_schedule_id);
1165: END IF;

Line 1162: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1158: into v_adjustment_number
1159: from dual;
1160:
1161: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1162: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1163: 'Calling INSERT_ADJUST_COVER to adjust'||
1164: ' payment_schedule_id'||existing_pay_schedule_id);
1165: END IF;
1166:

Line 1259: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,

1255:
1256: exception
1257: when others then
1258: error_message := 'adjust_existing_dm'||'-'||statement_no||'-'||sqlerrm;
1259: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,
1260: l_module_name||'.final_exception',error_message);
1261: raise ORACLE_ERROR;
1262:
1263: end adjust_existing_dm;

Line 1307: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,

1303: AND NVL(org_id,-99)=NVL(v_org_id,-99) ;
1304: exception
1305: when others then
1306: error_message := SQLERRM;
1307: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,
1308: l_module_name||'.final_exception',error_message);
1309: raise ORACLE_ERROR;
1310: end cleanup;
1311:

Line 1330: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1326: ctr number := 0;
1327:
1328: begin
1329: l_module_name := g_module_name || 'calculate_fixed_amount';
1330: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1331: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1332: 'beginning calculate_fixed_amount');
1333: END IF;
1334:

Line 1331: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1327:
1328: begin
1329: l_module_name := g_module_name || 'calculate_fixed_amount';
1330: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1331: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1332: 'beginning calculate_fixed_amount');
1333: END IF;
1334:
1335: curr := trunc(first_late_day);

Line 1354: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||

1350: return f_amount;
1351: exception
1352: when others then
1353: error_message := SQLERRM;
1354: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||
1355: '.final_exception',error_message);
1356: raise ORACLE_ERROR;
1357: end calculate_fixed_amount;
1358:

Line 1383: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1379: else
1380: last_pd := current_pd;
1381: end if;
1382: end loop;
1383: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1384: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1385: 'number of periods = '||num_periods);
1386: END IF;
1387:

Line 1384: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1380: last_pd := current_pd;
1381: end if;
1382: end loop;
1383: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1384: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1385: 'number of periods = '||num_periods);
1386: END IF;
1387:
1388:

Line 1398: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,

1394: end if;
1395: exception
1396: when others then
1397: error_message := SQLERRM;
1398: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,
1399: l_module_name||'.final_exception',error_message);
1400: raise ORACLE_ERROR;
1401: end missed_intervals;
1402:

Line 1458: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,

1454: OPEN RA_INTERFACE_ERR_CUR(sob_id, v_org_id) ;
1455: FETCH RA_INTERFACE_ERR_CUR INTO v_interface_err_count ;
1456: IF RA_INTERFACE_ERR_CUR %FOUND THEN
1457: CLOSE RA_INTERFACE_ERR_CUR;
1458: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1459: 'Debit Memos created by the previous submission ');
1460: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1461: 'of this process, exists in Receivables AutoInvoice ') ;
1462: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,

Line 1460: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,

1456: IF RA_INTERFACE_ERR_CUR %FOUND THEN
1457: CLOSE RA_INTERFACE_ERR_CUR;
1458: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1459: 'Debit Memos created by the previous submission ');
1460: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1461: 'of this process, exists in Receivables AutoInvoice ') ;
1462: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1463: 'Interface tables because of validation failure. Please ');
1464: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,

Line 1462: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,

1458: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1459: 'Debit Memos created by the previous submission ');
1460: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1461: 'of this process, exists in Receivables AutoInvoice ') ;
1462: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1463: 'Interface tables because of validation failure. Please ');
1464: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1465: 'correct these transactions and run AutoInvoice before ');
1466: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,

Line 1464: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,

1460: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1461: 'of this process, exists in Receivables AutoInvoice ') ;
1462: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1463: 'Interface tables because of validation failure. Please ');
1464: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1465: 'correct these transactions and run AutoInvoice before ');
1466: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1467: 'performing the Accrue Finance Charge process. ' );
1468: retcode:= 2;

Line 1466: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,

1462: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1463: 'Interface tables because of validation failure. Please ');
1464: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1465: 'correct these transactions and run AutoInvoice before ');
1466: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1467: 'performing the Accrue Finance Charge process. ' );
1468: retcode:= 2;
1469: RETURN ;
1470: END IF;

Line 1478: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,

1474: OPEN fv_ar_open_periods (v_gl_date) ;
1475: FETCH fv_ar_open_periods INTO v_ar_period_count ;
1476: IF fv_ar_open_periods%NOTFOUND THEN
1477: CLOSE fv_ar_open_periods;
1478: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1479: 'GL Date should be in an open period. ');
1480: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1481: 'Please Enter a GL Date which is in an open period ') ;
1482: retcode:= 2;

Line 1480: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,

1476: IF fv_ar_open_periods%NOTFOUND THEN
1477: CLOSE fv_ar_open_periods;
1478: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1479: 'GL Date should be in an open period. ');
1480: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1481: 'Please Enter a GL Date which is in an open period ') ;
1482: retcode:= 2;
1483: RETURN ;
1484: END IF;

Line 1564: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1560: 'for this finance charge '||charge_type||'.');
1561: raise oracle_error;
1562: end if;
1563:
1564: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1565: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1566: 'Transaction Number = '||trx_number);
1567: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1568: 'customer_trx_id = '||customer_trx_id);

Line 1565: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1561: raise oracle_error;
1562: end if;
1563:
1564: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1565: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1566: 'Transaction Number = '||trx_number);
1567: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1568: 'customer_trx_id = '||customer_trx_id);
1569: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

Line 1567: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1563:
1564: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1565: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1566: 'Transaction Number = '||trx_number);
1567: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1568: 'customer_trx_id = '||customer_trx_id);
1569: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1570: 'charge_type = '||charge_type);
1571: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

Line 1569: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1565: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1566: 'Transaction Number = '||trx_number);
1567: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1568: 'customer_trx_id = '||customer_trx_id);
1569: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1570: 'charge_type = '||charge_type);
1571: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1572: 'schedule_id = '||schedule_id);
1573: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

Line 1571: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1567: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1568: 'customer_trx_id = '||customer_trx_id);
1569: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1570: 'charge_type = '||charge_type);
1571: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1572: 'schedule_id = '||schedule_id);
1573: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1574: 'bill_to_customer_id = '||bill_to_customer_id);
1575: END IF;

Line 1573: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1569: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1570: 'charge_type = '||charge_type);
1571: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1572: 'schedule_id = '||schedule_id);
1573: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1574: 'bill_to_customer_id = '||bill_to_customer_id);
1575: END IF;
1576:
1577:

Line 1580: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1576:
1577:
1578: first_late_day := trunc(due_date) + first + grace + 1;
1579:
1580: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1581: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1582: 'first_late_day = '||first_late_day);
1583: END IF;
1584:

Line 1581: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1577:
1578: first_late_day := trunc(due_date) + first + grace + 1;
1579:
1580: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1581: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1582: 'first_late_day = '||first_late_day);
1583: END IF;
1584:
1585: if rate_flag = 'Y' then -- rate

Line 1605: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1601: --bug 2515917 changed from first_late_day to due_date
1602: fin_chrg := accrue_charges(trunc(new_due_date));
1603:
1604: IF fin_chrg <> 0 THEN
1605: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1606: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1607: 'Adding New Line to DM for amount '||to_char(fin_chrg));
1608: END IF;
1609: END IF;

Line 1606: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1602: fin_chrg := accrue_charges(trunc(new_due_date));
1603:
1604: IF fin_chrg <> 0 THEN
1605: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1606: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1607: 'Adding New Line to DM for amount '||to_char(fin_chrg));
1608: END IF;
1609: END IF;
1610: get_additional_invoice_info;

Line 1619: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1615:
1616: elsif (dm_flag = TRUE) and (interval > 0) then
1617: -- Debit Memo Already Exists and not a one-time charge
1618:
1619: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1620: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1621: 'debit memo exists/not one time charge');
1622: END IF;
1623:

Line 1620: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1616: elsif (dm_flag = TRUE) and (interval > 0) then
1617: -- Debit Memo Already Exists and not a one-time charge
1618:
1619: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1620: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1621: 'debit memo exists/not one time charge');
1622: END IF;
1623:
1624: -- get last_accrual_date for the payment_schedule_id being processed

Line 1627: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1623:
1624: -- get last_accrual_date for the payment_schedule_id being processed
1625: last_accrual_date := check_last_accrual;
1626:
1627: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1628: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1629: 'last_accrual_date = '||last_accrual_date);
1630: END IF;
1631:

Line 1628: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1624: -- get last_accrual_date for the payment_schedule_id being processed
1625: last_accrual_date := check_last_accrual;
1626:
1627: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1628: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1629: 'last_accrual_date = '||last_accrual_date);
1630: END IF;
1631:
1632: if last_accrual_date is null then

Line 1646: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

1642:
1643: -- this is a split term, add additional line to new DM.
1644: -- bug 2113826
1645: if fin_chrg <> 0 THEN
1646: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1647: THEN
1648: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1649: 'Adding New Line to DM for amount '||to_char(fin_chrg));
1650: END IF;

Line 1648: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1644: -- bug 2113826
1645: if fin_chrg <> 0 THEN
1646: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1647: THEN
1648: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1649: 'Adding New Line to DM for amount '||to_char(fin_chrg));
1650: END IF;
1651:
1652:

Line 1653: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

1649: 'Adding New Line to DM for amount '||to_char(fin_chrg));
1650: END IF;
1651:
1652:
1653: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1654: THEN
1655: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,
1656: l_module_name,'fin_chrg = '||fin_chrg);
1657: END IF;

Line 1655: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,

1651:
1652:
1653: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1654: THEN
1655: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,
1656: l_module_name,'fin_chrg = '||fin_chrg);
1657: END IF;
1658: get_additional_invoice_info;
1659: create_new_dm(fin_chrg);

Line 1665: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

1661: ELSE
1662: first_late_day := trunc(new_due_date) + first + grace + 1;
1663: fin_chrg:=accrue_charges(trunc(first_late_day));
1664: if fin_chrg <> 0 THEN
1665: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1666: THEN
1667: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1668: 'fin_chrg = '||fin_chrg);
1669: END IF;

Line 1667: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1663: fin_chrg:=accrue_charges(trunc(first_late_day));
1664: if fin_chrg <> 0 THEN
1665: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1666: THEN
1667: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1668: 'fin_chrg = '||fin_chrg);
1669: END IF;
1670: adjust_existing_dm(fin_chrg); -- Adjust Existing Debit Memo
1671: end if;

Line 1685: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1681: elsif last_accrual_date + interval < trunc(sysdate) Then
1682: -- an accrual already exists for payment_schedule
1683: fin_chrg:=accrue_charges (last_accrual_date);
1684:
1685: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1686: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1687: 'fin_chrg = '||fin_chrg);
1688: END IF;
1689:

Line 1686: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1682: -- an accrual already exists for payment_schedule
1683: fin_chrg:=accrue_charges (last_accrual_date);
1684:
1685: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1686: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1687: 'fin_chrg = '||fin_chrg);
1688: END IF;
1689:
1690:

Line 1698: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1694: end if;
1695:
1696: elsif dm_flag = FALSE then -- Create New Debit Memo
1697: -- bug 2515917 using due_date instead of first_late_day
1698: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1699: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1700: 'due_date = '||due_date);
1701: END IF;
1702: fin_chrg:=accrue_charges(trunc(new_due_date));

Line 1699: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1695:
1696: elsif dm_flag = FALSE then -- Create New Debit Memo
1697: -- bug 2515917 using due_date instead of first_late_day
1698: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1699: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1700: 'due_date = '||due_date);
1701: END IF;
1702: fin_chrg:=accrue_charges(trunc(new_due_date));
1703:

Line 1704: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1700: 'due_date = '||due_date);
1701: END IF;
1702: fin_chrg:=accrue_charges(trunc(new_due_date));
1703:
1704: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1705: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1706: 'dm_flag = FALSE');
1707: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1708: 'fin_chrg = '||fin_chrg);

Line 1705: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1701: END IF;
1702: fin_chrg:=accrue_charges(trunc(new_due_date));
1703:
1704: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1705: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1706: 'dm_flag = FALSE');
1707: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1708: 'fin_chrg = '||fin_chrg);
1709: END IF;

Line 1707: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1703:
1704: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1705: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1706: 'dm_flag = FALSE');
1707: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1708: 'fin_chrg = '||fin_chrg);
1709: END IF;
1710:
1711: IF fin_chrg <> 0 THEN

Line 1725: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1721: IF dm_flag = TRUE and interval = 0 and v_split_term = TRUE THEN
1722: -- this is for split term (2113826) a dm is in interface
1723: -- but haven't accrued for this payment schedule.
1724: -- so add new line to dm in interface table (bug 2113826)
1725: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1726: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1727: 'Adding New Line to DM for amount'||to_char(rate_amount));
1728: END IF;
1729:

Line 1726: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1722: -- this is for split term (2113826) a dm is in interface
1723: -- but haven't accrued for this payment schedule.
1724: -- so add new line to dm in interface table (bug 2113826)
1725: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1726: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1727: 'Adding New Line to DM for amount'||to_char(rate_amount));
1728: END IF;
1729:
1730: IF rate_amount <> 0 AND v_insert_flag='N' AND v_invoice_level='Y' THEN

Line 1745: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1741:
1742: -- get last accrual_date for payment_schedule_id and charge type
1743: last_accrual_date := check_last_accrual;
1744:
1745: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1746: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1747: 'last_accrual_date = '||last_accrual_date);
1748: END IF;
1749:

Line 1746: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1742: -- get last accrual_date for payment_schedule_id and charge type
1743: last_accrual_date := check_last_accrual;
1744:
1745: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1746: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1747: 'last_accrual_date = '||last_accrual_date);
1748: END IF;
1749:
1750: if last_accrual_date is null then

Line 1757: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1753: -- an invoice with split terms would fall to this branch.
1754: if trunc(sysdate) between first_late_day and
1755: first_late_day + interval then
1756:
1757: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1758: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1759: 'rate_amount = '||rate_amount);
1760: END IF;
1761: IF rate_amount <> 0 THEN

Line 1758: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1754: if trunc(sysdate) between first_late_day and
1755: first_late_day + interval then
1756:
1757: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1758: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1759: 'rate_amount = '||rate_amount);
1760: END IF;
1761: IF rate_amount <> 0 THEN
1762: IF v_split_term = TRUE THEN

Line 1765: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

1761: IF rate_amount <> 0 THEN
1762: IF v_split_term = TRUE THEN
1763: -- add new line to dm in interface table (bug 2113826)
1764:
1765: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1766: THEN
1767: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1768: 'Adding New Line to DM for amount '||to_char(rate_amount));
1769: END IF;

Line 1767: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1763: -- add new line to dm in interface table (bug 2113826)
1764:
1765: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1766: THEN
1767: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1768: 'Adding New Line to DM for amount '||to_char(rate_amount));
1769: END IF;
1770: get_additional_invoice_info;
1771: create_new_dm(rate_amount);

Line 1781: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

1777: else
1778: num_periods := missed_intervals; -- function to determine missed int
1779: fixed_amount := rate_amount * num_periods;
1780:
1781: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1782: THEN
1783: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1784: 'fixed_amt = '||fixed_amount);
1785: END IF;

Line 1783: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1779: fixed_amount := rate_amount * num_periods;
1780:
1781: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1782: THEN
1783: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1784: 'fixed_amt = '||fixed_amount);
1785: END IF;
1786:
1787: if fixed_amount <> 0 then

Line 1790: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

1786:
1787: if fixed_amount <> 0 then
1788: IF v_split_term = TRUE THEN
1789: -- add new line to dm in interface table (bug 2113826)
1790: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1791: THEN
1792: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1793: 'Adding New Line to DM for amount '||to_char(fixed_amount));
1794: END IF;

Line 1792: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1788: IF v_split_term = TRUE THEN
1789: -- add new line to dm in interface table (bug 2113826)
1790: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1791: THEN
1792: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1793: 'Adding New Line to DM for amount '||to_char(fixed_amount));
1794: END IF;
1795: IF v_insert_flag='N' AND v_invoice_level='Y' THEN
1796: get_additional_invoice_info;

Line 1821: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

1817: -- determine new accrual
1818: num_periods := missed_intervals; -- function to determine missed int
1819: fixed_amount := calculate_fixed_amount(num_periods);
1820: if fixed_amount <> 0 then
1821: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1822: THEN
1823: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1824: 'fixed_amt = '||fixed_amount);
1825: END IF;

Line 1823: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1819: fixed_amount := calculate_fixed_amount(num_periods);
1820: if fixed_amount <> 0 then
1821: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1822: THEN
1823: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1824: 'fixed_amt = '||fixed_amount);
1825: END IF;
1826:
1827: IF v_insert_flag='N' AND v_invoice_level='Y' THEN

Line 1838: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

1834: end if;
1835:
1836: elsif dm_flag = FALSE then
1837:
1838: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1839: THEN
1840: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,
1841: l_module_name,'dm_flag=FALSE');
1842: END IF;

Line 1840: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,

1836: elsif dm_flag = FALSE then
1837:
1838: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1839: THEN
1840: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,
1841: l_module_name,'dm_flag=FALSE');
1842: END IF;
1843:
1844: -- create new dm for interval = 0 or > 0

Line 1850: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

1846: if trunc(sysdate) between first_late_day and first_late_day + interval
1847: then
1848:
1849: IF rate_amount <> 0 THEN
1850: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1851: THEN
1852: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1853: 'rate_amount = '||rate_amount);
1854: END IF;

Line 1852: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1848:
1849: IF rate_amount <> 0 THEN
1850: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1851: THEN
1852: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1853: 'rate_amount = '||rate_amount);
1854: END IF;
1855:
1856: get_additional_invoice_info;

Line 1864: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

1860: num_periods := missed_intervals; -- function to determine missed int
1861: fixed_amount := rate_amount * num_periods;
1862:
1863: IF fixed_amount <> 0 THEN
1864: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1865: THEN
1866: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1867: 'fixed_amount = '||fixed_amount);
1868: END IF;

Line 1866: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1862:
1863: IF fixed_amount <> 0 THEN
1864: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1865: THEN
1866: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1867: 'fixed_amount = '||fixed_amount);
1868: END IF;
1869:
1870: get_additional_invoice_info;

Line 1898: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1894: '1',v_org_id, v_finchrg_batch_src_id.batch_source_id,v_finchrg_batch_src_id.name, trunc(sysdate),
1895: '','','','','','','','','','',
1896: '','','','','','','','','','', 'YES','');
1897:
1898: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1899: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'!!!!! '||
1900: 'SUBMITTING REQUEST '||v_auto_id);
1901: END IF;
1902:

Line 1899: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'!!!!! '||

1895: '','','','','','','','','','',
1896: '','','','','','','','','','', 'YES','');
1897:
1898: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1899: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'!!!!! '||
1900: 'SUBMITTING REQUEST '||v_auto_id);
1901: END IF;
1902:
1903: if v_auto_id <> 0 then

Line 1921: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,

1917: 'for Batch Source ' ||
1918: v_finchrg_batch_src_id.batch_source_id||
1919: '. Correct errors and resubmit'||
1920: ' AutoInvoice for this Batch Source';
1921: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1922: 'ERROR:- '||error_message);
1923: end if;
1924:
1925: --Bug 6348669

Line 1940: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,

1936: error_message := 'Errors in Submitted Request for Autoinvoice with '||
1937: 'Batch Source - '||
1938: v_finchrg_batch_src_id.batch_source_id||'-'||
1939: FND_MESSAGE.GET;
1940: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1941: 'ERROR:- '||error_message);
1942: RAISE ORACLE_ERROR;
1943: END IF;
1944: END IF;

Line 1946: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1942: RAISE ORACLE_ERROR;
1943: END IF;
1944: END IF;
1945:
1946: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1947: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1948: '!!!!! Completed request '||v_auto_id);
1949: END IF;
1950:

Line 1947: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

1943: END IF;
1944: END IF;
1945:
1946: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1947: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
1948: '!!!!! Completed request '||v_auto_id);
1949: END IF;
1950:
1951: else

Line 1960: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,

1956: 'Batch Source - '
1957: ||v_finchrg_batch_src_id.batch_source_id||'-'||
1958: FND_MESSAGE.GET;
1959: -- RAISE ORACLE_ERROR;
1960: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
1961: 'ERROR:- '||error_message);
1962:
1963: end if;
1964:

Line 1992: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_EVENT, l_module_name,

1988: */
1989:
1990:
1991: else
1992: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_EVENT, l_module_name,
1993: 'Not submitting AutoInvoice since no new debit memos being created. '||
1994: 'Process Complete.');
1995: end if; -- end v_interface_record = 'Y'
1996:

Line 2006: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2002: -- The following will submit Accrue finance charge detail report
2003: FND_REQUEST.set_org_id(v_org_id); -- PSKI MOAC Changes
2004: v_conc_req_id := FND_REQUEST.SUBMIT_REQUEST
2005: ('FV','FVDCACCD','','',FALSE, set_of_books_id) ;
2006: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2007: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_EVENT, l_module_name,
2008: 'Submitting Detail report '||v_conc_req_id) ;
2009: END IF;
2010:

Line 2007: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_EVENT, l_module_name,

2003: FND_REQUEST.set_org_id(v_org_id); -- PSKI MOAC Changes
2004: v_conc_req_id := FND_REQUEST.SUBMIT_REQUEST
2005: ('FV','FVDCACCD','','',FALSE, set_of_books_id) ;
2006: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2007: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_EVENT, l_module_name,
2008: 'Submitting Detail report '||v_conc_req_id) ;
2009: END IF;
2010:
2011: if v_conc_req_id = 0 then

Line 2014: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,

2010:
2011: if v_conc_req_id = 0 then
2012: error_message := 'Error in Submitting Accrue Finance '||
2013: 'charge Detail Report ' ;
2014: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,
2015: error_message) ;
2016: end if ;
2017: retcode := 0;
2018: errbuf := 'Accrual Process Successfully Completed';

Line 2030: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.exception1',

2026: rollback;
2027: if main_select%ISOPEN then
2028: close main_select;
2029: end if;
2030: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.exception1',
2031: errbuf);
2032:
2033: when others then
2034:

Line 2043: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.exception2',

2039: error_message := statement_no||'-'||sqlerrm;
2040: errbuf := error_message;
2041: retcode := 2;
2042: rollback;
2043: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.exception2',
2044: errbuf);
2045: end accrue_finance_charge;
2046:
2047:

Line 2100: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2096:
2097: for customer in c1
2098: LOOP
2099:
2100: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2101: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
2102: 'Updating waive flag for: '||customer.customer_id);
2103: END IF;
2104:

Line 2101: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

2097: for customer in c1
2098: LOOP
2099:
2100: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2101: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
2102: 'Updating waive flag for: '||customer.customer_id);
2103: END IF;
2104:
2105: update fv_cust_finance_chrgs

Line 2213: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2209: '','','','','','','','','','',
2210: '','','','','','','','','','',
2211: '','','','','','','','','','');
2212:
2213: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2214: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
2215: 'v_req_id = '||v_req_id);
2216: END IF;
2217:

Line 2214: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,

2210: '','','','','','','','','','',
2211: '','','','','','','','','','');
2212:
2213: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2214: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
2215: 'v_req_id = '||v_req_id);
2216: END IF;
2217:
2218:

Line 2222: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, error_message);

2218:
2219: IF v_req_id = 0 THEN
2220: error_message := 'Submitting the concurrent process, FVDCAFCO, '||
2221: 'failed contact System Admin.';
2222: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, error_message);
2223: RAISE ORACLE_ERROR;
2224: END IF;
2225:
2226:

Line 2233: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.exception1',

2229: when ORACLE_ERROR then
2230: errbuf := error_message;
2231: retcode := 2;
2232: rollback;
2233: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.exception1',
2234: errbuf);
2235:
2236: when others then
2237: error_message := statement_no||'-'||sqlerrm;

Line 2241: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.exception2',

2237: error_message := statement_no||'-'||sqlerrm;
2238: errbuf := error_message;
2239: retcode := 2;
2240: rollback;
2241: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.exception2',
2242: errbuf);
2243:
2244: FND_FILE.CLOSE;
2245: