[Home] [Help]
150: from dual;
151:
152: select max (payment_schedule_id)
153: into l_paymentScheduleId
154: from pn_payment_schedules_all /*sdm14jul*/
155: where lease_id = i.lease_id
156: and schedule_date = l_paymentScheduleDate;
157:
158: -- we need to create the schedule record
166: SELECT org_id INTO l_org_id
167: FROM pn_leases_all
168: WHERE lease_id = i.lease_id;
169:
170: INSERT INTO pn_payment_schedules_all /*sdm14jul*/
171: (
172: payment_schedule_id,
173: last_update_date,
174: last_updated_by,
196: ELSE
197: -- we trying to find if the schedule is approved or not
198: select payment_status_lookup_code
199: into l_paymentStatusLookupCode
200: from pn_payment_schedules_all /*sdm14jul*/
201: where payment_schedule_id = l_paymentScheduleId;
202: END IF;
203:
204:
300: END IF;
301:
302: SELECT max(schedule_date)
303: INTO min_sched_date
304: FROM pn_payment_schedules_all /*sdm14jul*/
305: WHERE lease_id = pt_rec.lease_id
306: AND payment_status_lookup_code <> 'DRAFT';
307:
308: IF min_sched_date is not null THEN
346: /* See if a payment schedule exists for this lease and gl period */
347:
348: SELECT max(payment_schedule_id)
349: INTO ps_id
350: FROM pn_payment_schedules_all /*sdm14jul*/
351: WHERE lease_id = pt_rec.lease_id
352: AND schedule_date = rent_sched_date;
353:
354: IF ps_id is null THEN
361: SELECT org_id INTO l_org_id
362: FROM pn_leases_all
363: WHERE lease_id = pt_rec.lease_id;
364:
365: INSERT INTO pn_payment_schedules_all /*sdm14jul*/
366: ( payment_schedule_id,
367: last_update_date,
368: last_updated_by,
369: creation_date,
448: /* See if a payment schedule exists for this lease and gl period */
449:
450: SELECT max(payment_schedule_id)
451: INTO ps_id
452: FROM pn_payment_schedules_all /*sdm14jul*/
453: WHERE lease_id = pt_rec.lease_id
454: AND schedule_date = rent_sched_date;
455:
456: IF ps_id is null THEN
458: SELECT pn_payment_schedules_s.nextval
459: INTO ps_id
460: FROM dual;
461:
462: INSERT INTO pn_payment_schedules_all /*sdm14jul*/
463: ( payment_schedule_id,
464: last_update_date,
465: last_updated_by,
466: creation_date,
569:
570: SELECT count(*)
571: INTO items_paid
572: FROM pn_payment_items_all pi, /*sdm14jul*/
573: pn_payment_schedules_all ps /*sdm14jul*/
574: WHERE pi.payment_schedule_id = ps.payment_schedule_id
575: AND pi.payment_term_id = pt_rec.payment_term_id
576: AND pi.payment_item_type_lookup_code = 'CASH'
577: AND ps.payment_status_lookup_code <> 'DRAFT';
727: /* See if a payment schedule exists for this lease and gl period */
728:
729: SELECT max(payment_schedule_id)
730: INTO ps_id
731: FROM pn_payment_schedules_all /*sdm14jul*/
732: WHERE lease_id = pt_rec.lease_id
733: AND schedule_date = rent_sched_date;
734:
735: IF ps_id is null THEN
739: FROM dual;
740:
741: IF (rent_sched_date < min_sched_date) THEN
742:
743: INSERT INTO pn_payment_schedules_all /*sdm14jul*/
744: (
745: payment_schedule_id,
746: last_update_date,
747: last_updated_by,creation_date,created_by,
763: 'APPROVED',
764: l_org_id
765: );
766: ELSE
767: INSERT INTO pn_payment_schedules_all /*sdm14jul*/
768: (
769: payment_schedule_id,
770: last_update_date,
771: last_updated_by,
943: WHERE payment_term_id = pt_rec.payment_term_id
944: AND payment_item_type_lookup_code = 'CASH'
945: AND payment_schedule_id in (
946: SELECT payment_schedule_id
947: FROM pn_payment_schedules_all /*sdm14jul*/
948: WHERE payment_status_lookup_code = 'DRAFT'
949: );
950:
951: END IF; /* IF F */