eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.FA_LEASE_PVT SQL Statements

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

Line: 12


	   SELECT VENDOR_ID
	   FROM PO_VENDORS
	   WHERE VENDOR_ID= P_VENDOR_ID;

Line: 50


	   SELECT VENDOR_ID
	   FROM PO_VENDORS
	   WHERE VENDOR_NAME= P_VENDOR_NAME;

Line: 88


	SELECT PAYMENT_SCHEDULE_ID
	FROM FA_LEASE_SCHEDULES
	WHERE PAYMENT_SCHEDULE_ID = P_PAYMENT_SCHEDULE_ID;

Line: 126


	   SELECT PAYMENT_SCHEDULE_ID
	   FROM FA_LEASE_SCHEDULES
	   WHERE PAYMENT_SCHEDULE_NAME = P_PAYMENT_SCHEDULE_NAME;

Line: 164


	  SELECT TERM_ID FROM
	  AP_TERMS_BAT_PAY_TERMS_V
	  WHERE TERM_ID = P_TERMS_ID;

Line: 202


	  SELECT TERM_ID FROM
	  AP_TERMS_BAT_PAY_TERMS_V
	  WHERE TERMS = P_PAYMENT_TERMS;

Line: 243


      	SELECT
	PVS.VENDOR_SITE_ID
	,SOB.CHART_OF_ACCOUNTS_ID COA_ID
        ,PVS.ORG_ID LESSOR_SITE_ORG_ID
	FROM GL_SETS_OF_BOOKS SOB
	,HR_ALL_ORGANIZATION_UNITS HAO
	,PO_VENDOR_SITES_ALL PVS
	,AP_SYSTEM_PARAMETERS_ALL AP
	WHERE PVS.VENDOR_ID = P_VENDOR_ID
        AND PVS.VENDOR_SITE_ID = P_VENDOR_SITE_ID
	AND PVS.ORG_ID IS NOT NULL
	AND AP.ORG_ID = PVS.ORG_ID
	AND SOB.SET_OF_BOOKS_ID = AP.SET_OF_BOOKS_ID
	AND HAO.ORGANIZATION_ID = PVS.ORG_ID
	UNION
	SELECT PVS.VENDOR_SITE_ID
	,SOB.CHART_OF_ACCOUNTS_ID COA_ID
        ,PVS.ORG_ID LESSOR_SITE_ORG_ID
	FROM GL_SETS_OF_BOOKS SOB
	,AP_SYSTEM_PARAMETERS_ALL AP
	,PO_VENDOR_SITES_ALL PVS
	WHERE PVS.VENDOR_ID = P_VENDOR_ID
  	AND PVS.VENDOR_SITE_ID = P_VENDOR_SITE_ID
	AND PVS.ORG_ID IS NULL
	AND AP.ORG_ID IS NULL
	AND SOB.SET_OF_BOOKS_ID = AP.SET_OF_BOOKS_ID;

Line: 313


      	SELECT
	PVS.VENDOR_SITE_ID
	,SOB.CHART_OF_ACCOUNTS_ID COA_ID
	FROM GL_SETS_OF_BOOKS SOB
	,HR_ALL_ORGANIZATION_UNITS HAO
	,PO_VENDOR_SITES_ALL PVS
	,AP_SYSTEM_PARAMETERS_ALL AP
	WHERE PVS.VENDOR_ID = P_VENDOR_ID
      	AND PVS.VENDOR_SITE_CODE = P_VENDOR_SITE_CODE
	AND PVS.ORG_ID IS NOT NULL
	AND AP.ORG_ID = PVS.ORG_ID
	AND SOB.SET_OF_BOOKS_ID = AP.SET_OF_BOOKS_ID
	AND HAO.ORGANIZATION_ID = PVS.ORG_ID
      	AND PVS.ORG_ID = P_VENDOR_SITE_ORG_ID
	UNION
	SELECT PVS.VENDOR_SITE_ID
	,SOB.CHART_OF_ACCOUNTS_ID COA_ID
	FROM GL_SETS_OF_BOOKS SOB
	,AP_SYSTEM_PARAMETERS_ALL AP
	,PO_VENDOR_SITES_ALL PVS
	WHERE PVS.VENDOR_ID = P_VENDOR_ID
  	AND PVS.VENDOR_SITE_CODE = P_VENDOR_SITE_CODE
	AND PVS.ORG_ID IS NULL
	AND AP.ORG_ID IS NULL
	AND SOB.SET_OF_BOOKS_ID = AP.SET_OF_BOOKS_ID;

