DBA Data[Home] [Help]

APPS.LNS_FEE_ASSIGNMENT_PUB SQL Statements

The following lines contain the word 'select', 'insert', 'update' or 'delete':

Line: 41

PROCEDURE do_update_fee_assignment (
    p_fee_assignment_rec        IN OUT NOCOPY FEE_ASSIGNMENT_REC_TYPE,
    p_object_version_number  IN OUT NOCOPY NUMBER,
    x_return_status          IN OUT NOCOPY VARCHAR2
);
Line: 47

PROCEDURE do_delete_fee_assignment (
    p_fee_assignment_id        IN NUMBER,
    x_return_status          IN OUT NOCOPY VARCHAR2
);
Line: 105

            SELECT 'Y'
            INTO   l_dummy
            FROM   LNS_FEE_ASSIGNMENTS
            WHERE  fee_assignment_id = l_fee_assignment_id;
Line: 122

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_create_fee_assignment procedure: Before call to LNS_FEE_ASSIGNMENTS_PKG.Insert_Row');
Line: 126

    LNS_FEE_ASSIGNMENTS_PKG.Insert_Row (
	  X_FEE_ASSIGNMENT_ID		=> p_fee_assignment_rec.fee_assignment_id,
	  P_OBJECT_VERSION_NUMBER	=> 1,
	  P_LOAN_ID			=> p_fee_assignment_rec.loan_id,
	  P_FEE_ID		=> p_fee_assignment_rec.fee_id,
	  P_FEE				=> p_fee_assignment_rec.fee,
	  P_FEE_TYPE			=> p_fee_assignment_rec.fee_type,
	  P_FEE_BASIS			=> p_fee_assignment_rec.fee_basis,
	  P_NUMBER_GRACE_DAYS		=> p_fee_assignment_rec.number_grace_days,
	  P_START_DATE_ACTIVE		=> p_fee_assignment_rec.start_date_active,
	  P_END_DATE_ACTIVE		=> p_fee_assignment_rec.end_date_active,
	  P_CREATED_BY			=> p_fee_assignment_rec.created_by,
	  P_CREATION_DATE		=> p_fee_assignment_rec.creation_date,
	  P_LAST_UPDATED_BY		=> p_fee_assignment_rec.last_updated_by,
	  P_LAST_UPDATE_DATE		=> p_fee_assignment_rec.last_update_date,
	  P_LAST_UPDATE_LOGIN		=> p_fee_assignment_rec.last_update_login,
	  P_COLLECTED_THIRD_PARTY_FLAG 	=> p_fee_assignment_rec.collected_third_party_flag,
	  P_RATE_TYPE			=> p_fee_assignment_rec.rate_type,
	  P_BEGIN_INSTALLMENT_NUMBER 	=> p_fee_assignment_rec.begin_installment_number,
	  P_END_INSTALLMENT_NUMBER 	=> p_fee_assignment_rec.end_installment_number,
	  P_NUMBER_OF_PAYMENTS 		=> p_fee_assignment_rec.number_of_payments,
	  P_BILLING_OPTION 		=> p_fee_assignment_rec.billing_option,
          P_DISB_HEADER_ID		=> p_fee_assignment_rec.disb_header_id,
	  P_DELETE_DISABLED_FLAG	=> p_fee_assignment_rec.delete_disabled_flag,
	  P_OPEN_PHASE_FLAG	 	=> p_fee_assignment_rec.open_phase_flag,
	  P_PHASE	 		=> p_fee_assignment_rec.phase,
	  P_CUSTOM_PROCEDURE	 	=> p_fee_assignment_rec.custom_procedure
	);
Line: 158

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_create_fee_assignment procedure: After call to LNS_FEE_ASSIGNMENT.Insert_Row');
Line: 166

 |              do_update_fee_assignment
 |
 | DESCRIPTION
 |              Updates assignment.
 |
 | SCOPE - PRIVATE
 |
 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED
 |
 | ARGUMENTS  : IN:
 |              OUT:
 |              IN/OUT:
 |                    p_fee_assignment_rec
 |		      p_object_version_number
 |                    x_return_status
 |
 | RETURNS    : NONE
 |
 | NOTES
 |
 | MODIFICATION HISTORY
 |
 |   22-APR-2004     Bernice Lam       Created.
 +===========================================================================*/

