[Home] [Help]
21: l_customer_id NUMBER;
22: l_batch_source_id NUMBER;
23: l_sold_to_customer_id NUMBER;
24: l_cust_trx_type_id NUMBER;
25: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
26: l_legal_entity_id NUMBER;
27: l_msg_data VARCHAR2(1000);
28: BEGIN
29:
86: p_batch_source_id => l_invoice_source_id, -- IN P_batch_source_id
87: p_operating_unit_id => p_org_id -- IN P_operating_unit_id (org_id)
88: );
89:
90: IF l_return_status <> FND_API.G_RET_STS_SUCCESS OR l_legal_entity_id = -1 THEN
91:
92: IF l_debug_level > 0 THEN
93: oe_debug_pub.add('In getting legal_entity_id, return status error'||l_msg_data);
94: END IF;
383: (G_PKG_NAME
384: ,'Get_Default_Tax_Code'
385: );
386: END IF;
387: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
388: END Get_Default_Tax_Code;
389:
390:
391: PROCEDURE Calculate_Tax
437: l_ship_to_acct_tax_rnd_rule VARCHAR2(30);
438: x_tax_value NUMBER;
439: l_x_msg_count NUMBER;
440: l_x_msg_data VARCHAR2(2000);
441: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
442: l_tax_value NUMBER := 0;
443: l_tax_code VARCHAR2(50);
444: l_adj_index NUMBER;
445: l_start_time NUMBER;
1362: oe_debug_pub.add( ' Call zx_api_pub.calculate_tax ',1);
1363:
1364: zx_api_pub.calculate_tax(
1365: p_api_version => 1.0,
1366: p_init_msg_list => FND_API.G_TRUE,
1367: p_commit => NULL,
1368: p_validation_level => NULL,
1369: x_return_status => l_return_status,
1370: x_msg_count => l_msg_count,
1383: oe_debug_pub.add('Message returned by tax API ZX_API_PUB.calculate_tax: '||l_msg_count,2);
1384: END IF;
1385:
1386:
1387: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1388: IF l_debug_level > 0 THEN
1389: oe_debug_pub.add( 'unexpected error');
1390: END IF;
1391: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1387: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1388: IF l_debug_level > 0 THEN
1389: oe_debug_pub.add( 'unexpected error');
1390: END IF;
1391: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1392: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1393: IF l_x_msg_data is not null then
1394: FND_MESSAGE.SET_NAME('ONT','ONT_AVAIL_GENERIC');
1395: FND_MESSAGE.SET_TOKEN('TEXT',l_x_msg_data);
1388: IF l_debug_level > 0 THEN
1389: oe_debug_pub.add( 'unexpected error');
1390: END IF;
1391: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1392: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1393: IF l_x_msg_data is not null then
1394: FND_MESSAGE.SET_NAME('ONT','ONT_AVAIL_GENERIC');
1395: FND_MESSAGE.SET_TOKEN('TEXT',l_x_msg_data);
1396: OE_MSG_PUB.Add;
1515: (G_PKG_NAME
1516: ,'Calcuate_Tax'
1517: );
1518: END IF;
1519: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1520: END Calculate_Tax;
1521:
1522:
1523:
1568: OE_BULK_MSG_PUB.Add_Exc_Msg
1569: ( G_PKG_NAME
1570: , 'Extend_Adj_Rec'
1571: );
1572: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1573: END Extend_Adj_Rec;
1574:
1575: PROCEDURE Insert_Tax_Records
1576: (p_post_insert IN BOOLEAN
1686: (G_PKG_NAME
1687: ,'Insert_Tax_Records'
1688: );
1689: END IF;
1690: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1691: END Insert_Tax_Records;
1692:
1693:
1694: PROCEDURE Handle_Error
1727: (G_PKG_NAME
1728: ,'Handle_Error'
1729: );
1730: END IF;
1731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1732: END Handle_Error;
1733:
1734: PROCEDURE Handle_Tax_Code_Error(p_index IN NUMBER,
1735: p_header_index IN NUMBER,
1803: (G_PKG_NAME
1804: ,'Handle_Tax_Code_Error'
1805: );
1806: END IF;
1807: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1808: END Handle_Tax_Code_Error;
1809:
1810: Procedure Debug_msg(p_index IN NUMBER,
1811: x_return_status OUT NOCOPY Varchar2) IS