[Home] [Help]
PACKAGE: APPS.OKL_REVERSE_CONTRACT_PVT
Source
1 PACKAGE OKL_REVERSE_CONTRACT_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLRRVKS.pls 120.6 2007/08/28 09:39:59 rviriyal noship $ */
3
4 G_FALSE CONSTANT VARCHAR2(1) := OKL_API.G_FALSE;
5 G_TRUE CONSTANT VARCHAR2(1) := OKL_API.G_TRUE;
6
7 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_REVERSE_CONTRACT_PVT';
8 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
9
10 G_MISS_NUM CONSTANT NUMBER := OKL_API.G_MISS_NUM;
11 G_MISS_CHAR CONSTANT VARCHAR2(1) := OKL_API.G_MISS_CHAR;
12 G_MISS_DATE CONSTANT DATE := OKL_API.G_MISS_DATE;
13
14 --------------------------------------------------------------------------------
15 -- ERRORS AND EXCEPTIONS
16 --------------------------------------------------------------------------------
17 G_BOOKED CONSTANT VARCHAR2(200) := 'BOOKED';
18 G_REVERSED CONSTANT VARCHAR2(200) := 'REVERSED';
19 G_CANCELED CONSTANT VARCHAR2(200) := 'CANCELED';
20 G_BOOKING CONSTANT VARCHAR2(200) := 'BOOKING';
21 G_UPFRONT_TAX CONSTANT VARCHAR2(200) := 'UPFRONT_TAX';
22 G_GENERATE_YIELDS CONSTANT VARCHAR2(200) := 'GENERATE_YIELDS';
23 G_INTERNAL_ASSET_CREATION CONSTANT VARCHAR2(200) := 'INTERNAL_ASSET_CREATION';
24 G_FUNDING CONSTANT VARCHAR2(200) := 'FUNDING';
25 G_SOURCE_TABLE CONSTANT VARCHAR2(200) := 'SOURCE_TABLE';
26 G_OKL_TXL_CNTRCT_LNS CONSTANT VARCHAR2(200) := 'OKL_TXL_CNTRCT_LNS';
27 G_OKL_TXL_ASSETS_B CONSTANT VARCHAR2(200) := 'OKL_TXL_ASSETS_B';
28 G_OKL_TXL_AP_INV_LNS_B CONSTANT VARCHAR2(200) := 'OKL_TXL_AP_INV_LNS_B';
29 OKL_LLA_CONT_REV_BOOKED CONSTANT VARCHAR2(200) := 'OKL_LLA_CONT_REV_BOOKED';
30 OKL_LLA_CONT_REV_TRX_TYPE CONSTANT VARCHAR2(200) := 'OKL_LLA_CONT_REV_TRX_TYPE';
31 -- Manu 11-Aug-2004. Message for Rollover Fee line check.
32 OKL_LA_NO_REV_CONTRACT CONSTANT VARCHAR2(200) := 'OKL_LA_NO_REV_CONTRACT';
33
34 -- cklee 04/01/2004
35 G_OKL_TXL_AR_INV_LNS_B CONSTANT VARCHAR2(200) := 'OKL_TXL_AR_INV_LNS_B';
36
37
38 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_CONTRACTS_UNEXPECTED_ERROR';
39 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'OKL_SQLERRM';
40 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'OKL_SQLCODE';
41 --START: 12-07-05 cklee changed message reference |
42 --G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
43 --G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
44 --G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
45 G_INVALID_VALUE CONSTANT VARCHAR2(200) := 'OKL_INVALID_VALUE';
46 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := 'OKL_REQUIRED_VALUE';
47 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := 'COL_NAME';
48 --END: 12-07-05 cklee changed message reference |
49
50 G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
51 G_RET_STS_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_ERROR;
52 G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_UNEXP_ERROR;
53
54 G_EXCEPTION_ERROR EXCEPTION;
55 G_EXCEPTION_UNEXPECTED_ERROR EXCEPTION;
56
57 --rviriyal 28-08-2007 Start: Added Message for Bug# 6164603
58 OKL_LLA_AR_INV_LINE_EXIST CONSTANT VARCHAR2(200) := 'OKL_LLA_AR_INV_LINE_EXIST';
59 --rviriyal 28-08-2007 End: Added Message for Bug# 6164603
60
61 SUBTYPE tcnv_rec_type IS okl_tcn_pvt.tcnv_rec_type;
62 subtype tapv_rec_type IS okl_tap_pvt.tapv_rec_type;
63 subtype thpv_rec_type IS okl_tas_pvt.tasv_rec_type;
64
65 -- Procedure which reverses a contract
66
67 PROCEDURE Reverse_Contract (p_api_version IN NUMBER,
68 p_init_msg_list IN VARCHAR2,
69 x_return_status OUT NOCOPY VARCHAR2,
70 x_msg_count OUT NOCOPY NUMBER,
71 x_msg_data OUT NOCOPY VARCHAR2,
72 p_contract_id IN NUMBER,
73 p_transaction_date IN DATE );
74
75
76 END OKL_REVERSE_CONTRACT_PVT;