[Home] [Help]
PACKAGE BODY: APPS.WSH_TPA_FREIGHT_COSTS_PKG
Source
1 PACKAGE BODY WSH_TPA_FREIGHT_COSTS_PKG AS
2 /* $Header: WSHTPFCB.pls 115.6 2002/11/12 01:55:55 nparikh ship $ */
3 --{
4 --
5 --
6 -- =================================================================
7 -- *** PLEASE DO NOT EDIT THIS FILE. ***
8 -- *** THIS FILE IS ALWAYS GENERATED BY TPA GENERATE UTILITY. ***
9 -- =================================================================
10 --
11 FUNCTION Get_Cost_Factor
12 (
13 p_delivery_id IN NUMBER,
14 p_container_instance_id IN NUMBER,
15 x_return_status OUT NOCOPY VARCHAR2
16 )
17 RETURN VARCHAR2
18 IS
19 --{
20 --
21 --
22 --
23 -- Internal Variables
24 --
25 l_return_value VARCHAR2(32767);
26 --
27 k_program_unit_id CONSTANT NUMBER := 11325;
28 --
29 k_layer_provider_code CONSTANT VARCHAR2(32767) := 'ORCL';
30 --
31 l_customization_level VARCHAR2(32767);
32 --
33 l_layer_tbl vea_tpa_util_pvt.g_layer_tbl_type;
34 --
35 l_code_conversion_tbl vea_tpa_util_pvt.g_code_conversion_tbl_type;
36 --
37 --
38 --
39 --}
40 BEGIN
41 --{
42 --
43 --
44 l_return_value := WSH_FC_INTERFACE_PKG.Get_Cost_Factor
45 (
46 p_delivery_id => p_delivery_id,
47 p_container_instance_id => p_container_instance_id,
48 x_return_status => x_return_status
49 )
50 ;
51 --
52 --
53 RETURN (l_return_value);
54 --
55 --
56 --}
57 EXCEPTION
58 --{
59 --
60 --
61 WHEN OTHERS THEN
62 RAISE ;
63 --
64 --
65 --}
66 END Get_Cost_Factor;
67 --
68 --
69 --
70 --}
71 END WSH_TPA_FREIGHT_COSTS_PKG;
72 --