APPS.AR_IREC_PAYMENTS dependencies on FND_LOG

Line 756: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

752:
753: EXCEPTION
754: WHEN OTHERS THEN
755: l_debug_info := 'Invalid Payment Method is Set in the profile OIR_CC_PMT_METHOD. Value in profile=' || fnd_profile.VALUE('OIR_CC_PMT_METHOD');
756: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
757: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info
758: ||':ERROR =>'|| SQLERRM);
759: end if;
760: END;

Line 757: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info

753: EXCEPTION
754: WHEN OTHERS THEN
755: l_debug_info := 'Invalid Payment Method is Set in the profile OIR_CC_PMT_METHOD. Value in profile=' || fnd_profile.VALUE('OIR_CC_PMT_METHOD');
756: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
757: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info
758: ||':ERROR =>'|| SQLERRM);
759: end if;
760: END;
761:

Line 788: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

784:
785: EXCEPTION
786: WHEN OTHERS THEN
787: l_debug_info := 'Invalid Payment Method is Set in the profile OIR_BA_PMT_METHOD. Value in profile=' || fnd_profile.VALUE('OIR_BA_PMT_METHOD');
788: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
789: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info
790: ||':ERROR =>'|| SQLERRM);
791: end if;
792: END;

Line 789: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info

785: EXCEPTION
786: WHEN OTHERS THEN
787: l_debug_info := 'Invalid Payment Method is Set in the profile OIR_BA_PMT_METHOD. Value in profile=' || fnd_profile.VALUE('OIR_BA_PMT_METHOD');
788: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
789: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info
790: ||':ERROR =>'|| SQLERRM);
791: end if;
792: END;
793:

Line 934: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

930: x_response => l_result_rec);
931:
932:
933: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
934: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
935: fnd_log.string(fnd_log.LEVEL_STATEMENT,
936: G_PKG_NAME||l_procedure_name,
937: 'ERROR IN UPDATING CREDIT CARD');
938: fnd_log.string(fnd_log.LEVEL_STATEMENT,

Line 935: fnd_log.string(fnd_log.LEVEL_STATEMENT,

931:
932:
933: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
934: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
935: fnd_log.string(fnd_log.LEVEL_STATEMENT,
936: G_PKG_NAME||l_procedure_name,
937: 'ERROR IN UPDATING CREDIT CARD');
938: fnd_log.string(fnd_log.LEVEL_STATEMENT,
939: G_PKG_NAME||l_procedure_name,l_result_rec.result_code);

Line 938: fnd_log.string(fnd_log.LEVEL_STATEMENT,

934: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
935: fnd_log.string(fnd_log.LEVEL_STATEMENT,
936: G_PKG_NAME||l_procedure_name,
937: 'ERROR IN UPDATING CREDIT CARD');
938: fnd_log.string(fnd_log.LEVEL_STATEMENT,
939: G_PKG_NAME||l_procedure_name,l_result_rec.result_code);
940: end if;
941: x_msg_data := l_result_rec.result_code;
942: x_return_status := FND_API.G_RET_STS_ERROR;

Line 981: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

977: x_response => l_result_rec);
978:
979:
980: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
981: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
982: fnd_log.string(fnd_log.LEVEL_STATEMENT,
983: G_PKG_NAME||l_procedure_name,
984: 'ERROR IN UPDATING BANK ACCOUNT');
985: fnd_log.string(fnd_log.LEVEL_STATEMENT,

Line 982: fnd_log.string(fnd_log.LEVEL_STATEMENT,

978:
979:
980: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
981: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
982: fnd_log.string(fnd_log.LEVEL_STATEMENT,
983: G_PKG_NAME||l_procedure_name,
984: 'ERROR IN UPDATING BANK ACCOUNT');
985: fnd_log.string(fnd_log.LEVEL_STATEMENT,
986: G_PKG_NAME||l_procedure_name,x_msg_data);

Line 985: fnd_log.string(fnd_log.LEVEL_STATEMENT,

981: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
982: fnd_log.string(fnd_log.LEVEL_STATEMENT,
983: G_PKG_NAME||l_procedure_name,
984: 'ERROR IN UPDATING BANK ACCOUNT');
985: fnd_log.string(fnd_log.LEVEL_STATEMENT,
986: G_PKG_NAME||l_procedure_name,x_msg_data);
987: end if;
988: x_return_status := FND_API.G_RET_STS_ERROR;
989: write_error_messages(x_msg_data, x_msg_count);

Line 2935: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

2931: p_status := x_return_status;
2932:
2933: write_debug_and_log('instrument_assignment_id :'||p_assignment_id );
2934:
2935: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2936: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Return status - '||x_return_status);
2937: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Message Count - '||x_msg_count);
2938: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Message Data - '||x_msg_data);
2939: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Credit Card Number - '||p_account_number);

Line 2936: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Return status - '||x_return_status);

2932:
2933: write_debug_and_log('instrument_assignment_id :'||p_assignment_id );
2934:
2935: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2936: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Return status - '||x_return_status);
2937: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Message Count - '||x_msg_count);
2938: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Message Data - '||x_msg_data);
2939: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Credit Card Number - '||p_account_number);
2940: end if;

Line 2937: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Message Count - '||x_msg_count);

2933: write_debug_and_log('instrument_assignment_id :'||p_assignment_id );
2934:
2935: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2936: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Return status - '||x_return_status);
2937: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Message Count - '||x_msg_count);
2938: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Message Data - '||x_msg_data);
2939: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Credit Card Number - '||p_account_number);
2940: end if;
2941:

Line 2938: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Message Data - '||x_msg_data);

2934:
2935: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2936: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Return status - '||x_return_status);
2937: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Message Count - '||x_msg_count);
2938: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Message Data - '||x_msg_data);
2939: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Credit Card Number - '||p_account_number);
2940: end if;
2941:
2942: IF (PG_DEBUG = 'Y') THEN

Line 2939: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Credit Card Number - '||p_account_number);

2935: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2936: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Return status - '||x_return_status);
2937: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Message Count - '||x_msg_count);
2938: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Message Data - '||x_msg_data);
2939: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Payment Instrument - Credit Card Number - '||p_account_number);
2940: end if;
2941:
2942: IF (PG_DEBUG = 'Y') THEN
2943: arp_standard.debug(l_debug_info);

Line 3122: fnd_log_repository.init;

3118: BEGIN
3119:
3120: l_procedure_name := '.create_receipt';
3121:
3122: fnd_log_repository.init;
3123:
3124: -----------------------------------------------------------------------------------------
3125: l_debug_info := 'Call public AR receipts API - create_cash - to create receipt for payment';
3126: -----------------------------------------------------------------------------------------

Line 3161: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3157: p_cash_receipt_id := l_cash_receipt_id;
3158: p_status := x_return_status;
3159: write_debug_and_log('p_receipt_currency_code:'||l_cash_receipt_id);
3160:
3161: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3162: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - Rerturn status - '||x_return_status);
3163: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - Message Count - '||x_msg_count);
3164: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - Message Data - '||x_msg_data);
3165: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - CR Id - '||l_cash_receipt_id);

Line 3162: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - Rerturn status - '||x_return_status);

3158: p_status := x_return_status;
3159: write_debug_and_log('p_receipt_currency_code:'||l_cash_receipt_id);
3160:
3161: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3162: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - Rerturn status - '||x_return_status);
3163: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - Message Count - '||x_msg_count);
3164: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - Message Data - '||x_msg_data);
3165: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - CR Id - '||l_cash_receipt_id);
3166: end if;

Line 3163: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - Message Count - '||x_msg_count);

3159: write_debug_and_log('p_receipt_currency_code:'||l_cash_receipt_id);
3160:
3161: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3162: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - Rerturn status - '||x_return_status);
3163: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - Message Count - '||x_msg_count);
3164: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - Message Data - '||x_msg_data);
3165: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - CR Id - '||l_cash_receipt_id);
3166: end if;
3167:

Line 3164: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - Message Data - '||x_msg_data);

3160:
3161: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3162: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - Rerturn status - '||x_return_status);
3163: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - Message Count - '||x_msg_count);
3164: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - Message Data - '||x_msg_data);
3165: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - CR Id - '||l_cash_receipt_id);
3166: end if;
3167:
3168: arp_standard.debug('X_RETURN_STATUS=>'||X_RETURN_STATUS);

Line 3165: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - CR Id - '||l_cash_receipt_id);

3161: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3162: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - Rerturn status - '||x_return_status);
3163: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - Message Count - '||x_msg_count);
3164: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - Message Data - '||x_msg_data);
3165: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Create Cash - CR Id - '||l_cash_receipt_id);
3166: end if;
3167:
3168: arp_standard.debug('X_RETURN_STATUS=>'||X_RETURN_STATUS);
3169: arp_standard.debug('X_MSG_COUNT=>'||to_char(X_MSG_COUNT));

Line 3263: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3259: l_msg_count := 0;
3260: l_apply_err_count := 0;
3261: l_procedure_name := '.apply_cash';
3262:
3263: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3264: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'In apply_cash: p_customer_id='||p_customer_id ||','
3265: || 'p_site_use_id=' || p_site_use_id || ','
3266: || 'p_cash_receipt_id=' || p_cash_receipt_id);
3267: end if;

Line 3264: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'In apply_cash: p_customer_id='||p_customer_id ||','

3260: l_apply_err_count := 0;
3261: l_procedure_name := '.apply_cash';
3262:
3263: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3264: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'In apply_cash: p_customer_id='||p_customer_id ||','
3265: || 'p_site_use_id=' || p_site_use_id || ','
3266: || 'p_cash_receipt_id=' || p_cash_receipt_id);
3267: end if;
3268:

Line 3275: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3271: SELECT COUNT(*)
3272: INTO total_trx_count
3273: FROM ar_irec_payment_list_gt;
3274:
3275: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3276: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Total no of rows in ar_irec_payment_list_gt='||total_trx_count);
3277: end if;
3278:
3279: --Pring in the debug log : No of rows that will be picked by the cursor credit_trx_list

Line 3276: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Total no of rows in ar_irec_payment_list_gt='||total_trx_count);

3272: INTO total_trx_count
3273: FROM ar_irec_payment_list_gt;
3274:
3275: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3276: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Total no of rows in ar_irec_payment_list_gt='||total_trx_count);
3277: end if;
3278:
3279: --Pring in the debug log : No of rows that will be picked by the cursor credit_trx_list
3280:

Line 3288: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3284: WHERE customer_id = p_customer_id
3285: AND customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id), customer_site_use_id)
3286: AND ( trx_class = 'CM' OR trx_class = 'PMT' );
3287:
3288: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3289: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'credit_trx_list_count: '||credit_trx_list_count);
3290: end if;
3291:
3292: --Pring in the debug log : No of rows that will be picked by the cursor debit_trx_list