PROCEDURE do_update_fee_assignment(
    p_fee_assignment_rec          IN OUT NOCOPY FEE_ASSIGNMENT_REC_TYPE,
    p_object_version_number   IN OUT NOCOPY NUMBER,
    x_return_status           IN OUT NOCOPY VARCHAR2
) IS

    l_object_version_number         NUMBER;
Line: 204

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Begin do_update_fee_assignment procedure');
Line: 209

        SELECT OBJECT_VERSION_NUMBER
        INTO   l_object_version_number
        FROM   LNS_FEE_ASSIGNMENTS
        WHERE  FEE_ASSIGNMENT_ID = p_fee_assignment_rec.fee_assignment_id
        FOR UPDATE OF FEE_ASSIGNMENT_ID NOWAIT;
Line: 242

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_update_fee_assignment procedure: Before call to LNS_FEE_ASSIGNMENTS_PKG.Update_Row');
Line: 251

    LNS_FEE_ASSIGNMENTS_PKG.Update_Row (
	  P_FEE_ASSIGNMENT_ID		=> p_fee_assignment_rec.fee_assignment_id,
	  P_LOAN_ID			=> p_fee_assignment_rec.LOAN_ID,
	  P_FEE_ID		=> p_fee_assignment_rec.FEE_ID,
	  P_FEE				=> p_fee_assignment_rec.FEE,
	  P_FEE_TYPE			=> p_fee_assignment_rec.fee_type,
	  P_FEE_BASIS			=> p_fee_assignment_rec.fee_basis,
	  P_NUMBER_GRACE_DAYS		=> p_fee_assignment_rec.NUMBER_GRACE_DAYS,
	  P_LAST_UPDATED_BY		=> null,
	  P_LAST_UPDATE_DATE		=> null,
	  P_LAST_UPDATE_LOGIN		=> null,
	  P_OBJECT_VERSION_NUMBER	=> p_OBJECT_VERSION_NUMBER,
	  P_COLLECTED_THIRD_PARTY_FLAG 	=> p_fee_assignment_rec.collected_third_party_flag,
	  P_BILLING_OPTION 		=> p_fee_assignment_rec.billing_option,
	  P_RATE_TYPE			=> p_fee_assignment_rec.rate_type,
	  P_BEGIN_INSTALLMENT_NUMBER 	=> p_fee_assignment_rec.begin_installment_number,
	  P_END_INSTALLMENT_NUMBER 	=> p_fee_assignment_rec.end_installment_number,
	  P_NUMBER_OF_PAYMENTS 		=> p_fee_assignment_rec.number_of_payments,
	  P_START_DATE_ACTIVE		=> null,
	  P_END_DATE_ACTIVE		=> p_fee_assignment_rec.end_date_active,
	  P_DISB_HEADER_ID		=> p_fee_assignment_rec.disb_header_id,
	  P_DELETE_DISABLED_FLAG	=> p_fee_assignment_rec.delete_disabled_flag,
	  P_OPEN_PHASE_FLAG		=> p_fee_assignment_rec.open_phase_flag,
	  P_PHASE			=> p_fee_assignment_rec.phase,
	  P_CUSTOM_PROCEDURE	 	=> p_fee_assignment_rec.custom_procedure
);
Line: 285

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_update_fee_assignment procedure: After call to LNS_FEE_ASSIGNMENTS_PKG.Update_Row');
Line: 288

END do_update_fee_assignment;
Line: 292

 |              do_delete_fee_assignment
 |
 | DESCRIPTION
 |              Deletes assignment.
 |
 | SCOPE - PRIVATE
 |
 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED
 |
 | ARGUMENTS  : IN:
 |              OUT:
 |              IN/OUT:
 |                    p_fee_assignment_id
 |		      p_object_version_number
 |                    x_return_status
 |
 | RETURNS    : NONE
 |
 | NOTES
 |
 | MODIFICATION HISTORY
 |
 |   22-APR-2004     Bernice Lam       Created.
 +===========================================================================*/

