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.0.12010000.2 2008/09/16 16:52:58 gparuchu ship $ */
3:
4: /* Insert_Row procedure */
5: PROCEDURE Insert_Row(

Line 50: INSERT INTO LNS_CUSTOM_PAYMNT_SCHEDS

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

Line 95: 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)

91: ,FEE_AMOUNT
92: ,LOCK_PRIN
93: ,LOCK_INT
94: ) VALUES (
95: 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)
96: ,DECODE(P_LOAN_ID, FND_API.G_MISS_NUM, NULL, P_LOAN_ID)
97: ,DECODE(P_PAYMENT_NUMBER, FND_API.G_MISS_NUM, NULL, P_PAYMENT_NUMBER)
98: ,DECODE(P_DUE_DATE, FND_API.G_MISS_DATE, NULL, P_DUE_DATE)
99: ,DECODE(P_PRINCIPAL_AMOUNT, FND_API.G_MISS_NUM, NULL, P_PRINCIPAL_AMOUNT)

Line 187: UPDATE LNS_CUSTOM_PAYMNT_SCHEDS SET

183: ,P_LOCK_PRIN IN VARCHAR2 DEFAULT NULL
184: ,P_LOCK_INT IN VARCHAR2 DEFAULT NULL
185: ) IS
186: BEGIN
187: UPDATE LNS_CUSTOM_PAYMNT_SCHEDS SET
188: LOAN_ID = DECODE(P_LOAN_ID, NULL, LOAN_ID, FND_API.G_MISS_NUM, NULL, P_LOAN_ID)
189: ,PAYMENT_NUMBER = DECODE(P_PAYMENT_NUMBER, NULL, PAYMENT_NUMBER, FND_API.G_MISS_NUM, NULL, P_PAYMENT_NUMBER)
190: ,DUE_DATE = DECODE(P_DUE_DATE, NULL, DUE_DATE, FND_API.G_MISS_DATE, NULL, P_DUE_DATE)
191: ,PRINCIPAL_AMOUNT = DECODE(P_PRINCIPAL_AMOUNT, NULL, PRINCIPAL_AMOUNT, FND_API.G_MISS_NUM, NULL, P_PRINCIPAL_AMOUNT)

Line 237: DELETE FROM LNS_CUSTOM_PAYMNT_SCHEDS

233:
234: /* Delete_Row procedure */
235: PROCEDURE Delete_Row(P_CUSTOM_SCHEDULE_ID IN NUMBER) IS
236: BEGIN
237: DELETE FROM LNS_CUSTOM_PAYMNT_SCHEDS
238: WHERE CUSTOM_SCHEDULE_ID = P_CUSTOM_SCHEDULE_ID;
239:
240: if (sql%notfound) then
241: raise no_data_found;

Line 290: CURSOR C IS SELECT * FROM LNS_CUSTOM_PAYMNT_SCHEDS

286: ,P_FEE_AMOUNT IN NUMBER DEFAULT NULL
287: ,P_LOCK_PRIN IN VARCHAR2 DEFAULT NULL
288: ,P_LOCK_INT IN VARCHAR2 DEFAULT NULL
289: ) IS
290: CURSOR C IS SELECT * FROM LNS_CUSTOM_PAYMNT_SCHEDS
291: WHERE CUSTOM_SCHEDULE_ID = P_CUSTOM_SCHEDULE_ID
292: FOR UPDATE of CUSTOM_SCHEDULE_ID NOWAIT;
293: Recinfo C%ROWTYPE;
294: BEGIN