PACKAGE BODY: APPS.INV_AP_TAX_ENGINE_MDTR

Source

1 PACKAGE BODY INV_AP_TAX_ENGINE_MDTR AS
2 -- $Header: INVMTAXB.pls 120.2 2006/01/31 18:42:28 rajkrish noship $
3 --+=======================================================================+
4 --|               Copyright (c) 2002 Oracle Corporation                   |
5 --|                       Redwood Shores, CA, USA                         |
6 --|                         All rights reserved.                          |
7 --+=======================================================================+
8 --| FILENAME                                                              |
9 --|     INVMTAXB.pls                                                       |
10 --|                                                                       |
11 --| DESCRIPTION                                                           |
12 --|    Consiged inventory INV/AP Dependency wrapper API                   |
13 --|                                                                       |
14 --| PROCEDURE LIST                                                        |
15 --|     Get_Default_Tax_Code                                              |
16 --|     Calculate_Tax                                                     |
17 --|                                                                       |
18 --| HISTORY                                                               |
19 --|     12/01/02 pseshadr  Created                                        |
20 --|     12/01/02 dherring  Created                                        |
21 --+========================================================================
22 
23 --===================
24 -- PROCEDURES AND FUNCTIONS
25 --===================
26 
27 l_debug     NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
28 
29 --========================================================================
30 -- PROCEDURE  : Calculate_Tax         PUBLIC
31 -- COMMENT   : Calculate tax done by eBTax
32 --========================================================================
33 
34 PROCEDURE Calculate_Tax
35 (  x_return_status OUT NOCOPY VARCHAR2
36 ,  x_msg_count     OUT NOCOPY VARCHAR2
37 ,  x_msg_data      OUT NOCOPY VARCHAR2
38 )
39 IS
40 
41 BEGIN
42 
43  IF (l_debug = 1)
44   THEN
45     INV_LOG_UTIL.trace
46     ( 'Entering ZX_API_PUB.Calculate_Tax'
47      , 9
48      );
49   END IF;
50 
51    -- Invoke eBTax to calculate Tax.
52 
53    ZX_API_PUB.Calculate_Tax
54    ( p_api_version   => 1.0
55    , p_init_msg_list => FND_API.G_TRUE
56    , p_validation_level => 11
57    , p_commit           => FND_API.G_FALSE
58    , x_return_status    => x_return_status
59    , x_msg_count        => x_msg_count
60    , x_msg_data         => x_msg_data);
61 
62 IF (l_debug = 1)
63   THEN
64     INV_LOG_UTIL.trace
65     ( 'after return from  ZX_API_PUB.Calculate_Tax '|| x_return_status
66      , 9
67      );
68   END IF;
69 
70 IF (l_debug = 1)
71   THEN
72     INV_LOG_UTIL.trace
73     ( 'Calling ZX_API_PUB.Determine_recovery '
74      , 9
75      );
76   END IF;
77 
78 
79 ZX_API_PUB.Determine_recovery
80    ( p_api_version   => 1.0
81    , p_init_msg_list => FND_API.G_TRUE
82    , p_validation_level => 11
83    , p_commit           => FND_API.G_FALSE
84    , x_return_status    => x_return_status
85    , x_msg_count        => x_msg_count
86    , x_msg_data         => x_msg_data);
87 
88 IF (l_debug = 1)
89   THEN
90     INV_LOG_UTIL.trace
91     ( 'after ZX_API_PUB.Determine_recovery  ' || x_return_status
92      , 9
93      );
94   END IF;
95 
96 
97 IF (l_debug = 1)
98   THEN
99     INV_LOG_UTIL.trace
100     ( 'exiting ZX_API_PUB.Calculate_Tax'
101      , 9
102      );
103   END IF;
104 
105 EXCEPTION
106 
107   WHEN OTHERS THEN
108     RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
109 
110 END Calculate_Tax;
111 
112 
113 END INV_AP_TAX_ENGINE_MDTR;