335: BEGIN
336:
337: ZX_API_PUB.validate_and_default_tax_attr(
338: p_api_version => 1.0,
339: p_init_msg_list => FND_API.G_FALSE,
340: p_commit => FND_API.G_FALSE,
341: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
342: x_return_status => l_return_status,
343: x_msg_count => l_message_count,
336:
337: ZX_API_PUB.validate_and_default_tax_attr(
338: p_api_version => 1.0,
339: p_init_msg_list => FND_API.G_FALSE,
340: p_commit => FND_API.G_FALSE,
341: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
342: x_return_status => l_return_status,
343: x_msg_count => l_message_count,
344: x_msg_data => l_message_data
337: ZX_API_PUB.validate_and_default_tax_attr(
338: p_api_version => 1.0,
339: p_init_msg_list => FND_API.G_FALSE,
340: p_commit => FND_API.G_FALSE,
341: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
342: x_return_status => l_return_status,
343: x_msg_count => l_message_count,
344: x_msg_data => l_message_data
345: );
343: x_msg_count => l_message_count,
344: x_msg_data => l_message_data
345: );
346:
347: IF l_return_status = FND_API.G_RET_STS_SUCCESS
348: THEN
349: IF PG_DEBUG in ('Y', 'C') THEN
350: arp_standard.debug('validate_and_default_tax_attr returns successfully');
351: END IF;
359: debug('arp_etax_util.validate_tax_int()+');
360: debug('ZX_API_PUB.validate_and_default_tax_attr returns failure');
361: END IF;
362:
363: IF l_return_status = FND_API.G_RET_STS_ERROR
364: THEN
365: p_return_status := 1;
366: ELSE
367: /* Unexpected error */
378: ELSIF l_message_count > 1
379: THEN
380: LOOP
381: l_msg := FND_MSG_PUB.Get(FND_MSG_PUB.G_NEXT,
382: FND_API.G_FALSE);
383: IF l_msg IS NULL
384: THEN
385: EXIT;
386: ELSE
406: l_msg VARCHAR2(2000);
407: BEGIN
408: ZX_API_PUB.import_document_with_tax(
409: p_api_version => 1.0,
410: p_init_msg_list => FND_API.G_FALSE,
411: p_commit => FND_API.G_FALSE,
412: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
413: x_return_status => l_return_status,
414: x_msg_count => l_message_count,
407: BEGIN
408: ZX_API_PUB.import_document_with_tax(
409: p_api_version => 1.0,
410: p_init_msg_list => FND_API.G_FALSE,
411: p_commit => FND_API.G_FALSE,
412: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
413: x_return_status => l_return_status,
414: x_msg_count => l_message_count,
415: x_msg_data => l_message_data
408: ZX_API_PUB.import_document_with_tax(
409: p_api_version => 1.0,
410: p_init_msg_list => FND_API.G_FALSE,
411: p_commit => FND_API.G_FALSE,
412: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
413: x_return_status => l_return_status,
414: x_msg_count => l_message_count,
415: x_msg_data => l_message_data
416: );
414: x_msg_count => l_message_count,
415: x_msg_data => l_message_data
416: );
417:
418: IF l_return_status = FND_API.G_RET_STS_SUCCESS
419: THEN
420: IF PG_DEBUG in ('Y', 'C') THEN
421: arp_standard.debug('import_document_with_tax returns successfully');
422: END IF;
430: debug('arp_etax_util.calculate_tax_int()+');
431: debug('ZX_API_PUB.import_document_with_tax returns failure');
432: END IF;
433:
434: IF l_return_status = FND_API.G_RET_STS_ERROR
435: THEN
436: p_return_status := 1;
437: ELSE
438: /* Unexpected error */
449: ELSIF l_message_count > 1
450: THEN
451: LOOP
452: l_msg := FND_MSG_PUB.Get(FND_MSG_PUB.G_NEXT,
453: FND_API.G_FALSE);
454: IF l_msg IS NULL
455: THEN
456: EXIT;
457: ELSE
685: END IF;
686:
687: /* 5748090 - preserve values in columns that are not
688: directly used by AR */
689: l_sync_trx_rec.supplier_tax_invoice_number := FND_API.G_MISS_CHAR;
690: l_sync_trx_rec.supplier_tax_invoice_date := FND_API.G_MISS_DATE;
691: l_sync_trx_rec.supplier_exchange_rate := FND_API.G_MISS_NUM;
692: l_sync_trx_rec.tax_invoice_date := FND_API.G_MISS_DATE;
693: l_sync_trx_rec.tax_invoice_number := FND_API.G_MISS_CHAR;
686:
687: /* 5748090 - preserve values in columns that are not
688: directly used by AR */
689: l_sync_trx_rec.supplier_tax_invoice_number := FND_API.G_MISS_CHAR;
690: l_sync_trx_rec.supplier_tax_invoice_date := FND_API.G_MISS_DATE;
691: l_sync_trx_rec.supplier_exchange_rate := FND_API.G_MISS_NUM;
692: l_sync_trx_rec.tax_invoice_date := FND_API.G_MISS_DATE;
693: l_sync_trx_rec.tax_invoice_number := FND_API.G_MISS_CHAR;
694: l_sync_trx_rec.port_of_entry_code := FND_API.G_MISS_CHAR;
687: /* 5748090 - preserve values in columns that are not
688: directly used by AR */
689: l_sync_trx_rec.supplier_tax_invoice_number := FND_API.G_MISS_CHAR;
690: l_sync_trx_rec.supplier_tax_invoice_date := FND_API.G_MISS_DATE;
691: l_sync_trx_rec.supplier_exchange_rate := FND_API.G_MISS_NUM;
692: l_sync_trx_rec.tax_invoice_date := FND_API.G_MISS_DATE;
693: l_sync_trx_rec.tax_invoice_number := FND_API.G_MISS_CHAR;
694: l_sync_trx_rec.port_of_entry_code := FND_API.G_MISS_CHAR;
695: l_sync_trx_rec.application_doc_status := FND_API.G_MISS_CHAR;
688: directly used by AR */
689: l_sync_trx_rec.supplier_tax_invoice_number := FND_API.G_MISS_CHAR;
690: l_sync_trx_rec.supplier_tax_invoice_date := FND_API.G_MISS_DATE;
691: l_sync_trx_rec.supplier_exchange_rate := FND_API.G_MISS_NUM;
692: l_sync_trx_rec.tax_invoice_date := FND_API.G_MISS_DATE;
693: l_sync_trx_rec.tax_invoice_number := FND_API.G_MISS_CHAR;
694: l_sync_trx_rec.port_of_entry_code := FND_API.G_MISS_CHAR;
695: l_sync_trx_rec.application_doc_status := FND_API.G_MISS_CHAR;
696:
689: l_sync_trx_rec.supplier_tax_invoice_number := FND_API.G_MISS_CHAR;
690: l_sync_trx_rec.supplier_tax_invoice_date := FND_API.G_MISS_DATE;
691: l_sync_trx_rec.supplier_exchange_rate := FND_API.G_MISS_NUM;
692: l_sync_trx_rec.tax_invoice_date := FND_API.G_MISS_DATE;
693: l_sync_trx_rec.tax_invoice_number := FND_API.G_MISS_CHAR;
694: l_sync_trx_rec.port_of_entry_code := FND_API.G_MISS_CHAR;
695: l_sync_trx_rec.application_doc_status := FND_API.G_MISS_CHAR;
696:
697: IF c_trx%rowcount > 0 THEN
690: l_sync_trx_rec.supplier_tax_invoice_date := FND_API.G_MISS_DATE;
691: l_sync_trx_rec.supplier_exchange_rate := FND_API.G_MISS_NUM;
692: l_sync_trx_rec.tax_invoice_date := FND_API.G_MISS_DATE;
693: l_sync_trx_rec.tax_invoice_number := FND_API.G_MISS_CHAR;
694: l_sync_trx_rec.port_of_entry_code := FND_API.G_MISS_CHAR;
695: l_sync_trx_rec.application_doc_status := FND_API.G_MISS_CHAR;
696:
697: IF c_trx%rowcount > 0 THEN
698: /* 5468039 - set p_sync_trx_lines_tbl if gl_date
691: l_sync_trx_rec.supplier_exchange_rate := FND_API.G_MISS_NUM;
692: l_sync_trx_rec.tax_invoice_date := FND_API.G_MISS_DATE;
693: l_sync_trx_rec.tax_invoice_number := FND_API.G_MISS_CHAR;
694: l_sync_trx_rec.port_of_entry_code := FND_API.G_MISS_CHAR;
695: l_sync_trx_rec.application_doc_status := FND_API.G_MISS_CHAR;
696:
697: IF c_trx%rowcount > 0 THEN
698: /* 5468039 - set p_sync_trx_lines_tbl if gl_date
699: has to get updated */
707:
708: /* Now call the API to synchronize the repository */
709: ZX_API_PUB.synchronize_tax_repository(
710: p_api_version => 1.0,
711: p_init_msg_list => FND_API.G_FALSE,
712: p_commit => FND_API.G_FALSE,
713: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
714: x_return_status => l_return_status,
715: x_msg_count => l_message_count,
708: /* Now call the API to synchronize the repository */
709: ZX_API_PUB.synchronize_tax_repository(
710: p_api_version => 1.0,
711: p_init_msg_list => FND_API.G_FALSE,
712: p_commit => FND_API.G_FALSE,
713: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
714: x_return_status => l_return_status,
715: x_msg_count => l_message_count,
716: x_msg_data => l_message_data,
709: ZX_API_PUB.synchronize_tax_repository(
710: p_api_version => 1.0,
711: p_init_msg_list => FND_API.G_FALSE,
712: p_commit => FND_API.G_FALSE,
713: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
714: x_return_status => l_return_status,
715: x_msg_count => l_message_count,
716: x_msg_data => l_message_data,
717: p_sync_trx_rec => l_sync_trx_rec,
718: p_sync_trx_lines_tbl => l_sync_trx_lines_t
719: );
720:
721: /* If a problem arises with synchronization, document it */
722: IF l_return_status = FND_API.G_RET_STS_SUCCESS
723: THEN
724: IF PG_DEBUG in ('Y', 'C') THEN
725: arp_standard.debug('sychronize_tax returns successfully');
726: END IF;
724: IF PG_DEBUG in ('Y', 'C') THEN
725: arp_standard.debug('sychronize_tax returns successfully');
726: END IF;
727: p_return_status := 0;
728: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
729: THEN
730: IF PG_DEBUG in ('Y', 'C') THEN
731: arp_standard.debug('synchronize_tax returns with validation errors');
732: END IF;
744: ELSIF l_message_count > 1
745: THEN
746: LOOP
747: l_msg := FND_MSG_PUB.Get(FND_MSG_PUB.G_NEXT,
748: FND_API.G_FALSE);
749: IF l_msg IS NULL
750: THEN
751: EXIT;
752: ELSE
796:
797: /* Now call the API to synchronize the repository */
798: ZX_API_PUB.synchronize_tax_repository(
799: p_api_version => 1.0,
800: p_init_msg_list => FND_API.G_FALSE,
801: p_commit => FND_API.G_FALSE,
802: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
803: x_return_status => l_return_status,
804: x_msg_count => l_message_count,
797: /* Now call the API to synchronize the repository */
798: ZX_API_PUB.synchronize_tax_repository(
799: p_api_version => 1.0,
800: p_init_msg_list => FND_API.G_FALSE,
801: p_commit => FND_API.G_FALSE,
802: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
803: x_return_status => l_return_status,
804: x_msg_count => l_message_count,
805: x_msg_data => l_message_data,
798: ZX_API_PUB.synchronize_tax_repository(
799: p_api_version => 1.0,
800: p_init_msg_list => FND_API.G_FALSE,
801: p_commit => FND_API.G_FALSE,
802: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
803: x_return_status => l_return_status,
804: x_msg_count => l_message_count,
805: x_msg_data => l_message_data,
806: p_sync_trx_rec => l_sync_trx_rec,
807: p_sync_trx_lines_tbl => l_sync_trx_lines_t
808: );
809:
810: /* If a problem arises with synchronization, document it */
811: IF l_return_status = FND_API.G_RET_STS_SUCCESS
812: THEN
813: IF PG_DEBUG in ('Y', 'C') THEN
814: arp_standard.debug('sychronize_tax returns successfully');
815: END IF;
813: IF PG_DEBUG in ('Y', 'C') THEN
814: arp_standard.debug('sychronize_tax returns successfully');
815: END IF;
816: p_return_status := 0;
817: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
818: THEN
819: IF PG_DEBUG in ('Y', 'C') THEN
820: arp_standard.debug('synchronize_tax returns with validation errors');
821: END IF;
833: ELSIF l_message_count > 1
834: THEN
835: LOOP
836: l_msg := FND_MSG_PUB.Get(FND_MSG_PUB.G_NEXT,
837: FND_API.G_FALSE);
838: IF l_msg IS NULL
839: THEN
840: EXIT;
841: ELSE
877:
878: /* Now call the API to synchronize the repository */
879: ZX_API_PUB.global_document_update(
880: p_api_version => 1.0,
881: p_init_msg_list => FND_API.G_FALSE,
882: p_commit => FND_API.G_FALSE,
883: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
884: x_return_status => l_return_status,
885: x_msg_count => l_message_count,
878: /* Now call the API to synchronize the repository */
879: ZX_API_PUB.global_document_update(
880: p_api_version => 1.0,
881: p_init_msg_list => FND_API.G_FALSE,
882: p_commit => FND_API.G_FALSE,
883: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
884: x_return_status => l_return_status,
885: x_msg_count => l_message_count,
886: x_msg_data => l_message_data,
879: ZX_API_PUB.global_document_update(
880: p_api_version => 1.0,
881: p_init_msg_list => FND_API.G_FALSE,
882: p_commit => FND_API.G_FALSE,
883: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
884: x_return_status => l_return_status,
885: x_msg_count => l_message_count,
886: x_msg_data => l_message_data,
887: p_transaction_rec => p_trx_rec
887: p_transaction_rec => p_trx_rec
888: );
889:
890: /* If a problem arises with synchronization, document it */
891: IF l_return_status = FND_API.G_RET_STS_SUCCESS
892: THEN
893: IF PG_DEBUG in ('Y', 'C') THEN
894: arp_standard.debug('gdu returns successfully');
895: END IF;
892: THEN
893: IF PG_DEBUG in ('Y', 'C') THEN
894: arp_standard.debug('gdu returns successfully');
895: END IF;
896: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
897: THEN
898: IF PG_DEBUG in ('Y', 'C') THEN
899: arp_standard.debug('gdu returns with validation errors');
900: END IF;
910: ELSIF l_message_count > 1
911: THEN
912: LOOP
913: l_msg := FND_MSG_PUB.Get(FND_MSG_PUB.G_NEXT,
914: FND_API.G_FALSE);
915: IF l_msg IS NULL
916: THEN
917: EXIT;
918: ELSE
1694: RETURN;
1695: END IF;
1696:
1697: /* Check for errors */
1698: IF l_return_status_service <> FND_API.G_RET_STS_SUCCESS THEN
1699:
1700: /* Retrieve and log errors */
1701: IF l_msg_count = 1
1702: THEN
1705: ELSIF l_msg_count > 1
1706: THEN
1707: LOOP
1708: l_msg := FND_MSG_PUB.Get(FND_MSG_PUB.G_NEXT,
1709: FND_API.G_FALSE);
1710: IF l_msg IS NULL
1711: THEN
1712: EXIT;
1713: ELSE
1773: x_msg_count => l_msg_count,
1774: x_msg_data => l_msg_data);
1775:
1776: /* Check for errors */
1777: IF l_return_status_service <> FND_API.G_RET_STS_SUCCESS THEN
1778:
1779: /* Retrieve and log errors */
1780: IF l_msg_count = 1
1781: THEN
1783: ELSIF l_msg_count > 1
1784: THEN
1785: LOOP
1786: l_msg := FND_MSG_PUB.Get(FND_MSG_PUB.G_NEXT,
1787: FND_API.G_FALSE);
1788: IF l_msg IS NULL
1789: THEN
1790: EXIT;
1791: ELSE
2683:
2684: /* insert det factors */
2685: ZX_API_PUB.insert_line_det_factors (
2686: p_api_version => 1.0,
2687: p_init_msg_list => FND_API.G_TRUE,
2688: p_commit => FND_API.G_FALSE,
2689: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2690: x_return_status => l_return_status_service,
2691: x_msg_count => l_msg_count,
2684: /* insert det factors */
2685: ZX_API_PUB.insert_line_det_factors (
2686: p_api_version => 1.0,
2687: p_init_msg_list => FND_API.G_TRUE,
2688: p_commit => FND_API.G_FALSE,
2689: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2690: x_return_status => l_return_status_service,
2691: x_msg_count => l_msg_count,
2692: x_msg_data => l_msg_data,
2685: ZX_API_PUB.insert_line_det_factors (
2686: p_api_version => 1.0,
2687: p_init_msg_list => FND_API.G_TRUE,
2688: p_commit => FND_API.G_FALSE,
2689: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2690: x_return_status => l_return_status_service,
2691: x_msg_count => l_msg_count,
2692: x_msg_data => l_msg_data,
2693: p_duplicate_line_rec => l_transaction_line_rec);
2694:
2695: /* calculate tax */
2696: zx_api_pub.calculate_tax(
2697: p_api_version => 1.0,
2698: p_init_msg_list => FND_API.G_TRUE,
2699: p_commit => FND_API.G_FALSE,
2700: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2701: p_transaction_rec => l_transaction_rec,
2702: p_quote_flag => p_quote, -- quote
2695: /* calculate tax */
2696: zx_api_pub.calculate_tax(
2697: p_api_version => 1.0,
2698: p_init_msg_list => FND_API.G_TRUE,
2699: p_commit => FND_API.G_FALSE,
2700: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2701: p_transaction_rec => l_transaction_rec,
2702: p_quote_flag => p_quote, -- quote
2703: p_data_transfer_mode => 'WIN',
2696: zx_api_pub.calculate_tax(
2697: p_api_version => 1.0,
2698: p_init_msg_list => FND_API.G_TRUE,
2699: p_commit => FND_API.G_FALSE,
2700: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2701: p_transaction_rec => l_transaction_rec,
2702: p_quote_flag => p_quote, -- quote
2703: p_data_transfer_mode => 'WIN',
2704: x_return_status => l_return_status_service,
3257: NULL;
3258:
3259: ELSE
3260: /* init return to prevent false returns */
3261: l_return_status := FND_API.G_RET_STS_SUCCESS;
3262:
3263: IF p_subject_table = 'TAX_LINE'
3264: THEN
3265:
3368: RETURN -1;
3369: END IF;
3370:
3371: /* 4917065 - Moved return logic inside IF/ELSE */
3372: IF l_return_status = FND_API.G_RET_STS_SUCCESS
3373: THEN
3374: g_tax_account_ccid := nvl(l_tax_account_ccid, -1);
3375: g_interim_tax_ccid := nvl(l_interim_tax_ccid, -1);
3376: g_adj_ccid := nvl(l_adj_ccid,-1);
3681: *===========================================================================*/
3682:
3683: PROCEDURE validate_for_tax (p_request_id IN NUMBER) IS
3684:
3685: l_return_status VARCHAR2(50) := FND_API.G_RET_STS_SUCCESS;
3686: l_msg_count NUMBER;
3687: l_msg_data VARCHAR2(2000);
3688: -- l_trx_rec ZX_API_PUB.transaction_rec_type;
3689: -- l_validation_status VARCHAR2(1);
3724: arp_debug.debug('before calling etax bulk processing api ');
3725: END IF;
3726: zx_api_pub.validate_document_for_tax(
3727: p_api_version => 1.0,
3728: p_init_msg_list => FND_API.G_TRUE,
3729: p_commit => FND_API.G_FALSE,
3730: p_validation_level => NULL,
3731: x_return_status => l_return_status,
3732: x_msg_count => l_msg_count,
3725: END IF;
3726: zx_api_pub.validate_document_for_tax(
3727: p_api_version => 1.0,
3728: p_init_msg_list => FND_API.G_TRUE,
3729: p_commit => FND_API.G_FALSE,
3730: p_validation_level => NULL,
3731: x_return_status => l_return_status,
3732: x_msg_count => l_msg_count,
3733: x_msg_data => l_msg_data);
3734: IF PG_DEBUG in ('Y', 'C') THEN
3735: arp_debug.debug('after calling etax bulk processing api');
3736: END IF;
3737:
3738: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
3739: THEN
3740: /* Retrieve and log errors */
3741: IF l_msg_count = 1
3742: THEN
3744: ELSIF l_msg_count > 1
3745: THEN
3746: LOOP
3747: l_msg := FND_MSG_PUB.Get(FND_MSG_PUB.G_NEXT,
3748: FND_API.G_FALSE);
3749: IF l_msg IS NULL
3750: THEN
3751: EXIT;
3752: ELSE