PROCEDURE do_delete_fee_assignment(
    p_fee_assignment_id           NUMBER,
    x_return_status           IN OUT NOCOPY VARCHAR2
) IS

    l_loan_id                 NUMBER;
Line: 328

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Begin do_delete_fee_assignment procedure');
Line: 336

        SELECT loan_id, fee_id, object_version_number
        INTO   l_loan_id, l_fee_id, l_object_version_num
        FROM   LNS_FEE_ASSIGNMENTS
        WHERE  FEE_ASSIGNMENT_ID = p_fee_assignment_id;
Line: 352

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_delete_fee_assignment procedure: Before call to LNS_FEE_ASSIGNMENTS_PKG.Delete_Row');
Line: 365

       UPDATE LNS_FEE_ASSIGNMENTS
       SET END_DATE_ACTIVE = SYSDATE
       WHERE LOAN_ID = l_loan_id
       AND FEE_ASSIGNMENT_ID = p_fee_assignment_id;
Line: 377

       LNS_FEE_ASSIGNMENTS_PKG.Delete_Row(
          P_FEE_ASSIGNMENT_ID           => p_fee_assignment_id);
Line: 393

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_delete_fee_assignment procedure: After call to LNS_FEE_ASSIGNMENTS_PKG.Delete_Row');
Line: 396

END do_delete_fee_assignment;
Line: 542

 |              update_fee_assignment
 |
 | DESCRIPTION
 |              Updates assignment.
 |
 | SCOPE - PUBLIC
 |
 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED
 |
 | ARGUMENTS  : IN:
 |                    p_init_msg_list
 |                    p_fee_assignment_rec
 |              OUT:
 |                    x_return_status
 |                    x_msg_count
 |                    x_msg_data
 |              IN/OUT:
 |		      p_object_version_number
 |
 | RETURNS    : NONE
 |
 | NOTES
 |
 | MODIFICATION HISTORY
 |   22-APR-2004     Bernice Lam		Created
 +===========================================================================*/

PROCEDURE update_fee_assignment (
    p_init_msg_list         IN      VARCHAR2,
    p_fee_assignment_rec        IN      FEE_ASSIGNMENT_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_api_name            CONSTANT VARCHAR2(30) := 'update_fee_assignment';
Line: 586

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Begin Update_fee_assignment procedure');
Line: 590

    SAVEPOINT update_fee_assignment;
Line: 615

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Update_fee_assignment procedure: Before call to do_update_fee_assignment proc');
Line: 621

    do_update_fee_assignment(
                   l_fee_assignment_rec,
                   p_object_version_number,
                   x_return_status
                  );
Line: 628

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Update_fee_assignment procedure: After call to do_update_fee_assignment proc');
Line: 633

        ROLLBACK TO update_fee_assignment;
Line: 641

        ROLLBACK TO update_fee_assignment;
Line: 649

        ROLLBACK TO update_fee_assignment;
Line: 660

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'End Update_fee_assignment procedure');
Line: 663

END update_fee_assignment;
Line: 667

 |              delete_fee_assignment
 |
 | DESCRIPTION
 |              Deletes assignment.
 |
 | SCOPE - PUBLIC
 |
 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED
 |
 | ARGUMENTS  : IN:
 |                    p_init_msg_list
 |                    p_fee_assignment_id
 |              OUT:
 |                    x_return_status
 |                    x_msg_count
 |                    x_msg_data
 |              IN/OUT:
 |
 | RETURNS    : NONE
 |
 | NOTES
 |
 | MODIFICATION HISTORY
 |   22-APR-2004     Bernice Lam       Created.
 +===========================================================================*/

PROCEDURE delete_fee_assignment (
    p_init_msg_list   IN      VARCHAR2,
    p_fee_assignment_id         IN     NUMBER,
    x_return_status   OUT NOCOPY     VARCHAR2,
    x_msg_count       OUT NOCOPY     NUMBER,
    x_msg_data        OUT NOCOPY     VARCHAR2
) IS

    l_api_name        CONSTANT VARCHAR2(30) := 'delete_fee_assignment';
Line: 708

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Begin Delete_fee_assignment procedure');
Line: 712

    SAVEPOINT delete_fee_assignment;
