[Home] [Help]
80: FROM DUAL
81: WHERE EXISTS (
82: SELECT 1
83: FROM pn_index_lease_periods_all pilp
84: ,pn_payment_terms_all ppt
85: WHERE pilp.index_period_id = ppt.index_period_id
86: AND ppt.status = 'APPROVED'
87: AND pilp.index_lease_id = p_index_lease_id
88: AND ppt.index_period_id > l_zero_period
97: INTO v
98: FROM DUAL
99: WHERE EXISTS (
100: SELECT 1
101: FROM pn_payment_terms_all ppt
102: WHERE ppt.index_period_id = p_index_lease_period_id
103: AND ppt.status = 'APPROVED'
104: AND ( p_chk_index_ind = 'Y'
105: AND ppt.index_term_indicator IN
149: SELECT '1'
150: INTO v
151: FROM DUAL
152: WHERE EXISTS ( SELECT 1
153: FROM pn_payment_items_all ppi, pn_payment_terms_all ppt
154: WHERE ppt.payment_term_id = ppi.payment_term_id
155: AND ppi.payment_item_type_lookup_code = 'CASH'
156: AND ( ppi.transferred_to_ap_flag = 'Y'
157: OR ppi.transferred_to_ar_flag = 'Y')
199: ,ppt.vendor_site_id
200: ,ppt.customer_id
201: ,ppt.customer_site_use_id
202: ,ppt.code_combination_id
203: FROM pn_leases_all pl, pn_payment_terms_all ppt
204: WHERE pl.lease_id = ppt.lease_id
205: AND ppt.payment_term_id = ip_payment_term_id;
206:
207: rec_payment_term curr_payment_term%ROWTYPE;
658: ,p_payment_term_id IN NUMBER
659: ,p_msg OUT NOCOPY VARCHAR2) IS
660: l_tax_data_rec tax_data_rec;
661: BEGIN
662: DELETE FROM pn_payment_terms_all
663: WHERE ( payment_term_id = p_payment_term_id
664: OR p_payment_term_id IS NULL)
665: AND index_period_id = p_index_period_id;
666:
725: SELECT 1
726: INTO l_term_exists
727: FROM DUAL
728: WHERE EXISTS ( SELECT ppt.payment_term_id
729: FROM pn_payment_terms_all ppt
730: WHERE ppt.index_period_id = p_index_period_id);
731: RETURN l_term_exists;
732: EXCEPTION
733: WHEN OTHERS
752: SELECT 1
753: INTO l_term_exists
754: FROM DUAL
755: WHERE EXISTS ( SELECT ppt.payment_term_id
756: FROM pn_payment_terms_all ppt
757: WHERE ppt.index_period_id = p_index_period_id
758: AND ppt.status = 'APPROVED');
759: RETURN l_term_exists;
760: EXCEPTION
807: l_term_status VARCHAR2 (30);
808: BEGIN
809: SELECT status
810: INTO l_term_status
811: FROM pn_payment_terms_all
812: WHERE payment_term_id = p_payment_term_id;
813: RETURN l_term_status;
814: EXCEPTION
815: WHEN OTHERS
1230: SELECT 1
1231: INTO l_calc_exists
1232: FROM DUAL
1233: WHERE EXISTS ( SELECT terms.payment_term_id
1234: FROM pn_payment_terms_all terms
1235: ,pn_index_leases_all lease
1236: ,pn_index_lease_periods_all periods
1237: WHERE terms.index_period_id = periods.index_period_id
1238: AND periods.index_lease_id = lease.index_lease_id
1290: BEGIN
1291: SELECT max(SCHEDULE_DATE)
1292: INTO l_max_sch_date
1293: FROM pn_index_lease_periods_all pilp,
1294: pn_payment_terms_all ppt,
1295: pn_payment_items_all ppi,
1296: pn_payment_schedules_all pps
1297: WHERE pilp.index_period_id=ppt.index_period_id
1298: AND ppt.payment_term_id=ppi.payment_term_id
1402:
1403: CURSOR C_UPD_TERMS IS
1404: SELECT ppt.payment_term_id,
1405: NVL(ppt.status, 'X')
1406: FROM PN_PAYMENT_TERMS_ALL ppt,
1407: PN_INDEX_LEASE_PERIODS_ALL pilp
1408: WHERE ppt.status = 'DRAFT'
1409: AND ppt.index_period_id = pilp.index_period_id
1410: AND pilp.index_lease_id = p_index_lease_id
1410: AND pilp.index_lease_id = p_index_lease_id
1411: UNION ALL
1412: SELECT ppt.payment_term_id,
1413: NVL(ppt.status, 'X')
1414: FROM PN_PAYMENT_TERMS_ALL ppt,
1415: PN_INDEX_LEASE_PERIODS_ALL pilp,
1416: PN_LEASES_ALL pl
1417: WHERE ppt.status = 'APPROVED'
1418: AND ppt.lease_id = pl.lease_id
1441: BULK COLLECT INTO l_payment_term_id, l_payment_status
1442: LIMIT 1000;
1443:
1444: FORALL i IN 1..l_payment_term_id.COUNT
1445: UPDATE PN_PAYMENT_TERMS_ALL
1446: SET location_id = p_location_id
1447: WHERE payment_term_id = l_payment_term_id(i);
1448:
1449: FOR i IN 1..l_payment_term_id.COUNT LOOP