1 PACKAGE OKL_QUICK_QUOTES_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLRQQHS.pls 120.4 2006/02/15 12:56:51 viselvar noship $ */
3
4 SUBTYPE qqhv_rec_type IS okl_qqh_pvt.qqhv_rec_type;
5
6 SUBTYPE qqlv_rec_type IS okl_qql_pvt.qqlv_rec_type;
7
8 SUBTYPE qqlv_tbl_type IS okl_qql_pvt.qqlv_tbl_type;
9
10 -- sub types for cashflow records
11 SUBTYPE cashflow_hdr_rec IS OKL_LEASE_QUOTE_CASHFLOW_PVT.cashflow_header_rec_type;
12 SUBTYPE cashflow_level_rec IS OKL_LEASE_QUOTE_CASHFLOW_PVT.cashflow_level_rec_type;
13 SUBTYPE cashflow_level_tbl IS OKL_LEASE_QUOTE_CASHFLOW_PVT.cashflow_level_tbl_type;
14
15 TYPE payment_rec_type IS RECORD(
16 subsidy_amount number,
17 financed_amount number,
18 arrears_yn varchar2(1),
19 frequency_code varchar2(1),
20 pre_tax_irr number,
21 after_tax_irr number,
22 book_yield number,
23 iir number,
24 sub_pre_tax_irr number,
25 sub_after_tax_irr number,
26 sub_book_yield number,
27 sub_iir number
28 );
29
30 TYPE rent_payments_rec IS RECORD(
31 rate number,
32 stub_amt number,
33 stub_days number,
34 periods number,
35 periodic_amount number,
36 start_date date
37 );
38 TYPE rent_payments_tbl IS TABLE OF rent_payments_rec INDEX BY binary_integer;
39
40 TYPE fee_service_payments_rec IS RECORD(
41 payment_type varchar2(30),
42 periods number,
43 periodic_amt number,
44 start_date date
45 );
46 TYPE fee_service_payments_tbl IS TABLE OF fee_service_payments_rec INDEX BY binary_integer;
47
48
49 TYPE item_order_estimate_rec IS RECORD(
50 Item_Category varchar2(240),
51 description varchar2(240),
52 cost number,
53 purchase_option_value number,
54 rate_factor number,
55 periods number,
56 periodic_amt number,
57 start_date date
58 );
59 TYPE item_order_estimate_tbl IS TABLE OF item_order_estimate_rec INDEX by binary_integer;
60 ------------------------------------------------------------------------------
61 -- Global Variables
62
63 g_pkg_name CONSTANT varchar2(200) := 'OKL_QUICK_QUOTES_PVT';
64 g_app_name CONSTANT varchar2(3) := okl_api.g_app_name;
65 g_api_type CONSTANT varchar2(4) := '_PVT';
66
67 ------------------------------------------------------------------------------
68 --Global Exception
69 ------------------------------------------------------------------------------
70
71 g_exception_halt_validation EXCEPTION;
72
73 ------------------------------------------------------------------------------
74
75 PROCEDURE create_quick_qte(p_api_version IN number
76 ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
77 ,x_return_status OUT NOCOPY varchar2
78 ,x_msg_count OUT NOCOPY number
79 ,x_msg_data OUT NOCOPY varchar2
80 ,p_qqhv_rec_type IN qqhv_rec_type
81 ,x_qqhv_rec_type OUT NOCOPY qqhv_rec_type
82 ,p_qqlv_tbl_type IN qqlv_tbl_type
83 ,x_qqlv_tbl_type OUT NOCOPY qqlv_tbl_type);
84
85 PROCEDURE update_quick_qte(p_api_version IN number
86 ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
87 ,x_return_status OUT NOCOPY varchar2
88 ,x_msg_count OUT NOCOPY number
89 ,x_msg_data OUT NOCOPY varchar2
90 ,p_qqhv_rec_type IN qqhv_rec_type
91 ,x_qqhv_rec_type OUT NOCOPY qqhv_rec_type
92 ,p_qqlv_tbl_type IN qqlv_tbl_type
93 ,x_qqlv_tbl_type OUT NOCOPY qqlv_tbl_type);
94
95 PROCEDURE delete_qql(p_api_version IN number
96 ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
97 ,x_return_status OUT NOCOPY varchar2
98 ,x_msg_count OUT NOCOPY number
99 ,x_msg_data OUT NOCOPY varchar2
100 ,p_qqlv_rec_type IN qqlv_rec_type);
101
102 PROCEDURE delete_qql(p_api_version IN number
103 ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
104 ,x_return_status OUT NOCOPY varchar2
105 ,x_msg_count OUT NOCOPY number
106 ,x_msg_data OUT NOCOPY varchar2
107 ,p_qqlv_tbl_type IN qqlv_tbl_type);
108
109 PROCEDURE handle_quick_quote(p_api_version IN number
110 ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
111 ,x_return_status OUT NOCOPY varchar2
112 ,x_msg_count OUT NOCOPY number
113 ,x_msg_data OUT NOCOPY varchar2
114 ,p_qqhv_rec_type IN qqhv_rec_type
115 ,p_qqlv_tbl_type IN qqlv_tbl_type
116 ,p_cfh_rec_type IN cashflow_hdr_rec
117 ,p_cfl_tbl_type IN cashflow_level_tbl
118 ,p_commit IN varchar2
119 ,create_yn IN varchar2
120 ,x_payment_rec OUT NOCOPY payment_rec_type
121 ,x_rent_payments_tbl OUT NOCOPY rent_payments_tbl
122 ,x_fee_payments_tbl OUT NOCOPY fee_service_payments_tbl
123 ,x_item_tbl OUT NOCOPY item_order_estimate_tbl
124 ,x_qqhv_rec_type OUT NOCOPY qqhv_rec_type --viselvar added
125 ,x_qqlv_tbl_type OUT NOCOPY qqlv_tbl_type -- viselvar added
126 );
127
128 procedure cancel_quick_quote(p_api_version IN NUMBER
129 ,p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false
130 ,x_return_status OUT NOCOPY VARCHAR2
131 ,x_msg_count OUT NOCOPY NUMBER
132 ,x_msg_data OUT NOCOPY VARCHAR2
133 ,p_qqhv_rec_type IN qqhv_rec_type
134 ,x_qqhv_rec_type OUT NOCOPY qqhv_rec_type);
135
136 ------------------------------------------------------------------------------
137 -- PROCEDURE duplicate_quick_qte
138 ------------------------------------------------------------------------------
139 -- Procedure Name : duplicate_quick_qte
140 -- Description : This procedure is a wrapper that duplicates estimates of a
141 -- particular lease opportunity
142 -- Parameters :
143 -- Version : 1.0
144 -- History : 15-FEB-2006 viselvar created
145
146 PROCEDURE duplicate_estimate ( p_api_version IN NUMBER,
147 p_init_msg_list IN VARCHAR2,
148 source_lopp_id IN NUMBER,
149 target_lopp_id IN NUMBER,
150 x_return_status OUT NOCOPY VARCHAR2,
151 x_msg_count OUT NOCOPY NUMBER,
152 x_msg_data OUT NOCOPY VARCHAR2);
153
154 END okl_quick_quotes_pvt;