The following lines contain the word 'select', 'insert', 'update' or 'delete':
/* Insert_Row procedure */
PROCEDURE Insert_Row(
X_DISB_HEADER_ID IN OUT NOCOPY NUMBER
,P_LOAN_ID IN NUMBER
,P_ACTIVITY_CODE IN VARCHAR2
,P_DISBURSEMENT_NUMBER IN NUMBER
,P_HEADER_AMOUNT IN NUMBER
,P_HEADER_PERCENT IN NUMBER
,P_STATUS IN VARCHAR2
,P_TARGET_DATE IN DATE
,P_PAYMENT_REQUEST_DATE IN DATE
,P_OBJECT_VERSION_NUMBER IN NUMBER
,P_CREATION_DATE IN DATE
,P_CREATED_BY IN NUMBER
,P_LAST_UPDATE_DATE IN DATE
,P_LAST_UPDATED_BY IN NUMBER
,P_LAST_UPDATE_LOGIN IN NUMBER
,P_AUTOFUNDING_FLAG IN VARCHAR2
,P_DESCRIPTION IN VARCHAR2
,P_PHASE IN VARCHAR2
) IS
BEGIN
INSERT INTO LNS_DISB_HEADERS
(
DISB_HEADER_ID
,LOAN_ID
,ACTIVITY_CODE
,DISBURSEMENT_NUMBER
,HEADER_AMOUNT
,HEADER_PERCENT
,STATUS
,TARGET_DATE
,PAYMENT_REQUEST_DATE
,OBJECT_VERSION_NUMBER
,CREATION_DATE
,CREATED_BY
,LAST_UPDATE_DATE
,LAST_UPDATED_BY
,LAST_UPDATE_LOGIN
,AUTOFUNDING_FLAG
,DESCRIPTION
,PHASE
) VALUES (
DECODE(X_DISB_HEADER_ID, FND_API.G_MISS_NUM, LNS_DISB_HEADERS_S.NEXTVAL, NULL, LNS_DISB_HEADERS_S.NEXTVAL, X_DISB_HEADER_ID)
,DECODE(P_LOAN_ID, FND_API.G_MISS_NUM, NULL, P_LOAN_ID)
,DECODE(P_ACTIVITY_CODE, FND_API.G_MISS_CHAR, NULL, P_ACTIVITY_CODE)
,DECODE(P_DISBURSEMENT_NUMBER, FND_API.G_MISS_NUM, NULL, P_DISBURSEMENT_NUMBER)
,DECODE(P_HEADER_AMOUNT, FND_API.G_MISS_NUM, NULL, P_HEADER_AMOUNT)
,DECODE(P_HEADER_PERCENT, FND_API.G_MISS_NUM, NULL, P_HEADER_PERCENT)
,DECODE(P_STATUS, FND_API.G_MISS_CHAR, NULL, P_STATUS)
,DECODE(P_TARGET_DATE, FND_API.G_MISS_DATE, NULL, P_TARGET_DATE)
,DECODE(P_PAYMENT_REQUEST_DATE, FND_API.G_MISS_DATE, NULL, P_PAYMENT_REQUEST_DATE)
,DECODE(P_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, NULL, P_OBJECT_VERSION_NUMBER)
,LNS_UTILITY_PUB.CREATION_DATE
,LNS_UTILITY_PUB.CREATED_BY
,LNS_UTILITY_PUB.LAST_UPDATE_DATE
,LNS_UTILITY_PUB.LAST_UPDATED_BY
,LNS_UTILITY_PUB.LAST_UPDATE_LOGIN
,DECODE(P_AUTOFUNDING_FLAG, FND_API.G_MISS_CHAR, NULL, P_AUTOFUNDING_FLAG)
,DECODE(P_DESCRIPTION, FND_API.G_MISS_CHAR, NULL, P_DESCRIPTION)
,DECODE(P_PHASE, FND_API.G_MISS_CHAR, NULL, P_PHASE)
) RETURNING
DISB_HEADER_ID
INTO
X_DISB_HEADER_ID;
END Insert_Row;
/* Update_Row procedure */
PROCEDURE Update_Row(
P_DISB_HEADER_ID IN NUMBER
,P_LOAN_ID IN NUMBER
,P_ACTIVITY_CODE IN VARCHAR2
,P_DISBURSEMENT_NUMBER IN NUMBER
,P_HEADER_AMOUNT IN NUMBER
,P_HEADER_PERCENT IN NUMBER
,P_STATUS IN VARCHAR2
,P_TARGET_DATE IN DATE
,P_PAYMENT_REQUEST_DATE IN DATE
,P_OBJECT_VERSION_NUMBER IN NUMBER
,P_LAST_UPDATE_DATE IN DATE
,P_LAST_UPDATED_BY IN NUMBER
,P_LAST_UPDATE_LOGIN IN NUMBER
,P_AUTOFUNDING_FLAG IN VARCHAR2
,P_DESCRIPTION IN VARCHAR2
,P_PHASE IN VARCHAR2
) IS
BEGIN
UPDATE LNS_DISB_HEADERS SET
LOAN_ID = DECODE(P_LOAN_ID, NULL, LOAN_ID, FND_API.G_MISS_NUM, NULL, P_LOAN_ID)
,ACTIVITY_CODE = DECODE(P_ACTIVITY_CODE, NULL, ACTIVITY_CODE, FND_API.G_MISS_CHAR, NULL, P_ACTIVITY_CODE)
,DISBURSEMENT_NUMBER = DECODE(P_DISBURSEMENT_NUMBER, NULL, DISBURSEMENT_NUMBER, FND_API.G_MISS_NUM, NULL, P_DISBURSEMENT_NUMBER)
,HEADER_AMOUNT = DECODE(P_HEADER_AMOUNT, NULL, HEADER_AMOUNT, FND_API.G_MISS_NUM, NULL, P_HEADER_AMOUNT)
,HEADER_PERCENT = DECODE(P_HEADER_PERCENT, NULL, HEADER_PERCENT, FND_API.G_MISS_NUM, NULL, P_HEADER_PERCENT)
,STATUS = DECODE(P_STATUS, NULL, STATUS, FND_API.G_MISS_CHAR, NULL, P_STATUS)
,TARGET_DATE = DECODE(P_TARGET_DATE, NULL, TARGET_DATE, FND_API.G_MISS_DATE, NULL, P_TARGET_DATE)
,PAYMENT_REQUEST_DATE = DECODE(P_PAYMENT_REQUEST_DATE, NULL, PAYMENT_REQUEST_DATE, FND_API.G_MISS_DATE, NULL, P_PAYMENT_REQUEST_DATE)
,OBJECT_VERSION_NUMBER = DECODE(P_OBJECT_VERSION_NUMBER, NULL, OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, NULL, P_OBJECT_VERSION_NUMBER)
,LAST_UPDATE_DATE = LNS_UTILITY_PUB.LAST_UPDATE_DATE
,LAST_UPDATED_BY = LNS_UTILITY_PUB.LAST_UPDATED_BY
,LAST_UPDATE_LOGIN = LNS_UTILITY_PUB.LAST_UPDATE_LOGIN
,AUTOFUNDING_FLAG = DECODE(P_AUTOFUNDING_FLAG, NULL, AUTOFUNDING_FLAG, FND_API.G_MISS_CHAR, NULL, P_AUTOFUNDING_FLAG)
,DESCRIPTION = DECODE(P_DESCRIPTION, NULL, DESCRIPTION, FND_API.G_MISS_CHAR, NULL, P_DESCRIPTION)
,PHASE = DECODE(P_PHASE, NULL, PHASE, FND_API.G_MISS_CHAR, NULL, P_PHASE)
WHERE DISB_HEADER_ID = P_DISB_HEADER_ID;
END Update_Row;
/* Delete_Row procedure */
PROCEDURE Delete_Row(P_DISB_HEADER_ID IN NUMBER) IS
BEGIN
DELETE FROM LNS_DISB_HEADERS
WHERE DISB_HEADER_ID = P_DISB_HEADER_ID;
END Delete_Row;
,P_LAST_UPDATE_DATE IN DATE
,P_LAST_UPDATED_BY IN NUMBER
,P_LAST_UPDATE_LOGIN IN NUMBER
,P_AUTOFUNDING_FLAG IN VARCHAR2
,P_DESCRIPTION IN VARCHAR2
,P_PHASE IN VARCHAR2
) IS
CURSOR C IS SELECT * FROM LNS_DISB_HEADERS
WHERE DISB_HEADER_ID = P_DISB_HEADER_ID
FOR UPDATE of DISB_HEADER_ID NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
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_UPDATED_BY = P_LAST_UPDATED_BY)
OR ( (Recinfo.LAST_UPDATED_BY IS NULL)
AND (P_LAST_UPDATED_BY 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.AUTOFUNDING_FLAG = P_AUTOFUNDING_FLAG)
OR ( (Recinfo.AUTOFUNDING_FLAG IS NULL)
AND (P_AUTOFUNDING_FLAG IS NULL)))
AND ( (Recinfo.DESCRIPTION = P_DESCRIPTION)
OR ( (Recinfo.DESCRIPTION IS NULL)
AND (P_DESCRIPTION IS NULL)))
AND ( (Recinfo.PHASE = P_PHASE)
OR ( (Recinfo.PHASE IS NULL)
AND (P_PHASE IS NULL)))
) THEN
return;