Line 3289: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'credit_trx_list_count: '||credit_trx_list_count);

3285: AND customer_site_use_id = nvl(decode(p_site_use_id, -1, null, p_site_use_id), customer_site_use_id)
3286: AND ( trx_class = 'CM' OR trx_class = 'PMT' );
3287:
3288: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3289: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'credit_trx_list_count: '||credit_trx_list_count);
3290: end if;
3291:
3292: --Pring in the debug log : No of rows that will be picked by the cursor debit_trx_list
3293:

Line 3306: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3302: trx_class = 'CB' OR
3303: trx_class = 'DEP'
3304: );
3305:
3306: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3307: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'debit_trx_list_count: ' || debit_trx_list_count);
3308: end if;
3309:
3310: --

Line 3307: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'debit_trx_list_count: ' || debit_trx_list_count);

3303: trx_class = 'DEP'
3304: );
3305:
3306: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3307: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'debit_trx_list_count: ' || debit_trx_list_count);
3308: end if;
3309:
3310: --
3311: -- Establish a save point

Line 3319: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3315: ----------------------------------------------------------------------------------
3316: l_debug_info := 'Step 1: Apply credits against the receipt (if any)';
3317: ----------------------------------------------------------------------------------
3318:
3319: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3320: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);
3321: end if;
3322:
3323: FOR trx in credit_trx_list

Line 3320: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);

3316: l_debug_info := 'Step 1: Apply credits against the receipt (if any)';
3317: ----------------------------------------------------------------------------------
3318:
3319: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3320: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);
3321: end if;
3322:
3323: FOR trx in credit_trx_list
3324: LOOP

Line 3326: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3322:
3323: FOR trx in credit_trx_list
3324: LOOP
3325:
3326: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3327: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, 'trx.trx_class=' || trx.trx_class);
3328: end if;
3329:
3330: IF (trx.trx_class = 'CM') THEN

Line 3327: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, 'trx.trx_class=' || trx.trx_class);

3323: FOR trx in credit_trx_list
3324: LOOP
3325:
3326: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3327: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, 'trx.trx_class=' || trx.trx_class);
3328: end if;
3329:
3330: IF (trx.trx_class = 'CM') THEN
3331: -- The transaction is a credit memo

Line 3333: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3329:
3330: IF (trx.trx_class = 'CM') THEN
3331: -- The transaction is a credit memo
3332:
3333: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3334: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Calling AR_RECEIPT_API_PUB.apply for CM:'
3335: ||'trx.customer_trx_id=' || trx.customer_trx_id || ','
3336: ||'trx.terms_sequence_number=' || trx.terms_sequence_number || ','
3337: ||'trx.payment_schedule_id=' || trx.payment_schedule_id || ','

Line 3334: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Calling AR_RECEIPT_API_PUB.apply for CM:'

3330: IF (trx.trx_class = 'CM') THEN
3331: -- The transaction is a credit memo
3332:
3333: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3334: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Calling AR_RECEIPT_API_PUB.apply for CM:'
3335: ||'trx.customer_trx_id=' || trx.customer_trx_id || ','
3336: ||'trx.terms_sequence_number=' || trx.terms_sequence_number || ','
3337: ||'trx.payment_schedule_id=' || trx.payment_schedule_id || ','
3338: ||'trx.payment_amt=' || trx.payment_amt || ','

Line 3360: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3356: p_apply_date => trunc(trx.receipt_date),
3357: p_called_from => 'IREC'
3358: );
3359:
3360: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3361: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Execution of AR_RECEIPT_API_PUB.apply is over');
3362: end if;
3363:
3364: ELSE

Line 3361: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Execution of AR_RECEIPT_API_PUB.apply is over');

3357: p_called_from => 'IREC'
3358: );
3359:
3360: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3361: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Execution of AR_RECEIPT_API_PUB.apply is over');
3362: end if;
3363:
3364: ELSE
3365: -- The transaction must be a payment

Line 3367: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3363:
3364: ELSE
3365: -- The transaction must be a payment
3366:
3367: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3368: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Calling AR_RECEIPT_API_PUB.apply_open_receipt for PMT:'
3369: || 'trx.cash_receipt_id=' || trx.cash_receipt_id ||','
3370: || 'trx.payment_amt=' || trx.payment_amt || ','
3371: || 'l_application_ref_num=' || l_application_ref_num || ','

Line 3368: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Calling AR_RECEIPT_API_PUB.apply_open_receipt for PMT:'

3364: ELSE
3365: -- The transaction must be a payment
3366:
3367: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3368: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Calling AR_RECEIPT_API_PUB.apply_open_receipt for PMT:'
3369: || 'trx.cash_receipt_id=' || trx.cash_receipt_id ||','
3370: || 'trx.payment_amt=' || trx.payment_amt || ','
3371: || 'l_application_ref_num=' || l_application_ref_num || ','
3372: || 'l_receivable_application_id=' || l_receivable_application_id || ','

Line 3396: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3392: x_acctd_amount_applied_from => l_acctd_amount_applied_from,
3393: x_acctd_amount_applied_to => l_acctd_amount_applied_to
3394: );
3395:
3396: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3397: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Execution of AR_RECEIPT_API_PUB.apply_open_receipt is over');
3398: end if;
3399:
3400: END IF;

Line 3397: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Execution of AR_RECEIPT_API_PUB.apply_open_receipt is over');

3393: x_acctd_amount_applied_to => l_acctd_amount_applied_to
3394: );
3395:
3396: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3397: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Execution of AR_RECEIPT_API_PUB.apply_open_receipt is over');
3398: end if;
3399:
3400: END IF;
3401:

Line 3402: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3398: end if;
3399:
3400: END IF;
3401:
3402: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3403: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'x_return_status=' || x_return_status);
3404: end if;
3405:
3406: -- Check for errors and increment the count for

Line 3403: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'x_return_status=' || x_return_status);

3399:
3400: END IF;
3401:
3402: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3403: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'x_return_status=' || x_return_status);
3404: end if;
3405:
3406: -- Check for errors and increment the count for
3407: -- errored applcations

Line 3416: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3412: ROLLBACK TO ARI_Apply_Cash_Receipt_PVT;
3413: RETURN;
3414: END IF;
3415:
3416: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3417: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Applied receipt '||trx.trx_number||', Status: '||x_return_status);
3418: end if;
3419:
3420: write_debug_and_log('X_RETURN_STATUS=>'||X_RETURN_STATUS);

Line 3417: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Applied receipt '||trx.trx_number||', Status: '||x_return_status);

3413: RETURN;
3414: END IF;
3415:
3416: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3417: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Applied receipt '||trx.trx_number||', Status: '||x_return_status);
3418: end if;
3419:
3420: write_debug_and_log('X_RETURN_STATUS=>'||X_RETURN_STATUS);
3421: write_debug_and_log('X_MSG_COUNT=>'||to_char(X_MSG_COUNT));

Line 3428: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3424: ----------------------------------------------------------------------------------
3425: l_debug_info := 'Step 2: Apply debits against the receipt';
3426: ----------------------------------------------------------------------------------
3427:
3428: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3429: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);
3430: end if;
3431:
3432: FOR trx in debit_trx_list

Line 3429: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);

3425: l_debug_info := 'Step 2: Apply debits against the receipt';
3426: ----------------------------------------------------------------------------------
3427:
3428: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3429: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);
3430: end if;
3431:
3432: FOR trx in debit_trx_list
3433: LOOP

Line 3435: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3431:
3432: FOR trx in debit_trx_list
3433: LOOP
3434:
3435: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3436: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, 'Calling AR_RECEIPT_API_PUB.apply for debit trx: '
3437: || 'p_cash_receipt_id=' || p_cash_receipt_id || ','
3438: || 'trx.customer_trx_id=' || trx.customer_trx_id || ','
3439: || 'trx.payment_schedule_id=' || trx.payment_schedule_id || ','

Line 3436: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, 'Calling AR_RECEIPT_API_PUB.apply for debit trx: '

3432: FOR trx in debit_trx_list
3433: LOOP
3434:
3435: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3436: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, 'Calling AR_RECEIPT_API_PUB.apply for debit trx: '
3437: || 'p_cash_receipt_id=' || p_cash_receipt_id || ','
3438: || 'trx.customer_trx_id=' || trx.customer_trx_id || ','
3439: || 'trx.payment_schedule_id=' || trx.payment_schedule_id || ','
3440: || 'trx.payment_amt=' || trx.payment_amt || ','

Line 3466: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3462: p_apply_date => trunc(trx.receipt_date),
3463: p_called_from => 'IREC'
3464: );
3465:
3466: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3467: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Execution of AR_RECEIPT_API_PUB.apply is over. Return Status=' || x_return_status);
3468: end if;
3469:
3470: -- Check for errors and increment the count for

Line 3467: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Execution of AR_RECEIPT_API_PUB.apply is over. Return Status=' || x_return_status);

3463: p_called_from => 'IREC'
3464: );
3465:
3466: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3467: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Execution of AR_RECEIPT_API_PUB.apply is over. Return Status=' || x_return_status);
3468: end if;
3469:
3470: -- Check for errors and increment the count for
3471: -- errored applcations

Line 3480: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3476: ROLLBACK TO ARI_Apply_Cash_Receipt_PVT;
3477: RETURN;
3478: END IF;
3479:
3480: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3481: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Applied Cash to '||trx.trx_number||' Status: '||x_return_status);
3482: end if;
3483:
3484: write_debug_and_log('X_RETURN_STATUS=>'||X_RETURN_STATUS);

