[Home] [Help]
PACKAGE: APPS.OKL_QUOTE_TO_CONTRACT_PVT
Source
1 PACKAGE OKL_QUOTE_TO_CONTRACT_PVT AS
2 /* $Header: OKLRLQCS.pls 120.1 2006/03/09 05:18:18 rravikir noship $ */
3
4 SUBTYPE clev_fin_rec IS okl_okc_migration_pvt.clev_rec_type;
5 SUBTYPE ipyv_rec_type IS Okl_Ipy_Pvt.ipyv_rec_type;
6
7 TYPE link_asset_rec_type IS RECORD(fin_asset_id NUMBER,
8 amount NUMBER,
9 asset_number VARCHAR2(15));
10 TYPE link_asset_tbl_type IS TABLE OF link_asset_rec_type
11 INDEX BY BINARY_INTEGER;
12 TYPE quote_service_rec_type IS RECORD ( CHR_ID NUMBER,
13 CLE_ID NUMBER,
14 SERVICE_NAME_ID NUMBER,
15 SUPPLIER_ID NUMBER,
16 SUPPLIER_SITE_ID NUMBER,
17 START_DATE DATE,
18 PERIODS NUMBER,
19 PERIODIC_AMOUNT NUMBER,
20 FREQUENCY_CODE_EXPENSE VARCHAR2(30),
21 PASSTHROUGH_PERCENTAGE NUMBER,
22 PASSTHROUGH_BASIS_CODE VARCHAR2(30),
23 PAYMENT_METHOD_CODE VARCHAR2(30),
24 PAYMENT_TERMS_CODE VARCHAR2(30),
25 PAYMENT_TYPE_ID NUMBER,
26 ARREARS_YN VARCHAR2(1),
27 FREQUENCY_CODE VARCHAR2(30),
28 PASSTHROUGH_STREAM_TYPE_ID NUMBER);
29 TYPE payment_levels_rec_type IS RECORD (PAYMENT_LEVEL_ID NUMBER,
30 START_DATE DATE,
31 PERIODS NUMBER,
32 AMOUNT NUMBER,
33 STUB_DAYS NUMBER,
34 STUB_AMOUNT NUMBER,
35 RATE NUMBER,
36 RATE_TYPE VARCHAR2(30),
37 PAYMENT_STRUCTURE VARCHAR2(1),
38 PAYMENT_TYPE_ID NUMBER,
39 FREQUENCY_CODE VARCHAR2(1),
40 ARREARS_YN VARCHAR2(1));
41 TYPE payment_levels_tbl_type IS TABLE OF payment_levels_rec_type
42 INDEX BY BINARY_INTEGER;
43 TYPE qte_cntrct_ast_rec_type IS RECORD (qte_asset_id NUMBER,
44 cntrct_asset_id NUMBER);
45 TYPE qte_cntrct_ast_tbl_type IS TABLE OF qte_cntrct_ast_rec_type
46 INDEX BY BINARY_INTEGER;
47
48 ---------------------------------------------------------------------------
49 -- GLOBAL EXCEPTIONS
50 ---------------------------------------------------------------------------
51 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
52 ---------------------------------------------------------------------------
53 -- GLOBAL VARIABLES
54 ---------------------------------------------------------------------------
55 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_QUOTE_TO_CONTRACT_PVT';
56 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
57 G_API_TYPE CONSTANT VARCHAR2(30) := '_PVT';
58 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
59 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
60 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_CONTRACTS_UNEXPECTED_ERROR';
61 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';
62 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLcode';
63 G_RLE_CODE CONSTANT VARCHAR2(10) := 'LESSEE';
64 G_STS_CODE CONSTANT VARCHAR2(10) := 'NEW';
65 G_LEASE_VENDOR CONSTANT VARCHAR2(10) := 'OKL_VENDOR';
66 G_VENDOR_BILL_RGD_CODE CONSTANT VARCHAR2(10) := 'LAVENB';
67 G_DB_ERROR CONSTANT VARCHAR2(12) := 'OKL_DB_ERROR';
68 G_PROG_NAME_TOKEN CONSTANT VARCHAR2(9) := 'PROG_NAME';
69 G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
70 G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_UNEXP_ERROR;
71 G_RET_STS_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_ERROR;
72
73 PROCEDURE create_contract(
74 p_api_version IN NUMBER,
75 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
76 x_return_status OUT NOCOPY VARCHAR2,
77 x_msg_count OUT NOCOPY NUMBER,
78 x_msg_data OUT NOCOPY VARCHAR2,
79 p_contract_number IN VARCHAR2,
80 p_parent_object_code IN VARCHAR2,--LEASEAPP or LEASEOPP
81 p_parent_object_id IN NUMBER,--LEASEAPP ID or LEASEOPP ID
82 x_chr_id OUT NOCOPY NUMBER,
83 x_contract_number OUT NOCOPY VARCHAR2);
84 END OKL_QUOTE_TO_CONTRACT_PVT;