APPS.LNS_CUSTOM_PAYMNT_SCHEDS_PKG dependencies on LNS_CUSTOM_PAYMNT_SCHEDS

Line 1: PACKAGE BODY LNS_CUSTOM_PAYMNT_SCHEDS_PKG AS

1: PACKAGE BODY LNS_CUSTOM_PAYMNT_SCHEDS_PKG AS
2: /* $Header: LNS_CUST_TBLH_B.pls 120.2 2011/01/05 21:59:27 scherkas ship $ */
3:
4: /* Insert_Row procedure */
5: PROCEDURE Insert_Row(

Line 51: INSERT INTO LNS_CUSTOM_PAYMNT_SCHEDS

47: ,P_LOCK_INT IN VARCHAR2 DEFAULT NULL
48: ,P_PRINCIPAL_PERCENT IN NUMBER DEFAULT NULL
49: ) IS
50: BEGIN
51: INSERT INTO LNS_CUSTOM_PAYMNT_SCHEDS
52: (
53: CUSTOM_SCHEDULE_ID
54: ,LOAN_ID
55: ,PAYMENT_NUMBER

Line 97: DECODE(X_CUSTOM_SCHEDULE_ID, FND_API.G_MISS_NUM, LNS_CUSTOM_PAYMNT_SCHEDS_S.NEXTVAL, NULL, LNS_CUSTOM_PAYMNT_SCHEDS_S.NEXTVAL, X_CUSTOM_SCHEDULE_ID)

93: ,LOCK_PRIN
94: ,LOCK_INT
95: ,PRINCIPAL_PERCENT
96: ) VALUES (
97: DECODE(X_CUSTOM_SCHEDULE_ID, FND_API.G_MISS_NUM, LNS_CUSTOM_PAYMNT_SCHEDS_S.NEXTVAL, NULL, LNS_CUSTOM_PAYMNT_SCHEDS_S.NEXTVAL, X_CUSTOM_SCHEDULE_ID)
98: ,DECODE(P_LOAN_ID, FND_API.G_MISS_NUM, NULL, P_LOAN_ID)
99: ,DECODE(P_PAYMENT_NUMBER, FND_API.G_MISS_NUM, NULL, P_PAYMENT_NUMBER)
100: ,DECODE(P_DUE_DATE, FND_API.G_MISS_DATE, NULL, P_DUE_DATE)
101: ,DECODE(P_PRINCIPAL_AMOUNT, FND_API.G_MISS_NUM, NULL, P_PRINCIPAL_AMOUNT)

Line 191: UPDATE LNS_CUSTOM_PAYMNT_SCHEDS SET

187: ,P_LOCK_INT IN VARCHAR2 DEFAULT NULL
188: ,P_PRINCIPAL_PERCENT IN NUMBER DEFAULT NULL
189: ) IS
190: BEGIN
191: UPDATE LNS_CUSTOM_PAYMNT_SCHEDS SET
192: LOAN_ID = DECODE(P_LOAN_ID, NULL, LOAN_ID, FND_API.G_MISS_NUM, NULL, P_LOAN_ID)
193: ,PAYMENT_NUMBER = DECODE(P_PAYMENT_NUMBER, NULL, PAYMENT_NUMBER, FND_API.G_MISS_NUM, NULL, P_PAYMENT_NUMBER)
194: ,DUE_DATE = DECODE(P_DUE_DATE, NULL, DUE_DATE, FND_API.G_MISS_DATE, NULL, P_DUE_DATE)
195: ,PRINCIPAL_AMOUNT = DECODE(P_PRINCIPAL_AMOUNT, NULL, PRINCIPAL_AMOUNT, FND_API.G_MISS_NUM, NULL, P_PRINCIPAL_AMOUNT)

Line 242: DELETE FROM LNS_CUSTOM_PAYMNT_SCHEDS

238:
239: /* Delete_Row procedure */
240: PROCEDURE Delete_Row(P_CUSTOM_SCHEDULE_ID IN NUMBER) IS
241: BEGIN
242: DELETE FROM LNS_CUSTOM_PAYMNT_SCHEDS
243: WHERE CUSTOM_SCHEDULE_ID = P_CUSTOM_SCHEDULE_ID;
244:
245: if (sql%notfound) then
246: raise no_data_found;

Line 296: CURSOR C IS SELECT * FROM LNS_CUSTOM_PAYMNT_SCHEDS

292: ,P_LOCK_PRIN IN VARCHAR2 DEFAULT NULL
293: ,P_LOCK_INT IN VARCHAR2 DEFAULT NULL
294: ,P_PRINCIPAL_PERCENT IN NUMBER DEFAULT NULL
295: ) IS
296: CURSOR C IS SELECT * FROM LNS_CUSTOM_PAYMNT_SCHEDS
297: WHERE CUSTOM_SCHEDULE_ID = P_CUSTOM_SCHEDULE_ID
298: FOR UPDATE of CUSTOM_SCHEDULE_ID NOWAIT;
299: Recinfo C%ROWTYPE;
300: BEGIN