Line 3481: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Applied Cash to '||trx.trx_number||' Status: '||x_return_status);

3477: RETURN;
3478: END IF;
3479:
3480: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3481: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Applied Cash to '||trx.trx_number||' Status: '||x_return_status);
3482: end if;
3483:
3484: write_debug_and_log('X_RETURN_STATUS=>'||X_RETURN_STATUS);
3485: write_debug_and_log('X_MSG_COUNT=>'||to_char(X_MSG_COUNT));

Line 3494: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3490: -- There are no errored applications; set the
3491: -- return status to success
3492: p_return_status := FND_API.G_RET_STS_SUCCESS;
3493:
3494: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3495: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Exiting apply_cash with return status: '||p_return_status);
3496: end if;
3497:
3498: EXCEPTION

Line 3495: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Exiting apply_cash with return status: '||p_return_status);

3491: -- return status to success
3492: p_return_status := FND_API.G_RET_STS_SUCCESS;
3493:
3494: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3495: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Exiting apply_cash with return status: '||p_return_status);
3496: end if;
3497:
3498: EXCEPTION
3499: WHEN OTHERS THEN

Line 3734: fnd_log_repository.init;

3730: --Assign default values
3731: l_total_service_charge := 0;
3732: l_procedure_name := '.apply_service_charge';
3733:
3734: fnd_log_repository.init;
3735: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3736: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'+');
3737: end if;
3738:

Line 3735: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3731: l_total_service_charge := 0;
3732: l_procedure_name := '.apply_service_charge';
3733:
3734: fnd_log_repository.init;
3735: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3736: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'+');
3737: end if;
3738:
3739: l_count := 1;

Line 3736: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'+');

3732: l_procedure_name := '.apply_service_charge';
3733:
3734: fnd_log_repository.init;
3735: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3736: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'+');
3737: end if;
3738:
3739: l_count := 1;
3740:

Line 3750: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3746: LOOP
3747:
3748: --l_count := invoice_rec.customer_trx_id;
3749: --l_invoice_list.EXTEND;
3750: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3751: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Index: '||l_count);
3752: end if;
3753: l_invoice_list(l_count).payment_schedule_id := invoice_rec.payment_schedule_id;
3754: l_invoice_list(l_count).payment_amount := invoice_rec.payment_amount;

Line 3751: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Index: '||l_count);

3747:
3748: --l_count := invoice_rec.customer_trx_id;
3749: --l_invoice_list.EXTEND;
3750: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3751: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Index: '||l_count);
3752: end if;
3753: l_invoice_list(l_count).payment_schedule_id := invoice_rec.payment_schedule_id;
3754: l_invoice_list(l_count).payment_amount := invoice_rec.payment_amount;
3755: l_invoice_list(l_count).customer_id := invoice_rec.customer_id;

Line 3775: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3771:
3772: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
3773: -- bug 3672530 - Ensure graceful error handling
3774: x_return_status := FND_API.G_RET_STS_ERROR;
3775: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3776: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'ERROR: Loop count is: '||l_count);
3777: end if;
3778: APP_EXCEPTION.RAISE_EXCEPTION;
3779: END IF;

Line 3776: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'ERROR: Loop count is: '||l_count);

3772: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
3773: -- bug 3672530 - Ensure graceful error handling
3774: x_return_status := FND_API.G_RET_STS_ERROR;
3775: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3776: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'ERROR: Loop count is: '||l_count);
3777: end if;
3778: APP_EXCEPTION.RAISE_EXCEPTION;
3779: END IF;
3780:

Line 3781: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3777: end if;
3778: APP_EXCEPTION.RAISE_EXCEPTION;
3779: END IF;
3780:
3781: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3782: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'-');
3783: end if;
3784:
3785: EXCEPTION

Line 3782: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'-');

3778: APP_EXCEPTION.RAISE_EXCEPTION;
3779: END IF;
3780:
3781: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3782: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'-');
3783: end if;
3784:
3785: EXCEPTION
3786: WHEN OTHERS THEN

Line 3934: fnd_log_repository.init;

3930: x_msg_data := '';
3931: l_procedure_name := '.pay_multiple_invoices';
3932:
3933:
3934: fnd_log_repository.init;
3935:
3936: --------------------------------------------------------------------
3937: l_debug_info := 'In debug mode, log we have entered this procedure';
3938: --------------------------------------------------------------------

Line 3939: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3935:
3936: --------------------------------------------------------------------
3937: l_debug_info := 'In debug mode, log we have entered this procedure';
3938: --------------------------------------------------------------------
3939: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3940: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,
3941: 'Begin+');
3942: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,
3943: 'p_payment_amount ' ||p_payment_amount ||

Line 3940: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,

3936: --------------------------------------------------------------------
3937: l_debug_info := 'In debug mode, log we have entered this procedure';
3938: --------------------------------------------------------------------
3939: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3940: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,
3941: 'Begin+');
3942: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,
3943: 'p_payment_amount ' ||p_payment_amount ||
3944: 'p_discount_amount ' ||p_discount_amount ||

Line 3942: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,

3938: --------------------------------------------------------------------
3939: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3940: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,
3941: 'Begin+');
3942: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,
3943: 'p_payment_amount ' ||p_payment_amount ||
3944: 'p_discount_amount ' ||p_discount_amount ||
3945: 'p_customer_id ' || p_customer_id ||
3946: 'p_site_use_id ' ||p_site_use_id ||

Line 3972: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

3968: l_cvv2 := p_cvv2;
3969: END IF;
3970:
3971:
3972: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3973: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,
3974: 'Calling get_payment_information');
3975: end if;
3976:

Line 3973: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,

3969: END IF;
3970:
3971:
3972: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3973: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,
3974: 'Calling get_payment_information');
3975: end if;
3976:
3977:

Line 4012: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

4008: p_trx_number => l_invoice_trx_number,
4009: p_payment_channel_code => l_payment_channel_code);
4010:
4011: --DEBUG
4012: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4013: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_rct_curr => ' || l_receipt_currency_code);
4014: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_rct_method_id => ' ||l_receipt_method_id );
4015: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_remit_bank_account_id => ' || l_Remit_bank_account_id);
4016: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_creation_status => ' || l_receipt_creation_status );

Line 4013: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_rct_curr => ' || l_receipt_currency_code);

4009: p_payment_channel_code => l_payment_channel_code);
4010:
4011: --DEBUG
4012: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4013: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_rct_curr => ' || l_receipt_currency_code);
4014: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_rct_method_id => ' ||l_receipt_method_id );
4015: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_remit_bank_account_id => ' || l_Remit_bank_account_id);
4016: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_creation_status => ' || l_receipt_creation_status );
4017: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_site_use_id => ' || l_site_use_id );

