[Home] [Help]
PACKAGE: APPS.OKL_CS_TRANSFER_ASSUMPTION_PVT
Source
1 PACKAGE OKL_CS_TRANSFER_ASSUMPTION_PVT AS
2 /* $Header: OKLRTRAS.pls 120.4 2005/10/30 04:39:18 appldev noship $ */
3
4 -------------------------------------------------------------------------------------------------
5 -- GLOBAL MESSAGE CONSTANTS
6 -------------------------------------------------------------------------------------------------
7 G_FND_APP CONSTANT VARCHAR2(200) := OKL_API.G_FND_APP;
8 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
9 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_PARENT_TABLE_TOKEN;
10 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_CHILD_TABLE_TOKEN;
11 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_UNEXPECTED_ERROR';
12 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';
13 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLcode';
14 G_NO_PARENT_RECORD CONSTANT VARCHAR2(200) := 'NO_PARENT_RECORD';
15 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := 'REQUIRED_VALUE';
16
17 ------------------------------------------------------------------------------------
18 -- GLOBAL EXCEPTION
19 ------------------------------------------------------------------------------------
20 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
21 G_EXCEPTION_STOP_VALIDATION EXCEPTION;
22 G_API_TYPE CONSTANT VARCHAR2(4) := '_PVT';
23 G_API_VERSION CONSTANT NUMBER := 1.0;
24 G_SCOPE CONSTANT VARCHAR2(4) := '_PVT';
25
26 -- GLOBAL VARIABLES
27 -----------------------------------------------------------------------------------
28 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_CS_TRANSFER';
29 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
30
31
32
33 --GLOBAL DATA STRUCTURES---------------------------------------------------------
34 TYPE before_trf_rec IS RECORD(id NUMBER,
35 line_type VARCHAR2(10));
36
37 TYPE before_trf_tbl IS TABLE OF before_trf_rec
38 INDEX BY BINARY_INTEGER;
39
40 TYPE after_trf_rec IS RECORD(id NUMBER,
41 line_type VARCHAR2(10),
42 bill_to_site_id NUMBER,
43 install_loc_id NUMBER,
44 fa_loc_id NUMBER);
45 TYPE after_trf_tbl IS TABLE OF after_trf_rec
46 INDEX BY BINARY_INTEGER;
47
48 SUBTYPE l_after_trf_tbl IS after_trf_tbl;
49 SUBTYPE l_before_trf_tbl IS before_trf_tbl;
50
51 g_after_trf l_after_trf_tbl;
52 g_before_trf l_before_trf_tbl;
53
54
55 SUBTYPE tcnv_rec_type IS okl_trx_contracts_pvt.tcnv_rec_type;
56 SUBTYPE tcnv_tbl_type IS okl_trx_contracts_pvt.tcnv_tbl_type;
57
58 SUBTYPE tclv_rec_type IS okl_trx_contracts_pvt.tclv_rec_type;
59 SUBTYPE tclv_tbl_type IS okl_trx_contracts_pvt.tclv_tbl_type;
60
61
62 SUBTYPE taav_tbl_type IS okl_taa_pvt.taav_tbl_type;
63
64 TYPE add_hdr_rec IS RECORD ( new_contract_number VARCHAR2(120),
65 bill_to_site_id NUMBER,
66 cust_acct_id NUMBER,
67 bank_acct_Id NUMBER,
68 invoice_format_id NUMBER,
69 payment_mthd_id NUMBER,
70 mla_id NUMBER,
71 credit_line_id NUMBER,
72 insurance_yn VARCHAR2(1),
73 lease_policy_yn VARCHAR2(1));
74 TYPE add_hdr_tbl IS TABLE OF add_hdr_rec
75 INDEX BY BINARY_INTEGER;
76
77 SUBTYPE add_hdr_tbl_type IS add_hdr_tbl;
78
79 TYPE upd_hdr_rec IS RECORD (id NUMBER,
80 new_contract_number VARCHAR2(120),
81 bill_to_site_id NUMBER,
82 cust_acct_id NUMBER,
83 bank_acct_Id NUMBER,
84 invoice_format_id NUMBER,
85 payment_mthd_id NUMBER,
86 mla_id NUMBER,
87 credit_line_id NUMBER,
88 insurance_yn VARCHAR2(1),
89 lease_policy_yn VARCHAR2(1));
90 TYPE upd_hdr_tbl IS TABLE OF upd_hdr_rec
91 INDEX BY BINARY_INTEGER;
92
93 SUBTYPE upd_hdr_tbl_type IS upd_hdr_tbl;
94
95 TYPE new_lessee_rec IS RECORD (taa_id NUMBER,
96 new_contract_number VARCHAR2(120),
97 new_lessee VARCHAR2(360),
98 new_party_id NUMBER,
99 contact_name VARCHAR2(360),
100 contact_id NUMBER,
101 contact_email VARCHAR2(2000),
102 contact_phone VARCHAR2(30),
103 bill_to_address VARCHAR2(4000),
104 bill_to_id NUMBER,
105 cust_acct_number VARCHAR2(30),
106 cust_acct_id NUMBER,
107 bank_account VARCHAR2(30),
108 bank_acct_id NUMBER,
109 invoice_format VARCHAR2(450),
110 inv_fmt_id NUMBER,
111 payment_method VARCHAR2(30),
112 pay_mthd_id NUMBER,
113 master_lease VARCHAR2(120),
114 mla_id NUMBER,
115 credit_line_no VARCHAR2(120),
116 credit_line_id NUMBER,
117 insurance_yn VARCHAR2(1),
118 lease_policy_yn VARCHAR2(1));
119
120 TYPE new_lessee_tbl IS TABLE OF new_lessee_rec
121 INDEX BY BINARY_INTEGER;
122
123 SUBTYPE new_lessee_tbl_type IS new_lessee_tbl;
124
125
126 TYPE insurance_rec IS RECORD (insurer VARCHAR2(360),
127 insurance_agent VARCHAR2(360),
128 policy_number VARCHAR2(20),
129 covered_amount NUMBER,
130 deductible_amount NUMBER,
131 effective_from DATE,
132 effective_to DATE,
133 proof_provided DATE,
134 proof_required DATE,
135 lessor_insured_yn VARCHAR2(10),
136 lessor_payee_yn VARCHAR2(10));
137
138
139 TYPE insurance_tbl IS TABLE OF insurance_rec
140 INDEX BY BINARY_INTEGER;
141
142 SUBTYPE insurance_tbl_type IS insurance_tbl;
143
144 PROCEDURE Create_Requests(
145 p_api_version IN NUMBER,
146 p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
147 p_header_tbl IN tcnv_tbl_type,
148 p_add_hdr_tbl IN add_hdr_tbl_type,
149 p_old_line_tbl IN l_before_trf_tbl,
150 p_new_line_tbl IN l_after_trf_tbl,
151 x_header_tbl OUT NOCOPY Okl_Trx_Contracts_Pub.tcnv_tbl_type,
152 x_taaV_tbl OUT NOCOPY taav_tbl_type,
153 x_return_status OUT NOCOPY VARCHAR2,
154 x_msg_count OUT NOCOPY NUMBER,
155 x_msg_data OUT NOCOPY VARCHAR2) ;
156
157
158 PROCEDURE Accept_Requests( p_api_version IN NUMBER,
159 p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
160 p_header_tbl IN tcnv_tbl_type,
161 p_upd_hdr_tbl IN upd_hdr_tbl_type,
162 p_old_line_tbl IN l_before_trf_tbl,
163 p_new_line_tbl IN l_after_trf_tbl,
164 x_header_tbl OUT NOCOPY Okl_Trx_Contracts_Pub.tcnv_tbl_type,
165 x_taaV_tbl OUT NOCOPY taav_tbl_type,
166 x_return_status OUT NOCOPY VARCHAR2,
167 x_msg_count OUT NOCOPY NUMBER,
168 x_msg_data OUT NOCOPY VARCHAR2);
169
170 PROCEDURE Update_Requests( p_api_version IN NUMBER,
171 p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
172 p_header_tbl IN tcnv_tbl_type,
173 p_upd_hdr_tbl IN upd_hdr_tbl_type,
174 p_old_line_tbl IN l_before_trf_tbl,
175 p_new_line_tbl IN l_after_trf_tbl,
176 x_header_tbl OUT NOCOPY Okl_Trx_Contracts_Pub.tcnv_tbl_type,
177 x_taaV_tbl OUT NOCOPY taav_tbl_type,
178 x_return_status OUT NOCOPY VARCHAR2,
179 x_msg_count OUT NOCOPY NUMBER,
180 x_msg_data OUT NOCOPY VARCHAR2);
181
182 PROCEDURE Populate_new_Lessee_details( p_api_version IN NUMBER,
183 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
184 p_request_id IN NUMBER,
185 x_new_lessee_tbl OUT NOCOPY new_lessee_tbl_type,
186 x_return_status OUT NOCOPY VARCHAR2,
187 x_msg_count OUT NOCOPY NUMBER,
188 x_msg_data OUT NOCOPY VARCHAR2);
189
190 PROCEDURE Populate_ThirdParty_Insurance( p_api_version IN NUMBER,
191 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
192 p_taa_id IN NUMBER,
193 x_insurance_tbl OUT NOCOPY insurance_tbl_type,
194 x_return_status OUT NOCOPY VARCHAR2,
195 x_msg_count OUT NOCOPY NUMBER,
196 x_msg_data OUT NOCOPY VARCHAR2);
197
198
199
200
201
202 END OKL_CS_TRANSFER_ASSUMPTION_PVT;
203
204