Line: 378


      	SELECT
	CODE_COMBINATION_ID
	FROM GL_CODE_COMBINATIONS_V
	WHERE CODE_COMBINATION_ID = P_DIST_CODE_COMBINATION_ID
      	AND CHART_OF_ACCOUNTS_ID = P_COA_ID
      	AND ENABLED_FLAG = 'Y';

Line: 448


	      SELECT  LEASE_ID
	      FROM    FA_LEASES
	      WHERE   LEASE_NUMBER = P_LEASE_NUMBER
	      AND     LESSOR_ID = P_LESSOR_ID;

Line: 491


       	SELECT CURRENCY_CODE
       	FROM FA_LEASE_SCHEDULES
       	WHERE PAYMENT_SCHEDULE_ID = P_PAYMENT_SCHEDULE_ID;

Line: 536


	SELECT LOOKUP_CODE
	FROM FA_LOOKUPS WHERE
	LOOKUP_TYPE='LEASE TYPES'
	AND LOOKUP_CODE = UPPER(P_LEASE_TYPE)
	AND ENABLED_FLAG = 'Y'
	AND SYSDATE BETWEEN NVL(START_DATE_ACTIVE,SYSDATE) AND NVL(END_DATE_ACTIVE,SYSDATE);

Line: 578


	   SELECT VENDOR_ID
	   FROM PO_VENDORS
	   WHERE VENDOR_NAME= P_VENDOR_NAME ;

Line: 583


	   SELECT VENDOR_ID
	   FROM PO_VENDORS
	   WHERE VENDOR_ID= P_VENDOR_ID ;

Line: 635


      	SELECT  LEASE_ID
      	FROM    FA_LEASES
      	WHERE   LEASE_NUMBER = P_LEASE_NUMBER
	AND     LESSOR_ID = P_LESSOR_ID;

Line: 681


	SELECT LEASE_ID INTO L_LEASE_ID
	FROM FA_LEASES
	WHERE LEASE_ID = P_LEASE_ID;

Line: 702


FUNCTION CHECK_LEASE_UPDATE
(P_LEASE_ID IN NUMBER,
 p_log_level_rec        IN     FA_API_TYPES.log_level_rec_type default null)
RETURN VARCHAR2 AS

	L_COUNT NUMBER:=0;

Line: 711


	SELECT COUNT(*) INTO L_COUNT
	FROM FA_ADDITIONS_B
	WHERE LEASE_ID = P_LEASE_ID;

Line: 724


      FND_MESSAGE.SET_TOKEN ('CALLING_FN','CHECK_LEASE_UPDATE');

Line: 728


       FA_SRVR_MSG.ADD_SQL_ERROR('CHECK_LEASE_UPDATE'
       ,p_log_level_rec => p_log_level_rec);

Line: 731


END CHECK_LEASE_UPDATE;

Line: 750


	   SELECT
	    LEASE_NUMBER,
	    LESSOR_ID,
	    LESSOR_SITE_ID,
	    B.ORG_ID LESSOR_SITE_ORG_ID
	   INTO
	    L_LEASE_NUMBER,
	    L_LESSOR_ID,
	    L_LESSOR_SITE_ID,
	    L_LESSOR_SITE_ORG_ID
	   FROM FA_LEASES A,
	   PO_VENDOR_SITES_ALL B
	   WHERE A.LEASE_ID = P_LEASE_ID
	   AND A.LESSOR_SITE_ID = B.VENDOR_SITE_ID;