Line 4014: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_rct_method_id => ' ||l_receipt_method_id );

4010:
4011: --DEBUG
4012: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4013: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_rct_curr => ' || l_receipt_currency_code);
4014: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_rct_method_id => ' ||l_receipt_method_id );
4015: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_remit_bank_account_id => ' || l_Remit_bank_account_id);
4016: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_creation_status => ' || l_receipt_creation_status );
4017: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_site_use_id => ' || l_site_use_id );
4018: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_currency_code => ' || l_receipt_currency_code);

Line 4015: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_remit_bank_account_id => ' || l_Remit_bank_account_id);

4011: --DEBUG
4012: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4013: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_rct_curr => ' || l_receipt_currency_code);
4014: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_rct_method_id => ' ||l_receipt_method_id );
4015: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_remit_bank_account_id => ' || l_Remit_bank_account_id);
4016: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_creation_status => ' || l_receipt_creation_status );
4017: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_site_use_id => ' || l_site_use_id );
4018: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_currency_code => ' || l_receipt_currency_code);
4019: end if;

Line 4016: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_creation_status => ' || l_receipt_creation_status );

4012: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4013: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_rct_curr => ' || l_receipt_currency_code);
4014: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_rct_method_id => ' ||l_receipt_method_id );
4015: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_remit_bank_account_id => ' || l_Remit_bank_account_id);
4016: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_creation_status => ' || l_receipt_creation_status );
4017: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_site_use_id => ' || l_site_use_id );
4018: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_currency_code => ' || l_receipt_currency_code);
4019: end if;
4020:

Line 4017: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_site_use_id => ' || l_site_use_id );

4013: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_rct_curr => ' || l_receipt_currency_code);
4014: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_rct_method_id => ' ||l_receipt_method_id );
4015: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_remit_bank_account_id => ' || l_Remit_bank_account_id);
4016: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_creation_status => ' || l_receipt_creation_status );
4017: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_site_use_id => ' || l_site_use_id );
4018: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_currency_code => ' || l_receipt_currency_code);
4019: end if;
4020:
4021: IF p_payment_instrument = 'CREDIT_CARD' THEN

Line 4018: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_currency_code => ' || l_receipt_currency_code);

4014: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_rct_method_id => ' ||l_receipt_method_id );
4015: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_remit_bank_account_id => ' || l_Remit_bank_account_id);
4016: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_creation_status => ' || l_receipt_creation_status );
4017: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_site_use_id => ' || l_site_use_id );
4018: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_currency_code => ' || l_receipt_currency_code);
4019: end if;
4020:
4021: IF p_payment_instrument = 'CREDIT_CARD' THEN
4022: get_payment_channel_attribs

Line 4033: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

4029: x_msg_data => x_msg_data
4030: );
4031: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
4032:
4033: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4034: fnd_log.string(fnd_log.LEVEL_STATEMENT,
4035: G_PKG_NAME||l_procedure_name,
4036: 'ERROR IN GETTING IBY PAYMENT CHANNEL ATTRIBUTES');
4037: end if;

Line 4034: fnd_log.string(fnd_log.LEVEL_STATEMENT,

4030: );
4031: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
4032:
4033: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4034: fnd_log.string(fnd_log.LEVEL_STATEMENT,
4035: G_PKG_NAME||l_procedure_name,
4036: 'ERROR IN GETTING IBY PAYMENT CHANNEL ATTRIBUTES');
4037: end if;
4038:

Line 4109: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

4105: x_msg_data => l_msg_data);
4106:
4107: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
4108:
4109: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4110: fnd_log.string(fnd_log.LEVEL_STATEMENT,
4111: G_PKG_NAME||l_procedure_name,
4112: 'ERROR IN CREATING PAYMENT INSTRUMENT');
4113: end if;

