DBA Data[Home] [Help]

PACKAGE: APPS.INL_LANDEDCOST_PUB

Source


1 PACKAGE INL_LANDEDCOST_PUB AUTHID CURRENT_USER AS
2 /* $Header: INLPLCOS.pls 120.7.12020000.1 2012/06/27 08:37:45 appldev ship $ */
3 
4    G_MODULE_NAME           CONSTANT VARCHAR2(200) := 'INL.PLSQL.INL_LANDEDCOST_PUB.';
5    G_PKG_NAME              CONSTANT VARCHAR2(30)  := 'INL_LANDEDCOST_PUB';
6 
7     -- Record to keep Landed Cost info for a given Shipment.
8     TYPE landed_cost_rec IS RECORD(
9         ship_line_id               NUMBER,
10         organization_id            NUMBER,
11         inventory_item_id          NUMBER,
12         primary_qty                NUMBER,
13         primary_uom_code           VARCHAR2(3),
14         estimated_item_price       NUMBER,
15         estimated_charges          NUMBER,
16         estimated_taxes            NUMBER,
17         estimated_unit_landed_cost NUMBER,
18         actual_item_price          NUMBER,
19         actual_charges             NUMBER,
20         actual_taxes               NUMBER,
21         actual_unit_landed_cost    NUMBER);
22     TYPE landed_cost_tbl IS TABLE OF landed_cost_rec INDEX BY BINARY_INTEGER;
23 
24     PROCEDURE Get_LandedCost(
25         p_api_version                IN NUMBER,
26         p_init_msg_list              IN VARCHAR2 := FND_API.G_FALSE,
27         p_commit                     IN VARCHAR2 := FND_API.G_FALSE,
28         p_ship_line_id               IN NUMBER,
29         x_return_status              OUT NOCOPY VARCHAR2,
30         x_msg_count                  OUT NOCOPY NUMBER,
31         x_msg_data                   OUT NOCOPY VARCHAR2,
32         x_organization_id            OUT NOCOPY NUMBER,
33         x_inventory_item_id          OUT NOCOPY NUMBER,
34         x_primary_qty                OUT NOCOPY NUMBER,
35         x_primary_uom_code           OUT NOCOPY VARCHAR2,
36         x_estimated_item_price       OUT NOCOPY NUMBER,
37         x_estimated_charges          OUT NOCOPY NUMBER,
38         x_estimated_taxes            OUT NOCOPY NUMBER,
39         x_estimated_unit_landed_cost OUT NOCOPY NUMBER,
40         x_actual_item_price          OUT NOCOPY NUMBER,
41         x_actual_charges             OUT NOCOPY NUMBER,
42         x_actual_taxes               OUT NOCOPY NUMBER,
43         x_actual_unit_landed_cost    OUT NOCOPY NUMBER,
44         x_adjustment_num              OUT NOCOPY NUMBER
45     );
46 
47     PROCEDURE Get_LandedCost(
48         p_api_version     IN NUMBER,
49         p_init_msg_list   IN VARCHAR2 := FND_API.G_FALSE,
50         p_commit          IN VARCHAR2 := FND_API.G_FALSE,
51         p_ship_header_id  IN NUMBER,
52         x_return_status   OUT NOCOPY VARCHAR2,
53         x_msg_count       OUT NOCOPY NUMBER,
54         x_msg_data        OUT NOCOPY VARCHAR2,
55         x_landed_cost_tbl OUT NOCOPY landed_cost_tbl
56     );
57 
58 END INL_LANDEDCOST_PUB;