Line: 816


	   SELECT PRESENT_VALUE
	   FROM FA_LEASE_SCHEDULES
	   WHERE PAYMENT_SCHEDULE_ID= L_PAYMENT_SCHEDULE_ID;

Line: 914


	-- CHECK FOR CODE COMBINATION, IF DYNAMIC INSERT IS ON AND IF CODE COMBINATION DOES NOT EXISTS, IT
	-- WILL INSERT A NEW CODE COMBINATION
	--------------------------------------------------------------------------------------------------

	 IF PX_LEASE_DETAILS_REC.DIST_CODE_COMBINATION_ID IS NULL THEN
	    IF  PX_LEASE_DETAILS_REC.CON_DIST_CODE_COMBINATION IS NULL THEN
 		FND_MESSAGE.SET_NAME ('OFA','FA_INV_CODE_COMBINATION');

Line: 1111


FUNCTION VALIDATION_UPDATE_LEASE  (
   PX_LEASE_DETAILS_REC_NEW	      	IN  OUT    NOCOPY FA_API_TYPES.LEASE_DETAILS_REC_TYPE,
   X_OK_TO_UPDATE_FLAG			OUT 	   NOCOPY VARCHAR2,
   p_log_level_rec        IN     FA_API_TYPES.log_level_rec_type default null) RETURN BOOLEAN AS

	VALUE_ERROR_EXCEPTION               	EXCEPTION;

Line: 1119


	L_UPDATE_FLAG 				VARCHAR2(1):=NULL;

Line: 1122


	L_UPDATE_STATEMET			VARCHAR2(3000):=NULL;

Line: 1123


	L_OK_TO_UPDATE_LESSOR			VARCHAR2(1):=NULL;

Line: 1125


	L_ATLEAST_ONE_UPDATE			NUMBER:=0;

Line: 1156


      	  		FND_MESSAGE.SET_TOKEN ('CALLING_FN','VALIDATION_UPDATE_LEASE');

Line: 1198


	-- CHECK IF LEASE CAN BE UPDATED
	---------------------------------------

	L_UPDATE_FLAG :=CHECK_LEASE_UPDATE(PX_LEASE_DETAILS_REC_NEW.LEASE_ID
				,p_log_level_rec => p_log_level_rec);

Line: 1205


	-- CHECK IF LESSOR AND SITE IS SAME AS IN THE DATABASE DO NOT BOTHER TO UPDATE, IF NOT MAKE
	-- SURE THAT THEY ARE IN THE SAME OPERATING UNIT AS PREVIOUS LESSOR AND  LESSOR SITE
	----------------------------------------------------------------------------------------------
	L_OK_TO_UPDATE_LESSOR :='N';

Line: 1212


	   IF  L_UPDATE_FLAG = 'Y' THEN
	   	IF VALIDATE_LEASE_LESSOR(L_LEASE_ID,L_LESSOR_ID,L_LESSOR_SITE_ID,L_LESSOR_SITE_ORG_ID)  THEN
	       L_OK_TO_UPDATE_LESSOR :='Y';

Line: 1216


	       FND_MESSAGE.SET_NAME ('OFA','FA_LEASE_CANNOT_BE_UPDATED');

Line: 1217


      	 FND_MESSAGE.SET_TOKEN ('CALLING_FN','VALIDATION_UPDATE_LEASE');

Line: 1222


		 FND_MESSAGE.SET_NAME ('OFA','FA_LEASE_CANNOT_BE_UPDATED');

Line: 1223


      	 FND_MESSAGE.SET_TOKEN ('CALLING_FN','VALIDATION_UPDATE_LEASE');

Line: 1229


	X_OK_TO_UPDATE_FLAG:=L_OK_TO_UPDATE_LESSOR;

Line: 1238


END VALIDATION_UPDATE_LEASE;

Line: 1240


PROCEDURE UPDATE_ROW (
	X_ROWID                         IN 		VARCHAR2 DEFAULT NULL,
      	X_LEASE_ID                      IN            	NUMBER,
	X_LESSOR_ID                     IN            	NUMBER,
	X_LESSOR_SITE_ID                IN              NUMBER,
	X_DESCRIPTION                   IN            	VARCHAR2,
	X_LAST_UPDATE_DATE              IN            	DATE,
	X_LAST_UPDATED_BY               IN            	NUMBER,
	X_ATTRIBUTE1                    IN              VARCHAR2,
	X_ATTRIBUTE2                    IN              VARCHAR2,
	X_ATTRIBUTE3                    IN              VARCHAR2,
	X_ATTRIBUTE4                    IN              VARCHAR2,
	X_ATTRIBUTE5                    IN              VARCHAR2,
	X_ATTRIBUTE6                    IN              VARCHAR2,
	X_ATTRIBUTE7                    IN              VARCHAR2,
	X_ATTRIBUTE8                    IN              VARCHAR2,
	X_ATTRIBUTE9                    IN              VARCHAR2,
	X_ATTRIBUTE10                   IN              VARCHAR2,
	X_ATTRIBUTE11                   IN              VARCHAR2,
	X_ATTRIBUTE12                   IN              VARCHAR2,
	X_ATTRIBUTE13                   IN              VARCHAR2,
	X_ATTRIBUTE14                   IN              VARCHAR2,
	X_ATTRIBUTE15                   IN              VARCHAR2,
	X_ATTRIBUTE_CATEGORY_CODE       IN              VARCHAR2,
        p_log_level_rec        IN     FA_API_TYPES.log_level_rec_type default null)
 IS
  BEGIN
    IF X_ROWID IS NOT NULL THEN
     UPDATE FA_LEASES
     	SET
	LESSOR_ID                         = NVL(X_LESSOR_ID,LESSOR_ID),
	DESCRIPTION                    	  = NVL(X_DESCRIPTION,DESCRIPTION),
	LAST_UPDATE_DATE               	  = DECODE(X_LAST_UPDATE_DATE,NULL,LAST_UPDATE_DATE,X_LAST_UPDATE_DATE),
	LAST_UPDATED_BY                	  = DECODE(X_LAST_UPDATED_BY,NULL,LAST_UPDATED_BY,FND_API.G_MISS_NUM,NULL,X_LAST_UPDATED_BY),
	ATTRIBUTE1                     	  = DECODE(X_ATTRIBUTE1,NULL,ATTRIBUTE1,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE1),
	ATTRIBUTE2                     	  = DECODE(X_ATTRIBUTE2,NULL,ATTRIBUTE2,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE2),
	ATTRIBUTE3                     	  = DECODE(X_ATTRIBUTE3,NULL,ATTRIBUTE3,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE3),
	ATTRIBUTE4                     	  = DECODE(X_ATTRIBUTE4,NULL,ATTRIBUTE4,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE4),
	ATTRIBUTE5                     	  = DECODE(X_ATTRIBUTE5,NULL,ATTRIBUTE5,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE5),
	ATTRIBUTE6                     	  = DECODE(X_ATTRIBUTE6,NULL,ATTRIBUTE6,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE6),
	ATTRIBUTE7                     	  = DECODE(X_ATTRIBUTE7,NULL,ATTRIBUTE7,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE7),
	ATTRIBUTE8                     	  = DECODE(X_ATTRIBUTE8,NULL,ATTRIBUTE8,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE8),
	ATTRIBUTE9                     	  = DECODE(X_ATTRIBUTE9,NULL,ATTRIBUTE9,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE9),
	ATTRIBUTE10                    	  = DECODE(X_ATTRIBUTE10,NULL,ATTRIBUTE10,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE10),
	ATTRIBUTE11                    	  = DECODE(X_ATTRIBUTE11,NULL,ATTRIBUTE11,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE11),
	ATTRIBUTE12                    	  = DECODE(X_ATTRIBUTE12,NULL,ATTRIBUTE12,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE12),
	ATTRIBUTE13                    	  = DECODE(X_ATTRIBUTE13,NULL,ATTRIBUTE13,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE13),
	ATTRIBUTE14                    	  = DECODE(X_ATTRIBUTE14,NULL,ATTRIBUTE14,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE14),
	ATTRIBUTE15                    	  = DECODE(X_ATTRIBUTE15,NULL,ATTRIBUTE15,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE15),
	ATTRIBUTE_CATEGORY_CODE        	  = DECODE(X_ATTRIBUTE_CATEGORY_CODE,NULL,ATTRIBUTE_CATEGORY_CODE,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE_CATEGORY_CODE),
	LESSOR_SITE_ID                 	  = NVL(X_LESSOR_SITE_ID,LESSOR_SITE_ID)
	WHERE ROWID = X_ROWID;

Line: 1293


      UPDATE FA_LEASES
     	SET
	LESSOR_ID                         = NVL(X_LESSOR_ID,LESSOR_ID),
	DESCRIPTION                    	  = NVL(X_DESCRIPTION,DESCRIPTION),
	LAST_UPDATE_DATE               	  = DECODE(X_LAST_UPDATE_DATE,NULL,LAST_UPDATE_DATE,X_LAST_UPDATE_DATE),
	LAST_UPDATED_BY                	  = DECODE(X_LAST_UPDATED_BY,NULL,LAST_UPDATED_BY,FND_API.G_MISS_NUM,NULL,X_LAST_UPDATED_BY),
	ATTRIBUTE1                     	  = DECODE(X_ATTRIBUTE1,NULL,ATTRIBUTE1,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE1),
	ATTRIBUTE2                     	  = DECODE(X_ATTRIBUTE2,NULL,ATTRIBUTE2,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE2),
	ATTRIBUTE3                     	  = DECODE(X_ATTRIBUTE3,NULL,ATTRIBUTE3,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE3),
	ATTRIBUTE4                     	  = DECODE(X_ATTRIBUTE4,NULL,ATTRIBUTE4,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE4),
	ATTRIBUTE5                     	  = DECODE(X_ATTRIBUTE5,NULL,ATTRIBUTE5,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE5),
	ATTRIBUTE6                     	  = DECODE(X_ATTRIBUTE6,NULL,ATTRIBUTE6,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE6),
	ATTRIBUTE7                     	  = DECODE(X_ATTRIBUTE7,NULL,ATTRIBUTE7,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE7),
	ATTRIBUTE8                     	  = DECODE(X_ATTRIBUTE8,NULL,ATTRIBUTE8,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE8),
	ATTRIBUTE9                     	  = DECODE(X_ATTRIBUTE9,NULL,ATTRIBUTE9,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE9),
	ATTRIBUTE10                    	  = DECODE(X_ATTRIBUTE10,NULL,ATTRIBUTE10,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE10),
	ATTRIBUTE11                    	  = DECODE(X_ATTRIBUTE11,NULL,ATTRIBUTE11,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE11),
	ATTRIBUTE12                    	  = DECODE(X_ATTRIBUTE12,NULL,ATTRIBUTE12,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE12),
	ATTRIBUTE13                    	  = DECODE(X_ATTRIBUTE13,NULL,ATTRIBUTE13,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE13),
	ATTRIBUTE14                    	  = DECODE(X_ATTRIBUTE14,NULL,ATTRIBUTE14,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE14),
	ATTRIBUTE15                    	  = DECODE(X_ATTRIBUTE15,NULL,ATTRIBUTE15,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE15),
	ATTRIBUTE_CATEGORY_CODE        	  = DECODE(X_ATTRIBUTE_CATEGORY_CODE,NULL,ATTRIBUTE_CATEGORY_CODE,FND_API.G_MISS_CHAR,NULL,X_ATTRIBUTE_CATEGORY_CODE),
	LESSOR_SITE_ID                 	  = NVL(X_LESSOR_SITE_ID,LESSOR_SITE_ID)
	WHERE LEASE_ID = X_LEASE_ID;

Line: 1326


		CALLING_FN => 'FA_LEASE_PVT.UPDATE_ROW'
		,p_log_level_rec => p_log_level_rec);

Line: 1329


END UPDATE_ROW;