Line 4110: fnd_log.string(fnd_log.LEVEL_STATEMENT,

4106:
4107: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
4108:
4109: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4110: fnd_log.string(fnd_log.LEVEL_STATEMENT,
4111: G_PKG_NAME||l_procedure_name,
4112: 'ERROR IN CREATING PAYMENT INSTRUMENT');
4113: end if;
4114:

Line 4156: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

4152:
4153:
4154: -- Check if the payment instrument was created successfully
4155: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
4156: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4157: fnd_log.string(fnd_log.LEVEL_STATEMENT,
4158: G_PKG_NAME||l_procedure_name,
4159: 'ERROR IN CREATING PAYMENT INSTRUMENT');
4160: end if;

Line 4157: fnd_log.string(fnd_log.LEVEL_STATEMENT,

4153:
4154: -- Check if the payment instrument was created successfully
4155: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
4156: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4157: fnd_log.string(fnd_log.LEVEL_STATEMENT,
4158: G_PKG_NAME||l_procedure_name,
4159: 'ERROR IN CREATING PAYMENT INSTRUMENT');
4160: end if;
4161:

Line 4181: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

4177: l_instr_assign_id := p_instr_assign_id;
4178: END IF;
4179:
4180:
4181: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4182: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with bank Creation .....');
4183: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Expiration date for bank account: ' || p_expiration_date);
4184: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Bank Acct Id: '||l_bank_account_id);
4185: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Bank Acct Uses Id: '||l_bank_account_uses_id);

Line 4182: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with bank Creation .....');

4178: END IF;
4179:
4180:
4181: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4182: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with bank Creation .....');
4183: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Expiration date for bank account: ' || p_expiration_date);
4184: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Bank Acct Id: '||l_bank_account_id);
4185: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Bank Acct Uses Id: '||l_bank_account_uses_id);
4186: end if;

Line 4183: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Expiration date for bank account: ' || p_expiration_date);

4179:
4180:
4181: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4182: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with bank Creation .....');
4183: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Expiration date for bank account: ' || p_expiration_date);
4184: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Bank Acct Id: '||l_bank_account_id);
4185: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Bank Acct Uses Id: '||l_bank_account_uses_id);
4186: end if;
4187:

Line 4184: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Bank Acct Id: '||l_bank_account_id);

4180:
4181: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4182: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with bank Creation .....');
4183: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Expiration date for bank account: ' || p_expiration_date);
4184: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Bank Acct Id: '||l_bank_account_id);
4185: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Bank Acct Uses Id: '||l_bank_account_uses_id);
4186: end if;
4187:
4188: /*------------------------------------+

Line 4185: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Bank Acct Uses Id: '||l_bank_account_uses_id);

4181: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4182: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with bank Creation .....');
4183: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Expiration date for bank account: ' || p_expiration_date);
4184: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Bank Acct Id: '||l_bank_account_id);
4185: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Bank Acct Uses Id: '||l_bank_account_uses_id);
4186: end if;
4187:
4188: /*------------------------------------+
4189: | Standard start of API savepoint |

Line 4240: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

4236: x_entity_id => l_extn_id,
4237: x_response => l_result_rec);
4238:
4239: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
4240: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4241: fnd_log.string(fnd_log.LEVEL_STATEMENT,
4242: G_PKG_NAME||l_procedure_name,
4243: 'ERROR IN CREATING TRANSACTION EXTENSION');
4244: fnd_log.string(fnd_log.LEVEL_STATEMENT,

Line 4241: fnd_log.string(fnd_log.LEVEL_STATEMENT,

4237: x_response => l_result_rec);
4238:
4239: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
4240: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4241: fnd_log.string(fnd_log.LEVEL_STATEMENT,
4242: G_PKG_NAME||l_procedure_name,
4243: 'ERROR IN CREATING TRANSACTION EXTENSION');
4244: fnd_log.string(fnd_log.LEVEL_STATEMENT,
4245: G_PKG_NAME||l_procedure_name,l_result_rec.result_code);

Line 4244: fnd_log.string(fnd_log.LEVEL_STATEMENT,

4240: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4241: fnd_log.string(fnd_log.LEVEL_STATEMENT,
4242: G_PKG_NAME||l_procedure_name,
4243: 'ERROR IN CREATING TRANSACTION EXTENSION');
4244: fnd_log.string(fnd_log.LEVEL_STATEMENT,
4245: G_PKG_NAME||l_procedure_name,l_result_rec.result_code);
4246: end if;
4247:
4248: x_msg_count := x_msg_count + l_msg_count;

Line 4260: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

4256: write_error_messages(x_msg_data, x_msg_count);
4257: RETURN;
4258: END IF;
4259:
4260: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4261: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with create trxn extn.....');
4262: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_extn_id : ' ||l_extn_id);
4263: end if;
4264: write_debug_and_log('l_receipt_currency_code : ' || l_receipt_currency_code);

Line 4261: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with create trxn extn.....');

4257: RETURN;
4258: END IF;
4259:
4260: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4261: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with create trxn extn.....');
4262: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_extn_id : ' ||l_extn_id);
4263: end if;
4264: write_debug_and_log('l_receipt_currency_code : ' || l_receipt_currency_code);
4265: write_debug_and_log('l_invoice_exchange_rate : ' || to_char(l_invoice_exchange_rate));

Line 4262: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_extn_id : ' ||l_extn_id);

4258: END IF;
4259:
4260: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4261: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with create trxn extn.....');
4262: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_extn_id : ' ||l_extn_id);
4263: end if;
4264: write_debug_and_log('l_receipt_currency_code : ' || l_receipt_currency_code);
4265: write_debug_and_log('l_invoice_exchange_rate : ' || to_char(l_invoice_exchange_rate));
4266: write_debug_and_log('l_extn_id : ' || l_extn_id);

Line 4278: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

4274: p_exchange_rate => l_receipt_exchange_rate,
4275: p_exchange_rate_type => l_receipt_exchange_rate_type,
4276: p_exchange_rate_date => l_receipt_exchange_rate_date);
4277:
4278: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4279: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with getexchangerate.....');
4280: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_currency_code : ' || l_receipt_currency_code);
4281: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_exchange_rate : ' || to_char(l_invoice_exchange_rate));
4282: end if;

Line 4279: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with getexchangerate.....');

4275: p_exchange_rate_type => l_receipt_exchange_rate_type,
4276: p_exchange_rate_date => l_receipt_exchange_rate_date);
4277:
4278: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4279: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with getexchangerate.....');
4280: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_currency_code : ' || l_receipt_currency_code);
4281: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_exchange_rate : ' || to_char(l_invoice_exchange_rate));
4282: end if;
4283:

Line 4280: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_currency_code : ' || l_receipt_currency_code);

4276: p_exchange_rate_date => l_receipt_exchange_rate_date);
4277:
4278: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4279: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with getexchangerate.....');
4280: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_currency_code : ' || l_receipt_currency_code);
4281: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_exchange_rate : ' || to_char(l_invoice_exchange_rate));
4282: end if;
4283:
4284: -- for demo purposes only: if fnd function ARIPAYMENTDEMOMODE

Line 4281: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_exchange_rate : ' || to_char(l_invoice_exchange_rate));

4277:
4278: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4279: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with getexchangerate.....');
4280: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_currency_code : ' || l_receipt_currency_code);
4281: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'l_receipt_exchange_rate : ' || to_char(l_invoice_exchange_rate));
4282: end if;
4283:
4284: -- for demo purposes only: if fnd function ARIPAYMENTDEMOMODE
4285: -- is added to the menu of the current responsibility, supress

Line 4328: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

4324:
4325: arp_standard.debug('create receipt --> ' || x_return_status || 'receipt id --> ' || p_cash_receipt_id);
4326: arp_standard.debug('X_RETURN_STATUS=>'||X_RETURN_STATUS);
4327:
4328: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4329: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with receipt creation ....');
4330: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Return Status: '||x_return_status);
4331: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Cash Receipt Id: '||to_char(p_cash_receipt_id));
4332: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Bank Account Id: '||to_char(p_bank_account_id));

Line 4329: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with receipt creation ....');

4325: arp_standard.debug('create receipt --> ' || x_return_status || 'receipt id --> ' || p_cash_receipt_id);
4326: arp_standard.debug('X_RETURN_STATUS=>'||X_RETURN_STATUS);
4327:
4328: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4329: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with receipt creation ....');
4330: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Return Status: '||x_return_status);
4331: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Cash Receipt Id: '||to_char(p_cash_receipt_id));
4332: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Bank Account Id: '||to_char(p_bank_account_id));
4333: end if;

Line 4330: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Return Status: '||x_return_status);

4326: arp_standard.debug('X_RETURN_STATUS=>'||X_RETURN_STATUS);
4327:
4328: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4329: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with receipt creation ....');
4330: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Return Status: '||x_return_status);
4331: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Cash Receipt Id: '||to_char(p_cash_receipt_id));
4332: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Bank Account Id: '||to_char(p_bank_account_id));
4333: end if;
4334:

Line 4331: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Cash Receipt Id: '||to_char(p_cash_receipt_id));

4327:
4328: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4329: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with receipt creation ....');
4330: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Return Status: '||x_return_status);
4331: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Cash Receipt Id: '||to_char(p_cash_receipt_id));
4332: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Bank Account Id: '||to_char(p_bank_account_id));
4333: end if;
4334:
4335: -- Check for error in receipt creation. If it is an error

Line 4332: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Bank Account Id: '||to_char(p_bank_account_id));

4328: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4329: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Done with receipt creation ....');
4330: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Return Status: '||x_return_status);
4331: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Cash Receipt Id: '||to_char(p_cash_receipt_id));
4332: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Bank Account Id: '||to_char(p_bank_account_id));
4333: end if;
4334:
4335: -- Check for error in receipt creation. If it is an error
4336: -- the rollback and return.

Line 4390: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

4386: );
4387:
4388: -- Check if any of the applications errored out
4389: -- If so the rollback everything and return
4390: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4391: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Apply Cash call ended with Status : '||x_return_status);
4392: end if;
4393:
4394: IF ( l_apply_err_count > 0 ) THEN

Line 4391: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Apply Cash call ended with Status : '||x_return_status);

4387:
4388: -- Check if any of the applications errored out
4389: -- If so the rollback everything and return
4390: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4391: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Apply Cash call ended with Status : '||x_return_status);
4392: end if;
4393:
4394: IF ( l_apply_err_count > 0 ) THEN
4395: x_msg_count := x_msg_count + l_msg_count;

Line 4411: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

4407: -- only if it is a credit card payment
4408: IF (p_payment_instrument = 'CREDIT_CARD' AND
4409: l_call_payment_processor = FND_API.G_TRUE) THEN
4410:
4411: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4412: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Calling process_payment .....');
4413: end if;
4414: --------------------------------------------------------------------
4415: l_debug_info := 'Capture Credit Card payment';

Line 4412: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Calling process_payment .....');

4408: IF (p_payment_instrument = 'CREDIT_CARD' AND
4409: l_call_payment_processor = FND_API.G_TRUE) THEN
4410:
4411: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4412: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Calling process_payment .....');
4413: end if;
4414: --------------------------------------------------------------------
4415: l_debug_info := 'Capture Credit Card payment';
4416: --------------------------------------------------------------------

Line 4426: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

4422: x_msg_count => l_msg_count,
4423: x_msg_data => l_msg_data,
4424: x_return_status => x_return_status);
4425:
4426: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4427: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Process Payment ended with Status : '||x_return_status);
4428: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Response Code: '|| l_response_error_code);
4429: end if;
4430: -- If the payment processor call fails, then we need to rollback all the changes

Line 4427: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Process Payment ended with Status : '||x_return_status);

4423: x_msg_data => l_msg_data,
4424: x_return_status => x_return_status);
4425:
4426: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4427: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Process Payment ended with Status : '||x_return_status);
4428: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Response Code: '|| l_response_error_code);
4429: end if;
4430: -- If the payment processor call fails, then we need to rollback all the changes
4431: -- made in the create() and apply() routines also.

Line 4428: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Response Code: '|| l_response_error_code);

4424: x_return_status => x_return_status);
4425:
4426: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4427: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Process Payment ended with Status : '||x_return_status);
4428: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Response Code: '|| l_response_error_code);
4429: end if;
4430: -- If the payment processor call fails, then we need to rollback all the changes
4431: -- made in the create() and apply() routines also.
4432: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

Line 4554: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

4550: END IF;
4551:
4552: p_status := FND_API.G_RET_STS_SUCCESS;
4553:
4554: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4555: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,
4556: 'End-');
4557: end if;
4558:

Line 4555: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,

4551:
4552: p_status := FND_API.G_RET_STS_SUCCESS;
4553:
4554: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4555: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,
4556: 'End-');
4557: end if;
4558:
4559: EXCEPTION

Line 5272: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

5268: FETCH cc_profile_pmt_method_info_cur INTO cc_profile_pmt_method_info;
5269: /* If CC Payment Method set is NULL or DISABLED or an invalid payment method, it returns NO rows */
5270: IF cc_profile_pmt_method_info_cur%FOUND THEN
5271: l_debug_info := 'Payment Method Set in the profile OIR_CC_PMT_METHOD is Valid. Val=' || fnd_profile.VALUE('OIR_CC_PMT_METHOD');
5272: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5273: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);
5274: end if;
5275: RETURN 1;
5276: ELSE

Line 5273: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);

