DBA Data[Home] [Help]

PACKAGE: APPS.PN_LEASE_PVT

Source


1 PACKAGE PN_LEASE_PVT AUTHID CURRENT_USER AS
2 /* $Header: PNLSPVTS.pls 120.2 2011/09/30 17:45:05 asahoo ship $ */
3 
4   -- Record Type for PN_LEASES_ALL and PN_LEASE_DETAILS_ALL record.
5      TYPE lease_rec IS RECORD (
6         lease_id                  NUMBER                             := pn_lease_utils.g_pn_miss_num
7       , lease_change_id           NUMBER                             := pn_lease_utils.g_pn_miss_num
8       , org_id                    NUMBER                             := nvl(pn_mo_cache_utils.get_current_org_id,fnd_profile.value ('org_id'))
12       , created_by                NUMBER                             := pn_lease_utils.g_pn_miss_num
9       , last_update_date          DATE                               := pn_lease_utils.g_pn_miss_date
10       , last_updated_by           NUMBER                             := pn_lease_utils.g_pn_miss_num
11       , creation_date             DATE                               := pn_lease_utils.g_pn_miss_date
13       , last_update_login         NUMBER                             := pn_lease_utils.g_pn_miss_num
14       , lease_name                pn_leases_all.NAME%TYPE            := pn_lease_utils.g_pn_miss_char
15       , lease_num                 pn_leases_all.lease_num%TYPE       := pn_lease_utils.g_pn_miss_char
16       , parent_lease_name         pn_leases_all.NAME%TYPE            := pn_lease_utils.g_pn_miss_char
17       , parent_lease_num          pn_leases_all.lease_num%TYPE       := pn_lease_utils.g_pn_miss_char
18       , parent_lease_id           NUMBER                             := pn_lease_utils.g_pn_miss_num
19       , lease_type                VARCHAR2 (80)                      := pn_lease_utils.g_pn_miss_char
20       , lease_type_code           pn_leases_all.lease_type_code%TYPE := pn_lease_utils.g_pn_miss_char
21       , lease_class               VARCHAR2 (80)                      := pn_lease_utils.g_pn_miss_char
22       , lease_class_code          pn_leases_all.lease_class_code%TYPE:= pn_lease_utils.g_pn_miss_char
23       , abstracted_by_user        fnd_user.user_name%TYPE            := pn_lease_utils.g_pn_miss_char
24       , abstracted_by_user_id     NUMBER                             := pn_lease_utils.g_pn_miss_num
25       , location_code             VARCHAR2 (30)                      := pn_lease_utils.g_pn_miss_char
26       , location_id               NUMBER                             := pn_lease_utils.g_pn_miss_num
27       , status_code               pn_leases_all.status%TYPE          := pn_lease_utils.g_pn_miss_char
28       , status                    VARCHAR2 (80)                      := pn_lease_utils.g_pn_miss_char
29       , lease_status_code         pn_leases_all.lease_status%TYPE    := pn_lease_utils.g_pn_miss_char
30       , lease_status              VARCHAR2 (80)                      := pn_lease_utils.g_pn_miss_char
31       , lease_detail_id           NUMBER                             := pn_lease_utils.g_pn_miss_num
32       , lease_commencement_date   DATE                               := pn_lease_utils.g_pn_miss_date
33       , lease_termination_date    DATE                               := pn_lease_utils.g_pn_miss_date
34       , lease_execution_date      DATE                               := pn_lease_utils.g_pn_miss_date
35       , lease_extension_date      DATE                               := pn_lease_utils.g_pn_miss_date
36       , pymt_term_pro_rule_id     VARCHAR2(30)                       := pn_lease_utils.g_pn_miss_char
37        ,pymt_term_pro_rule        VARCHAR2 (80)                      := pn_lease_utils.g_pn_miss_char
38       , responsible_user          fnd_user.user_name%TYPE            := pn_lease_utils.g_pn_miss_char
39       , responsible_user_id       NUMBER                             := pn_lease_utils.g_pn_miss_num
40       , term_template_name        pn_term_templates_all.NAME%TYPE    := pn_lease_utils.g_pn_miss_char
41       , term_template_id          NUMBER                             := pn_lease_utils.g_pn_miss_num
42       , customer_id               NUMBER                             := pn_lease_utils.g_pn_miss_num
43       , customer_name             VARCHAR2 (50)                      := pn_lease_utils.g_pn_miss_char
44       , grouping_rule_name        pn_pay_group_rules.name%TYPE       := pn_lease_utils.g_pn_miss_char
45       , grouping_rule_id          NUMBER                             := pn_lease_utils.g_pn_miss_num
46       , send_entries              VARCHAR2 (1)                       := pn_lease_utils.g_pn_miss_char
47       , amend_comm_date           DATE                               := pn_lease_utils.g_pn_miss_date
48       , amend_exec_date           DATE                               := pn_lease_utils.g_pn_miss_date
49       , amend_lease_name          pn_lease_changes_all.lease_change_name%TYPE := pn_lease_utils.g_pn_miss_char
50       , cal_start                 pn_leases_all.cal_start%TYPE       := pn_lease_utils.g_pn_miss_char
51       , attribute_category        VARCHAR2 (30)                      := pn_lease_utils.g_pn_miss_char
52       , attribute1                VARCHAR2 (150)                     := pn_lease_utils.g_pn_miss_char
53       , attribute2                VARCHAR2 (150)                     := pn_lease_utils.g_pn_miss_char
54       , attribute3                VARCHAR2 (150)                     := pn_lease_utils.g_pn_miss_char
55       , attribute4                VARCHAR2 (150)                     := pn_lease_utils.g_pn_miss_char
56       , attribute5                VARCHAR2 (150)                     := pn_lease_utils.g_pn_miss_char
57       , attribute6                VARCHAR2 (150)                     := pn_lease_utils.g_pn_miss_char
58       , attribute7                VARCHAR2 (150)                     := pn_lease_utils.g_pn_miss_char
59       , attribute8                VARCHAR2 (150)                     := pn_lease_utils.g_pn_miss_char
60       , attribute9                VARCHAR2 (150)                     := pn_lease_utils.g_pn_miss_char
61       , attribute10               VARCHAR2 (150)                     := pn_lease_utils.g_pn_miss_char
62       , attribute11               VARCHAR2 (150)                     := pn_lease_utils.g_pn_miss_char
63       , attribute12               VARCHAR2 (150)                     := pn_lease_utils.g_pn_miss_char
64       , attribute13               VARCHAR2 (150)                     := pn_lease_utils.g_pn_miss_char
65       , attribute14               VARCHAR2 (150)                     := pn_lease_utils.g_pn_miss_char
66       , attribute15               VARCHAR2 (150)                     := pn_lease_utils.g_pn_miss_char
67      );
68 
69      -- Record Type for the accounting key flexfields associated with the PN_LEASE_DETAILS_ALL
70      TYPE lease_account_rec IS RECORD (
71         account_id            NUMBER         := pn_lease_utils.g_pn_miss_num
72       , account_vals_or_ids   VARCHAR2 (1)   := pn_lease_utils.g_pn_miss_char
73       , account_conc_segs     VARCHAR2 (800) := pn_lease_utils.g_pn_miss_char
74       , account_segment1      VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
75       , account_segment2      VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
76       , account_segment3      VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
77       , account_segment4      VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
78       , account_segment5      VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
79       , account_segment6      VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
80       , account_segment7      VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
81       , account_segment8      VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
82       , account_segment9      VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
83       , account_segment10     VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
84       , account_segment11     VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
85       , account_segment12     VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
86       , account_segment13     VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
87       , account_segment14     VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
88       , account_segment15     VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
89       , account_segment16     VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
90       , account_segment17     VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
91       , account_segment18     VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
92       , account_segment19     VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
93       , account_segment20     VARCHAR2 (30)  := pn_lease_utils.g_pn_miss_char
94       , account_percentage    NUMBER         := pn_lease_utils.g_pn_miss_num
95      );
96 
97   ------------------------
98      -- Record Type for the CONTACTS
99      TYPE lease_contacts_rec IS RECORD (
100         contact_assignment_id   NUMBER                           := PN_LEASE_UTILS.G_PN_MISS_NUM
101        ,last_update_date        DATE                             := PN_LEASE_UTILS.G_PN_MISS_DATE
102        ,last_updated_by         NUMBER                           := PN_LEASE_UTILS.G_PN_MISS_NUM
103        ,creation_date           DATE                             := PN_LEASE_UTILS.G_PN_MISS_DATE
104        ,created_by              NUMBER                           := PN_LEASE_UTILS.G_PN_MISS_NUM
105        ,last_update_login       NUMBER                           := PN_LEASE_UTILS.G_PN_MISS_NUM
106        ,role_code               VARCHAR2 (30)                    := pn_lease_utils.g_pn_miss_char
107       , role                    VARCHAR2 (80)                    := pn_lease_utils.g_pn_miss_char
108       , company_name            pn_companies_all.NAME%TYPE       := pn_lease_utils.g_pn_miss_char
109       , company_id              NUMBER                           := pn_lease_utils.g_pn_miss_num
110       , company_site_name       pn_company_sites_all.NAME%TYPE   := pn_lease_utils.g_pn_miss_char
111       , company_site_id         NUMBER                           := pn_lease_utils.g_pn_miss_num
112       , lease_id                NUMBER                           := pn_lease_utils.g_pn_miss_num
113       , lease_change_id         NUMBER                           := pn_lease_utils.g_pn_miss_num
114       , location_code           VARCHAR2 (30)                    := pn_lease_utils.g_pn_miss_char
115       , location_id             NUMBER                           := pn_lease_utils.g_pn_miss_num
116       , status                  VARCHAR2 (1)                     := pn_lease_utils.g_pn_miss_char
117       , org_id                  NUMBER                           := nvl(pn_mo_cache_utils.get_current_org_id,fnd_profile.value ('org_id'))
118       , attribute_category      VARCHAR2 (30)                    := pn_lease_utils.g_pn_miss_char
119       , attribute1              VARCHAR2 (150)                   := pn_lease_utils.g_pn_miss_char
120       , attribute2              VARCHAR2 (150)                   := pn_lease_utils.g_pn_miss_char
124       , attribute6              VARCHAR2 (150)                   := pn_lease_utils.g_pn_miss_char
121       , attribute3              VARCHAR2 (150)                   := pn_lease_utils.g_pn_miss_char
122       , attribute4              VARCHAR2 (150)                   := pn_lease_utils.g_pn_miss_char
123       , attribute5              VARCHAR2 (150)                   := pn_lease_utils.g_pn_miss_char
125       , attribute7              VARCHAR2 (150)                   := pn_lease_utils.g_pn_miss_char
126       , attribute8              VARCHAR2 (150)                   := pn_lease_utils.g_pn_miss_char
127       , attribute9              VARCHAR2 (150)                   := pn_lease_utils.g_pn_miss_char
128       , attribute10             VARCHAR2 (150)                   := pn_lease_utils.g_pn_miss_char
129       , attribute11             VARCHAR2 (150)                   := pn_lease_utils.g_pn_miss_char
130       , attribute12             VARCHAR2 (150)                   := pn_lease_utils.g_pn_miss_char
131       , attribute13             VARCHAR2 (150)                   := pn_lease_utils.g_pn_miss_char
132       , attribute14             VARCHAR2 (150)                   := pn_lease_utils.g_pn_miss_char
133       , attribute15             VARCHAR2 (150)                   := pn_lease_utils.g_pn_miss_char
134       , error_flag              VARCHAR2(1)                      := pn_lease_utils.g_pn_miss_char
135      );
136 
137      TYPE lease_contacts_tbl IS TABLE OF lease_contacts_rec
138         INDEX BY BINARY_INTEGER;
139 
140      --------Tenancies Record Type------------
141      TYPE lease_tenancies_rec IS RECORD (
142         tenancy_id                   NUMBER                                 := PN_LEASE_UTILS.G_PN_MISS_NUM
143        ,last_update_date             DATE                                   := PN_LEASE_UTILS.G_PN_MISS_DATE
144       , last_updated_by              NUMBER                                 := PN_LEASE_UTILS.G_PN_MISS_NUM
145       , creation_date                DATE                                   := PN_LEASE_UTILS.G_PN_MISS_DATE
146       , created_by                   NUMBER                                 := PN_LEASE_UTILS.G_PN_MISS_NUM
147       , last_update_login            NUMBER                                 := PN_LEASE_UTILS.G_PN_MISS_NUM
148       , location_id                  NUMBER                                 := pn_lease_utils.g_pn_miss_num
149       , location_code                VARCHAR2 (30)                          := pn_lease_utils.g_pn_miss_char
150       , lease_id                     NUMBER                                 := pn_lease_utils.g_pn_miss_num
151       , lease_change_id              NUMBER                                 := pn_lease_utils.g_pn_miss_num
152       , tenancy_usage_lookup_code    VARCHAR2 (30)                          := pn_lease_utils.g_pn_miss_char
153       , tenancy_usage_lookup_name    VARCHAR2 (80)                          := pn_lease_utils.g_pn_miss_char
154       , primary_flag                 VARCHAR2 (1)                           := pn_lease_utils.g_pn_miss_char
155       , estimated_occupancy_date     DATE                                   := pn_lease_utils.g_pn_miss_date
156       , occupancy_date               DATE                                   := pn_lease_utils.g_pn_miss_date
157       , expiration_date              DATE                                   := pn_lease_utils.g_pn_miss_date
158       , assignable_flag              pn_tenancies_all.assignable_flag%TYPE  := pn_lease_utils.g_pn_miss_char
159       , subleaseable_flag            pn_tenancies_all.subleaseable_flag%TYPE:= pn_lease_utils.g_pn_miss_char
160       , tenants_proportionate_share  pn_tenancies_all.tenants_proportionate_share%TYPE := pn_lease_utils.g_pn_miss_num
161       , status                       pn_tenancies_all.status%TYPE           := pn_lease_utils.g_pn_miss_char
162       , attribute_category           VARCHAR2 (30)                          := pn_lease_utils.g_pn_miss_char
163       , attribute1                   VARCHAR2 (150)                         := pn_lease_utils.g_pn_miss_char
164       , attribute2                   VARCHAR2 (150)                         := pn_lease_utils.g_pn_miss_char
165       , attribute3                   VARCHAR2 (150)                         := pn_lease_utils.g_pn_miss_char
166       , attribute4                   VARCHAR2 (150)                         := pn_lease_utils.g_pn_miss_char
167       , attribute5                   VARCHAR2 (150)                         := pn_lease_utils.g_pn_miss_char
168       , attribute6                   VARCHAR2 (150)                         := pn_lease_utils.g_pn_miss_char
169       , attribute7                   VARCHAR2 (150)                         := pn_lease_utils.g_pn_miss_char
170       , attribute8                   VARCHAR2 (150)                         := pn_lease_utils.g_pn_miss_char
171       , attribute9                   VARCHAR2 (150)                         := pn_lease_utils.g_pn_miss_char
172       , attribute10                  VARCHAR2 (150)                         := pn_lease_utils.g_pn_miss_char
173       , attribute11                  VARCHAR2 (150)                         := pn_lease_utils.g_pn_miss_char
174       , attribute12                  VARCHAR2 (150)                         := pn_lease_utils.g_pn_miss_char
175       , attribute13                  VARCHAR2 (150)                         := pn_lease_utils.g_pn_miss_char
176       , attribute14                  VARCHAR2 (150)                         := pn_lease_utils.g_pn_miss_char
177       , attribute15                  VARCHAR2 (150)                         := pn_lease_utils.g_pn_miss_char
178       , org_id                       NUMBER                                 := nvl(pn_mo_cache_utils.get_current_org_id,fnd_profile.value ('org_id'))
179       , recovery_type_code           pn_tenancies_all.recovery_type_code%TYPE:= pn_lease_utils.g_pn_miss_char
180       , recovery_type_meaning        VARCHAR2(80)                           := pn_lease_utils.g_pn_miss_char
181       , recovery_space_std_code      pn_tenancies_all.recovery_space_std_code%TYPE:= pn_lease_utils.g_pn_miss_char
182       , recovery_space_std_meaning   VARCHAR2(30)                           := pn_lease_utils.g_pn_miss_char
183       , fin_oblig_end_date           DATE                                   := pn_lease_utils.g_pn_miss_date
184       , customer_id                  NUMBER                                 := pn_lease_utils.g_pn_miss_num
185       , customer_name                VARCHAR2 (50)                          := pn_lease_utils.g_pn_miss_char
186       , customer_site_use_id         NUMBER                                 := pn_lease_utils.g_pn_miss_num
187       , lease_rentable_area          NUMBER                                 := pn_lease_utils.g_pn_miss_num
188       , lease_usable_area            NUMBER                                 := pn_lease_utils.g_pn_miss_num
189       , lease_assignable_area        NUMBER                                 := pn_lease_utils.g_pn_miss_num
190       , lease_load_factor            NUMBER                                 := pn_lease_utils.g_pn_miss_num
191       , location_rentable_area       NUMBER                                 := pn_lease_utils.g_pn_miss_num
192       , location_usable_area         NUMBER                                 := pn_lease_utils.g_pn_miss_num
193       , location_assignable_area     NUMBER                                 := pn_lease_utils.g_pn_miss_num
194       , location_load_factor         NUMBER                                 := pn_lease_utils.g_pn_miss_num
195       , allocated_area               NUMBER                                 := pn_lease_utils.g_pn_miss_num
196       , allocated_area_pct           NUMBER                                 := pn_lease_utils.g_pn_miss_num
197       , error_flag                   VARCHAR2(1)                            := pn_lease_utils.g_pn_miss_char
198       , allow_overlap_space_asg      VARCHAR2(1)                            := 'N'
199       , allow_dup_space_asg          VARCHAR2(1)                            := 'N'
200       , allow_zero_space_asg         VARCHAR2(1)                            := 'N'
201      );
202 
203      TYPE lease_tenancies_tbl IS TABLE OF lease_tenancies_rec
204         INDEX BY BINARY_INTEGER;
205 
206 
207 
208      TYPE temp_rec_type IS RECORD (
209       temp_flag   NUMBER
210        );
211 
212     TYPE temp_tbl_type IS TABLE OF temp_rec_type
213       INDEX BY BINARY_INTEGER;
214 
215      TYPE lease_milestone_rec IS RECORD(
216        lease_milestone_id          pn_lease_milestones_all.lease_milestone_id%type             := pn_lease_utils.g_pn_miss_num
217      , milestone_type              fnd_lookups.meaning%TYPE                                    := pn_lease_utils.g_pn_miss_char
218      , milestone_type_code         pn_lease_milestones_all.milestone_type_code%TYPE            := pn_lease_utils.g_pn_miss_char
219      , user_name                   fnd_user.user_name%TYPE                                     := pn_lease_utils.g_pn_miss_char
220      , user_id                     pn_lease_milestones_all.user_id%TYPE                        := pn_lease_utils.g_pn_miss_num
221      , action_due_date             pn_lease_milestones_all.milestone_date%TYPE                 := pn_lease_utils.g_pn_miss_date
222      , lead_days                   pn_lease_milestones_all.lead_days%TYPE                      := pn_lease_utils.g_pn_miss_num
223      , frequency                   pn_lease_milestones_all.every_days%TYPE                     := pn_lease_utils.g_pn_miss_num
224      , attribute_category          pn_lease_milestones_all.attribute_category%TYPE             := pn_lease_utils.g_pn_miss_char
225      , attribute1                  pn_lease_milestones_all.attribute1%TYPE                     := pn_lease_utils.g_pn_miss_char
226      , attribute2                  pn_lease_milestones_all.attribute2%TYPE                     := pn_lease_utils.g_pn_miss_char
227      , attribute3                  pn_lease_milestones_all.attribute3%TYPE                     := pn_lease_utils.g_pn_miss_char
228      , attribute4                  pn_lease_milestones_all.attribute4%TYPE                     := pn_lease_utils.g_pn_miss_char
229      , attribute5                  pn_lease_milestones_all.attribute5%TYPE                     := pn_lease_utils.g_pn_miss_char
230      , attribute6                  pn_lease_milestones_all.attribute6%TYPE                     := pn_lease_utils.g_pn_miss_char
231      , attribute7                  pn_lease_milestones_all.attribute7%TYPE                     := pn_lease_utils.g_pn_miss_char
232      , attribute8                  pn_lease_milestones_all.attribute8%TYPE                     := pn_lease_utils.g_pn_miss_char
233      , attribute9                  pn_lease_milestones_all.attribute9%TYPE                     := pn_lease_utils.g_pn_miss_char
234      , attribute10                 pn_lease_milestones_all.attribute10%TYPE                    := pn_lease_utils.g_pn_miss_char
235      , attribute11                 pn_lease_milestones_all.attribute11%TYPE                    := pn_lease_utils.g_pn_miss_char
236      , attribute12                 pn_lease_milestones_all.attribute12%TYPE                    := pn_lease_utils.g_pn_miss_char
237      , attribute13                 pn_lease_milestones_all.attribute13%TYPE                    := pn_lease_utils.g_pn_miss_char
238      , attribute14                 pn_lease_milestones_all.attribute14%TYPE                    := pn_lease_utils.g_pn_miss_char
239      , attribute15                 pn_lease_milestones_all.attribute15%TYPE                    := pn_lease_utils.g_pn_miss_char
240    );
241 
242     TYPE lease_milestone_tbl_type IS TABLE OF lease_milestone_rec
243     INDEX BY BINARY_INTEGER;
244 
245  --for notes
246   TYPE pn_lease_note_rec IS RECORD (
247      note_header_id          pn_note_headers.note_header_id%TYPE            := pn_lease_utils.g_pn_miss_num
248    , note_date               DATE                                           := pn_lease_utils.g_pn_miss_date
249    , note_type               fnd_lookups.meaning%TYPE                       := pn_lease_utils.g_pn_miss_char
250    , note_type_lookup_code   pn_note_headers.note_type_lookup_code%TYPE     := pn_lease_utils.g_pn_miss_char
251    , note_detail_id          pn_note_details.note_detail_id%TYPE            := pn_lease_utils.g_pn_miss_num
252    , text                    pn_note_details.text%TYPE                      := pn_lease_utils.g_pn_miss_char
253    , attribute_category      pn_note_headers.attribute_category%TYPE        := pn_lease_utils.g_pn_miss_char
254    , attribute1              pn_note_headers.attribute1%TYPE                := pn_lease_utils.g_pn_miss_char
255    , attribute2              pn_note_headers.attribute2%TYPE                := pn_lease_utils.g_pn_miss_char
256    , attribute3              pn_note_headers.attribute3%TYPE                := pn_lease_utils.g_pn_miss_char
257    , attribute4              pn_note_headers.attribute4%TYPE                := pn_lease_utils.g_pn_miss_char
258    , attribute5              pn_note_headers.attribute5%TYPE                := pn_lease_utils.g_pn_miss_char
259    , attribute6              pn_note_headers.attribute6%TYPE                := pn_lease_utils.g_pn_miss_char
260    , attribute7              pn_note_headers.attribute7%TYPE                := pn_lease_utils.g_pn_miss_char
261    , attribute8              pn_note_headers.attribute8%TYPE                := pn_lease_utils.g_pn_miss_char
262    , attribute9              pn_note_headers.attribute9%TYPE                := pn_lease_utils.g_pn_miss_char
263    , attribute10             pn_note_headers.attribute10%TYPE               := pn_lease_utils.g_pn_miss_char
264    , attribute11             pn_note_headers.attribute11%TYPE               := pn_lease_utils.g_pn_miss_char
265    , attribute12             pn_note_headers.attribute12%TYPE               := pn_lease_utils.g_pn_miss_char
266    , attribute13             pn_note_headers.attribute13%TYPE               := pn_lease_utils.g_pn_miss_char
267    , attribute14             pn_note_headers.attribute14%TYPE               := pn_lease_utils.g_pn_miss_char
268    , attribute15             pn_note_headers.attribute15%TYPE               := pn_lease_utils.g_pn_miss_char
269    --, p_null_id            VARCHAR(1)                                         := pn_lease_utils.g_pn_miss_char
270   );
271 
272 
273    TYPE lease_note_tbl_type IS TABLE OF pn_lease_note_rec INDEX BY BINARY_INTEGER;
274 
275 /*RECORD TYPE FOR RIGHTS*/
276 TYPE lease_right_rec IS RECORD (
277     right_id             NUMBER                                  := pn_lease_utils.g_pn_miss_num
278   , right_num            NUMBER                                  := pn_lease_utils.g_pn_miss_num
279   , right_type           fnd_lookups.meaning%TYPE                := pn_lease_utils.g_pn_miss_char
280   , right_type_code      pn_rights_all.right_type_code%TYPE      := pn_lease_utils.g_pn_miss_char
281   , right_status         fnd_lookups.meaning%TYPE                := pn_lease_utils.g_pn_miss_char
282   , right_status_code    pn_rights_all.right_status_code%TYPE    := pn_lease_utils.g_pn_miss_char
283   , right_reference      pn_rights_all.right_reference%TYPE      := pn_lease_utils.g_pn_miss_char
284   , right_comments       pn_rights_all.right_comments%TYPE       := pn_lease_utils.g_pn_miss_char
285   , attribute_category   pn_rights_all.attribute_category%TYPE   := pn_lease_utils.g_pn_miss_char
286   , attribute1           pn_rights_all.attribute1%TYPE           := pn_lease_utils.g_pn_miss_char
287   , attribute2           pn_rights_all.attribute2%TYPE           := pn_lease_utils.g_pn_miss_char
288   , attribute3           pn_rights_all.attribute3%TYPE           := pn_lease_utils.g_pn_miss_char
289   , attribute4           pn_rights_all.attribute4%TYPE           := pn_lease_utils.g_pn_miss_char
290   , attribute5           pn_rights_all.attribute5%TYPE           := pn_lease_utils.g_pn_miss_char
291   , attribute6           pn_rights_all.attribute6%TYPE           := pn_lease_utils.g_pn_miss_char
292   , attribute7           pn_rights_all.attribute7%TYPE           := pn_lease_utils.g_pn_miss_char
293   , attribute8           pn_rights_all.attribute8%TYPE           := pn_lease_utils.g_pn_miss_char
294   , attribute9           pn_rights_all.attribute9%TYPE           := pn_lease_utils.g_pn_miss_char
295   , attribute10          pn_rights_all.attribute10%TYPE          := pn_lease_utils.g_pn_miss_char
296   , attribute11          pn_rights_all.attribute11%TYPE          := pn_lease_utils.g_pn_miss_char
297   , attribute12          pn_rights_all.attribute12%TYPE          := pn_lease_utils.g_pn_miss_char
298   , attribute13          pn_rights_all.attribute13%TYPE          := pn_lease_utils.g_pn_miss_char
299   , attribute14          pn_rights_all.attribute14%TYPE          := pn_lease_utils.g_pn_miss_char
300   , attribute15          pn_rights_all.attribute15%TYPE          := pn_lease_utils.g_pn_miss_char
301   --, p_null_id            VARCHAR(1)                              := pn_lease_utils.g_pn_miss_char
302   );
303 
304 
305    TYPE lease_right_tbl_type IS TABLE OF lease_right_rec
306       INDEX BY BINARY_INTEGER;
307 
308 
309     /*Record type for obligations*/
310  TYPE lease_obligation_rec IS RECORD (
311      landlord_service_id         pn_landlord_services_all.landlord_service_id%TYPE       := pn_lease_utils.g_pn_miss_num
312    , status                      pn_landlord_services_all.status%TYPE                    := pn_lease_utils.g_pn_miss_char
313   -- , status_code                 pn_landlord_services_all.status%TYPE                    := pn_lease_utils.g_pn_miss_char
314    , service_type                fnd_lookups.meaning%TYPE                                := pn_lease_utils.g_pn_miss_char
315    , service_type_lookup_code    pn_landlord_services_all.service_type_lookup_code%TYPE  := pn_lease_utils.g_pn_miss_char
316    , start_date                  pn_landlord_services_all.start_date%TYPE                := pn_lease_utils.g_pn_miss_date
317    , end_date                    pn_landlord_services_all.end_date%TYPE                  := pn_lease_utils.g_pn_miss_date
318    , obligation_num              pn_landlord_services_all.obligation_num%TYPE            := pn_lease_utils.g_pn_miss_char
319    , responsibility              fnd_lookups.meaning%TYPE                                := pn_lease_utils.g_pn_miss_char
320    , responsibility_code         pn_landlord_services_all.responsibility_code%TYPE       := pn_lease_utils.g_pn_miss_char
321    , common_area_resp            pn_landlord_services_all.common_area_resp%TYPE          := pn_lease_utils.g_pn_miss_char
322    , financial_resp_party        fnd_lookups.meaning%TYPE                                := pn_lease_utils.g_pn_miss_char
323    , financial_resp_party_code   pn_landlord_services_all.financial_resp_party_code%TYPE := pn_lease_utils.g_pn_miss_char
324    , financial_pct_resp          pn_landlord_services_all.financial_pct_resp%TYPE        := pn_lease_utils.g_pn_miss_char
325    , responsibility_maint        pn_landlord_services_all.responsibility_maint%TYPE      := pn_lease_utils.g_pn_miss_char
326    , company_name                pn_companies_all.NAME%TYPE                              := pn_lease_utils.g_pn_miss_char
327    , company_id                  pn_landlord_services_all.company_id%TYPE                := pn_lease_utils.g_pn_miss_num
328    , obligation_reference        pn_landlord_services_all.obligation_reference%TYPE      := pn_lease_utils.g_pn_miss_char
329    , obligation_comments         pn_landlord_services_all.obligation_comments%TYPE       := pn_lease_utils.g_pn_miss_char
330    , attribute_category          pn_landlord_services_all.attribute_category%TYPE        := pn_lease_utils.g_pn_miss_char
331    , attribute1                  pn_landlord_services_all.attribute1%TYPE                := pn_lease_utils.g_pn_miss_char
332    , attribute2                  pn_landlord_services_all.attribute2%TYPE                := pn_lease_utils.g_pn_miss_char
333    , attribute3                  pn_landlord_services_all.attribute3%TYPE                := pn_lease_utils.g_pn_miss_char
334    , attribute4                  pn_landlord_services_all.attribute4%TYPE                := pn_lease_utils.g_pn_miss_char
335    , attribute5                  pn_landlord_services_all.attribute5%TYPE                := pn_lease_utils.g_pn_miss_char
336    , attribute6                  pn_landlord_services_all.attribute6%TYPE                := pn_lease_utils.g_pn_miss_char
337    , attribute7                  pn_landlord_services_all.attribute7%TYPE                := pn_lease_utils.g_pn_miss_char
338    , attribute8                  pn_landlord_services_all.attribute8%TYPE                := pn_lease_utils.g_pn_miss_char
339    , attribute9                  pn_landlord_services_all.attribute9%TYPE                := pn_lease_utils.g_pn_miss_char
340    , attribute10                 pn_landlord_services_all.attribute10%TYPE               := pn_lease_utils.g_pn_miss_char
341    , attribute11                 pn_landlord_services_all.attribute11%TYPE               := pn_lease_utils.g_pn_miss_char
342    , attribute12                 pn_landlord_services_all.attribute12%TYPE               := pn_lease_utils.g_pn_miss_char
343    , attribute13                 pn_landlord_services_all.attribute13%TYPE               := pn_lease_utils.g_pn_miss_char
344    , attribute14                 pn_landlord_services_all.attribute14%TYPE               := pn_lease_utils.g_pn_miss_char
345    , attribute15                 pn_landlord_services_all.attribute15%TYPE               := pn_lease_utils.g_pn_miss_char
346    --, p_null_id                   VARCHAR(1)                                              := pn_lease_utils.g_pn_miss_char
347  );
348 
349 
350    TYPE lease_obligation_tbl_type IS TABLE OF lease_obligation_rec
351       INDEX BY BINARY_INTEGER;
352 
353 
354 
355   TYPE lease_insurance_rec IS RECORD (
356    insurance_requirement_id   pn_insurance_requirements_all.insurance_requirement_id%TYPE   := pn_lease_utils.g_pn_miss_num
357  , status                     fnd_lookups.meaning%TYPE                                      := pn_lease_utils.g_pn_miss_char
358  , status_code                pn_insurance_requirements_all.status%TYPE                     := pn_lease_utils.g_pn_miss_char
359  , insurance_type             fnd_lookups.meaning%TYPE                                      := pn_lease_utils.g_pn_miss_char
360  , insurance_type_lookup_code pn_insurance_requirements_all.insurance_type_lookup_code%TYPE := pn_lease_utils.g_pn_miss_char
361  , policy_start_date          DATE                                                          := pn_lease_utils.g_pn_miss_date
362  , policy_expiration_date     DATE                                                          := pn_lease_utils.g_pn_miss_date
363  , insurer_name               pn_insurance_requirements_all.insurer_name%TYPE               := pn_lease_utils.g_pn_miss_char
364  , policy_number              pn_insurance_requirements_all.policy_number%TYPE              := pn_lease_utils.g_pn_miss_char
365  , insured_amount             NUMBER                                                        := pn_lease_utils.g_pn_miss_num
366  , required_amount            NUMBER                                                        := pn_lease_utils.g_pn_miss_num
367  , attribute_category         pn_insurance_requirements_all.attribute_category%TYPE         := pn_lease_utils.g_pn_miss_char
368  , attribute1                 pn_insurance_requirements_all.attribute1%TYPE                 := pn_lease_utils.g_pn_miss_char
369  , attribute2                 pn_insurance_requirements_all.attribute2%TYPE                 := pn_lease_utils.g_pn_miss_char
370  , attribute3                 pn_insurance_requirements_all.attribute3%TYPE                 := pn_lease_utils.g_pn_miss_char
371  , attribute4                 pn_insurance_requirements_all.attribute4%TYPE                 := pn_lease_utils.g_pn_miss_char
372  , attribute5                 pn_insurance_requirements_all.attribute5%TYPE                 := pn_lease_utils.g_pn_miss_char
373  , attribute6                 pn_insurance_requirements_all.attribute6%TYPE                 := pn_lease_utils.g_pn_miss_char
374  , attribute7                 pn_insurance_requirements_all.attribute7%TYPE                 := pn_lease_utils.g_pn_miss_char
375  , attribute8                 pn_insurance_requirements_all.attribute8%TYPE                 := pn_lease_utils.g_pn_miss_char
376  , attribute9                 pn_insurance_requirements_all.attribute8%TYPE                 := pn_lease_utils.g_pn_miss_char
377  , attribute10                pn_insurance_requirements_all.attribute10%TYPE                := pn_lease_utils.g_pn_miss_char
378  , attribute11                pn_insurance_requirements_all.attribute11%TYPE                := pn_lease_utils.g_pn_miss_char
379  , attribute12                pn_insurance_requirements_all.attribute12%TYPE                := pn_lease_utils.g_pn_miss_char
380  , attribute13                pn_insurance_requirements_all.attribute13%TYPE                := pn_lease_utils.g_pn_miss_char
381  , attribute14                pn_insurance_requirements_all.attribute14%TYPE                := pn_lease_utils.g_pn_miss_char
382  , attribute15                pn_insurance_requirements_all.attribute15%TYPE                := pn_lease_utils.g_pn_miss_char
383  , insurance_comments         pn_insurance_requirements_all.insurance_comments%TYPE         := pn_lease_utils.g_pn_miss_char
384  --, p_null_id                  VARCHAR(1)                                                    := pn_lease_utils.g_pn_miss_char
385  , insurance_milestone_tbl    lease_milestone_tbl_type
386   );
387 
388     TYPE lease_insurance_tbl_type IS TABLE OF lease_insurance_rec
389                                         INDEX BY BINARY_INTEGER;
390 
391 TYPE lease_option_rec IS RECORD
392         (
393          option_id                          pn_options_all.option_id%type                   := pn_lease_utils.g_pn_miss_num
394         ,option_num                         pn_options_all.option_num%type                  := pn_lease_utils.g_pn_miss_char
395         ,option_type                        fnd_lookups.meaning%type                        := pn_lease_utils.g_pn_miss_char
396         ,option_type_code                   pn_options_all.option_type_code%type            := pn_lease_utils.g_pn_miss_char
397         ,start_date                         pn_options_all.start_date%type                  := pn_lease_utils.g_pn_miss_date
398         ,expiration_date                    pn_options_all.expiration_date%type             := pn_lease_utils.g_pn_miss_date
399         ,option_reference                   pn_options_all.option_reference%type            := pn_lease_utils.g_pn_miss_char
400         ,option_status_type                 fnd_lookups.meaning%type                        := pn_lease_utils.g_pn_miss_char
401         ,option_status_lookup_code          pn_options_all.option_status_lookup_code%type   := pn_lease_utils.g_pn_miss_char
402         ,option_notice_reqd_type            fnd_lookups.meaning%type                        := pn_lease_utils.g_pn_miss_char
403         ,option_notice_reqd                 pn_options_all.option_notice_reqd%type          := pn_lease_utils.g_pn_miss_char
404         ,option_size                        pn_options_all.option_size%type                 := pn_lease_utils.g_pn_miss_num
405         ,option_exer_start_date             pn_options_all.option_exer_start_date%type      := pn_lease_utils.g_pn_miss_date
406         ,option_exer_end_date               pn_options_all.option_exer_end_date%type        := pn_lease_utils.g_pn_miss_date
407         ,option_action_date                 pn_options_all.option_action_date%type          := pn_lease_utils.g_pn_miss_date
408         ,uom_type                           fnd_lookups.meaning%type                        := pn_lease_utils.g_pn_miss_char
409         ,uom_code                           pn_options_all.uom_code%type                    := pn_lease_utils.g_pn_miss_char
410         ,option_cost                        pn_options_all.option_cost%type                 := pn_lease_utils.g_pn_miss_char
411         ,option_area_change                 pn_options_all.option_area_change%type          := pn_lease_utils.g_pn_miss_num
412         ,comments                           pn_options_all.option_comments%type             := pn_lease_utils.g_pn_miss_char
413         ,attribute_category                 pn_options_all.attribute_category%TYPE          := pn_lease_utils.g_pn_miss_char
414         ,attribute1                         pn_options_all.attribute1%TYPE                  := pn_lease_utils.g_pn_miss_char
415         ,attribute2                         pn_options_all.attribute2%TYPE                  := pn_lease_utils.g_pn_miss_char
416         ,attribute3                         pn_options_all.attribute3%TYPE                  := pn_lease_utils.g_pn_miss_char
417         ,attribute4                         pn_options_all.attribute4%TYPE                  := pn_lease_utils.g_pn_miss_char
418         ,attribute5                         pn_options_all.attribute5%TYPE                  := pn_lease_utils.g_pn_miss_char
419         ,attribute6                         pn_options_all.attribute6%TYPE                  := pn_lease_utils.g_pn_miss_char
420         ,attribute7                         pn_options_all.attribute7%TYPE                  := pn_lease_utils.g_pn_miss_char
421         ,attribute8                         pn_options_all.attribute8%TYPE                  := pn_lease_utils.g_pn_miss_char
422         ,attribute9                         pn_options_all.attribute9%TYPE                  := pn_lease_utils.g_pn_miss_char
423         ,attribute10                        pn_options_all.attribute10%TYPE                 := pn_lease_utils.g_pn_miss_char
424         ,attribute11                        pn_options_all.attribute11%TYPE                 := pn_lease_utils.g_pn_miss_char
425         ,attribute12                        pn_options_all.attribute12%TYPE                 := pn_lease_utils.g_pn_miss_char
426         ,attribute13                        pn_options_all.attribute13%TYPE                 := pn_lease_utils.g_pn_miss_char
427         ,attribute14                        pn_options_all.attribute14%TYPE                 := pn_lease_utils.g_pn_miss_char
428         ,attribute15                        pn_options_all.attribute15%TYPE                 := pn_lease_utils.g_pn_miss_char
429        -- ,p_null_id                          VARCHAR(1)                                      := pn_lease_utils.g_pn_miss_char
430         ,option_milestone_tbl               lease_milestone_tbl_type
431         );
432 
433         TYPE lease_option_tbl_type IS TABLE OF lease_option_rec
434         INDEX BY BINARY_INTEGER;
435         -----------------------
436         --------------------Terms Begin----------------------------------------------------
437    TYPE TERMS_ACCOUNT_REC IS RECORD
438     (
439       account_id             NUMBER              := NULL
440     , account_vals_or_ids    VARCHAR2 (1)        := NULL
441     , account_conc_segs      VARCHAR2 (800)      := NULL
442     , account_segment1       VARCHAR2 (30)       := NULL
443     , account_segment2       VARCHAR2 (30)       := NULL
444     , account_segment3       VARCHAR2 (30)       := NULL
445     , account_segment4       VARCHAR2 (30)       := NULL
446     , account_segment5       VARCHAR2 (30)       := NULL
447     , account_segment6       VARCHAR2 (30)       := NULL
448     , account_segment7       VARCHAR2 (30)       := NULL
449     , account_segment8       VARCHAR2 (30)       := NULL
450     , account_segment9       VARCHAR2 (30)       := NULL
451     , account_segment10      VARCHAR2 (30)       := NULL
452     , account_segment11      VARCHAR2 (30)       := NULL
453     , account_segment12      VARCHAR2 (30)       := NULL
454     , account_segment13      VARCHAR2 (30)       := NULL
455     , account_segment14      VARCHAR2 (30)       := NULL
456     , account_segment15      VARCHAR2 (30)       := NULL
457     , account_segment16      VARCHAR2 (30)       := NULL
458     , account_segment17      VARCHAR2 (30)       := NULL
459     , account_segment18      VARCHAR2 (30)       := NULL
460     , account_segment19      VARCHAR2 (30)       := NULL
461     , account_segment20      VARCHAR2 (30)       := NULL
462     , account_percentage     NUMBER              := NULL
463     , account_code           VARCHAR2(30)        := NULL
464       );
465     TYPE TERMS_EXP_REV_ACCOUNTS_TBL IS TABLE OF TERMS_ACCOUNT_REC
466     INDEX BY BINARY_INTEGER;
467 
468     TYPE TERMS_ACCRUAL_ACCOUNT_TBL IS TABLE OF TERMS_ACCOUNT_REC
469     INDEX BY BINARY_INTEGER;
470 
471     TYPE TERMS_LIAB_RCVL_ACCOUNT_TBL IS TABLE OF TERMS_ACCOUNT_REC
472     INDEX BY BINARY_INTEGER;
473 
474 
475 -- Record Type for PN_PAYMENT_TERMS_ALL.
476 
477  TYPE LEASE_TERMS_REC IS RECORD
478     (
479       payment_term_id                      pn_payment_terms_all.payment_term_id%TYPE             := NULL
480     , term_template_name                   pn_term_templates_all.name%TYPE                       := NULL
481     , last_update_date                     pn_payment_terms_all.last_update_date%TYPE            := SYSDATE
482     , last_updated_by                      pn_payment_terms_all.last_updated_by%TYPE             := FND_GLOBAL.USER_ID
483     , creation_date                        pn_payment_terms_all.creation_date%TYPE               := SYSDATE
487     , payment_purpose                      VARCHAR2(80)                                          := NULL
484     , created_by                           pn_payment_terms_all.created_by%TYPE                  := FND_GLOBAL.USER_ID
485     , last_update_login                    pn_payment_terms_all.last_update_login%TYPE           := FND_GLOBAL.LOGIN_ID
486     , payment_purpose_code                 pn_payment_terms_all.payment_purpose_code%TYPE        := NULL
488     , payment_term_type_code               pn_payment_terms_all.payment_term_type_code %TYPE     := NULL
489     , payment_term_type                    VARCHAR2(80)                                          := NULL
490     , frequency                            VARCHAR2(80)                                          := NULL
491     , frequency_code                       pn_payment_terms_all.frequency_code%TYPE              := NULL
492     , lease_id                             pn_payment_terms_all.lease_id %TYPE                   := NULL
493     , lease_change_id                      pn_payment_terms_all.lease_change_id%TYPE             := NULL
494     , start_date                           pn_payment_terms_all.start_date%TYPE                  := NULL
495     , end_date                             pn_payment_terms_all.end_date%TYPE                    := NULL
496     , code_combination_id                  pn_payment_terms_all.code_combination_id%TYPE         := NULL
497     , vendor_id                            pn_payment_terms_all.vendor_id%TYPE                   := NULL
498     , vendor_name                          po_vendors.vendor_name%TYPE                           := NULL
499     , vendor_site_code                     VARCHAR2 (30)                                         := NULL
500     , vendor_site_id                       pn_payment_terms_all.vendor_site_id%TYPE              := NULL
501     , target_date                          pn_payment_terms_all.target_date%TYPE                 := NULL
502     , actual_amount                        pn_payment_terms_all.actual_amount%TYPE               := NULL
503     , estimated_amount                     pn_payment_terms_all.estimated_amount%TYPE            := NULL
504     , set_of_books_id                      pn_payment_terms_all.set_of_books_id%TYPE             := NULL
505     , currency_code                        pn_payment_terms_all.currency_code%TYPE               := NULL
506     , rate                                 pn_payment_terms_all.rate %TYPE                       := NULL
507     , attribute_category                   pn_payment_terms_all.attribute_category%TYPE          := NULL
508     , attribute1                           pn_payment_terms_all.attribute1%TYPE                  := NULL
509     , attribute2                           pn_payment_terms_all.attribute2%TYPE                  := NULL
510     , attribute3                           pn_payment_terms_all.attribute3%TYPE                  := NULL
511     , attribute4                           pn_payment_terms_all.attribute4%TYPE                  := NULL
512     , attribute5                           pn_payment_terms_all.attribute5%TYPE                  := NULL
513     , attribute6                           pn_payment_terms_all.attribute6%TYPE                  := NULL
514     , attribute7                           pn_payment_terms_all.attribute7 %TYPE                 := NULL
515     , attribute8                           pn_payment_terms_all.attribute8%TYPE                  := NULL
516     , attribute9                           pn_payment_terms_all.attribute9 %TYPE                 := NULL
517     , attribute10                          pn_payment_terms_all.attribute10 %TYPE                := NULL
518     , attribute11                          pn_payment_terms_all.attribute11%TYPE                 := NULL
519     , attribute12                          pn_payment_terms_all.attribute12%TYPE                 := NULL
520     , attribute13                          pn_payment_terms_all.attribute13 %TYPE                := NULL
521     , attribute14                          pn_payment_terms_all.attribute14 %TYPE                := NULL
522     , attribute15                          pn_payment_terms_all.attribute15%TYPE                 := NULL
523     , org_id                               NUMBER                                                := nvl(pn_mo_cache_utils.get_current_org_id,fnd_profile.value ('org_id'))
524     , customer_id                          NUMBER                                                := NULL
525     , customer_name                        VARCHAR2 (50)                                         := NULL
526     , customer_site_use_id                 pn_payment_terms_all.customer_site_use_id%TYPE        := NULL
527     , customer_site_code                  VARCHAR2 (30)                                          := NULL
528     , normalize                            pn_payment_terms_all.normalize%TYPE                   := NULL
529     , location_code                        VARCHAR2(80)                                          := NULL
530     , location_id                          NUMBER                                                := NULL
531     , schedule_day                         pn_payment_terms_all.schedule_day%TYPE                := NULL
532     , cust_ship_site_id                    pn_payment_terms_all.cust_ship_site_id%TYPE           := NULL
533     , ap_ar_term_id                        pn_payment_terms_all.ap_ar_term_id%TYPE               := NULL
534     , cust_trx_type_id                     pn_payment_terms_all.cust_trx_type_id %TYPE           := NULL
535     , project_id                           pn_payment_terms_all.project_id%TYPE                  := NULL
536     , task_id                              pn_payment_terms_all.task_id%TYPE                     := NULL
537     , organization_id                      pn_payment_terms_all.organization_id%TYPE             := NULL
538     , expenditure_type                     pn_payment_terms_all.expenditure_type%TYPE            := NULL
539     , expenditure_item_date                pn_payment_terms_all.expenditure_item_date%TYPE       := NULL
540     , tax_group_id                         pn_payment_terms_all.tax_group_id%TYPE                := NULL
541     , tax_code_id                          pn_payment_terms_all.tax_code_id%TYPE                 := NULL
545     , account_rule_id                      pn_payment_terms_all.account_rule_id%TYPE             := NULL
542     , tax_included                         pn_payment_terms_all.tax_included%TYPE                := NULL
543     , distribution_set_id                  pn_payment_terms_all.distribution_set_id%TYPE         := NULL
544     , inv_rule_id                          pn_payment_terms_all.inv_rule_id%TYPE                 := NULL
546     , salesrep_id                          pn_payment_terms_all.salesrep_id%TYPE                 := NULL
547     , approved_by                          pn_payment_terms_all.approved_by%TYPE                 := NULL
548     , status                               pn_payment_terms_all.status%TYPE                      := NULL
549     , index_period_id                      pn_payment_terms_all.index_period_id%TYPE             := NULL
550     , index_term_indicator                 pn_payment_terms_all.index_term_indicator%TYPE        := NULL
551     , po_header_id                         pn_payment_terms_all.po_header_id%TYPE                := NULL
552     , cust_po_number                       pn_payment_terms_all.cust_po_number%TYPE              := NULL
553     , receipt_method_id                    pn_payment_terms_all.receipt_method_id %TYPE          := NULL
554     , project_attribute_category           VARCHAR2 (30)                                         := NULL
555     , project_attribute1                   VARCHAR2 (150)                                        := NULL
556     , project_attribute2                   VARCHAR2 (150)                                        := NULL
557     , project_attribute3                   VARCHAR2 (150)                                        := NULL
558     , project_attribute4                   VARCHAR2 (150)                                        := NULL
559     , project_attribute5                   VARCHAR2 (150)                                        := NULL
560     , project_attribute6                   VARCHAR2 (150)                                        := NULL
561     , project_attribute7                   VARCHAR2 (150)                                        := NULL
562     , project_attribute8                   VARCHAR2 (150)                                        := NULL
563     , project_attribute9                   VARCHAR2 (150)                                        := NULL
564     , project_attribute10                  VARCHAR2 (150)                                        := NULL
565     , project_attribute11                  VARCHAR2 (150)                                        := NULL
566     , project_attribute12                  VARCHAR2 (150)                                        := NULL
567     , project_attribute13                  VARCHAR2 (150)                                        := NULL
568     , project_attribute14                  VARCHAR2 (150)                                        := NULL
569     , project_attribute15                  VARCHAR2 (150)                                        := NULL
570     , var_rent_inv_id                      pn_payment_terms_all.var_rent_inv_id%TYPE             := NULL
571     , var_rent_type                        pn_payment_terms_all.var_rent_type%TYPE               := NULL
572     , changed_flag                         pn_payment_terms_all.changed_flag%TYPE                := NULL
573     , norm_start_date                      pn_payment_terms_all.norm_start_date%TYPE             := NULL
574     , term_template_id                     pn_payment_terms_all.term_template_id%TYPE            := NULL
575     , event_type_code                      pn_payment_terms_all.event_type_code %TYPE            := NULL
576     , lease_status                         pn_payment_terms_all.lease_status%TYPE               := NULL
577     , norm_end_date                        pn_payment_terms_all.norm_end_date%TYPE               := NULL
578     , recoverable_flag                     pn_payment_terms_all.recoverable_flag%TYPE           := NULL
579     , period_billrec_id                    pn_payment_terms_all.period_billrec_id%TYPE           := NULL
580     , amount_type                          pn_payment_terms_all.amount_type%TYPE                 := NULL
581     , rec_agr_line_id                      pn_payment_terms_all.rec_agr_line_id%TYPE             := NULL
582     , grouping_rule_id                     pn_payment_terms_all.grouping_rule_id%TYPE            := NULL
583     , area_type_code                       pn_payment_terms_all.area_type_code%TYPE              := NULL
584     , area                                 pn_payment_terms_all.area%TYPE                        := NULL
585     , term_altered_flag                    pn_payment_terms_all.term_altered_flag%TYPE           := NULL
586     , source_code                          pn_payment_terms_all.source_code%TYPE                 := NULL
587     , source_name                          VARCHAR2(80)                                          := NULL
588     , term_comments                        pn_payment_terms_all.term_comments%TYPE               := NULL
589     , legal_entity_id                      pn_payment_terms_all.legal_entity_id%TYPE             := NULL
590     , tax_classification_code              pn_payment_terms_all.tax_classification_code%TYPE     := NULL
591     , index_norm_flag                      pn_payment_terms_all.index_norm_flag%TYPE             := NULL
592     , parent_term_id                       pn_payment_terms_all.parent_term_id%TYPE              := NULL
593     , include_in_var_rent                  pn_payment_terms_all.include_in_var_rent%TYPE         := NULL
594     , update_nbp_flag                      pn_payment_terms_all.update_nbp_flag%TYPE             := NULL
595     , recur_bb_calc_date                   pn_payment_terms_all.recur_bb_calc_date%TYPE          := NULL
596     , opex_type                            pn_payment_terms_all.opex_type%TYPE                  := NULL
597     , opex_agr_id                          pn_payment_terms_all.opex_agr_id%TYPE                 := NULL
598     , opex_recon_id                        pn_payment_terms_all.opex_recon_id%TYPE               := NULL
599     , error_flag                           VARCHAR2(1)                                           := NULL
600     , p_terms_exp_rev_accounts_tbl         terms_exp_rev_accounts_tbl
601     , p_terms_liab_rcvl_account_tbl        terms_exp_rev_accounts_tbl
602     , p_terms_accrual_account_tbl          terms_exp_rev_accounts_tbl
603 
604     );
605 
606     TYPE LEASE_TERMS_TBL IS TABLE OF LEASE_TERMS_REC
607     INDEX BY BINARY_INTEGER;
608 --------------------------------------------
609   /*
610      PROCEDURE validate_lease_rec (
611         p_lease_rec                   IN OUT   lease_rec
612       , p_lease_exp_rev_accounts_rec  IN OUT lease_account_rec
613       , p_lease_accrual_account_rec   IN OUT  lease_account_rec
614       , p_lease_liab_rcvl_account_rec IN OUT lease_account_rec
615       , p_operation                   IN       VARCHAR2
616       , p_lease_context               IN       VARCHAR2
617       , x_return_status                  OUT NOCOPY VARCHAR2);
618   */
619    PROCEDURE create_lease (
620       p_commit                       IN             VARCHAR2         := fnd_api.g_false
621     , p_validate                     IN             VARCHAR2         := fnd_api.g_false
622     , p_lease_rec                    IN OUT  NOCOPY lease_rec
623     , p_lease_exp_rev_accounts_rec   IN OUT  NOCOPY lease_account_rec
624     , p_lease_accrual_account_rec    IN OUT  NOCOPY lease_account_rec
625     , p_lease_liab_rcvl_account_rec  IN OUT  NOCOPY lease_account_rec
626     , p_contacts_tbl                 IN OUT  NOCOPY lease_contacts_tbl
627     , p_tenancies_tbl                IN OUT  NOCOPY lease_tenancies_tbl
628     , p_insurance_tbl                IN OUT  NOCOPY lease_insurance_tbl_type
629     , p_right_tbl                    IN OUT  NOCOPY lease_right_tbl_type
630     , p_obligation_tbl               IN OUT  NOCOPY lease_obligation_tbl_type
631     , p_option_tbl                   IN OUT  NOCOPY lease_option_tbl_type
632     , p_lease_payment_term_tbl       IN OUT  NOCOPY lease_terms_tbl --Rupak
633     , p_note_tbl                     IN OUT  NOCOPY lease_note_tbl_type
634     , x_msg_count                       OUT  NOCOPY NUMBER
635     , x_msg_data                        OUT  NOCOPY VARCHAR2
636     , x_return_status                   OUT  NOCOPY VARCHAR2
637     , p_lease_context                IN       VARCHAR2
638     );
639 
640 
641       PROCEDURE update_lease (
642         p_api_version              IN       NUMBER
643       , p_init_msg_list            IN       VARCHAR2 := fnd_api.g_false
644       , p_commit                   IN       VARCHAR2 := fnd_api.g_false
645       , p_validate                 IN       VARCHAR2 := fnd_api.g_false
646       , p_lease_rec                IN OUT NOCOPY  lease_rec
647       , p_lease_exp_rev_accounts_rec IN OUT NOCOPY lease_account_rec
648       , p_lease_accrual_account_rec IN OUT NOCOPY lease_account_rec
649       , p_lease_liab_rcvl_account_rec IN OUT NOCOPY lease_account_rec
650       , p_lease_contacts_tbl       IN OUT  NOCOPY lease_contacts_tbl
651       , p_lease_tenancies_tbl      IN OUT NOCOPY  lease_tenancies_tbl
652       , p_lease_context            IN       VARCHAR2 DEFAULT 'UPD'
653       , p_right_tbl                   IN OUT NOCOPY lease_right_tbl_type
654       , p_note_tbl              IN OUT NOCOPY lease_note_tbl_type
655       , p_obligation_tbl        IN OUT NOCOPY lease_obligation_tbl_type
656       , p_insurance_tbl         IN OUT NOCOPY lease_insurance_tbl_type
657       , p_option_tbl            IN OUT NOCOPY lease_option_tbl_type
658       , p_lease_payment_term_tbl       IN OUT   NOCOPY lease_terms_tbl --Rupak
659      -- , x_lease_id                 OUT NOCOPY NUMBER
660      -- , x_lease_number             OUT NOCOPY VARCHAR2
661      -- , x_lease_name               OUT NOCOPY VARCHAR2
662       , x_return_status            OUT NOCOPY VARCHAR2
663       , x_msg_count                OUT NOCOPY NUMBER
664       , x_msg_data                 OUT NOCOPY VARCHAR2
665       );
666 --------------------------------------------------------
667 
668    PROCEDURE create_terms (
669       p_api_version                  IN            NUMBER
670     , p_init_msg_list                IN            VARCHAR2        := FND_API.G_FALSE
671     , p_commit                       IN            VARCHAR2        := FND_API.G_FALSE
672     , p_validate                     IN            VARCHAR2        := FND_API.G_FALSE
673     , p_payment_terms_tbl            IN OUT  NOCOPY lease_terms_tbl
674     , p_lease_id                     IN            NUMBER
675     , p_lease_context                IN            VARCHAR2 DEFAULT NULL
676     , x_return_status                   OUT NOCOPY VARCHAR2
677     , x_msg_count                       OUT NOCOPY NUMBER
678     , x_msg_data                        OUT NOCOPY VARCHAR2
679    );
680 
681 
682 
683   PROCEDURE update_terms (
684       p_api_version                  IN            NUMBER
685     , p_init_msg_list                IN            VARCHAR2        := FND_API.G_FALSE
686     , p_commit                       IN            VARCHAR2        := FND_API.G_FALSE
687     , p_validate                     IN            VARCHAR2        := FND_API.G_FALSE
688     , p_payment_terms_tbl            IN OUT  NOCOPY   lease_terms_tbl
689     , p_lease_id                     IN            NUMBER
690     , p_lease_context                IN            VARCHAR2 DEFAULT NULL
691     , x_return_status                   OUT NOCOPY VARCHAR2
692     , x_msg_count                       OUT NOCOPY NUMBER
693     , x_msg_data                        OUT NOCOPY VARCHAR2
694    );
695 
696    --------------------------------------------------------------------------------
697 --Debug Procedure
698 --------------------------------------------------------------------------------
699 
700    PROCEDURE pvt_debug (p_log_message              IN       VARCHAR2
701                       , p_log_level                IN       NUMBER
702                        );
703 
704 --------------------Terms End------------------------------------------------------
705 
706    PROCEDURE UPDATE_STATUS( p_lease_id                  IN OUT NOCOPY  NUMBER
707                           , p_new_approval_status_code  IN OUT NOCOPY  VARCHAR2
708                           , p_new_lease_status          IN OUT NOCOPY  VARCHAR2
709                           , p_operation                 IN             VARCHAR2 DEFAULT 'UPDATE_STATUS'
710                           , x_return_status                OUT NOCOPY  VARCHAR2
711                           , x_msg_count                    OUT NOCOPY  NUMBER
712                           , x_msg_data                     OUT NOCOPY  VARCHAR2
713                           );
714 
715 END pn_lease_pvt;