1 PACKAGE pn_leases_pkg AUTHID CURRENT_USER AS
2 -- $Header: PNTLEASS.pls 120.1.12010000.2 2009/05/26 07:09:54 rthumma ship $
3 ------------------------------------------------------------------------
4 -- PROCEDURE : INSERT_ROW
5 -- HISTORY : Modified 19-MAR-2002 lkatputu
6 -- : Added Send_Entries into the table handler
7 -- as per the 'DO NOT SEND' enhancement requirement.
8 ------------------------------------------------------------------------
9 PROCEDURE Insert_Row
10 (
11 x_rowid IN OUT NOCOPY VARCHAR2,
12 x_lease_id IN OUT NOCOPY NUMBER,
13 x_lease_change_id IN OUT NOCOPY NUMBER,
14 x_lease_detail_id IN OUT NOCOPY NUMBER,
15 x_name IN VARCHAR2,
16 x_lease_num IN OUT NOCOPY VARCHAR2,
17 x_parent_lease_id IN NUMBER,
18 x_lease_type_code IN VARCHAR2,
19 x_lease_class_code IN VARCHAR2,
20 x_payment_term_proration_rule IN NUMBER,
21 x_abstracted_by_user IN NUMBER,
22 x_status IN VARCHAR2,
23 x_lease_status IN VARCHAR2,
24 x_creation_date IN DATE,
25 x_created_by IN NUMBER,
26 x_last_update_date IN DATE,
27 x_last_updated_by IN NUMBER,
28 x_last_update_login IN NUMBER,
29 x_responsible_user IN NUMBER,
30 x_expense_account_id IN NUMBER,
31 x_accrual_account_id IN NUMBER,
32 x_receivable_account_id IN NUMBER,
33 x_term_template_id IN NUMBER DEFAULT NULL,
34 x_lease_commencement_date IN DATE,
35 x_lease_termination_date IN DATE,
36 x_lease_execution_date IN DATE,
37 x_attribute_category IN VARCHAR2,
38 x_attribute1 IN VARCHAR2,
39 x_attribute2 IN VARCHAR2,
40 x_attribute3 IN VARCHAR2,
41 x_attribute4 IN VARCHAR2,
42 x_attribute5 IN VARCHAR2,
43 x_attribute6 IN VARCHAR2,
44 x_attribute7 IN VARCHAR2,
45 x_attribute8 IN VARCHAR2,
46 x_attribute9 IN VARCHAR2,
47 x_attribute10 IN VARCHAR2,
48 x_attribute11 IN VARCHAR2,
49 x_attribute12 IN VARCHAR2,
50 x_attribute13 IN VARCHAR2,
51 x_attribute14 IN VARCHAR2,
52 x_attribute15 IN VARCHAR2,
53 x_org_id IN NUMBER,
54 x_location_id IN NUMBER,
55 x_customer_id IN NUMBER,
56 x_grouping_rule_id IN NUMBER DEFAULT NULL,
57 x_calendar_year_start_date IN VARCHAR2 DEFAULT NULL --Bug#7022608
58 );
59
60 ------------------------------------------------------------------------
61 -- PROCEDURE : LOCK_ROW
62 -- HISTORY : Modified 19-MAR-2002 lkatputu
63 -- : Added Send_Entries into the table handler
64 -- as per the 'DO NOT SEND' enhancement requirement.
65 ------------------------------------------------------------------------
66 PROCEDURE Lock_Row
67 (
68 x_lease_id IN NUMBER,
69 x_lease_detail_id IN NUMBER,
70 x_lease_change_id IN NUMBER,
71 x_name IN VARCHAR2,
72 x_lease_num IN VARCHAR2,
73 x_parent_lease_id IN NUMBER,
74 x_lease_type_code IN VARCHAR2,
75 x_lease_class_code IN VARCHAR2,
76 x_payment_term_proration_rule IN NUMBER,
77 x_abstracted_by_user IN NUMBER,
78 x_status IN VARCHAR2,
79 x_lease_status IN VARCHAR2,
80 x_responsible_user IN NUMBER,
81 x_expense_account_id IN NUMBER,
82 x_accrual_account_id IN NUMBER,
83 x_receivable_account_id IN NUMBER,
84 x_term_template_id IN NUMBER,
85 x_lease_commencement_date IN DATE,
86 x_lease_termination_date IN DATE,
87 x_lease_execution_date IN DATE,
88 x_attribute_category IN VARCHAR2,
89 x_attribute1 IN VARCHAR2,
90 x_attribute2 IN VARCHAR2,
91 x_attribute3 IN VARCHAR2,
92 x_attribute4 IN VARCHAR2,
93 x_attribute5 IN VARCHAR2,
94 x_attribute6 IN VARCHAR2,
95 x_attribute7 IN VARCHAR2,
96 x_attribute8 IN VARCHAR2,
97 x_attribute9 IN VARCHAR2,
98 x_attribute10 IN VARCHAR2,
99 x_attribute11 IN VARCHAR2,
100 x_attribute12 IN VARCHAR2,
101 x_attribute13 IN VARCHAR2,
102 x_attribute14 IN VARCHAR2,
103 x_attribute15 IN VARCHAR2,
104 x_location_id IN NUMBER,
105 x_customer_id IN NUMBER,
106 x_grouping_rule_id IN NUMBER DEFAULT NULL,
107 x_calendar_year_start_date IN VARCHAR2 DEFAULT NULL --Bug#7022608
108 );
109
110
111 -------------------------------------------------------------------------------
112 -- PROCEDURE : UPDATE_ROW
113 -- HISTORY : Modified 19-MAR-2002 lkatputu
114 -- : Added Send_Entries into the table handler
115 -- as per the 'DO NOT SEND' enhancement requirement.
116 -- 02-FEB-05 Vivek o Added lease extension end date as one of the input
117 -- parameters. Fix for bug# 4142423
118 -------------------------------------------------------------------------------
119 PROCEDURE Update_Row
120 (
121 x_lease_id IN NUMBER,
122 x_lease_detail_id IN NUMBER,
123 x_lease_change_id IN NUMBER,
124 x_name IN VARCHAR2,
125 x_lease_num IN VARCHAR2,
126 x_parent_lease_id IN NUMBER,
127 x_lease_type_code IN VARCHAR2,
128 x_lease_class_code IN VARCHAR2,
129 x_payment_term_proration_rule IN NUMBER,
130 x_abstracted_by_user IN NUMBER,
131 x_status IN VARCHAR2,
132 x_lease_status IN VARCHAR2,
133 x_last_update_date IN DATE,
134 x_last_updated_by IN NUMBER,
135 x_last_update_login IN NUMBER,
136 x_responsible_user IN NUMBER,
137 x_expense_account_id IN NUMBER,
138 x_accrual_account_id IN NUMBER,
139 x_receivable_account_id IN NUMBER,
140 x_term_template_id IN NUMBER,
141 x_lease_commencement_date IN DATE,
142 x_lease_termination_date IN DATE,
143 x_lease_execution_date IN DATE,
144 x_attribute_category IN VARCHAR2,
145 x_attribute1 IN VARCHAR2,
146 x_attribute2 IN VARCHAR2,
147 x_attribute3 IN VARCHAR2,
148 x_attribute4 IN VARCHAR2,
149 x_attribute5 IN VARCHAR2,
150 x_attribute6 IN VARCHAR2,
151 x_attribute7 IN VARCHAR2,
152 x_attribute8 IN VARCHAR2,
153 x_attribute9 IN VARCHAR2,
154 x_attribute10 IN VARCHAR2,
155 x_attribute11 IN VARCHAR2,
156 x_attribute12 IN VARCHAR2,
157 x_attribute13 IN VARCHAR2,
158 x_attribute14 IN VARCHAR2,
159 x_attribute15 IN VARCHAR2,
160 x_location_id IN NUMBER,
161 x_customer_id IN NUMBER,
162 x_grouping_rule_id IN NUMBER DEFAULT NULL,
163 x_lease_extension_end_date IN DATE,
164 x_calendar_year_start_date IN VARCHAR2 DEFAULT NULL --Bug#7022608
165 );
166
167 ------------------------------------------------------------------------
168 -- PROCEDURE : DELETE_ROW --delete logic....8/11/1999
169 ------------------------------------------------------------------------
170 PROCEDURE Delete_Row
171 (
172 x_lease_id IN NUMBER
173 );
174
175 ------------------------------------------------------------------------
176 -- PROCEDURE : CHECK_UNIQUE_LEASE_NUMBER
177 ------------------------------------------------------------------------
178 PROCEDURE check_unique_lease_number
179 (
180 x_return_status IN OUT NOCOPY VARCHAR2,
181 x_lease_id IN NUMBER,
182 x_lease_number IN VARCHAR2
183 );
184
185 /* overloaded functions and procedures for MOAC */
186 ------------------------------------------------------------------------
187 -- PROCEDURE : CHECK_UNIQUE_LEASE_NUMBER
188 ------------------------------------------------------------------------
189 PROCEDURE check_unique_lease_number
190 (
191 x_return_status IN OUT NOCOPY VARCHAR2,
192 x_lease_id IN NUMBER,
193 x_lease_number IN VARCHAR2,
194 x_org_id IN NUMBER
195 );
196
197 END pn_leases_pkg;