The following lines contain the word 'select', 'insert', 'update' or 'delete':
/* Insert_Row procedure */
PROCEDURE Insert_Row(
X_FEE_SCHEDULE_ID IN OUT NOCOPY NUMBER
,P_FEE_ID IN NUMBER
,P_LOAN_ID IN NUMBER
,P_FEE_AMOUNT IN NUMBER
,P_FEE_INSTALLMENT IN NUMBER
,P_FEE_DESCRIPTION IN VARCHAR2
,P_ACTIVE_FLAG IN VARCHAR2
,P_BILLED_FLAG IN VARCHAR2
,P_FEE_WAIVABLE_FLAG IN VARCHAR2
,P_WAIVED_AMOUNT IN NUMBER
,P_CREATED_BY IN NUMBER
,P_CREATION_DATE IN DATE
,P_LAST_UPDATED_BY IN NUMBER
,P_LAST_UPDATE_DATE IN DATE
,P_LAST_UPDATE_LOGIN IN NUMBER
,P_PROGRAM_ID IN NUMBER
,P_REQUEST_ID IN NUMBER
,P_OBJECT_VERSION_NUMBER IN NUMBER
,P_DISB_HEADER_ID IN NUMBER
) IS
BEGIN
INSERT INTO LNS_FEE_SCHEDULES
(
FEE_SCHEDULE_ID
,FEE_ID
,LOAN_ID
,FEE_AMOUNT
,FEE_INSTALLMENT
,FEE_DESCRIPTION
,ACTIVE_FLAG
,BILLED_FLAG
,FEE_WAIVABLE_FLAG
,WAIVED_AMOUNT
,CREATED_BY
,CREATION_DATE
,LAST_UPDATED_BY
,LAST_UPDATE_DATE
,LAST_UPDATE_LOGIN
,PROGRAM_ID
,REQUEST_ID
,OBJECT_VERSION_NUMBER
,DISB_HEADER_ID
) VALUES (
DECODE(X_FEE_SCHEDULE_ID, FND_API.G_MISS_NUM, LNS_FEE_SCHEDULE_S.NEXTVAL, NULL, LNS_FEE_SCHEDULE_S.NEXTVAL, X_FEE_SCHEDULE_ID)
,DECODE(P_FEE_ID, FND_API.G_MISS_NUM, NULL, P_FEE_ID)
,DECODE(P_LOAN_ID, FND_API.G_MISS_NUM, NULL, P_LOAN_ID)
,DECODE(P_FEE_AMOUNT, FND_API.G_MISS_NUM, NULL, P_FEE_AMOUNT)
,DECODE(P_FEE_INSTALLMENT, FND_API.G_MISS_NUM, NULL, P_FEE_INSTALLMENT)
,DECODE(P_FEE_DESCRIPTION, FND_API.G_MISS_CHAR, NULL, P_FEE_DESCRIPTION)
,DECODE(P_ACTIVE_FLAG, FND_API.G_MISS_CHAR, NULL, P_ACTIVE_FLAG)
,DECODE(P_BILLED_FLAG, FND_API.G_MISS_CHAR, NULL, P_BILLED_FLAG)
,DECODE(P_FEE_WAIVABLE_FLAG, FND_API.G_MISS_CHAR, NULL, P_FEE_WAIVABLE_FLAG)
,DECODE(P_WAIVED_AMOUNT, FND_API.G_MISS_NUM, NULL, P_WAIVED_AMOUNT)
,LNS_UTILITY_PUB.CREATED_BY
,LNS_UTILITY_PUB.CREATION_DATE
,LNS_UTILITY_PUB.LAST_UPDATED_BY
,LNS_UTILITY_PUB.LAST_UPDATE_DATE
,LNS_UTILITY_PUB.LAST_UPDATE_LOGIN
,DECODE(P_PROGRAM_ID, FND_API.G_MISS_NUM, NULL, P_PROGRAM_ID)
,DECODE(P_REQUEST_ID, FND_API.G_MISS_NUM, NULL, P_REQUEST_ID)
,DECODE(P_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, NULL, P_OBJECT_VERSION_NUMBER)
,DECODE(P_DISB_HEADER_ID, FND_API.G_MISS_NUM, NULL, P_DISB_HEADER_ID)
) RETURNING
FEE_SCHEDULE_ID
INTO
X_FEE_SCHEDULE_ID;
END Insert_Row;
/* Update_Row procedure */
PROCEDURE Update_Row(
P_FEE_SCHEDULE_ID IN NUMBER
,P_FEE_ID IN NUMBER
,P_LOAN_ID IN NUMBER
,P_FEE_AMOUNT IN NUMBER
,P_FEE_INSTALLMENT IN NUMBER
,P_FEE_DESCRIPTION IN VARCHAR2
,P_ACTIVE_FLAG IN VARCHAR2
,P_BILLED_FLAG IN VARCHAR2
,P_FEE_WAIVABLE_FLAG IN VARCHAR2
,P_WAIVED_AMOUNT IN NUMBER
,P_LAST_UPDATED_BY IN NUMBER
,P_LAST_UPDATE_DATE IN DATE
,P_LAST_UPDATE_LOGIN IN NUMBER
,P_PROGRAM_ID IN NUMBER
,P_REQUEST_ID IN NUMBER
,P_OBJECT_VERSION_NUMBER IN NUMBER
,P_DISB_HEADER_ID IN NUMBER
) IS
BEGIN
UPDATE LNS_FEE_SCHEDULES SET
FEE_ID = DECODE(P_FEE_ID, NULL, FEE_ID, FND_API.G_MISS_NUM, NULL, P_FEE_ID)
,LOAN_ID = DECODE(P_LOAN_ID, NULL, LOAN_ID, FND_API.G_MISS_NUM, NULL, P_LOAN_ID)
,FEE_AMOUNT = DECODE(P_FEE_AMOUNT, NULL, FEE_AMOUNT, FND_API.G_MISS_NUM, NULL, P_FEE_AMOUNT)
,FEE_INSTALLMENT = DECODE(P_FEE_INSTALLMENT, NULL, FEE_INSTALLMENT, FND_API.G_MISS_NUM, NULL, P_FEE_INSTALLMENT)
,FEE_DESCRIPTION = DECODE(P_FEE_DESCRIPTION, NULL, FEE_DESCRIPTION, FND_API.G_MISS_CHAR, NULL, P_FEE_DESCRIPTION)
,ACTIVE_FLAG = DECODE(P_ACTIVE_FLAG, NULL, ACTIVE_FLAG, FND_API.G_MISS_CHAR, NULL, P_ACTIVE_FLAG)
,BILLED_FLAG = DECODE(P_BILLED_FLAG, NULL, BILLED_FLAG, FND_API.G_MISS_CHAR, NULL, P_BILLED_FLAG)
,FEE_WAIVABLE_FLAG = DECODE(P_FEE_WAIVABLE_FLAG, NULL, FEE_WAIVABLE_FLAG, FND_API.G_MISS_CHAR, NULL, P_FEE_WAIVABLE_FLAG)
,WAIVED_AMOUNT = DECODE(P_WAIVED_AMOUNT, NULL, WAIVED_AMOUNT, FND_API.G_MISS_NUM, NULL, P_WAIVED_AMOUNT)
,LAST_UPDATED_BY = LNS_UTILITY_PUB.LAST_UPDATED_BY
,LAST_UPDATE_DATE = LNS_UTILITY_PUB.LAST_UPDATE_DATE
,LAST_UPDATE_LOGIN = LNS_UTILITY_PUB.LAST_UPDATE_LOGIN
,PROGRAM_ID = DECODE(P_PROGRAM_ID, NULL, PROGRAM_ID, FND_API.G_MISS_NUM, NULL, P_PROGRAM_ID)
,REQUEST_ID = DECODE(P_REQUEST_ID, NULL, REQUEST_ID, FND_API.G_MISS_NUM, NULL, P_REQUEST_ID)
,OBJECT_VERSION_NUMBER = DECODE(P_OBJECT_VERSION_NUMBER, NULL, OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, NULL, P_OBJECT_VERSION_NUMBER)
,DISB_HEADER_ID = DECODE(P_DISB_HEADER_ID, NULL, DISB_HEADER_ID, FND_API.G_MISS_NUM, NULL, P_DISB_HEADER_ID)
WHERE FEE_SCHEDULE_ID = P_FEE_SCHEDULE_ID;
END Update_Row;
/* Delete_Row procedure */
PROCEDURE Delete_Row(P_FEE_SCHEDULE_ID IN NUMBER) IS
BEGIN
DELETE FROM LNS_FEE_SCHEDULES
WHERE FEE_SCHEDULE_ID = P_FEE_SCHEDULE_ID;
END Delete_Row;
,P_LAST_UPDATED_BY IN NUMBER
,P_LAST_UPDATE_DATE IN DATE
,P_LAST_UPDATE_LOGIN IN NUMBER
,P_PROGRAM_ID IN NUMBER
,P_REQUEST_ID IN NUMBER
,P_OBJECT_VERSION_NUMBER IN NUMBER
,P_DISB_HEADER_ID IN NUMBER
) IS
CURSOR C IS SELECT * FROM LNS_FEE_SCHEDULES
WHERE FEE_SCHEDULE_ID = P_FEE_SCHEDULE_ID
FOR UPDATE of FEE_SCHEDULE_ID NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
AND ( (Recinfo.LAST_UPDATED_BY = P_LAST_UPDATED_BY)
OR ( (Recinfo.LAST_UPDATED_BY IS NULL)
AND (P_LAST_UPDATED_BY IS NULL)))
AND ( (Recinfo.LAST_UPDATE_DATE = P_LAST_UPDATE_DATE)
OR ( (Recinfo.LAST_UPDATE_DATE IS NULL)
AND (P_LAST_UPDATE_DATE IS NULL)))
AND ( (Recinfo.LAST_UPDATE_LOGIN = P_LAST_UPDATE_LOGIN)
OR ( (Recinfo.LAST_UPDATE_LOGIN IS NULL)
AND (P_LAST_UPDATE_LOGIN IS NULL)))
AND ( (Recinfo.PROGRAM_ID = P_PROGRAM_ID)
OR ( (Recinfo.PROGRAM_ID IS NULL)
AND (P_PROGRAM_ID IS NULL)))
AND ( (Recinfo.REQUEST_ID = P_REQUEST_ID)
OR ( (Recinfo.REQUEST_ID IS NULL)
AND (P_REQUEST_ID IS NULL)))
AND ( (Recinfo.OBJECT_VERSION_NUMBER = P_OBJECT_VERSION_NUMBER)
OR ( (Recinfo.OBJECT_VERSION_NUMBER IS NULL)
AND (P_OBJECT_VERSION_NUMBER IS NULL)))
AND ( (Recinfo.DISB_HEADER_ID = P_DISB_HEADER_ID)
OR ( (Recinfo.DISB_HEADER_ID IS NULL)
AND (P_DISB_HEADER_ID IS NULL)))
) THEN
return;