Line: 723

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Delete_fee_assignment procedure: Before call to do_delete_fee_assignment proc');
Line: 727

    do_delete_fee_assignment(
                   l_fee_assignment_id,
                   x_return_status
                  );
Line: 733

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Delete_fee_assignment procedure: After call to do_delete_fee_assignment proc');
Line: 738

        ROLLBACK TO delete_fee_assignment;
Line: 746

        ROLLBACK TO delete_fee_assignment;
Line: 754

        ROLLBACK TO delete_fee_assignment;
Line: 765

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'End Delete_fee_assignment procedure');
Line: 768

END delete_fee_assignment;
Line: 775

  SELECT 'X' FROM DUAL
  WHERE EXISTS ( SELECT NULL FROM LNS_FEE_ASSIGNMENTS
                  WHERE FEE_ID = X_FEE_ID )
  OR EXISTS ( SELECT NULL FROM LNS_LOAN_PRODUCT_LINES
              WHERE LINE_REFERENCE_ID = X_FEE_ID
              AND ( LOAN_PRODUCT_LINE_TYPE = 'FEE' OR LOAN_PRODUCT_LINE_TYPE='DISB_FEE' )
              );
Line: 806

  select LNS_FEE_ASSIGNMENTS_S.NEXTVAL FEE_ASSIGNMENT_ID,
    LnsLoanHeaders.LOAN_ID,
    LnsFees.FEE_ID,
    --decode(LnsFees.RATE_TYPE,'VARIABLE', lns_fee_engine.calculateFee(LnsFees.FEE_ID,LnsLoanHeaders.LOAN_ID) , LnsFees.FEE) FEE,
    LnsFees.FEE,
    LnsFees.FEE_TYPE,
    LnsFees.FEE_BASIS,
    LnsFees.NUMBER_GRACE_DAYS,
    LnsFees.COLLECTED_THIRD_PARTY_FLAG,
    LnsFees.RATE_TYPE,
    decode(LnsFees.BILLING_OPTION,'ORIGINATION',0,
           'SUBMIT_FOR_APPROVAL',0,
	   'AD_HOC',0,
	   'TERM_CONVERSION',0,
           'BILL_WITH_INSTALLMENT',1,
           (decode(LNS_BILLING_UTIL_PUB.LAST_PAYMENT_NUMBER_EXT(LnsLoanHeaders.LOAN_ID) ,
             -1 , 0 , LNS_BILLING_UTIL_PUB.LAST_PAYMENT_NUMBER_EXT(LnsLoanHeaders.LOAN_ID)) + 1 )
      ) BEGIN_INSTALLMENT_NUMBER,
    decode(LnsFees.BILLING_OPTION,'ORIGINATION',0,
          'SUBMIT_FOR_APPROVAL',0,
	  'AD_HOC',0,
	  'TERM_CONVERSION',0,
          'BILL_WITH_INSTALLMENT',decode(LnsFees.fee_type, 'EVENT_LATE_CHARGE', lns_fin_utils.getnumberinstallments(LnsLoanHeaders.LOAN_ID), 1 ),
          lns_fin_utils.getnumberinstallments(LnsLoanHeaders.LOAN_ID)) END_INSTALLMENT_NUMBER,

     NULL NUMBER_OF_PAYMENTS,
     LnsFees.BILLING_OPTION,
     NULL CREATED_BY,
     NULL CREATION_DATE,
     NULL LAST_UPDATED_BY,
     NULL LAST_UPDATE_DATE,
     NULL LAST_UPDATE_LOGIN,
     1 OBJECT_VERSION_NUMBER,
     sysdate START_DATE_ACTIVE,
     NULL END_DATE_ACTIVE,
     NULL DISB_HEADER_ID,
     LnsLoanProductLines.MANDATORY_FLAG,
     NULL OPEN_PHASE_FLAG,  -- We don't use this flag anywhere
     NULL PHASE,
     LnsFees.CUSTOM_PROCEDURE
FROM LNS_FEES LnsFees ,
LNS_LOAN_HEADERS LnsLoanHeaders ,
LNS_LOAN_PRODUCT_LINES LnsLoanProductLines

