[Home] [Help]
PACKAGE: APPS.OKL_AM_REPURCHASE_ASSET_PUB
Source
1 PACKAGE OKL_AM_REPURCHASE_ASSET_PUB AUTHID CURRENT_USER AS
2 /* $Header: OKLPRQUS.pls 115.0 2002/03/26 18:56:52 pkm ship $ */
3
4
5 SUBTYPE qtev_rec_type IS OKL_AM_REPURCHASE_ASSET_PVT.qtev_rec_type;
6 SUBTYPE tqlv_tbl_type IS OKL_AM_REPURCHASE_ASSET_PVT.tqlv_tbl_type;
7
8 ---------------------------------------------------------------------------
9 -- GLOBAL CONSTANTS
10 ---------------------------------------------------------------------------
11
12 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_AM_REPURCHASE_ASSET_PUB';
13 G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
14 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_UNEXPECTED_ERROR';
15 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';
16 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLcode';
17
18 G_EXCEPTION_HALT_PROCESS EXCEPTION;
19 ---------------------------------------------------------------------------
20 -- PROCEDURES
21 ---------------------------------------------------------------------------
22
23 PROCEDURE create_repurchase_quote(
24 p_api_version IN NUMBER,
25 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
26 x_return_status OUT NOCOPY VARCHAR2,
27 x_msg_count OUT NOCOPY NUMBER,
28 x_msg_data OUT NOCOPY VARCHAR2,
29 p_qtev_rec IN qtev_rec_type,
30 p_tqlv_tbl IN tqlv_tbl_type,
31 x_qtev_rec OUT NOCOPY qtev_rec_type,
32 x_tqlv_tbl OUT NOCOPY tqlv_tbl_type);
33
34 PROCEDURE update_repurchase_quote(
35 p_api_version IN NUMBER,
36 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
37 x_return_status OUT NOCOPY VARCHAR2,
38 x_msg_count OUT NOCOPY NUMBER,
39 x_msg_data OUT NOCOPY VARCHAR2,
40 p_qtev_rec IN qtev_rec_type,
41 p_tqlv_tbl IN tqlv_tbl_type,
42 x_qtev_rec OUT NOCOPY qtev_rec_type,
43 x_tqlv_tbl OUT NOCOPY tqlv_tbl_type);
44
45 END OKL_AM_REPURCHASE_ASSET_PUB;