[Home] [Help]
3813: -- Call AR API Create Cash Receipt per Batch --
3814: fun_net_util.log_string(g_event_level,l_path,'receipt currency:'||pARReceiptRec.currency_code);
3815: fun_net_util.log_string(g_event_level,l_path,'exchange rate:'||pARReceiptRec.exchange_rate);
3816: fun_net_util.log_string(g_event_level,l_path,'amount:'||pARReceiptRec.amount);
3817: AR_RECEIPT_API_PUB.Create_cash(
3818: -- Standard API parameters.
3819: p_api_version => 1.0,
3820: p_init_msg_list => FND_API.G_TRUE,
3821: p_commit => FND_API.G_FALSE,
3843: -- ** OUT NOCOPY variables
3844: p_cr_id => x_cash_receipt_id);
3845: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3846: fun_net_util.log_string(g_event_level,l_path
3847: ,'Cash receipt creation failed either because AR_RECEIPT_API_PUB. Creat_cash failed or there is no receipt class associated ');
3848: FND_MSG_PUB.Count_And_Get (
3849: p_count => x_msg_count,
3850: p_data => x_msg_data );
3851: IF x_msg_count > 1 THEN
3930: txnTable(i).invoice_currency_code,
3931: g_func_currency);
3932: l_applied_from := l_applied_amt * l_exchange_rate;
3933: END IF;
3934: AR_RECEIPT_API_PUB.Apply(
3935: -- Standard API parameters.
3936: p_api_version => 1.0,
3937: p_init_msg_list => FND_API.G_FALSE,
3938: p_commit => FND_API.G_FALSE,
3988: l_msg_count NUMBER;
3989: l_msg_data VARCHAR2(2000);
3990: l_path VARCHAR2(100);
3991: l_receipt_currecycode VARCHAR2(10); -- bug 52380292
3992: llca_def_trx_lines_tbl AR_RECEIPT_API_PUB.llca_trx_lines_tbl_type ;
3993: l_precision NUMBER;
3994: l_running_amount1 NUMBER;
3995: l_freight_amount NUMBER;
3996: l_discount_amount NUMBER;
4228: IF l_line_or_header >= 1 and pymt_schedule_count=1 and (l_class = 'INV' OR l_class = 'DM')THEN
4229: --6179308. Call Apply_In_Detail for invoices and Debitmemo, otherwise call Apply API.
4230: fun_net_util.Log_String(g_event_level,l_path,'Inside main iF');
4231: fun_net_util.Log_String(g_event_level,l_path,'Calling APPLY IN DETAIL');
4232: AR_RECEIPT_API_PUB.Apply_In_Detail(
4233: -- Standard API parameters.
4234: p_api_version => 1.0,
4235: p_init_msg_list => FND_API.G_FALSE,
4236: p_commit => FND_API.G_FALSE,
4255: fun_net_util.Log_String(g_event_level,l_path,'Inside Else jst before calling Apply');
4256: fun_net_util.Log_String(g_event_level,l_path,'p_cash_receipt_id = ' || p_cash_receipt_id );
4257: fun_net_util.Log_String(g_event_level,l_path,'txnTable(i).customer_trx_id = ' || txnTable(i).customer_trx_id );
4258: fun_net_util.Log_String(g_event_level,l_path,'Calling APPLY');
4259: Ar_receipt_api_pub.apply(
4260: p_api_version => 1.0,
4261: p_init_msg_list => FND_API.G_TRUE,
4262: p_cash_receipt_id => p_cash_receipt_id,
4263: p_customer_trx_id => txnTable(i).customer_trx_id,
4272: FND_MSG_PUB.Count_And_Get (
4273: p_count => l_msg_count,
4274: p_data => l_msg_data );
4275: fun_net_util.Log_String(g_event_level,l_path
4276: ,'apply cash receipt package after AR_RECEIPT_API_PUB.Apply:' ||l_msg_data);
4277: IF l_msg_count > 1 THEN
4278: FOR x IN 1..l_msg_count LOOP
4279: l_msg_data := fnd_msg_pub.get(p_encoded => fnd_api.g_false);
4280: FND_FILE.PUT_LINE(FND_FILE.LOG,l_msg_data);
4279: l_msg_data := fnd_msg_pub.get(p_encoded => fnd_api.g_false);
4280: FND_FILE.PUT_LINE(FND_FILE.LOG,l_msg_data);
4281: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
4282: fun_net_util.Log_String(g_event_level,l_path
4283: ,'apply cash receipt package Error message AR_RECEIPT_API_PUB.Apply' ||l_msg_data||' '||' '||x);
4284: END LOOP;
4285: END IF;
4286: x_return_status := FND_API.G_FALSE;
4287: RETURN;
4581: /***************************************************************************
4582: |PROCEDURE apply_cash_receipt : Applies a Receipt to AR transactions in the|
4583: |Batch . Applies at Line level based on perecent contribution per line |
4584: | |
4585: |Calls : AR_RECEIPT_API_PUB.Apply |
4586: ***************************************************************************/
4587: FUNCTION default_batch_details
4588: RETURN VARCHAR2
4589: IS