WHERE LnsLoanHeaders.LOAN_ID = c_loan_id
AND LnsLoanHeaders.PRODUCT_ID = LnsLoanProductLines.LOAN_PRODUCT_ID
AND LnsLoanProductLines.LOAN_PRODUCT_LINE_TYPE = 'FEE'
AND LnsLoanProductLines.LINE_REFERENCE_ID = LnsFees.FEE_ID ;
Line: 856

    SELECT  LINE_TYPE, ACCOUNT_NAME, CODE_COMBINATION_ID, ACCOUNT_TYPE, DISTRIBUTION_PERCENT, DISTRIBUTION_TYPE
    FROM LNS_DEFAULT_DISTRIBS
    WHERE ACCOUNT_NAME = 'FEE_RECEIVABLE' OR FEE_ID = c_fee_id ;
Line: 862

  SELECT LOAN_STATUS , CURRENT_PHASE
  FROM LNS_LOAN_HEADERS LnsLoanHeaders
  WHERE LnsLoanHeaders.LOAN_ID = c_loan_id ;
Line: 868

  SELECT 'Y'
  FROM DUAL
  WHERE
  EXISTS
  (SELECT NULL FROM LNS_FEE_ASSIGNMENTS LnsFeeAssignments
  WHERE LnsFeeAssignments.LOAN_ID = c_loan_id)
  OR EXISTS
  (SELECT NULL FROM LNS_LOAN_HISTORIES_H
   WHERE TABLE_NAME = 'LNS_FEE_ASSIGNMENTS' AND LOAN_ID = c_loan_id) ;
Line: 1017

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In create_LP_FEE_ASSIGNMENT procedure: Before inserting to lns_distributions record for accountint name '||l_account_name || ' and code comb id ' ||  l_code_combination_id);
Line: 1020

    Insert into lns_distributions
                (DISTRIBUTION_ID
                ,LOAN_ID
                ,LINE_TYPE
                ,ACCOUNT_NAME
                ,CODE_COMBINATION_ID
                ,ACCOUNT_TYPE
                ,DISTRIBUTION_PERCENT
                ,DISTRIBUTION_TYPE
                ,FEE_ID
                ,CREATION_DATE
                ,CREATED_BY
                ,LAST_UPDATE_DATE
                ,LAST_UPDATED_BY
                ,OBJECT_VERSION_NUMBER )
                values
                (LNS_DISTRIBUTIONS_S.nextval
                ,p_loan_id
                ,l_line_type
                ,l_account_name
                ,l_code_combination_id
                ,l_account_type
                ,l_distribution_percent
                ,l_distribution_type
                ,l_fee_assignment_rec.fee_id
                ,lns_utility_pub.creation_date
                ,lns_utility_pub.created_by
                ,lns_utility_pub.last_update_date
                ,lns_utility_pub.last_updated_by
                ,1) ;
Line: 1052

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In create_LP_FEE_ASSIGNMENT procedure: After inserting to lns_distributions record for accountint name '||l_account_name || ' and code comb id ' ||  l_code_combination_id);
Line: 1082

  select LNS_FEE_ASSIGNMENTS_S.NEXTVAL FEE_ASSIGNMENT_ID,
    c_loan_id LOAN_ID,
    LnsFees.FEE_ID,
    LnsFees.FEE,
    LnsFees.FEE_TYPE,
    LnsFees.FEE_BASIS,
    LnsFees.NUMBER_GRACE_DAYS,
    LnsFees.COLLECTED_THIRD_PARTY_FLAG,
    LnsFees.RATE_TYPE,
    decode(LnsFees.BILLING_OPTION,'ORIGINATION',0,
    	   'SUBMIT_FOR_APPROVAL',0,
           'BILL_WITH_INSTALLMENT',1,
           (decode(LNS_BILLING_UTIL_PUB.LAST_PAYMENT_NUMBER_EXT((select loan_id from lns_disb_headers where disb_header_id = c_disb_header_id )) ,
             -1 , 0 , LNS_BILLING_UTIL_PUB.LAST_PAYMENT_NUMBER_EXT((select loan_id from lns_disb_headers where disb_header_id = c_disb_header_id ))) + 1 )
      ) BEGIN_INSTALLMENT_NUMBER,
    decode(LnsFees.BILLING_OPTION,'ORIGINATION',0,
   	  'SUBMIT_FOR_APPROVAL',0,
           'BILL_WITH_INSTALLMENT',1,
          lns_fin_utils.getnumberinstallments((select loan_id from lns_disb_headers where disb_header_id = c_disb_header_id )) ) END_INSTALLMENT_NUMBER,

     NULL NUMBER_OF_PAYMENTS,
     LnsFees.BILLING_OPTION,
     NULL CREATED_BY,
     NULL CREATION_DATE,
     NULL LAST_UPDATED_BY,
     NULL LAST_UPDATE_DATE,
     NULL LAST_UPDATE_LOGIN,
     1 OBJECT_VERSION_NUMBER,
     sysdate START_DATE_ACTIVE,
     NULL END_DATE_ACTIVE,
     c_disb_header_id DISB_HEADER_ID,
     LnsLoanProductLines.MANDATORY_FLAG,
     NULL OPEN_PHASE_FLAG,
     (select phase from lns_disb_headers where disb_header_id = c_disb_header_id) PHASE,
     LnsFees.CUSTOM_PROCEDURE
