APPS.CSF_PLAN_TERRS_PKG SQL Statements

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

Line: 16

Insert, lock and delete records in the CSF_PLAN_TERRS table.
Check uniqueness of columns PLAN_TERR_ID and TERR_ID/GROUP_ID combinations.
Check referential integrity of the TERR_ID and GROUP_ID columns.

History
-------
06-JAN-2000 ipels         - First creation
26-SEP-2000 ipels         - Fixed bug# 1413810
13-NOV-2002 jgrondel      Bug 2663989.
                          Added NOCOPY hint to procedure
                          out-parameters.
13-NOV-2002 jgrondel      Added dbdrv.
03-dec-2002 jgrondel      Bug 2692082.
                          Added NOCOPY hint to procedure
                          out-parameters.
30-Nov-2004 vrajeev       Bug Fixed 3224947
                          Changed code in Delete_Row
+========================================================================+
*/


PROCEDURE Check_Unique
( p_rowid    IN VARCHAR2,
  p_terr_id  IN NUMBER,
  p_group_id IN NUMBER
)
IS

	CURSOR c_unique IS
	  SELECT NULL
	    FROM csf_plan_terrs
	   WHERE ( p_rowid IS NULL OR rowid <> p_rowid )
		 AND terr_id  = p_terr_id
		 AND group_id = p_group_id;

Line: 76

	  SELECT NULL
	    FROM jtf_terr_all
	   WHERE terr_id  = p_terr_id;

Line: 81

	  SELECT NULL
	    FROM jtf_rs_groups_b
	   WHERE group_id  = p_group_id;

Line: 113

PROCEDURE Insert_Row
( x_rowid    IN OUT NOCOPY VARCHAR2,
  p_terr_id  IN     NUMBER,
  p_group_id IN     NUMBER
)
IS

	l_plan_terr_id	            NUMBER;

Line: 121

	l_last_update_date	    DATE   ;

Line: 122

	l_last_updated_by	    NUMBER ;

Line: 125

	l_last_update_login	    NUMBER ;

Line: 129

	  SELECT rowid
	    FROM csf_plan_terrs
	   WHERE plan_terr_id = l_plan_terr_id;

Line: 135

	l_last_update_date	    := SYSDATE;

Line: 136

	l_last_updated_by	    := FND_GLOBAL.User_Id;

Line: 139

	l_last_update_login	    := FND_GLOBAL.Login_Id;

Line: 141

	SELECT CSF_PLAN_TERRS_S.NEXTVAL
	  INTO l_plan_terr_id
	  FROM dual;

Line: 145

	INSERT INTO csf_plan_terrs
		( plan_terr_id			,
		  last_update_date		,
		  last_updated_by		,
		  creation_date			,
		  created_by			,
		  last_update_login		,
		  object_version_number		,
		  terr_id			,
		  group_id
		)
	VALUES
		( l_plan_terr_id		,
		  l_last_update_date		,
		  l_last_updated_by		,
		  l_creation_date		,
		  l_created_by			,
		  l_last_update_login		,
		  l_object_version_number	,
		  p_terr_id			,
		  p_group_id
		);

Line: 176

END Insert_Row;

Line: 179

PROCEDURE Delete_Row
( p_rowid IN VARCHAR2
)
IS
  l_selected_terr  varchar2(4000);

Line: 186

  CURSOR c_deleted_terr is
      SELECT terr_id
      FROM csf_plan_terrs
      WHERE rowid = p_rowid;

Line: 195

    OPEN c_deleted_terr;

Line: 196

    FETCH c_deleted_terr INTO l_del_terr;

Line: 197

    IF (c_deleted_terr%NOTFOUND) THEN
		CLOSE c_deleted_terr;

Line: 201

    CLOSE c_deleted_terr;

Line: 203

    l_selected_terr := csf_util_pvt.get_selected_terr(fnd_global.user_id);

Line: 205

    if l_selected_terr is not null
    then
       l_selected_terr := replace(l_selected_terr, l_del_terr);

Line: 208

       l_selected_terr := replace(l_selected_terr,',,',',');

Line: 209

       l_selected_terr := ltrim(l_selected_terr,',');

Line: 210

       l_selected_terr := rtrim(l_selected_terr,',');

Line: 213

       csf_util_pvt.set_selected_terr( l_selected_terr, fnd_global.user_id );

Line: 215

     DELETE FROM csf_plan_terrs
	      WHERE rowid = p_rowid;

Line: 221

END Delete_Row;

Line: 233

	  SELECT object_version_number
	    FROM csf_plan_terrs
	   WHERE rowid = p_rowid
		 FOR UPDATE NOWAIT;

Line: 244

		FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');