5269: /* If CC Payment Method set is NULL or DISABLED or an invalid payment method, it returns NO rows */
5270: IF cc_profile_pmt_method_info_cur%FOUND THEN
5271: l_debug_info := 'Payment Method Set in the profile OIR_CC_PMT_METHOD is Valid. Val=' || fnd_profile.VALUE('OIR_CC_PMT_METHOD');
5272: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5273: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);
5274: end if;
5275: RETURN 1;
5276: ELSE
5277: l_debug_info := 'Invalid Payment Method is Set in the profile OIR_CC_PMT_METHOD. Value in profile=' || fnd_profile.VALUE('OIR_CC_PMT_METHOD');

Line 5278: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

5274: end if;
5275: RETURN 1;
5276: ELSE
5277: l_debug_info := 'Invalid Payment Method is Set in the profile OIR_CC_PMT_METHOD. Value in profile=' || fnd_profile.VALUE('OIR_CC_PMT_METHOD');
5278: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5279: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);
5280: end if;
5281: RETURN 0;
5282: END IF;

Line 5279: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);

5275: RETURN 1;
5276: ELSE
5277: l_debug_info := 'Invalid Payment Method is Set in the profile OIR_CC_PMT_METHOD. Value in profile=' || fnd_profile.VALUE('OIR_CC_PMT_METHOD');
5278: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5279: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);
5280: end if;
5281: RETURN 0;
5282: END IF;
5283: CLOSE cc_profile_pmt_method_info_cur;

Line 5289: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

5285: END IF;
5286:
5287: l_debug_info := 'No value is set in the profile OIR_CC_PMT_METHOD. Checking at customer site, acct and system options level.';
5288:
5289: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5290: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);
5291: end if;
5292:
5293: /* Default behavior, as no Credit Card Payment method is mentioned in the OIR_CC_PMT_METHOD profile */

Line 5290: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);

5286:
5287: l_debug_info := 'No value is set in the profile OIR_CC_PMT_METHOD. Checking at customer site, acct and system options level.';
5288:
5289: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5290: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);
5291: end if;
5292:
5293: /* Default behavior, as no Credit Card Payment method is mentioned in the OIR_CC_PMT_METHOD profile */
5294:

Line 5457: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

5453: FETCH ba_profile_pmt_method_info_cur INTO ba_profile_pmt_method_info;
5454: /* If Bank Account Payment Method set is NULL or DISABLED or an invalid payment method, it returns NO rows */
5455: IF ba_profile_pmt_method_info_cur%FOUND THEN
5456: l_debug_info := 'Payment Method Set in the profile OIR_BA_PMT_METHOD is Valid. Val=' || fnd_profile.VALUE('OIR_BA_PMT_METHOD');
5457: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5458: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);
5459: end if;
5460: RETURN 1;
5461: ELSE

Line 5458: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);

