PACKAGE BODY: APPS.WSH_TPA_DELIVERY_DETAILS_PKG

Source

1 PACKAGE BODY WSH_TPA_DELIVERY_DETAILS_PKG AS
2 /* $Header: WSHTPDDB.pls 115.4 2002/11/12 01:55:01 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_Account
12       (
13         p_delivery_detail_id           IN      NUMBER,
14         x_return_status                OUT NOCOPY      VARCHAR2
15       )
16     RETURN NUMBER
17     IS
18     --{
19         --
20         --
21         --
22         -- Internal Variables
23         --
24         l_return_value                 NUMBER;
25         --
26         k_program_unit_id              CONSTANT NUMBER := 11327;
27         --
28         k_layer_provider_code          CONSTANT VARCHAR2(32767) := 'ORCL';
29         --
30         l_customization_level          VARCHAR2(32767);
31         --
32         l_layer_tbl                    vea_tpa_util_pvt.g_layer_tbl_type;
33         --
34         l_code_conversion_tbl          vea_tpa_util_pvt.g_code_conversion_tbl_type;
35         --
36         --
37         --
38     --}
39     BEGIN
40     --{
41         --
42         --
43         l_return_value := WSH_SHIP_CONFIRM_ACTIONS.Get_Account
44           (
45             p_delivery_detail_id           => p_delivery_detail_id,
46             x_return_status                => x_return_status
47           )
48         ;
49         --
50         --
51         RETURN (l_return_value);
52         --
53         --
54     --}
55     EXCEPTION
56     --{
57         --
58         --
59         WHEN OTHERS THEN
60             RAISE ;
61         --
62         --
63     --}
64     END Get_Account;
65     --
66     --
67     --
68 --}
69 END WSH_TPA_DELIVERY_DETAILS_PKG;
70 --