DBA Data[Home] [Help]

APPS.FA_ADD_WARRANTY_PKG SQL Statements

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

Line: 4

  PROCEDURE Update_Table(WR_warranty_id      NUMBER,
                     WR_old_warranty_id      NUMBER,
		     WR_asset_id         NUMBER,
		     WR_date_effective   DATE DEFAULT sysdate,
		     WR_date_ineffective  DATE,
		     WR_last_update_date DATE,
		     WR_last_updated_by  NUMBER,
		     WR_created_by       NUMBER DEFAULT -1,
		     WR_creation_date    DATE DEFAULT sysdate,
		     WR_last_update_login NUMBER DEFAULT -1,
		     WR_update_row       VARCHAR2,
		     WR_insert_row       VARCHAR2,
		     WR_calling_fn	 VARCHAR2,
		     p_log_level_rec        IN     FA_API_TYPES.log_level_rec_type default null
                    )   IS

	h_date_effective 	DATE;
Line: 21

	h_last_update_date	DATE;
Line: 22

	h_last_updated_by	NUMBER;
Line: 28

	h_last_update_date := WR_last_update_date;
Line: 29

	h_last_updated_by  := WR_last_updated_by;
Line: 35

	IF (h_last_update_date IS NULL) THEN
		h_last_update_date := sysdate;
Line: 39

	IF (h_last_updated_by IS NULL) THEN
		h_last_updated_by := -1;
Line: 44

	IF (WR_update_row = 'YES') THEN
 	 	Update_Row(X_old_warranty_id    =>WR_old_warranty_id ,
		     X_asset_id         =>WR_asset_id,
		     X_date_ineffective =>WR_date_ineffective,
		     X_last_update_date =>h_last_update_date,
		     X_last_updated_by  =>h_last_updated_by ,
		     X_last_update_login=>WR_last_update_login ,
		     X_calling_fn	=>'FA_ADD_WARRANTY_PKG.Update_Table'
		     ,p_log_level_rec => p_log_level_rec);
Line: 55

	IF (WR_insert_row = 'YES') THEN
	  	Insert_Row(X_warranty_id=>WR_warranty_id ,
		     X_asset_id         =>WR_asset_id,
		     X_date_effective   =>h_date_effective ,
		     X_last_update_date =>h_last_update_date,
		     X_last_updated_by  =>h_last_updated_by ,
		     X_created_by       =>WR_created_by,
		     X_creation_date    =>WR_creation_date,
		     X_last_update_login=>WR_last_update_login ,
		     X_calling_fn	=>'FA_ADD_WARRANTY_PKG.Update_Table'
		     ,p_log_level_rec => p_log_level_rec);
Line: 71

				CALLED_FN => 'FA_INS_WARRANTY_PKG.Update_Table',
				CALLING_FN => WR_calling_fn
				,p_log_level_rec => p_log_level_rec);
Line: 74

  END Update_Table;
Line: 80

  PROCEDURE Update_Row(X_old_warranty_id     NUMBER,
		     X_asset_id          NUMBER,
		     X_date_ineffective  DATE DEFAULT sysdate,
		     X_last_update_date  DATE DEFAULT sysdate,
		     X_last_updated_by   NUMBER DEFAULT -1,
		     X_last_update_login NUMBER DEFAULT -1,
		     X_calling_fn	 VARCHAR2,
		     p_log_level_rec        IN     FA_API_TYPES.log_level_rec_type default null
                     ) IS
  BEGIN
  	UPDATE fa_add_warranties
	SET date_ineffective = X_date_ineffective,
	    last_update_date = X_last_update_date,
	    last_updated_by  = X_last_updated_by,
	    last_update_login= X_last_update_login
	WHERE asset_id = X_asset_id
	AND   warranty_id =  X_old_warranty_id
	AND   date_ineffective IS NULL;
Line: 102

				CALLED_FN => 'FA_INS_WARRANTY_PKG.Update_Row',
				CALLING_FN => X_calling_fn
				,p_log_level_rec => p_log_level_rec);
Line: 105

  END Update_Row;
Line: 110

  PROCEDURE Insert_Row(X_warranty_id      NUMBER,
		     X_asset_id         NUMBER,
		     X_date_effective   DATE,
		     X_last_update_date DATE,
		     X_last_updated_by  NUMBER,
		     X_created_by       NUMBER DEFAULT -1,
		     X_creation_date    DATE DEFAULT sysdate,
		     X_last_update_login NUMBER DEFAULT -1,
		     X_calling_fn	 VARCHAR2,
		     p_log_level_rec        IN     FA_API_TYPES.log_level_rec_type default null
                     )   IS
  BEGIN
	INSERT INTO fa_add_warranties(
	warranty_id,
	asset_id,
	date_effective,
	last_update_date,
	last_updated_by,
	created_by,
	creation_date,
	last_update_login)
	VALUES (X_warranty_id,
		X_asset_id,
		X_date_effective,
		X_last_update_date,
		X_last_updated_by,
		X_created_by,
		X_creation_date,
		X_last_update_login);
Line: 142

				CALLED_FN => 'FA_INS_WARRANTY_PKG.Insert_Row',
				CALLING_FN => X_calling_fn
				,p_log_level_rec => p_log_level_rec);
Line: 145

  END Insert_Row;