FROM LNS_FEES LnsFees ,
LNS_LOAN_PRODUCT_LINES LnsLoanProductLines

WHERE LnsLoanProductLines.PARENT_PRODUCT_LINES_ID = c_loan_prod_line_id
AND LnsLoanProductLines.LOAN_PRODUCT_LINE_TYPE = 'DISB_FEE'
AND LnsLoanProductLines.LINE_REFERENCE_ID = LnsFees.FEE_ID ;
Line: 1125

    SELECT  LINE_TYPE, ACCOUNT_NAME, CODE_COMBINATION_ID, ACCOUNT_TYPE, DISTRIBUTION_PERCENT, DISTRIBUTION_TYPE
    FROM LNS_DEFAULT_DISTRIBS
    WHERE ACCOUNT_NAME = 'FEE_RECEIVABLE' OR FEE_ID = c_fee_id ;
Line: 1131

  SELECT LOAN_STATUS , CURRENT_PHASE
  FROM LNS_LOAN_HEADERS LnsLoanHeaders
  WHERE LnsLoanHeaders.LOAN_ID = c_loan_id ;
Line: 1137

SELECT 'Y'
  FROM DUAL
  WHERE
  EXISTS
  (SELECT * FROM LNS_DISTRIBUTIONS lnsDistribs
  WHERE lnsDistribs.ACCOUNT_NAME = 'FEE_RECEIVABLE' AND lnsDistribs.LOAN_ID = c_loan_id);
Line: 1258

				    FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In create_LP_DISB_FEE_ASSIGNMENT procedure: Before inserting to lns_distributions record for accountint name '||l_account_name || ' and code comb id ' ||  l_code_combination_id);
Line: 1261

			    Insert into lns_distributions
					(DISTRIBUTION_ID
					,LOAN_ID
					,LINE_TYPE
					,ACCOUNT_NAME
					,CODE_COMBINATION_ID
					,ACCOUNT_TYPE
					,DISTRIBUTION_PERCENT
					,DISTRIBUTION_TYPE
					,FEE_ID
					,CREATION_DATE
					,CREATED_BY
					,LAST_UPDATE_DATE
					,LAST_UPDATED_BY
					,OBJECT_VERSION_NUMBER
					,DISB_HEADER_ID )
					values
					(LNS_DISTRIBUTIONS_S.nextval
					,p_loan_id
					,l_line_type
					,l_account_name
					,l_code_combination_id
					,l_account_type
					,l_distribution_percent
					,l_distribution_type
					,l_fee_assignment_rec.fee_id
					,lns_utility_pub.creation_date
					,lns_utility_pub.created_by
					,lns_utility_pub.last_update_date
					,lns_utility_pub.last_updated_by
					,1
					,p_disb_header_id) ;
Line: 1295

				    FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In create_LP_DISB_FEE_ASSIGNMENT procedure: After inserting to lns_distributions record for accounting name '||l_account_name || ' and code comb id ' ||  l_code_combination_id);