5454: /* If Bank Account Payment Method set is NULL or DISABLED or an invalid payment method, it returns NO rows */
5455: IF ba_profile_pmt_method_info_cur%FOUND THEN
5456: l_debug_info := 'Payment Method Set in the profile OIR_BA_PMT_METHOD is Valid. Val=' || fnd_profile.VALUE('OIR_BA_PMT_METHOD');
5457: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5458: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);
5459: end if;
5460: RETURN 1;
5461: ELSE
5462: l_debug_info := 'Invalid Payment Method is Set in the profile OIR_BA_PMT_METHOD. Value in profile=' || fnd_profile.VALUE('OIR_BA_PMT_METHOD');

Line 5463: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

5459: end if;
5460: RETURN 1;
5461: ELSE
5462: l_debug_info := 'Invalid Payment Method is Set in the profile OIR_BA_PMT_METHOD. Value in profile=' || fnd_profile.VALUE('OIR_BA_PMT_METHOD');
5463: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5464: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);
5465: end if;
5466: RETURN 0;
5467: END IF;

Line 5464: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);

5460: RETURN 1;
5461: ELSE
5462: l_debug_info := 'Invalid Payment Method is Set in the profile OIR_BA_PMT_METHOD. Value in profile=' || fnd_profile.VALUE('OIR_BA_PMT_METHOD');
5463: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5464: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);
5465: end if;
5466: RETURN 0;
5467: END IF;
5468: CLOSE ba_profile_pmt_method_info_cur;

Line 5474: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

5470: END IF;
5471:
5472: l_debug_info := 'No value is set in the profile OIR_BA_PMT_METHOD. Checking at customer site, acct and system options level.';
5473:
5474: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5475: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);
5476: end if;
5477:
5478: /* Default behavior, as no Bank Account Payment method is mentioned in the OIR_BA_PMT_METHOD profile */

Line 5475: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);

5471:
5472: l_debug_info := 'No value is set in the profile OIR_BA_PMT_METHOD. Checking at customer site, acct and system options level.';
5473:
5474: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5475: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, l_debug_info);
5476: end if;
5477:
5478: /* Default behavior, as no Bank Account Payment method is mentioned in the OIR_BA_PMT_METHOD profile */
5479:

Line 6103: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

6099:
6100: l_procedure_name := '.get_customer_site_use_id';
6101: l_customer_site_use_id := NULL;
6102:
6103: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6104: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, 'Begin+');
6105: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,
6106: 'p_session_id=' || p_session_id ||
6107: 'p_user_id=' || FND_GLOBAL.user_id ||

Line 6104: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, 'Begin+');

6100: l_procedure_name := '.get_customer_site_use_id';
6101: l_customer_site_use_id := NULL;
6102:
6103: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6104: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, 'Begin+');
6105: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,
6106: 'p_session_id=' || p_session_id ||
6107: 'p_user_id=' || FND_GLOBAL.user_id ||
6108: 'p_customer_id=' || p_customer_id);

Line 6105: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,

6101: l_customer_site_use_id := NULL;
6102:
6103: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6104: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name, 'Begin+');
6105: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,
6106: 'p_session_id=' || p_session_id ||
6107: 'p_user_id=' || FND_GLOBAL.user_id ||
6108: 'p_customer_id=' || p_customer_id);
6109: end if;

Line 6115: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

6111:
6112: ---------------------------------------------------------------------------
6113: l_debug_info := 'Check if the user has access to the primary bill to site id';
6114: ---------------------------------------------------------------------------
6115: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6116: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,l_debug_info);
6117: end if;
6118:
6119: BEGIN

Line 6116: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,l_debug_info);

6112: ---------------------------------------------------------------------------
6113: l_debug_info := 'Check if the user has access to the primary bill to site id';
6114: ---------------------------------------------------------------------------
6115: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6116: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,l_debug_info);
6117: end if;
6118:
6119: BEGIN
6120:

Line 6138: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

6134: WHEN NO_DATA_FOUND THEN
6135: l_customer_site_use_id := NULL;
6136: END;
6137:
6138: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6139: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Check for acess to the Primary bill to site returned site id=' || l_customer_site_use_id);
6140: end if;
6141:
6142: IF (l_customer_site_use_id IS NULL) THEN

Line 6139: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Check for acess to the Primary bill to site returned site id=' || l_customer_site_use_id);

6135: l_customer_site_use_id := NULL;
6136: END;
6137:
6138: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6139: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Check for acess to the Primary bill to site returned site id=' || l_customer_site_use_id);
6140: end if;
6141:
6142: IF (l_customer_site_use_id IS NULL) THEN
6143: /* So, user does not have access to primary bill to site

Line 6151: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

6147: LOOP
6148: FETCH get_cust_site_use_id_cur INTO l_customer_site_use_id ;
6149:
6150: IF get_cust_site_use_id_cur%ROWCOUNT >1 THEN
6151: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6152: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'The selected transactions belong to more than one site');
6153: end if;
6154: l_customer_site_use_id := -1;
6155: EXIT;

Line 6152: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'The selected transactions belong to more than one site');

6148: FETCH get_cust_site_use_id_cur INTO l_customer_site_use_id ;
6149:
6150: IF get_cust_site_use_id_cur%ROWCOUNT >1 THEN
6151: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6152: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'The selected transactions belong to more than one site');
6153: end if;
6154: l_customer_site_use_id := -1;
6155: EXIT;
6156: ELSIF get_cust_site_use_id_cur%ROWCOUNT = 0 THEN

Line 6157: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

6153: end if;
6154: l_customer_site_use_id := -1;
6155: EXIT;
6156: ELSIF get_cust_site_use_id_cur%ROWCOUNT = 0 THEN
6157: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6158: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Query on ar_irec_payment_list_gt returned 0 rows');
6159: end if;
6160: RAISE e_no_rows_in_GT;
6161: EXIT;

Line 6158: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Query on ar_irec_payment_list_gt returned 0 rows');

6154: l_customer_site_use_id := -1;
6155: EXIT;
6156: ELSIF get_cust_site_use_id_cur%ROWCOUNT = 0 THEN
6157: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6158: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Query on ar_irec_payment_list_gt returned 0 rows');
6159: end if;
6160: RAISE e_no_rows_in_GT;
6161: EXIT;
6162: END IF;

Line 6170: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

6166: CLOSE get_cust_site_use_id_cur;
6167:
6168: END IF;
6169:
6170: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6171: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Return val: l_customer_site_use_id=' || l_customer_site_use_id);
6172: end if;
6173:
6174: RETURN l_customer_site_use_id;

Line 6171: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Return val: l_customer_site_use_id=' || l_customer_site_use_id);

6167:
6168: END IF;
6169:
6170: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6171: fnd_log.string(fnd_log.LEVEL_STATEMENT,G_PKG_NAME||l_procedure_name,'Return val: l_customer_site_use_id=' || l_customer_site_use_id);
6172: end if;
6173:
6174: RETURN l_customer_site_use_id;
6175: