DBA Data[Home] [Help]

APPS.FA_LEASE_PUB SQL Statements

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

Line: 40

   SELECT PRESENT_VALUE
   FROM FA_LEASE_SCHEDULES
   WHERE PAYMENT_SCHEDULE_ID= L_LEASE_DETAILS_REC.PAYMENT_SCHEDULE_ID;
Line: 93

	SELECT FA_LEASES_S.NEXTVAL
	 INTO  L_LEASE_ID
	 FROM DUAL;
Line: 187

	-- EVERYTING LOOKS GOOD, LET'S INSERT THIS ROW
	----------------------------------------------------------------

	   FA_LEASES2_PKG.INSERT_ROW( X_ROWID=>L_ROWID,
              X_LEASE_ID=>L_LEASE_ID,
              X_LEASE_NUMBER=>L_LEASE_DETAILS_REC.LEASE_NUMBER,
              X_LESSOR_ID=>L_LEASE_DETAILS_REC.LESSOR_ID,
              X_DESCRIPTION=>L_LEASE_DETAILS_REC.DESCRIPTION,
              X_LAST_UPDATE_DATE=>NVL(P_TRANS_REC.WHO_INFO.LAST_UPDATE_DATE,SYSDATE),
              X_LAST_UPDATED_BY=>NVL(P_TRANS_REC.WHO_INFO.LAST_UPDATED_BY,-1),
              X_CREATED_BY=>NVL(P_TRANS_REC.WHO_INFO.CREATED_BY,-1),
              X_CREATION_DATE=>NVL(P_TRANS_REC.WHO_INFO.CREATION_DATE,SYSDATE),
              X_LAST_UPDATE_LOGIN=>NVL(P_TRANS_REC.WHO_INFO.LAST_UPDATE_LOGIN,-1),
              X_ATTRIBUTE1=>L_LEASE_DETAILS_REC.DESC_FLEX.ATTRIBUTE1,
              X_ATTRIBUTE2=>L_LEASE_DETAILS_REC.DESC_FLEX.ATTRIBUTE2,
              X_ATTRIBUTE3=>L_LEASE_DETAILS_REC.DESC_FLEX.ATTRIBUTE3,
              X_ATTRIBUTE4=>L_LEASE_DETAILS_REC.DESC_FLEX.ATTRIBUTE4,
              X_ATTRIBUTE5=>L_LEASE_DETAILS_REC.DESC_FLEX.ATTRIBUTE5,
              X_ATTRIBUTE6=>L_LEASE_DETAILS_REC.DESC_FLEX.ATTRIBUTE6,
              X_ATTRIBUTE7=>L_LEASE_DETAILS_REC.DESC_FLEX.ATTRIBUTE7,
              X_ATTRIBUTE8=>L_LEASE_DETAILS_REC.DESC_FLEX.ATTRIBUTE8,
              X_ATTRIBUTE9=>L_LEASE_DETAILS_REC.DESC_FLEX.ATTRIBUTE9,
              X_ATTRIBUTE10=>L_LEASE_DETAILS_REC.DESC_FLEX.ATTRIBUTE10,
              X_ATTRIBUTE11=>L_LEASE_DETAILS_REC.DESC_FLEX.ATTRIBUTE11,
              X_ATTRIBUTE12=>L_LEASE_DETAILS_REC.DESC_FLEX.ATTRIBUTE12,
              X_ATTRIBUTE13=>L_LEASE_DETAILS_REC.DESC_FLEX.ATTRIBUTE13,
              X_ATTRIBUTE14=>L_LEASE_DETAILS_REC.DESC_FLEX.ATTRIBUTE14,
              X_ATTRIBUTE15=>L_LEASE_DETAILS_REC.DESC_FLEX.ATTRIBUTE15,
              X_ATTRIBUTE_CATEGORY_CODE=>L_LEASE_DETAILS_REC.DESC_FLEX.ATTRIBUTE_CATEGORY_CODE,
              X_FASB_LEASE_TYPE=>UPPER(L_FASB_LEASE_TYPE),
              X_COST_CAPITALIZED=>L_COST_CAPITALIZED ,
              X_TRANSFER_OWNERSHIP=>L_LEASE_DETAILS_REC.TRANSFER_OWNERSHIP,
              X_BARGAIN_PURCHASE_OPTION=>L_LEASE_DETAILS_REC.BARGAIN_PURCHASE_OPTION,
              X_PAYMENT_SCHEDULE_ID=>L_LEASE_DETAILS_REC.PAYMENT_SCHEDULE_ID,
              X_FAIR_VALUE=>L_LEASE_DETAILS_REC.FAIR_VALUE,
              X_PRESENT_VALUE=>L_PRESENT_VALUE,
              X_LEASE_TYPE=>L_LEASE_DETAILS_REC.LEASE_TYPE,
              X_LEASE_TERM=>L_LEASE_DETAILS_REC.LEASE_TERM,
              X_ASSET_LIFE=>L_LEASE_DETAILS_REC.ASSET_LIFE,
              X_CURRENCY_CODE=>L_LEASE_DETAILS_REC.CURRENCY_CODE,
              X_LESSOR_SITE_ID=>L_LEASE_DETAILS_REC.LESSOR_SITE_ID,
              X_DIST_CODE_COMBINATION_ID=>L_LEASE_DETAILS_REC.DIST_CODE_COMBINATION_ID,
              X_TERMS_ID=>L_LEASE_DETAILS_REC.TERMS_ID,
              X_CALLING_FN=>P_CALLING_FN
	  ) ;
Line: 263

PROCEDURE UPDATE_LEASE  (
   P_API_VERSION              IN      NUMBER,
   P_INIT_MSG_LIST            IN      VARCHAR2 := FND_API.G_FALSE,
   P_COMMIT                   IN      VARCHAR2 := FND_API.G_FALSE,
   P_VALIDATION_LEVEL         IN      NUMBER   := FND_API.G_VALID_LEVEL_FULL,
   X_RETURN_STATUS               OUT  NOCOPY VARCHAR2,
   X_MSG_COUNT                   OUT  NOCOPY NUMBER,
   X_MSG_DATA                    OUT  NOCOPY VARCHAR2,
   P_CALLING_FN               IN      VARCHAR2,
   P_TRANS_REC		      IN      FA_API_TYPES.TRANS_REC_TYPE,
   P_LEASE_DETAILS_REC_NEW    IN      FA_API_TYPES.LEASE_DETAILS_REC_TYPE) AS

   VALUE_ERROR_EXCEPTION       EXCEPTION;
Line: 276

   L_UPDATE_FLAG               VARCHAR2(1):= NULL;
Line: 277

   L_OK_TO_UPDATE_LESSOR       VARCHAR2(1):= NULL;
Line: 278

   L_ATLEAST_ONE_UPDATE        NUMBER := 0;
Line: 279

   L_API_NAME                  CONSTANT VARCHAR2(30) := 'UPDATE_LEASE';
Line: 285

	SAVEPOINT UPDATE_LEASE;
Line: 320

	IF NOT FA_LEASE_PVT.VALIDATION_UPDATE_LEASE(L_LEASE_DETAILS_REC_NEW,L_OK_TO_UPDATE_LESSOR,
                          p_log_level_rec => g_log_level_rec) THEN
	   RAISE VALUE_ERROR_EXCEPTION;
Line: 330

		FND_MESSAGE.SET_TOKEN ('CALLING_FN','UPDATE_LEASE');
Line: 335

	IF L_OK_TO_UPDATE_LESSOR = 'Y'
		AND L_LEASE_DETAILS_REC_NEW.LESSOR_ID IS NOT NULL
		AND L_LEASE_DETAILS_REC_NEW.LESSOR_SITE_ID IS NOT NULL THEN
		NULL;
Line: 345

	-- CALL UPDATE STATEMENT
	-----------------------------------------
	 FA_LEASE_PVT.UPDATE_ROW
		(X_ROWID	      =>NULL,
            	X_LEASE_ID            =>L_LEASE_DETAILS_REC_NEW.LEASE_ID,
 		X_LESSOR_ID           =>L_LEASE_DETAILS_REC_NEW.LESSOR_ID  ,
		X_LESSOR_SITE_ID      =>L_LEASE_DETAILS_REC_NEW.LESSOR_SITE_ID ,
		X_DESCRIPTION         =>L_LEASE_DETAILS_REC_NEW.DESCRIPTION   ,
		X_LAST_UPDATE_DATE    =>P_TRANS_REC.WHO_INFO.LAST_UPDATE_DATE ,
		X_LAST_UPDATED_BY     =>P_TRANS_REC.WHO_INFO.LAST_UPDATED_BY  ,
		X_ATTRIBUTE1          =>L_LEASE_DETAILS_REC_NEW.DESC_FLEX.ATTRIBUTE1 ,
		X_ATTRIBUTE2          =>L_LEASE_DETAILS_REC_NEW.DESC_FLEX.ATTRIBUTE2 ,
		X_ATTRIBUTE3          =>L_LEASE_DETAILS_REC_NEW.DESC_FLEX.ATTRIBUTE3 ,
		X_ATTRIBUTE4          =>L_LEASE_DETAILS_REC_NEW.DESC_FLEX.ATTRIBUTE4 ,
		X_ATTRIBUTE5          =>L_LEASE_DETAILS_REC_NEW.DESC_FLEX.ATTRIBUTE5 ,
		X_ATTRIBUTE6          =>L_LEASE_DETAILS_REC_NEW.DESC_FLEX.ATTRIBUTE6 ,
		X_ATTRIBUTE7          =>L_LEASE_DETAILS_REC_NEW.DESC_FLEX.ATTRIBUTE7 ,
		X_ATTRIBUTE8          =>L_LEASE_DETAILS_REC_NEW.DESC_FLEX.ATTRIBUTE8 ,
		X_ATTRIBUTE9          =>L_LEASE_DETAILS_REC_NEW.DESC_FLEX.ATTRIBUTE9 ,
		X_ATTRIBUTE10         =>L_LEASE_DETAILS_REC_NEW.DESC_FLEX.ATTRIBUTE10 ,
		X_ATTRIBUTE11         =>L_LEASE_DETAILS_REC_NEW.DESC_FLEX.ATTRIBUTE11 ,
		X_ATTRIBUTE12         =>L_LEASE_DETAILS_REC_NEW.DESC_FLEX.ATTRIBUTE12 ,
		X_ATTRIBUTE13         =>L_LEASE_DETAILS_REC_NEW.DESC_FLEX.ATTRIBUTE13 ,
		X_ATTRIBUTE14         =>L_LEASE_DETAILS_REC_NEW.DESC_FLEX.ATTRIBUTE14 ,
		X_ATTRIBUTE15         =>L_LEASE_DETAILS_REC_NEW.DESC_FLEX.ATTRIBUTE15 ,
		X_ATTRIBUTE_CATEGORY_CODE=>L_LEASE_DETAILS_REC_NEW.DESC_FLEX.ATTRIBUTE_CATEGORY_CODE
		,p_log_level_rec => g_log_level_rec);
Line: 374

    		FA_DEBUG_PKG.ADD('AFTER UPDATE','LEASE_ID',L_LEASE_DETAILS_REC_NEW.LEASE_ID,
                                  p_log_level_rec => g_log_level_rec);
Line: 390

        	ROLLBACK TO UPDATE_LEASE;
Line: 393

       		ROLLBACK TO UPDATE_LEASE;
Line: 396

END UPDATE_LEASE;