The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE do_update_loan (
p_loan_header_rec IN OUT NOCOPY LOAN_HEADER_REC_TYPE,
p_object_version_number IN OUT NOCOPY NUMBER,
x_return_status IN OUT NOCOPY VARCHAR2
);
SELECT disb_percent
FROM
lns_loan_product_lines prod_line
WHERE prod_line.LOAN_PRODUCT_ID = p_loan_header_rec.product_id
AND prod_line.LOAN_PRODUCT_LINE_TYPE = 'SUBSIDY_RATE'
AND nvl(p_loan_header_rec.gl_date, sysdate) between prod_line.START_DATE_ACTIVE and nvl(prod_line.END_DATE_ACTIVE,nvl(p_loan_header_rec.gl_date, sysdate))
AND rownum =1;
SELECT 'Y'
INTO l_dummy
FROM LNS_LOAN_HEADERS_ALL
WHERE loan_id = l_loan_id;
SELECT 'Y'
INTO l_dummy
FROM LNS_LOAN_HEADERS_ALL
WHERE LOAN_NUMBER = l_loan_number;
select amortization_frequency into l_amort_freq from lns_terms
where loan_id = l_loan_id;
select amortization_frequency into l_amort_freq from lns_terms
where loan_id = l_loan_id;
FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_create_loan procedure: Before call to LNS_LOAN_HEADER_ALL_PKG.Insert_Row');
LNS_LOAN_HEADER_ALL_PKG.Insert_Row (
X_LOAN_ID => p_loan_header_rec.loan_id,
X_ORG_ID => p_loan_header_rec.org_id,
X_LOAN_NUMBER => p_loan_header_rec.loan_number,
X_LOAN_DESCRIPTION => p_loan_header_rec.loan_description,
X_OBJECT_VERSION_NUMBER => 1,
X_LOAN_APPLICATION_DATE => p_loan_header_rec.loan_application_date,
X_END_DATE => p_loan_header_rec.end_date,
X_INITIAL_LOAN_BALANCE => p_loan_header_rec.initial_loan_balance,
X_LAST_PAYMENT_DATE => p_loan_header_rec.last_payment_date,
X_LAST_PAYMENT_AMOUNT => p_loan_header_rec.last_payment_amount,
X_LOAN_TERM => p_loan_header_rec.loan_term,
X_LOAN_TERM_PERIOD => p_loan_header_rec.loan_term_period,
X_AMORTIZED_TERM => p_loan_header_rec.amortized_term,
X_AMORTIZED_TERM_PERIOD => p_loan_header_rec.amortized_term_period,
X_LOAN_STATUS => p_loan_header_rec.loan_status,
X_LOAN_ASSIGNED_TO => p_loan_header_rec.loan_assigned_to,
X_LOAN_CURRENCY => p_loan_header_rec.loan_currency,
X_LOAN_CLASS_CODE => p_loan_header_rec.loan_class_code,
X_LOAN_TYPE => p_loan_header_rec.loan_type,
X_LOAN_SUBTYPE => p_loan_header_rec.loan_subtype,
X_LOAN_PURPOSE_CODE => p_loan_header_rec.loan_purpose_code,
X_CUST_ACCOUNT_ID => p_loan_header_rec.cust_account_id,
X_BILL_TO_ACCT_SITE_ID => p_loan_header_rec.bill_to_acct_site_id,
X_LOAN_MATURITY_DATE => p_loan_header_rec.loan_maturity_date,
X_LOAN_START_DATE => p_loan_header_rec.loan_start_date,
X_LOAN_CLOSING_DATE => p_loan_header_rec.loan_closing_date,
X_REFERENCE_ID => p_loan_header_rec.reference_id,
X_REFERENCE_NUMBER => p_loan_header_rec.reference_number,
X_REFERENCE_DESCRIPTION => p_loan_header_rec.reference_description,
X_REFERENCE_AMOUNT => p_loan_header_rec.reference_amount,
X_PRODUCT_FLAG => p_loan_header_rec.product_flag,
X_PRIMARY_BORROWER_ID => p_loan_header_rec.primary_borrower_id,
X_PRODUCT_ID => p_loan_header_rec.product_id,
X_REQUESTED_AMOUNT => p_loan_header_rec.requested_amount,
X_FUNDED_AMOUNT => p_loan_header_rec.funded_amount,
X_LOAN_APPROVAL_DATE => p_loan_header_rec.loan_approval_date,
X_LOAN_APPROVED_BY => p_loan_header_rec.loan_approved_by,
X_ATTRIBUTE_CATEGORY => p_loan_header_rec.attribute_category,
X_ATTRIBUTE1 => p_loan_header_rec.attribute1,
X_ATTRIBUTE2 => p_loan_header_rec.attribute2,
X_ATTRIBUTE3 => p_loan_header_rec.attribute3,
X_ATTRIBUTE4 => p_loan_header_rec.attribute4,
X_ATTRIBUTE5 => p_loan_header_rec.attribute5,
X_ATTRIBUTE6 => p_loan_header_rec.attribute6,
X_ATTRIBUTE7 => p_loan_header_rec.attribute7,
X_ATTRIBUTE8 => p_loan_header_rec.attribute8,
X_ATTRIBUTE9 => p_loan_header_rec.attribute9,
X_ATTRIBUTE10 => p_loan_header_rec.attribute10,
X_ATTRIBUTE11 => p_loan_header_rec.attribute11,
X_ATTRIBUTE12 => p_loan_header_rec.attribute12,
X_ATTRIBUTE13 => p_loan_header_rec.attribute13,
X_ATTRIBUTE14 => p_loan_header_rec.attribute14,
X_ATTRIBUTE15 => p_loan_header_rec.attribute15,
X_ATTRIBUTE16 => p_loan_header_rec.attribute16,
X_ATTRIBUTE17 => p_loan_header_rec.attribute17,
X_ATTRIBUTE18 => p_loan_header_rec.attribute18,
X_ATTRIBUTE19 => p_loan_header_rec.attribute19,
X_ATTRIBUTE20 => p_loan_header_rec.attribute20,
X_LAST_BILLED_DATE => p_loan_header_rec.last_billed_date,
X_CUSTOM_PAYMENTS_FLAG => p_loan_header_rec.custom_payments_flag,
X_BILLED_FLAG => p_loan_header_rec.billed_flag,
X_REFERENCE_NAME => p_loan_header_rec.reference_name,
X_REFERENCE_TYPE => p_loan_header_rec.reference_type,
X_REFERENCE_TYPE_ID => p_loan_header_rec.reference_type_id,
X_USSGL_TRANSACTION_CODE => p_loan_header_rec.ussgl_transaction_code,
X_GL_DATE => p_loan_header_rec.gl_date,
X_REC_ADJUSTMENT_NUMBER => p_loan_header_rec.REC_ADJUSTMENT_NUMBER,
X_CONTACT_REL_PARTY_ID => p_loan_header_rec.CONTACT_REL_PARTY_ID,
X_CONTACT_PERS_PARTY_ID => p_loan_header_rec.CONTACT_PERS_PARTY_ID,
X_CREDIT_REVIEW_FLAG => p_loan_header_rec.CREDIT_REVIEW_FLAG,
X_EXCHANGE_RATE_TYPE => p_loan_header_rec.EXCHANGE_RATE_TYPE,
X_EXCHANGE_DATE => p_loan_header_rec.EXCHANGE_DATE,
X_EXCHANGE_RATE => p_loan_header_rec.EXCHANGE_RATE,
X_COLLATERAL_PERCENT => p_loan_header_rec.COLLATERAL_PERCENT,
X_LAST_PAYMENT_NUMBER => p_loan_header_rec.LAST_PAYMENT_NUMBER,
X_LAST_AMORTIZATION_ID => p_loan_header_rec.LAST_AMORTIZATION_ID,
X_LEGAL_ENTITY_ID => p_loan_header_rec.LEGAL_ENTITY_ID,
X_OPEN_TO_TERM_FLAG => p_loan_header_rec.OPEN_TO_TERM_FLAG,
X_MULTIPLE_FUNDING_FLAG => p_loan_header_rec.MULTIPLE_FUNDING_FLAG,
X_LOAN_TYPE_ID => p_loan_header_rec.LOAN_TYPE_ID,
X_SECONDARY_STATUS => p_loan_header_rec.SECONDARY_STATUS,
X_OPEN_TO_TERM_EVENT => p_loan_header_rec.OPEN_TO_TERM_EVENT,
X_BALLOON_PAYMENT_TYPE => p_loan_header_rec.BALLOON_PAYMENT_TYPE,
X_BALLOON_PAYMENT_AMOUNT => p_loan_header_rec.BALLOON_PAYMENT_AMOUNT,
X_CURRENT_PHASE => p_loan_header_rec.CURRENT_PHASE,
X_OPEN_LOAN_START_DATE => p_loan_header_rec.OPEN_LOAN_START_DATE,
X_OPEN_LOAN_TERM => p_loan_header_rec.OPEN_LOAN_TERM,
X_OPEN_LOAN_TERM_PERIOD => p_loan_header_rec.OPEN_LOAN_TERM_PERIOD,
X_OPEN_MATURITY_DATE => p_loan_header_rec.OPEN_MATURITY_DATE,
X_FUNDS_RESERVED_FLAG => p_loan_header_rec.FUNDS_RESERVED_FLAG,
X_FUNDS_CHECK_DATE => p_loan_header_rec.FUNDS_CHECK_DATE,
X_SUBSIDY_RATE => p_loan_header_rec.SUBSIDY_RATE,
X_APPLICATION_ID => p_loan_header_rec.APPLICATION_ID,
X_CREATED_BY_MODULE => p_loan_header_rec.CREATED_BY_MODULE,
X_PARTY_TYPE => p_loan_header_rec.PARTY_TYPE,
X_FORGIVENESS_FLAG => p_loan_header_rec.FORGIVENESS_FLAG,
X_FORGIVENESS_PERCENT => p_loan_header_rec.FORGIVENESS_PERCENT,
X_DISABLE_BILLING_FLAG => p_loan_header_rec.DISABLE_BILLING_FLAG,
X_ADD_REQUESTED_AMOUNT => p_loan_header_rec.ADD_REQUESTED_AMOUNT,
X_DISABLE_INT_ACCRUAL_FLAG => p_loan_header_rec.DISABLE_INT_ACCRUAL_FLAG,
X_BILL_ON_APPR_AMOUNT_FLAG => p_loan_header_rec.BILL_ON_APPR_AMOUNT_FLAG
);
FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_create_loan procedure: After call to LNS_LOAN_HEADER_ALL_PKG.Insert_Row');
| do_update_loan
|
| DESCRIPTION
| Updates loan.
|
| SCOPE - PRIVATE
|
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED
|
| ARGUMENTS : IN:
| OUT:
| IN/OUT:
| p_loan_header_rec
| p_object_version_number
| x_return_status
|
| RETURNS : NONE
|
| NOTES
|
| MODIFICATION HISTORY
|
| 30-Nov-2003 Karthik Ramachandran Created.
+===========================================================================*/
PROCEDURE do_update_loan(
p_loan_header_rec IN OUT NOCOPY LOAN_HEADER_REC_TYPE,
p_object_version_number IN OUT NOCOPY NUMBER,
x_return_status IN OUT NOCOPY VARCHAR2
) IS
l_object_version_number NUMBER;
FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Begin do_update_loan procedure');
SELECT OBJECT_VERSION_NUMBER,
ROWID
INTO l_object_version_number,
l_rowid
FROM LNS_LOAN_HEADERS_ALL
WHERE LOAN_ID = p_loan_header_rec.loan_id
FOR UPDATE OF LOAN_ID NOWAIT;
--Update requested amount to funded amount for ERS loan
--Update requested amount to initial loan balance amount
--if ers loan
if (p_loan_header_rec.loan_class_code = 'ERS') then
--p_loan_header_rec.funded_amount := p_loan_header_rec.requested_amount;
IF (p_loan_header_rec.loan_status='DELETED' OR p_loan_header_rec.loan_status='REJECTED') THEN
p_loan_header_rec.secondary_status := FND_API.G_MISS_CHAR;
FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_update_loan procedure: Before call to LNS_LOAN_HEADER_ALL_PKG.Update_Row');
LNS_LOAN_HEADER_ALL_PKG.Update_Row (
X_Rowid => l_rowid,
X_LOAN_ID => p_loan_header_rec.loan_id,
X_ORG_ID => p_loan_header_rec.org_id,
X_LOAN_NUMBER => p_loan_header_rec.loan_number,
X_LOAN_DESCRIPTION => p_loan_header_rec.loan_description,
X_OBJECT_VERSION_NUMBER => p_object_version_number,
X_LOAN_APPLICATION_DATE => p_loan_header_rec.loan_application_date,
X_END_DATE => p_loan_header_rec.end_date,
X_INITIAL_LOAN_BALANCE => p_loan_header_rec.initial_loan_balance,
X_LAST_PAYMENT_DATE => p_loan_header_rec.last_payment_date,
X_LAST_PAYMENT_AMOUNT => p_loan_header_rec.last_payment_amount,
X_LOAN_TERM => p_loan_header_rec.loan_term,
X_LOAN_TERM_PERIOD => p_loan_header_rec.loan_term_period,
X_AMORTIZED_TERM => p_loan_header_rec.amortized_term,
X_AMORTIZED_TERM_PERIOD => p_loan_header_rec.amortized_term_period,
X_LOAN_STATUS => p_loan_header_rec.loan_status,
X_LOAN_ASSIGNED_TO => p_loan_header_rec.loan_assigned_to,
X_LOAN_CURRENCY => p_loan_header_rec.loan_currency,
X_LOAN_CLASS_CODE => p_loan_header_rec.loan_class_code,
X_LOAN_TYPE => p_loan_header_rec.loan_type,
X_LOAN_SUBTYPE => p_loan_header_rec.loan_subtype,
X_LOAN_PURPOSE_CODE => p_loan_header_rec.loan_purpose_code,
X_CUST_ACCOUNT_ID => p_loan_header_rec.cust_account_id,
X_BILL_TO_ACCT_SITE_ID => p_loan_header_rec.bill_to_acct_site_id,
X_LOAN_MATURITY_DATE => p_loan_header_rec.loan_maturity_date,
X_LOAN_START_DATE => p_loan_header_rec.loan_start_date,
X_LOAN_CLOSING_DATE => p_loan_header_rec.loan_closing_date,
X_REFERENCE_ID => p_loan_header_rec.reference_id,
X_REFERENCE_NUMBER => p_loan_header_rec.reference_number,
X_REFERENCE_DESCRIPTION => p_loan_header_rec.reference_description,
X_REFERENCE_AMOUNT => p_loan_header_rec.reference_amount,
X_PRODUCT_FLAG => p_loan_header_rec.product_flag,
X_PRIMARY_BORROWER_ID => p_loan_header_rec.primary_borrower_id,
X_PRODUCT_ID => p_loan_header_rec.product_id,
X_REQUESTED_AMOUNT => p_loan_header_rec.requested_amount,
X_FUNDED_AMOUNT => p_loan_header_rec.funded_amount,
X_LOAN_APPROVAL_DATE => p_loan_header_rec.loan_approval_date,
X_LOAN_APPROVED_BY => p_loan_header_rec.loan_approved_by,
X_ATTRIBUTE_CATEGORY => p_loan_header_rec.attribute_category,
X_ATTRIBUTE1 => p_loan_header_rec.attribute1,
X_ATTRIBUTE2 => p_loan_header_rec.attribute2,
X_ATTRIBUTE3 => p_loan_header_rec.attribute3,
X_ATTRIBUTE4 => p_loan_header_rec.attribute4,
X_ATTRIBUTE5 => p_loan_header_rec.attribute5,
X_ATTRIBUTE6 => p_loan_header_rec.attribute6,
X_ATTRIBUTE7 => p_loan_header_rec.attribute7,
X_ATTRIBUTE8 => p_loan_header_rec.attribute8,
X_ATTRIBUTE9 => p_loan_header_rec.attribute9,
X_ATTRIBUTE10 => p_loan_header_rec.attribute10,
X_ATTRIBUTE11 => p_loan_header_rec.attribute11,
X_ATTRIBUTE12 => p_loan_header_rec.attribute12,
X_ATTRIBUTE13 => p_loan_header_rec.attribute13,
X_ATTRIBUTE14 => p_loan_header_rec.attribute14,
X_ATTRIBUTE15 => p_loan_header_rec.attribute15,
X_ATTRIBUTE16 => p_loan_header_rec.attribute16,
X_ATTRIBUTE17 => p_loan_header_rec.attribute17,
X_ATTRIBUTE18 => p_loan_header_rec.attribute18,
X_ATTRIBUTE19 => p_loan_header_rec.attribute19,
X_ATTRIBUTE20 => p_loan_header_rec.attribute20,
X_LAST_BILLED_DATE => p_loan_header_rec.last_billed_date,
X_CUSTOM_PAYMENTS_FLAG => p_loan_header_rec.custom_payments_flag,
X_BILLED_FLAG => p_loan_header_rec.billed_flag,
X_REFERENCE_NAME => p_loan_header_rec.reference_name,
X_REFERENCE_TYPE => p_loan_header_rec.reference_type,
X_REFERENCE_TYPE_ID => p_loan_header_rec.reference_type_id,
X_USSGL_TRANSACTION_CODE => p_loan_header_rec.ussgl_transaction_code,
X_GL_DATE => p_loan_header_rec.gl_date,
X_REC_ADJUSTMENT_NUMBER => p_loan_header_rec.REC_ADJUSTMENT_NUMBER,
X_CONTACT_REL_PARTY_ID => p_loan_header_rec.CONTACT_REL_PARTY_ID,
X_CONTACT_PERS_PARTY_ID => p_loan_header_rec.CONTACT_PERS_PARTY_ID,
X_CREDIT_REVIEW_FLAG => p_loan_header_rec.CREDIT_REVIEW_FLAG,
X_EXCHANGE_RATE_TYPE => p_loan_header_rec.EXCHANGE_RATE_TYPE,
X_EXCHANGE_DATE => p_loan_header_rec.EXCHANGE_DATE,
X_EXCHANGE_RATE => p_loan_header_rec.EXCHANGE_RATE,
X_COLLATERAL_PERCENT => p_loan_header_rec.COLLATERAL_PERCENT,
X_LAST_PAYMENT_NUMBER => p_loan_header_rec.LAST_PAYMENT_NUMBER,
X_LAST_AMORTIZATION_ID => p_loan_header_rec.LAST_AMORTIZATION_ID,
X_LEGAL_ENTITY_ID => p_loan_header_rec.LEGAL_ENTITY_ID,
X_OPEN_TO_TERM_FLAG => p_loan_header_rec.OPEN_TO_TERM_FLAG,
X_MULTIPLE_FUNDING_FLAG => p_loan_header_rec.MULTIPLE_FUNDING_FLAG,
X_LOAN_TYPE_ID => p_loan_header_rec.LOAN_TYPE_ID,
X_SECONDARY_STATUS => p_loan_header_rec.SECONDARY_STATUS,
X_OPEN_TO_TERM_EVENT => p_loan_header_rec.OPEN_TO_TERM_EVENT,
X_BALLOON_PAYMENT_TYPE => p_loan_header_rec.BALLOON_PAYMENT_TYPE,
X_BALLOON_PAYMENT_AMOUNT => p_loan_header_rec.BALLOON_PAYMENT_AMOUNT,
X_CURRENT_PHASE => p_loan_header_rec.CURRENT_PHASE,
X_OPEN_LOAN_START_DATE => p_loan_header_rec.OPEN_LOAN_START_DATE,
X_OPEN_LOAN_TERM => p_loan_header_rec.OPEN_LOAN_TERM,
X_OPEN_LOAN_TERM_PERIOD => p_loan_header_rec.OPEN_LOAN_TERM_PERIOD,
X_OPEN_MATURITY_DATE => p_loan_header_rec.OPEN_MATURITY_DATE,
X_FUNDS_RESERVED_FLAG => p_loan_header_rec.FUNDS_RESERVED_FLAG,
X_FUNDS_CHECK_DATE => p_loan_header_rec.FUNDS_CHECK_DATE,
X_SUBSIDY_RATE => p_loan_header_rec.SUBSIDY_RATE,
X_APPLICATION_ID => p_loan_header_rec.APPLICATION_ID,
X_CREATED_BY_MODULE => p_loan_header_rec.CREATED_BY_MODULE,
X_PARTY_TYPE => p_loan_header_rec.PARTY_TYPE,
X_FORGIVENESS_FLAG => p_loan_header_rec.FORGIVENESS_FLAG,
X_FORGIVENESS_PERCENT => p_loan_header_rec.FORGIVENESS_PERCENT,
X_DISABLE_BILLING_FLAG => p_loan_header_rec.DISABLE_BILLING_FLAG,
X_ADD_REQUESTED_AMOUNT => p_loan_header_rec.ADD_REQUESTED_AMOUNT,
X_DISABLE_INT_ACCRUAL_FLAG => p_loan_header_rec.DISABLE_INT_ACCRUAL_FLAG,
X_BILL_ON_APPR_AMOUNT_FLAG => p_loan_header_rec.BILL_ON_APPR_AMOUNT_FLAG
);
FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_update_loan procedure: After call to LNS_LOAN_HEADER_ALL_PKG.Update_Row for loan_id: '|| p_loan_header_rec.loan_id);
IF (p_loan_header_rec.loan_status in ('DELETED','REJECTED','PAIDOFF')) THEN
IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_update_loan procedure: Loan Status code is '|| p_loan_header_rec.loan_status);
FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_update_loan procedure: Loan Status code is '|| p_loan_header_rec.loan_status);
END do_update_loan;
| update_loan
|
| DESCRIPTION
| Updates loan.
|
| SCOPE - PUBLIC
|
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED
|
| ARGUMENTS : IN:
| p_init_msg_list
| p_loan_header_rec
| OUT:
| x_return_status
| x_msg_count
| x_msg_data
| IN/OUT:
| p_object_version_number
|
| RETURNS : NONE
|
| NOTES
|
| MODIFICATION HISTORY
| 30-Nov-2003 Karthik Ramachandran Created.
+===========================================================================*/
PROCEDURE update_loan (
p_init_msg_list IN VARCHAR2,
p_loan_header_rec IN LOAN_HEADER_REC_TYPE,
p_object_version_number IN OUT NOCOPY NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
l_init_msg_list VARCHAR2(1);
l_api_name CONSTANT VARCHAR2(30) := 'update_loan';
FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Begin Update_Loan procedure');
SAVEPOINT update_loan;
FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Update_Loan procedure: Before call to do_update_loan proc');
do_update_loan(
l_loan_header_rec,
p_object_version_number,
x_return_status
);
FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Update_Loan procedure: After call to do_update_loan proc');
--for this loan participants, update the credit request with the
--new loan description information to fix bug#4930854
IF (l_old_loan_header_rec.credit_review_flag = 'Y' and l_loan_header_rec.loan_description is not null and l_loan_header_rec.loan_description <> FND_API.G_MISS_CHAR and l_loan_header_rec.loan_description <> l_old_loan_header_rec.loan_description) THEN
update ar_cmgt_credit_requests
set SOURCE_COLUMN3 = l_loan_header_rec.loan_description
where SOURCE_NAME = 'LNS' and
SOURCE_COLUMN1 = to_char(l_loan_header_rec.loan_id) and
SOURCE_COLUMN3 = l_old_loan_header_rec.loan_description;
ROLLBACK TO update_loan;
ROLLBACK TO update_loan;
ROLLBACK TO update_loan;
FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'End Update_Loan procedure');
END update_loan;
/* Call this only for update!
-- Get old record if update.
-- Will be used to validate value changes in fields.
get_loan_header_rec (
p_loan_id => l_loan_header_rec.loan_id,
x_loan_header_rec => l_old_loan_header_rec,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data );
LNS_LOAN_HEADER_ALL_PKG.Select_Row (
X_LOAN_ID => x_loan_header_rec.loan_id,
X_ORG_ID => x_loan_header_rec.org_id,
X_LOAN_NUMBER => x_loan_header_rec.loan_number,
X_LOAN_DESCRIPTION => x_loan_header_rec.loan_description,
X_LOAN_APPLICATION_DATE => x_loan_header_rec.loan_application_date,
X_END_DATE => x_loan_header_rec.end_date,
X_INITIAL_LOAN_BALANCE => x_loan_header_rec.initial_loan_balance,
X_LAST_PAYMENT_DATE => x_loan_header_rec.last_payment_date,
X_LAST_PAYMENT_AMOUNT => x_loan_header_rec.last_payment_amount,
X_LOAN_TERM => x_loan_header_rec.loan_term,
X_LOAN_TERM_PERIOD => x_loan_header_rec.loan_term_period,
X_AMORTIZED_TERM => x_loan_header_rec.amortized_term,
X_AMORTIZED_TERM_PERIOD => x_loan_header_rec.amortized_term_period,
X_LOAN_STATUS => x_loan_header_rec.loan_status,
X_LOAN_ASSIGNED_TO => x_loan_header_rec.loan_assigned_to,
X_LOAN_CURRENCY => x_loan_header_rec.loan_currency,
X_LOAN_CLASS_CODE => x_loan_header_rec.loan_class_code,
X_LOAN_TYPE => x_loan_header_rec.loan_type,
X_LOAN_SUBTYPE => x_loan_header_rec.loan_subtype,
X_LOAN_PURPOSE_CODE => x_loan_header_rec.loan_purpose_code,
X_CUST_ACCOUNT_ID => x_loan_header_rec.cust_account_id,
X_BILL_TO_ACCT_SITE_ID => x_loan_header_rec.bill_to_acct_site_id,
X_LOAN_MATURITY_DATE => x_loan_header_rec.loan_maturity_date,
X_LOAN_START_DATE => x_loan_header_rec.loan_start_date,
X_LOAN_CLOSING_DATE => x_loan_header_rec.loan_closing_date,
X_REFERENCE_ID => x_loan_header_rec.reference_id,
X_REFERENCE_NUMBER => x_loan_header_rec.reference_number,
X_REFERENCE_DESCRIPTION => x_loan_header_rec.reference_description,
X_REFERENCE_AMOUNT => x_loan_header_rec.reference_amount,
X_PRODUCT_FLAG => x_loan_header_rec.product_flag,
X_PRIMARY_BORROWER_ID => x_loan_header_rec.primary_borrower_id,
X_PRODUCT_ID => x_loan_header_rec.product_id,
X_REQUESTED_AMOUNT => x_loan_header_rec.requested_amount,
X_FUNDED_AMOUNT => x_loan_header_rec.funded_amount,
X_LOAN_APPROVAL_DATE => x_loan_header_rec.loan_approval_date,
X_LOAN_APPROVED_BY => x_loan_header_rec.loan_approved_by,
X_ATTRIBUTE_CATEGORY => x_loan_header_rec.attribute_category,
X_ATTRIBUTE1 => x_loan_header_rec.attribute1,
X_ATTRIBUTE2 => x_loan_header_rec.attribute2,
X_ATTRIBUTE3 => x_loan_header_rec.attribute3,
X_ATTRIBUTE4 => x_loan_header_rec.attribute4,
X_ATTRIBUTE5 => x_loan_header_rec.attribute5,
X_ATTRIBUTE6 => x_loan_header_rec.attribute6,
X_ATTRIBUTE7 => x_loan_header_rec.attribute7,
X_ATTRIBUTE8 => x_loan_header_rec.attribute8,
X_ATTRIBUTE9 => x_loan_header_rec.attribute9,
X_ATTRIBUTE10 => x_loan_header_rec.attribute10,
X_ATTRIBUTE11 => x_loan_header_rec.attribute11,
X_ATTRIBUTE12 => x_loan_header_rec.attribute12,
X_ATTRIBUTE13 => x_loan_header_rec.attribute13,
X_ATTRIBUTE14 => x_loan_header_rec.attribute14,
X_ATTRIBUTE15 => x_loan_header_rec.attribute15,
X_ATTRIBUTE16 => x_loan_header_rec.attribute16,
X_ATTRIBUTE17 => x_loan_header_rec.attribute17,
X_ATTRIBUTE18 => x_loan_header_rec.attribute18,
X_ATTRIBUTE19 => x_loan_header_rec.attribute19,
X_ATTRIBUTE20 => x_loan_header_rec.attribute20,
X_LAST_BILLED_DATE => x_loan_header_rec.last_billed_date,
X_CUSTOM_PAYMENTS_FLAG => x_loan_header_rec.custom_payments_flag,
X_BILLED_FLAG => x_loan_header_rec.billed_flag,
X_REFERENCE_NAME => x_loan_header_rec.reference_name,
X_REFERENCE_TYPE => x_loan_header_rec.reference_type,
X_REFERENCE_TYPE_ID => x_loan_header_rec.reference_type_id,
X_USSGL_TRANSACTION_CODE => x_loan_header_rec.ussgl_transaction_code,
X_GL_DATE => x_loan_header_rec.gl_date,
X_REC_ADJUSTMENT_NUMBER => x_loan_header_rec.REC_ADJUSTMENT_NUMBER,
X_CONTACT_REL_PARTY_ID => x_loan_header_rec.CONTACT_REL_PARTY_ID,
X_CONTACT_PERS_PARTY_ID => x_loan_header_rec.CONTACT_PERS_PARTY_ID,
X_CREDIT_REVIEW_FLAG => x_loan_header_rec.CREDIT_REVIEW_FLAG,
X_EXCHANGE_RATE_TYPE => x_loan_header_rec.EXCHANGE_RATE_TYPE,
X_EXCHANGE_DATE => x_loan_header_rec.EXCHANGE_DATE,
X_EXCHANGE_RATE => x_loan_header_rec.EXCHANGE_RATE,
X_COLLATERAL_PERCENT => x_loan_header_rec.COLLATERAL_PERCENT,
X_LAST_PAYMENT_NUMBER => x_loan_header_rec.LAST_PAYMENT_NUMBER,
X_LAST_AMORTIZATION_ID => x_loan_header_rec.LAST_AMORTIZATION_ID,
X_LEGAL_ENTITY_ID => x_loan_header_rec.LEGAL_ENTITY_ID,
X_OPEN_TO_TERM_FLAG => x_loan_header_rec.OPEN_TO_TERM_FLAG,
X_MULTIPLE_FUNDING_FLAG => x_loan_header_rec.MULTIPLE_FUNDING_FLAG,
X_LOAN_TYPE_ID => x_loan_header_rec.LOAN_TYPE_ID,
X_SECONDARY_STATUS => x_loan_header_rec.SECONDARY_STATUS,
X_OPEN_TO_TERM_EVENT => x_loan_header_rec.OPEN_TO_TERM_EVENT,
X_BALLOON_PAYMENT_TYPE => x_loan_header_rec.BALLOON_PAYMENT_TYPE,
X_BALLOON_PAYMENT_AMOUNT => x_loan_header_rec.BALLOON_PAYMENT_AMOUNT,
X_CURRENT_PHASE => x_loan_header_rec.CURRENT_PHASE,
X_OPEN_LOAN_START_DATE => x_loan_header_rec.OPEN_LOAN_START_DATE,
X_OPEN_LOAN_TERM => x_loan_header_rec.OPEN_LOAN_TERM,
X_OPEN_LOAN_TERM_PERIOD => x_loan_header_rec.OPEN_LOAN_TERM_PERIOD,
X_OPEN_MATURITY_DATE => x_loan_header_rec.OPEN_MATURITY_DATE,
X_FUNDS_RESERVED_FLAG => x_loan_header_rec.FUNDS_RESERVED_FLAG,
X_FUNDS_CHECK_DATE => x_loan_header_rec.FUNDS_CHECK_DATE,
X_SUBSIDY_RATE => x_loan_header_rec.SUBSIDY_RATE,
X_APPLICATION_ID => x_loan_header_rec.APPLICATION_ID,
X_CREATED_BY_MODULE => x_loan_header_rec.CREATED_BY_MODULE,
X_PARTY_TYPE => x_loan_header_rec.PARTY_TYPE,
X_FORGIVENESS_FLAG => x_loan_header_rec.FORGIVENESS_FLAG,
X_FORGIVENESS_PERCENT => x_loan_header_rec.FORGIVENESS_PERCENT,
X_DISABLE_BILLING_FLAG => x_loan_header_rec.DISABLE_BILLING_FLAG,
X_ADD_REQUESTED_AMOUNT => x_loan_header_rec.ADD_REQUESTED_AMOUNT,
X_DISABLE_INT_ACCRUAL_FLAG => x_loan_header_rec.DISABLE_INT_ACCRUAL_FLAG
);