DBA Data[Home] [Help]

PACKAGE: APPS.OKL_DEAL_CREATE_PUB

Source


1 PACKAGE okl_deal_create_pub AUTHID CURRENT_USER AS
2 /* $Header: OKLPDCRS.pls 120.5 2006/11/13 07:32:40 dpsingh noship $ */
3 
4   -------------------------------------------------------------------------------
5   -- GLOBAL EXCEPTION
6   ---------------------------------------------------------------------------
7   G_EXCEPTION_HALT_VALIDATION	EXCEPTION;
8 
9   -- GLOBAL VARIABLES
10   ---------------------------------------------------------------------------
11   G_PKG_NAME			CONSTANT VARCHAR2(200) :=  'OKL_DEAL_CREATE_PVT';
12   G_APP_NAME			CONSTANT VARCHAR2(3)   :=  'OKL';
13   OKL_TEMP_TYPE_PROGRAM		CONSTANT VARCHAR2(30)   := 'PROGRAM';
14   OKL_TEMP_TYPE_LEASEAPP	CONSTANT VARCHAR2(30)   := 'LEASEAPP';
15   OKL_TEMP_TYPE_CONTRACT	CONSTANT VARCHAR2(30)   := 'CONTRACT';
16   ---------------------------------------------------------------------------
17 
18   -- SUBTYPE chrv_rec_type IS		OKL_OKC_MIGRATION_PVT.chrv_rec_type;
19   -- SUBTYPE khrv_rec_type IS		OKL_CONTRACT_PUB.khrv_rec_type;
20 
21   TYPE deal_rec_type is record (
22 	chr_id okl_k_headers_full_v.id%type,
23 	chr_contract_number okl_k_headers_full_v.contract_number%type,
24 	chr_description okl_k_headers_full_v.description%type,
25 	vers_version VARCHAR2(30),
26 	chr_sts_code okl_k_headers_full_v.sts_code%type,
27 	chr_start_date okl_k_headers_full_v.start_date%type,
28 	chr_end_date okl_k_headers_full_v.end_date%type,
29 	khr_term_duration okl_k_headers_full_v.term_duration%type,
30 	chr_CUST_PO_NUMBER okl_k_headers_full_v.CUST_PO_NUMBER%type,
31 	chr_INV_ORGANIZATION_ID okl_k_headers_full_v.INV_ORGANIZATION_ID%type,
32 	chr_AUTHORING_ORG_ID okl_k_headers_full_v.AUTHORING_ORG_ID%type,
33 	khr_GENERATE_ACCRUAL_YN okl_k_headers_full_v.GENERATE_ACCRUAL_YN%type,
34 	khr_SYNDICATABLE_YN okl_k_headers_full_v.SYNDICATABLE_YN%type,
35 	khr_PREFUNDING_ELIGIBLE_YN okl_k_headers_full_v.PREFUNDING_ELIGIBLE_YN%type,
36 	khr_REVOLVING_CREDIT_YN okl_k_headers_full_v.REVOLVING_CREDIT_YN%type,
37 	khr_CONVERTED_ACCOUNT_YN okl_k_headers_full_v.CONVERTED_ACCOUNT_YN%type,
38 	khr_CREDIT_ACT_YN okl_k_headers_full_v.CREDIT_ACT_YN%type,
39 	chr_TEMPLATE_YN  okl_k_headers_full_v.TEMPLATE_YN%type,
40 	chr_DATE_SIGNED okl_k_headers_full_v.DATE_SIGNED%type,
41 	khr_DATE_DEAL_TRANSFERRED okl_k_headers_full_v.DATE_DEAL_TRANSFERRED%type,
42 	khr_ACCEPTED_DATE  okl_k_headers_full_v.ACCEPTED_DATE%type,
43 	khr_EXPECTED_DELIVERY_DATE okl_k_headers_full_v.EXPECTED_DELIVERY_DATE%type,
44 	khr_AMD_CODE okl_k_headers_full_v.AMD_CODE%type,
45 	khr_DEAL_TYPE okl_k_headers_full_v.DEAL_TYPE%type,
46 	mla_contract_number okl_k_headers_full_v.contract_number%type,
47 	mla_gvr_chr_id_referred okc_governances_v.chr_id_referred%type,
48 	mla_gvr_id okl_k_headers_full_v.id%type,
49 	cust_id okc_k_party_roles_v.id%type,
50 	cust_object1_id1 okc_k_party_roles_v.object1_id1%type,
51 	cust_object1_id2 okc_k_party_roles_v.object1_id2%type,
52 	cust_jtot_object1_code okc_k_party_roles_v.jtot_object1_code%type,
53 	cust_name varchar2(250),
54 	lessor_id okc_k_party_roles_v.id%type,
55 	lessor_object1_id1 okc_k_party_roles_v.object1_id1%type,
56 	lessor_object1_id2 okc_k_party_roles_v.object1_id2%type,
57 	lessor_jtot_object1_code okc_k_party_roles_v.jtot_object1_code%type,
58 	lessor_name varchar2(250),
59 	chr_currency_code okl_k_headers_full_v.currency_code%type,
60 	currency_name varchar2(250),
61 	khr_pdt_id okl_k_headers_full_v.pdt_id%type,
62 	product_name okl_products_v.name%type,
63 	product_description okl_products_v.description%type,
64 	khr_khr_id okl_k_headers_full_v.khr_id%type,
65 	program_contract_number okl_k_headers_full_v.contract_number%type,
66 	cl_contract_number okl_k_headers_full_v.contract_number%type,
67 	cl_gvr_chr_id_referred okl_k_headers_full_v.id%type,
68 	cl_gvr_id okl_k_headers_full_v.id%type,
69 	rg_larles_id okc_rule_groups_v.id%type,
70 	r_larles_id okc_rule_groups_v.id%type,
71 	r_larles_rule_information1 okc_rules_v.rule_information1%type,
72 	col_larles_form_left_prompt  varchar2(250),
73 	rg_LAREBL_id  okc_rule_groups_v.id%type,
74 	r_LAREBL_id  okc_rule_groups_v.id%type,
75 	r_LAREBL_rule_information1  okc_rules_v.rule_information1%type,
76 	col_larebl_form_left_prompt varchar2(250),
77         chr_cust_acct_id  okc_k_headers_b.cust_acct_id%type,
78         customer_account varchar2(250),
79 	cust_site_description varchar2(250),
80 	contact_id okc_contacts_v.id%type,
81 	contact_object1_id1 okc_contacts_v.object1_id1%type,
82 	contact_object1_id2 okc_contacts_v.object1_id2%type,
83 	contact_jtot_object1_code okc_contacts_v.jtot_object1_code%type,
84 	contact_name varchar2(250),
85 	rg_LATOWN_id okc_rule_groups_v.id%type,
86 	r_LATOWN_id okc_rule_groups_v.id%type,
87 	r_LATOWN_rule_information1 okc_rules_v.rule_information1%type,
88 	col_latown_form_left_prompt varchar2(250),
89 	rg_LANNTF_id okc_rule_groups_v.id%type,
90 	r_LANNTF_id okc_rule_groups_v.id%type,
91 	r_LANNTF_rule_information1 okc_rules_v.rule_information1%type,
92 	col_lanntf_form_left_prompt varchar2(250),
93 	rg_LACPLN_id okc_rule_groups_v.id%type,
94 	r_LACPLN_id okc_rule_groups_v.id%type,
95 	r_LACPLN_rule_information1 okc_rules_v.rule_information1%type,
96 	col_lacpln_form_left_prompt varchar2(250),
97 	rg_LAPACT_id okc_rule_groups_v.id%type,
98 	r_LAPACT_id okc_rule_groups_v.id%type,
99 	r_LAPACT_rule_information1 okc_rules_v.rule_information1%type,
100 	col_lapact_form_left_prompt  varchar2(250),
101 	khr_CURRENCY_CONV_TYPE  okl_k_headers_full_v.CURRENCY_CONVERSION_TYPE%type,
102 	khr_CURRENCY_CONV_RATE  okl_k_headers_full_v.CURRENCY_CONVERSION_RATE%type,
103 	khr_CURRENCY_CONV_DATE  okl_k_headers_full_v.CURRENCY_CONVERSION_DATE%type,
104 	khr_ASSIGNABLE_YN  okl_k_headers_full_v.ASSIGNABLE_YN%type,
105 	--Added by dpsingh for LE Uptake
106 	legal_entity_id NUMBER
107 	);
108 
109   TYPE deal_tab_type is table of deal_rec_type INDEX BY BINARY_INTEGER;
110 
111   TYPE party_rec_type is record (
112      id                             NUMBER := OKL_API.G_MISS_NUM
113     ,attribute_category             OKL_K_PARTY_ROLES.ATTRIBUTE_CATEGORY%TYPE := OKL_API.G_MISS_CHAR
114     ,attribute1                     OKL_K_PARTY_ROLES.ATTRIBUTE1%TYPE := OKL_API.G_MISS_CHAR
115     ,attribute2                     OKL_K_PARTY_ROLES.ATTRIBUTE2%TYPE := OKL_API.G_MISS_CHAR
116     ,attribute3                     OKL_K_PARTY_ROLES.ATTRIBUTE3%TYPE := OKL_API.G_MISS_CHAR
117     ,attribute4                     OKL_K_PARTY_ROLES.ATTRIBUTE4%TYPE := OKL_API.G_MISS_CHAR
118     ,attribute5                     OKL_K_PARTY_ROLES.ATTRIBUTE5%TYPE := OKL_API.G_MISS_CHAR
119     ,attribute6                     OKL_K_PARTY_ROLES.ATTRIBUTE6%TYPE := OKL_API.G_MISS_CHAR
120     ,attribute7                     OKL_K_PARTY_ROLES.ATTRIBUTE7%TYPE := OKL_API.G_MISS_CHAR
121     ,attribute8                     OKL_K_PARTY_ROLES.ATTRIBUTE8%TYPE := OKL_API.G_MISS_CHAR
122     ,attribute9                     OKL_K_PARTY_ROLES.ATTRIBUTE9%TYPE := OKL_API.G_MISS_CHAR
123     ,attribute10                    OKL_K_PARTY_ROLES.ATTRIBUTE10%TYPE := OKL_API.G_MISS_CHAR
124     ,attribute11                    OKL_K_PARTY_ROLES.ATTRIBUTE11%TYPE := OKL_API.G_MISS_CHAR
125     ,attribute12                    OKL_K_PARTY_ROLES.ATTRIBUTE12%TYPE := OKL_API.G_MISS_CHAR
126     ,attribute13                    OKL_K_PARTY_ROLES.ATTRIBUTE13%TYPE := OKL_API.G_MISS_CHAR
127     ,attribute14                    OKL_K_PARTY_ROLES.ATTRIBUTE14%TYPE := OKL_API.G_MISS_CHAR
128     ,attribute15                    OKL_K_PARTY_ROLES.ATTRIBUTE15%TYPE := OKL_API.G_MISS_CHAR
129     ,object1_id1                    OKC_K_PARTY_ROLES_B.object1_id1%type := OKL_API.G_MISS_CHAR
130     ,object1_id2                    OKC_K_PARTY_ROLES_B.object1_id2%type := OKL_API.G_MISS_CHAR
131     ,jtot_object1_code              OKC_K_PARTY_ROLES_B.jtot_object1_code%type := OKL_API.G_MISS_CHAR
132     ,rle_code              	    OKC_K_PARTY_ROLES_B.rle_code%type := OKL_API.G_MISS_CHAR
133     ,chr_id              	    OKC_K_PARTY_ROLES_B.chr_id%type := OKL_API.G_MISS_NUM
134     ,dnz_chr_id              	    OKC_K_PARTY_ROLES_B.dnz_chr_id%type := OKL_API.G_MISS_NUM
135     ,cle_id              	    OKC_K_PARTY_ROLES_B.cle_id%type := OKL_API.G_MISS_NUM
136    );
137 
138   TYPE party_tab_type is table of party_rec_type INDEX BY BINARY_INTEGER;
139 
140 
141   PROCEDURE create_deal(
142     p_api_version                  IN NUMBER,
143     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
144     x_return_status                OUT NOCOPY VARCHAR2,
145     x_msg_count                    OUT NOCOPY NUMBER,
146     x_msg_data                     OUT NOCOPY VARCHAR2,
147     p_contract_number              IN  VARCHAR2,
148     p_scs_code                     IN  VARCHAR2,
149     p_customer_id1                 IN  VARCHAR2,
150     p_customer_id2                 IN  VARCHAR2,
151     p_customer_code                IN  VARCHAR2,
152     p_org_id                       IN  NUMBER,
153     p_organization_id              IN  NUMBER,
154     p_source_chr_id                IN  NUMBER,
155     x_chr_id                       OUT NOCOPY NUMBER,
156     --Added by dpsingh for LE Uptake
157     p_legal_entity_id              IN NUMBER);
158 
159   PROCEDURE create_deal(
160     p_api_version                  IN NUMBER,
161     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
162     x_return_status                OUT NOCOPY VARCHAR2,
163     x_msg_count                    OUT NOCOPY NUMBER,
164     x_msg_data                     OUT NOCOPY VARCHAR2,
165     p_source_code                  IN  VARCHAR2,
166     p_contract_number              IN  VARCHAR2,
167     p_scs_code                     IN  VARCHAR2,
168     p_customer_id1                 IN  VARCHAR2,
169     p_customer_id2                 IN  VARCHAR2,
170     p_customer_code                IN  VARCHAR2,
171     p_org_id                       IN  NUMBER,
172     p_organization_id              IN  NUMBER,
173     p_source_chr_id                IN  NUMBER,
174     x_chr_id                       OUT NOCOPY NUMBER,
175     --Added by dpsingh for LE Uptake
176     p_legal_entity_id              IN NUMBER);
177 
178   PROCEDURE update_deal(
179       p_api_version                  IN NUMBER,
180       p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
181       x_return_status                OUT NOCOPY VARCHAR2,
182       x_msg_count                    OUT NOCOPY NUMBER,
183       x_msg_data                     OUT NOCOPY VARCHAR2,
184       p_durv_rec                     IN  deal_rec_type,
185       x_durv_rec                     OUT NOCOPY deal_rec_type
186       );
187 
188  PROCEDURE load_deal(
189       p_api_version                  IN NUMBER,
190       p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
191       x_return_status                OUT NOCOPY VARCHAR2,
192       x_msg_count                    OUT NOCOPY NUMBER,
193       x_msg_data                     OUT NOCOPY VARCHAR2,
194       p_durv_rec                     IN  deal_rec_type,
195       x_durv_rec                     OUT NOCOPY deal_rec_type
196       );
197 
198 
199   PROCEDURE create_deal(
200     p_api_version                  IN NUMBER,
201     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
202     x_return_status                OUT NOCOPY VARCHAR2,
203     x_msg_count                    OUT NOCOPY NUMBER,
204     x_msg_data                     OUT NOCOPY VARCHAR2,
205     p_source_code                  IN  VARCHAR2,
206     p_contract_number              IN  VARCHAR2,
207     p_scs_code                     IN  VARCHAR2,
208     p_customer_id1                 IN OUT NOCOPY VARCHAR2,
209     p_customer_id2                 IN OUT NOCOPY VARCHAR2,
210     p_customer_code                IN  VARCHAR2,
211     p_customer_name                IN  VARCHAR2,
212     p_org_id                       IN  NUMBER,
213     p_organization_id              IN  NUMBER,
214     p_source_chr_id                IN OUT NOCOPY NUMBER,
215     p_source_contract_number       IN  VARCHAR2,
216     x_chr_id                       OUT NOCOPY NUMBER,
217     --Added by dpsingh for LE Uptake
218     p_legal_entity_id              IN NUMBER);
219 
220   PROCEDURE create_deal(
221     p_api_version                  IN NUMBER,
222     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
223     x_return_status                OUT NOCOPY VARCHAR2,
224     x_msg_count                    OUT NOCOPY NUMBER,
225     x_msg_data                     OUT NOCOPY VARCHAR2,
226     p_source_code                  IN  VARCHAR2,
227     p_template_yn                  IN  VARCHAR2,
228     p_contract_number              IN  VARCHAR2,
229     p_scs_code                     IN  VARCHAR2,
230     p_customer_id1                 IN OUT NOCOPY VARCHAR2,
231     p_customer_id2                 IN OUT NOCOPY VARCHAR2,
232     p_customer_code                IN  VARCHAR2,
233     p_customer_name                IN  VARCHAR2,
234     p_org_id                       IN  NUMBER,
235     p_organization_id              IN  NUMBER,
236     p_source_chr_id                IN OUT NOCOPY  NUMBER,
237     p_source_contract_number       IN  VARCHAR2,
238     x_chr_id                       OUT NOCOPY NUMBER,
239     --Added by dpsingh for LE Uptake
240     p_legal_entity_id              IN NUMBER);
241 
242   PROCEDURE create_deal(
243     p_api_version                  IN NUMBER,
244     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
245     x_return_status                OUT NOCOPY VARCHAR2,
246     x_msg_count                    OUT NOCOPY NUMBER,
247     x_msg_data                     OUT NOCOPY VARCHAR2,
248     p_source_code                  IN  VARCHAR2,
249     p_template_type                IN  VARCHAR2,
250     p_contract_number              IN  VARCHAR2,
251     p_scs_code                     IN  VARCHAR2,
252     p_customer_id1                 IN  OUT NOCOPY VARCHAR2,
253     p_customer_id2                 IN  OUT NOCOPY VARCHAR2,
254     p_customer_code                IN  VARCHAR2,
255     p_customer_name                IN  VARCHAR2,
256     p_effective_from               IN  DATE,
257     p_program_name               IN  VARCHAR2,
258     p_program_id                   IN  NUMBER,
259     p_org_id                       IN  NUMBER,
260     p_organization_id              IN  NUMBER,
261     p_source_chr_id                IN  OUT NOCOPY  NUMBER,
262     p_source_contract_number       IN  VARCHAR2,
263     x_chr_id                       OUT NOCOPY NUMBER,
264     --Added by dpsingh for LE Uptake
265     p_legal_entity_id              IN NUMBER);
266 
267 /*  PROCEDURE validate_deal(
268     p_api_version                  IN NUMBER,
269     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
270     x_return_status                OUT NOCOPY VARCHAR2,
271     x_msg_count                    OUT NOCOPY NUMBER,
272     x_msg_data                     OUT NOCOPY VARCHAR2,
273     p_chr_id                       IN  NUMBER,
274     p_contract_number              IN  VARCHAR2,
275     p_scs_code                     IN  VARCHAR2,
276     p_customer_id1                 IN OUT VARCHAR2,
277     p_customer_id2                 IN OUT VARCHAR2,
278     p_customer_code                IN OUT VARCHAR2,
279     p_customer_name                IN  VARCHAR2,
280     p_customer_acc_id1             IN OUT VARCHAR2,
281     p_customer_acc_id2             IN OUT VARCHAR2,
282     p_customer_acc_code            IN OUT VARCHAR2,
283     p_customer_acc_name            IN  VARCHAR2,
284     p_product_name                 IN  VARCHAR2,
285     p_product_id                   IN OUT VARCHAR2
286     );
287 */
288 
289   PROCEDURE copy_rules(
290     p_api_version                  IN NUMBER,
291     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
292     x_return_status                OUT NOCOPY VARCHAR2,
293     x_msg_count                    OUT NOCOPY NUMBER,
294     x_msg_data                     OUT NOCOPY VARCHAR2,
295     p_source_id                    IN  NUMBER,
296     p_dest_id                      IN  NUMBER,
297     p_org_id                       IN  NUMBER,
298     p_organization_id              IN  NUMBER);
299 
300 Procedure confirm_cancel_contract
301                   (p_api_version          IN  NUMBER,
302                    p_init_msg_list        IN  VARCHAR2 DEFAULT OKL_API.G_FALSE,
303                    x_return_status        OUT NOCOPY VARCHAR2,
304                    x_msg_count            OUT NOCOPY NUMBER,
305                    x_msg_data             OUT NOCOPY VARCHAR2,
306                    p_contract_id          IN  NUMBER,
307                    p_contract_number      IN VARCHAR2);
308 
309   PROCEDURE create_party(
310       p_api_version                  IN NUMBER,
311       p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
312       x_return_status                OUT NOCOPY VARCHAR2,
313       x_msg_count                    OUT NOCOPY NUMBER,
314       x_msg_data                     OUT NOCOPY VARCHAR2,
315       p_kpl_rec                 IN  party_rec_type,
316       x_kpl_rec                 OUT NOCOPY party_rec_type
317       );
318 
319   PROCEDURE update_party(
320       p_api_version                  IN NUMBER,
321       p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
322       x_return_status                OUT NOCOPY VARCHAR2,
323       x_msg_count                    OUT NOCOPY NUMBER,
324       x_msg_data                     OUT NOCOPY VARCHAR2,
325       p_kpl_rec                 IN  party_rec_type,
326       x_kpl_rec                 OUT NOCOPY party_rec_type
327       );
328 
329 END  OKL_DEAL_CREATE_PUB;