[Home] [Help]
PACKAGE: APPS.OKL_AM_SV_WRITEDOWN_PVT
Source
1 PACKAGE OKL_AM_SV_WRITEDOWN_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLRSVWS.pls 115.5 2002/11/04 20:48:12 sechawla noship $ */
3
4
5 TYPE assets_rec_type IS RECORD( p_cle_id NUMBER DEFAULT OKL_API.G_MISS_NUM,
6 p_new_salvage_value NUMBER DEFAULT OKL_API.G_MISS_NUM);
7
8 TYPE assets_tbl_type IS TABLE OF assets_rec_type INDEX BY BINARY_INTEGER;
9
10
11 ---------------------------------------------------------------------------
12 -- GLOBAL CONSTANTS
13 ---------------------------------------------------------------------------
14 G_INVALID_VALUE CONSTANT VARCHAR2(200) := okc_api.G_INVALID_VALUE;
15 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := okc_api.G_COL_NAME_TOKEN;
16 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_AM_SV_WRITEDOWN_PVT';
17 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
18 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := okc_api.G_REQUIRED_VALUE;
19 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_CONTRACTS_UNEXPECTED_ERROR';
20 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';
21 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLcode';
22
23
24
25
26 -- The main body of OKL_AM_SV_WRITEDOWN_PVT
27 PROCEDURE create_salvage_value_trx( p_api_version IN NUMBER,
28 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
29 x_return_status OUT NOCOPY VARCHAR2,
30 x_msg_count OUT NOCOPY NUMBER,
31 x_msg_data OUT NOCOPY VARCHAR2,
32 p_assets_tbl IN assets_tbl_type,
33 x_salvage_value_status OUT NOCOPY VARCHAR2); -- this flag is redundant,
34 -- we are keeping it for the time
35 -- being to avoid
36 -- rosetta regeneration
37
38
39
40 END OKL_AM_SV_WRITEDOWN_PVT;