Line: 1331

PROCEDURE delete_DISB_FEE_ASSIGNMENT(P_DISB_HEADER_ID IN NUMBER ) IS

CURSOR loan_disb_fee ( c_disb_header_id NUMBER ) IS
  select FEE_ASSIGNMENT_ID
  FROM LNS_FEE_ASSIGNMENTS LnsFeeAssignments
  WHERE LnsFeeAssignments.DISB_HEADER_ID = c_disb_header_id ;
Line: 1345

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Begin delete_DISB_FEE_ASSIGNMENT procedure');
Line: 1349

    SAVEPOINT delete_DISB_FEE_ASSIGNMENT ;
Line: 1353

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In delete_DISB_FEE_ASSIGNMENT procedure: Before opening cursor loan_disb_fee ');
Line: 1359

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In delete_DISB_FEE_ASSIGNMENT procedure: After opening cursor loan_disb_fee , no of fees found is '||loan_disb_fee%ROWCOUNT);
Line: 1371

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In delete_DISB_FEE_ASSIGNMENT procedure: Before call to do_delete_fee_assignment proc for fee_assignment_id '||l_fee_assignment_id );
Line: 1375

    do_delete_fee_assignment( l_fee_assignment_id ,
                              x_return_status );
Line: 1380

    	FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In delete_DISB_FEE_ASSIGNMENT procedure: After call to do_delete_fee_assignment proc for fee_assignment_id'|| l_fee_assignment_id ||' , return status is' || x_return_status);
Line: 1392

        ROLLBACK TO delete_DISB_FEE_ASSIGNMENT ;
Line: 1394

END delete_DISB_FEE_ASSIGNMENT ;
Line: 1431

  	SELECT 'X' FROM DUAL
  	WHERE EXISTS ( SELECT NULL FROM LNS_FEE_ASSIGNMENTS fasgn
			WHERE (fasgn.LOAN_ID = c_loan_id
				OR (fasgn.DISB_HEADER_ID = c_disb_header_id ))
			AND fasgn.FEE_ID = c_fee_id
			AND nvl(trunc(fasgn.END_DATE_ACTIVE), trunc(SYSDATE)) >= trunc(SYSDATE)
			AND nvl(trunc(fasgn.START_DATE_ACTIVE), trunc(SYSDATE)) <= trunc(SYSDATE)
		     )
	      AND
	        EXISTS ( SELECT NULL FROM LNS_FEE_SCHEDULES sched
			WHERE (sched.loan_id = c_loan_id OR sched.DISB_HEADER_ID = c_disb_header_id)
			AND sched.fee_id = c_fee_id
			AND sched.ACTIVE_FLAG = 'Y'
			AND sched.BILLED_FLAG = 'N'
			AND (NOT EXISTS
			  (select 'X'
			     from lns_amortization_scheds am
				 ,lns_amortization_lines lines
			    where lines.loan_id = c_loan_id
			      and lines.fee_schedule_id = sched.fee_schedule_id
			      and am.loan_id = lines.loan_id
			      and NVL(am.reversed_flag, 'N') = 'N'
			      --and am.payment_number = p_installment
			      )
			    or EXISTS
			    (select 'X'
			     from lns_amortization_scheds am
				 ,lns_amortization_lines lines
			    where lines.loan_id = c_loan_id
			      and lines.fee_schedule_id = sched.fee_schedule_id
			      and am.loan_id = lines.loan_id
			      and am.reversed_flag = 'Y'
			      --and am.payment_number = p_installment
			    )
			)
                      );
Line: 1469

     	SELECT
		fees.fee_category, fees.fee_type
	FROM
		lns_fees_all fees
	WHERE
		fees.fee_id = c_fee_id;
Line: 1477

     	SELECT
		hdr.loan_status
	FROM
		lns_loan_headers_all hdr
	WHERE
		hdr.loan_id in (select loan_id from lns_disb_headers where disb_header_id = c_disb_header_id);
Line: 1485

	SELECT
		disb.status
	FROM
		lns_disb_headers disb
	WHERE
		disb.disb_header_id = c_disb_header_id;