[Home] [Help]
PACKAGE: APPS.OKL_MASTER_LEASE_AGREEMENT_PUB
Source
1 PACKAGE OKL_MASTER_LEASE_AGREEMENT_PUB AUTHID CURRENT_USER AS
2 /*$Header: OKLPMAGS.pls 120.4 2008/02/29 10:51:52 nikshah noship $*/
3 /*#
4 * Master Lease Agreement API allows users to perform actions on
5 * Master Lease Agreements in Lease Management.
6 * @rep:scope public
7 * @rep:product OKL
8 * @rep:displayname Master Lease Agreement API
9 * @rep:category BUSINESS_ENTITY OKL_ORIGINATION
10 * @rep:lifecycle active
11 * @rep:compatibility S
12 */
13
14 /* Header Variables */
15
16 SUBTYPE chrv_rec_type IS OKL_OKC_MIGRATION_PVT.chrv_rec_type;
17 subtype khrv_rec_type is OKL_CONTRACT_PUB.khrv_rec_type;
18 subtype khrv_tbl_type is OKL_CONTRACT_PUB.khrv_tbl_type;
19 subtype hdr_tbl_type is OKL_CONTRACT_PUB.hdr_tbl_type;
20
21 /* Governances for Credit Line link */
22 SUBTYPE gvev_rec_type IS OKL_OKC_MIGRATION_PVT.gvev_rec_type;
23
24 /* Party Role*/
25 subtype cplv_rec_type is OKL_OKC_MIGRATION_PVT.cplv_rec_type;
26 SUBTYPE cplv_tbl_type is OKL_CONTRACT_PARTY_PUB.cplv_tbl_type;
27
28 /* Terms and Conditions */
29 subtype rgr_rec_type is OKL_RGRP_RULES_PROCESS_PUB.rgr_rec_type;
30 subtype rgr_tbl_type is OKL_RGRP_RULES_PROCESS_PUB.rgr_tbl_type;
31 subtype rgr_out_rec_type is OKL_RGRP_RULES_PROCESS_PUB.rgr_out_rec_type;
32 subtype rgr_out_tbl_type is OKL_RGRP_RULES_PROCESS_PUB.rgr_out_tbl_type;
33
34 /* Articles */
35 SUBTYPE catv_rec_type is OKL_VP_K_ARTICLE_PUB.catv_rec_type;
36 SUBTYPE catv_tbl_type is OKL_VP_K_ARTICLE_PUB.catv_tbl_type;
37
38 ---------------------------------------------------------------------------
39 -- GLOBAL VARIABLES
40 ---------------------------------------------------------------------------
41 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_MASTER_LEASE_AGREEMENT_PUB';
42 G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
43 G_API_TYPE CONSTANT VARCHAR2(4) := '_PVT';
44 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
45 G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
46 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'OKL_SQLerrm';
47 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'OKL_SQLcode';
48 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_MASTER_LEASE_AGREEMENT_UNEXPECTED_ERROR';
49 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
50
51 /* Party Role Record */
52 TYPE HEADER_REC IS RECORD (
53 AGREEMENT_NUMBER OKC_K_HEADERS_V.CONTRACT_NUMBER%TYPE := OKC_API.G_MISS_CHAR,
54 DESCRIPTION OKC_K_HEADERS_V.SHORT_DESCRIPTION%TYPE := OKC_API.G_MISS_CHAR,
55 CUSTOMER_ID OKC_K_PARTY_ROLES_V.OBJECT1_ID1%type := OKC_API.G_MISS_CHAR,
56 DATE_SIGNED OKC_K_HEADERS_V.DATE_SIGNED%TYPE := OKC_API.G_MISS_DATE,
57 START_DATE OKC_K_HEADERS_V.START_DATE%TYPE := OKC_API.G_MISS_DATE,
58 END_DATE OKC_K_HEADERS_V.END_DATE%TYPE := OKC_API.G_MISS_DATE,
59 CURRENCY_CODE OKC_K_HEADERS_V.CURRENCY_CODE%TYPE := OKC_API.G_MISS_CHAR,
60 CREDIT_LINE_NUMBER OKC_K_HEADERS_V.CONTRACT_NUMBER%TYPE := OKC_API.G_MISS_CHAR,
61 TEMPLATE_YN OKC_K_HEADERS_V.TEMPLATE_YN%TYPE := OKC_API.G_MISS_CHAR,
62 CONVERTED_ACCOUNT_YN OKL_K_HEADERS_V.CONVERTED_ACCOUNT_YN%TYPE := OKC_API.G_MISS_CHAR,
63 CONVERTED_LEGACY_NO OKC_K_HEADERS_V.ORIG_SYSTEM_REFERENCE1%TYPE := OKC_API.G_MISS_CHAR,
64 TC_TPO_MID_TERM_OPTION OKC_RULES_V.RULE_INFORMATION1%TYPE := OKC_API.G_MISS_CHAR,
65 TC_TPO_MID_TERM_AMT OKC_RULES_V.RULE_INFORMATION1%TYPE := OKC_API.G_MISS_CHAR,
66 TC_TPO_END_TERM_OPTION OKC_RULES_V.RULE_INFORMATION1%TYPE := OKC_API.G_MISS_CHAR,
67 TC_TPO_END_TERM_AMT OKC_RULES_V.RULE_INFORMATION1%TYPE := OKC_API.G_MISS_CHAR,
68 TC_RO_RENEW_NOTICE_DAYS OKC_RULES_V.RULE_INFORMATION1%TYPE := OKC_API.G_MISS_CHAR,
69 TC_RO_RENEW_OPTION OKC_RULES_V.RULE_INFORMATION1%TYPE := OKC_API.G_MISS_CHAR,
70 TC_RO_RENEW_AMT OKC_RULES_V.RULE_INFORMATION1%TYPE := OKC_API.G_MISS_CHAR,
71 TC_TAX_WITHHOLD_YN OKC_RULES_V.RULE_INFORMATION1%TYPE := OKC_API.G_MISS_CHAR,
72 TC_TAX_FORMULA OKC_RULES_V.RULE_INFORMATION1%TYPE := OKC_API.G_MISS_CHAR,
73 TC_INS_BLANKET_YN OKC_RULES_V.RULE_INFORMATION1%TYPE := OKC_API.G_MISS_CHAR,
74 TC_INS_INSURABLE_YN OKC_RULES_V.RULE_INFORMATION1%TYPE := OKC_API.G_MISS_CHAR,
75 TC_INS_CANCEL_YN OKC_RULES_V.RULE_INFORMATION1%TYPE := OKC_API.G_MISS_CHAR,
76 -- added by zrehman for LE Uptake project 17-Nov-2006
77 LEGAL_ENTITY_ID NUMBER :=OKL_API.G_MISS_NUM);
78
79
80 /* Terms and Conditions Record */
81 TYPE TERMS_AND_CONDITIONS_REC IS RECORD (
82 RULE_GROUP_CODE OKC_RULE_GROUPS_V.RGD_CODE%TYPE := OKC_API.G_MISS_CHAR,
83 RULE_CODE OKC_RULES_V.RULE_INFORMATION_CATEGORY%TYPE := OKC_API.G_MISS_CHAR,
84 object1_id1 OKC_RULES_V.OBJECT1_ID1%TYPE := OKC_API.G_MISS_CHAR,
85 object2_id1 OKC_RULES_V.OBJECT2_ID1%TYPE := OKC_API.G_MISS_CHAR,
86 object3_id1 OKC_RULES_V.OBJECT3_ID1%TYPE := OKC_API.G_MISS_CHAR,
87 object1_id2 OKC_RULES_V.OBJECT1_ID2%TYPE := OKC_API.G_MISS_CHAR,
88 object2_id2 OKC_RULES_V.OBJECT2_ID2%TYPE := OKC_API.G_MISS_CHAR,
89 object3_id2 OKC_RULES_V.OBJECT3_ID2%TYPE := OKC_API.G_MISS_CHAR,
90 jtot_object1_code OKC_RULES_V.JTOT_OBJECT1_CODE%TYPE := OKC_API.G_MISS_CHAR,
91 jtot_object2_code OKC_RULES_V.JTOT_OBJECT2_CODE%TYPE := OKC_API.G_MISS_CHAR,
92 jtot_object3_code OKC_RULES_V.JTOT_OBJECT3_CODE%TYPE := OKC_API.G_MISS_CHAR,
93 rule_information1 OKC_RULES_V.RULE_INFORMATION1%TYPE := OKC_API.G_MISS_CHAR,
94 rule_information2 OKC_RULES_V.RULE_INFORMATION2%TYPE := OKC_API.G_MISS_CHAR,
95 rule_information3 OKC_RULES_V.RULE_INFORMATION3%TYPE := OKC_API.G_MISS_CHAR,
96 rule_information4 OKC_RULES_V.RULE_INFORMATION4%TYPE := OKC_API.G_MISS_CHAR,
97 rule_information5 OKC_RULES_V.RULE_INFORMATION5%TYPE := OKC_API.G_MISS_CHAR,
98 rule_information6 OKC_RULES_V.RULE_INFORMATION6%TYPE := OKC_API.G_MISS_CHAR,
99 rule_information7 OKC_RULES_V.RULE_INFORMATION7%TYPE := OKC_API.G_MISS_CHAR,
100 rule_information8 OKC_RULES_V.RULE_INFORMATION8%TYPE := OKC_API.G_MISS_CHAR,
101 rule_information9 OKC_RULES_V.RULE_INFORMATION9%TYPE := OKC_API.G_MISS_CHAR,
102 rule_information10 OKC_RULES_V.RULE_INFORMATION10%TYPE := OKC_API.G_MISS_CHAR,
103 rule_information11 OKC_RULES_V.RULE_INFORMATION11%TYPE := OKC_API.G_MISS_CHAR,
104 rule_information12 OKC_RULES_V.RULE_INFORMATION12%TYPE := OKC_API.G_MISS_CHAR,
105 rule_information13 OKC_RULES_V.RULE_INFORMATION13%TYPE := OKC_API.G_MISS_CHAR,
106 rule_information14 OKC_RULES_V.RULE_INFORMATION14%TYPE := OKC_API.G_MISS_CHAR,
107 rule_information15 OKC_RULES_V.RULE_INFORMATION15%TYPE := OKC_API.G_MISS_CHAR
108 );
109
110 TYPE TERMS_AND_CONDITIONS_TBL IS TABLE OF TERMS_AND_CONDITIONS_REC INDEX BY BINARY_INTEGER;
111
112 /* Articles Record */
113 TYPE ARTICLE_REC IS RECORD (
114 article_name OKC_K_ARTICLES_V.NAME%TYPE := OKC_API.G_MISS_CHAR,
115 version OKC_K_ARTICLES_V.SAV_SAV_RELEASE%TYPE := OKC_API.G_MISS_CHAR);
116
117 TYPE ARTICLE_TBL IS TABLE OF ARTICLE_REC INDEX BY BINARY_INTEGER;
118
119 /*
120 * Procedure: CREATE_MASTER_LEASE_AGREEMENT
121 */
122 /*#
123 * Create Master Lease Agreement
124 * @param p_api_version API version
125 * @param p_init_msg_list Initialize message stack
126 * @param p_header_rec Master lease agreement header and terms and Conditions
127 * @param p_article_tbl Articles
128 * @param x_return_status Return status from the API
129 * @param x_msg_count Message count if error messages are encountered
130 * @param x_msg_data Error message data
131 * @rep:displayname Create Master Lease Agreement
132 * @rep:scope public
133 * @rep:lifecycle active
134 */
135 PROCEDURE create_master_lease_agreement(
136 p_api_version IN NUMBER,
137 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
138 p_header_rec IN HEADER_REC,
139 p_article_tbl IN article_tbl,
140 x_return_status OUT NOCOPY VARCHAR2,
141 x_msg_count OUT NOCOPY NUMBER,
142 x_msg_data OUT NOCOPY VARCHAR2);
143
144
145 END OKL_MASTER_LEASE_AGREEMENT_PUB;