[Home] [Help]
183: l_legal_entity_id pn_payment_terms.legal_entity_id%TYPE;
184: l_return_status VARCHAR2(2) := NULL;
185:
186: CURSOR org_cur IS
187: SELECT org_id FROM pn_leases_all WHERE lease_id = X_LEASE_ID;
188: l_org_id NUMBER;
189:
190: l_precision NUMBER;
191: l_ext_precision NUMBER;
1079: -- PURPOSE : updates a term
1080: -- HISTORY :
1081: -- 04-DEC-03 ftanudja o Added parameter area_type_code, area. 3257508.
1082: -- 15-JUL-05 ftanudja o R12 changes. #4495054, #4497295
1083: -- 25-JUL-05 sdmahesh o Bug 4284035 - Replaced pn_payment_terms, pn_leases
1084: -- with _ALL table.
1085: -- 24-NOV-05 Kiran o rounding for amounts done based on currency precision
1086: -- 01-DEC-05 Hareesha o Fetched legal_entity_id into l_legal_entity_id
1087: -- for handling incase it has distributions.
1199: l_org_id pn_payment_terms.org_id%TYPE;
1200: l_find_le BOOLEAN;
1201: l_return_status VARCHAR2 (2) := NULL;
1202: l_old_est NUMBER;
1203: l_status PN_LEASES.status%TYPE;
1204: l_context varchar2(240);
1205: l_rate pn_payment_terms.rate%TYPE;
1206: l_precision NUMBER;
1207: l_ext_precision NUMBER;
1259: l_context := 'SELECTing lease status';
1260:
1261: SELECT status
1262: INTO l_status
1263: FROM pn_leases_all
1264: WHERE lease_id = X_LEASE_ID;
1265:
1266: l_context := 'SELECTing estimated amt';
1267:
1546: -- 23-SEP-03 ATUPPAD o Changed the procedure to handle the One Time terms as in
1547: -- this case start and end dates are the same.
1548: -- Also, the query now executes through Cursor.
1549: -- Also, optmized the query by not joining with tables
1550: -- pn_payment_items and pn_leases. (bug#3140238)
1551: -- 05-JUL-05 sdmahesh o Bug 4284035 - Replaced pn_leases with _ALL table.
1552: -------------------------------------------------------------------------------
1553: PROCEDURE Check_Approved_Schedule_Exists (
1554: x_return_status IN OUT NOCOPY VARCHAR2
1547: -- this case start and end dates are the same.
1548: -- Also, the query now executes through Cursor.
1549: -- Also, optmized the query by not joining with tables
1550: -- pn_payment_items and pn_leases. (bug#3140238)
1551: -- 05-JUL-05 sdmahesh o Bug 4284035 - Replaced pn_leases with _ALL table.
1552: -------------------------------------------------------------------------------
1553: PROCEDURE Check_Approved_Schedule_Exists (
1554: x_return_status IN OUT NOCOPY VARCHAR2
1555: ,x_lease_id IN NUMBER
1564:
1565: -- Get the details of Approved Schedules
1566: CURSOR c_chk_app_sch IS
1567: SELECT lease_num
1568: FROM pn_leases_all
1569: WHERE lease_id = x_lease_id
1570: AND EXISTS
1571: (
1572: SELECT pps.lease_id
1595:
1596: CLOSE c_chk_app_sch;
1597:
1598: x_return_status := 'E';
1599: fnd_message.set_name('PN','PN_LEASES_APPROVED_PMT_EXISTS');
1600: fnd_message.set_token('LEASE_NUMBER', l_leaseNumber);
1601: fnd_message.set_token('START_DATE', l_startDate);
1602: fnd_message.set_token('END_DATE', l_endDate);
1603:
1622: -- 11-OCT-04 STripathi o Fixed for BUG# 3942284. Changed paramater p_freq
1623: -- to p_freq_code. For OT terms, update amount with
1624: -- the p_new_est_amt.
1625: -- 05-JUL-05 sdmahesh o Bug 4284035 - Replaced pn_payment_items,
1626: -- pn_payment_schedules, pn_leases with _ALL table.
1627: -- 24-NOV-05 Kiran o rounding for amounts done based on currency precision
1628: --------------------------------------------------------------------------------
1629:
1630: PROCEDURE UPDATE_PNT_ITEMS_AMT (
1706: l_freq := pn_schedules_items.get_frequency(p_freq_code);
1707:
1708: SELECT payment_term_proration_rule
1709: INTO l_prorate_rule
1710: FROM pn_leases_all
1711: WHERE lease_id = p_lease_id;
1712:
1713: l_context:= 'entering UPDATE loop';
1714: