[Home] [Help]
PACKAGE: APPS.OKL_REV_LOSS_PROV_PVT
Source
1 package OKL_REV_LOSS_PROV_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLRRPVS.pls 120.2 2006/07/11 09:56:50 dkagrawa noship $ */
3
4 TYPE lprv_rec_type IS RECORD (
5 cntrct_num OKL_K_HEADERS_FULL_V.CONTRACT_NUMBER%TYPE
6 ,reversal_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE
7 ,reversal_date OKL_TRX_CONTRACTS.DATE_TRANSACTION_OCCURRED%TYPE);
8
9 TYPE lprv_tbl_type IS TABLE OF lprv_rec_type INDEX BY BINARY_INTEGER;
10
11
12 ------------------------------------------------------------------------------
13 -- Global Variables
14 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_REV_LOSS_PROV_PVT';
15 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
16 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_REQUIRED_VALUE;
17 G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_INVALID_VALUE;
18
19 G_NO_DATA_FOUND CONSTANT VARCHAR2(200) := 'OKL_NOT_FOUND';
20 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_CONTRACTS_UNEXPECTED_ERROR';
21 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLERRM';
22 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLCODE';
23 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
24 G_CONTRACT_NUMBER_TOKEN CONSTANT VARCHAR2(200) := 'CONTRACT_NUMBER';
25
26 ------------------------------------------------------------------------------
27 ------------------------------------------------------------------------------
28 -- Global Exception
29 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
30
31 -- this procedure reverses loss provision transactions
32 PROCEDURE REVERSE_LOSS_PROVISIONS(
33 p_api_version IN NUMBER
34 ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
35 ,x_msg_count OUT NOCOPY NUMBER
36 ,x_msg_data OUT NOCOPY VARCHAR2
37 ,x_return_status OUT NOCOPY VARCHAR2
38 ,p_lprv_rec IN lprv_rec_type);
39
40 PROCEDURE REVERSE_LOSS_PROVISIONS(
41 p_api_version IN NUMBER
42 ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
43 ,x_msg_count OUT NOCOPY NUMBER
44 ,x_msg_data OUT NOCOPY VARCHAR2
45 ,x_return_status OUT NOCOPY VARCHAR2
46 ,p_lprv_tbl IN lprv_tbl_type);
47
48 End OKL_REV_LOSS_PROV_PVT;