#=============================================================================================
#
# @TITLE			Configure users - Rename/Delete user in group
#
# @NUMBER			DBM3_DBUser_016_Configure_users_NewUser_inG_rename_delete
#
# @DESCRIPTION		Rename/Delete User in group
#
#=============================================================================================

static TestName = "DBM3_DBUser_016_Configure_users_NewUser_inG_rename_delete";
static expHeaderTitle = "Configure Database Users / User Groups";
static expHeaderSubtitle = "Configure database user for the database administrator 'DBA'.";
static Failure = 0;

#=============================================================================================
# @STEP 1			check if Config Wizard is open --> texit
#=============================================================================================
if (win_exists("Configuration Wizard",0) != E_OK)
{
	tl_step ("Wizard not open",1,"Testname: " & TestName & ", Line:" & getvar("line_no"));
	texit("true");
}	

#=============================================================================================
# @STEP 2		check header title ---> texit
#=============================================================================================	
#get header title
set_window("Configuration Wizard", 1);
ActiveX_get_info("DBMWfr3.Framework","HeaderTitle",HeaderTitle);
ActiveX_get_info("DBMWfr3.Framework","HeaderSubtitle",HeaderSubtitle);

# check if header title is correct
if (HeaderTitle != expHeaderTitle || HeaderSubtitle != expHeaderSubtitle)
{
	tl_step ("Header title not correct",1,"Testname: " & TestName & ", Line:" & getvar("line_no"));
	texit("true");
}


static function del_user(in user,in TestName,in Failure)
{
static btn_NewUser;
static btn_NewUserGroup;
static btn_Properties;
static btn_Copy;
static btn_Delete;
static btn_Rename;
static checked;
static checked_2;
static item_count_before_del;
static item_count;
static item_value;
static i;
static rename_success;

#=============================================================================================
# @STEP 3		Check user ---> texit
#=============================================================================================	
set_window ("Configuration Wizard", 1);
if (list_select_item ("lvwSQLUser", user) != E_OK)
{
	tl_step ("No user",1,"Testname: " & TestName & ", Line:" & getvar("line_no"));
	texit("true");
}


#=============================================================================================
# @STEP 4		Check  Toolbar Buttons
#=============================================================================================	

toolbar_get_button_info("msvb_lib_toolbar","New User",ENABLED,btn_NewUser);
toolbar_get_button_info("msvb_lib_toolbar","New User Group",ENABLED,btn_NewUserGroup);
toolbar_get_button_info("msvb_lib_toolbar","Properties",ENABLED,btn_Properties);
toolbar_get_button_info("msvb_lib_toolbar","Copy",ENABLED,btn_Copy);
toolbar_get_button_info("msvb_lib_toolbar","Delete",ENABLED,btn_Delete);
toolbar_get_button_info("msvb_lib_toolbar","Rename",ENABLED,btn_Rename);

if (btn_NewUser == 0 || btn_NewUserGroup == 0 || btn_Properties == 0 || btn_Copy == 0 || btn_Delete == 0 || btn_Rename == 0 )
{
	tl_step ("Toolbar Buttons not in correct state",1,"Testname: " & TestName & ", Line:" & getvar("line_no")); 
	Failure = 1;
}

#=============================================================================================
# @STEP 5		rename the user 
#=============================================================================================	

toolbar_button_press ("msvb_lib_toolbar", "Rename");
edit_set ("Edit", user & "_RENAME");
obj_type ("Edit","<kReturn>");
#set_window("Configuration Wizard");

wait(2);
list_get_info("lvwSQLUser","count",item_count);
rename_success = "false";
for(i=0;i<item_count;i++)
{
	list_get_item("lvwSQLUser",i,item_value);
	if (item_value == user & "_RENAME")
	{
		rename_success = "true";
	}
}

if (rename_success == "false")
{
	tl_step ("No "user & "_RENAME - renaming failed",1,"Testname: " & TestName & ", Line:" & getvar("line_no"));
	Failure = 1;
}

toolbar_button_press ("msvb_lib_toolbar", "Rename");
edit_set ("Edit", user);

#=============================================================================================
# @STEP 6		Delete the user 
#=============================================================================================	

#count items before delete
list_get_info("lvwSQLUser","count",item_count_before_del);

#=============================================================================================
# @STEP 6.1		cancel delete & check if user exists anymore
#=============================================================================================	

toolbar_button_press ("msvb_lib_toolbar", "Delete");

if (win_exists("Confirm SQL User Delete_1",0) != E_OK)
{
	tl_step ("Confirm Delete window not open",1,"Testname: " & TestName & ", Line:" & getvar("line_no"));
	texit("true");
}

set_window("Confirm SQL User Delete_1");
button_press("No");


if (win_exists("Configuration Wizard",0) != E_OK)
{
	tl_step ("No Configuration Wizard window after cancel delete user",1,"Testname: " & TestName & ", Line:" & getvar("line_no"));
	texit("true");
}

set_window("Configuration Wizard");

list_get_info("lvwSQLUser","count",item_count);
if (item_count != item_count_before_del)
{
	tl_step ("different number of members before and after CANCEL deleting",1,"Testname: " & TestName & ", Line:" & getvar("line_no"));
	texit("true");
}

#=============================================================================================
# @STEP 6.2		delete the user 
#=============================================================================================	

toolbar_button_press ("msvb_lib_toolbar", "Delete");

if (win_exists("Confirm SQL User Delete_1",0) != E_OK)
{
	tl_step ("Confirm Delete window not open",1,"Testname: " & TestName & ", Line:" & getvar("line_no"));
	texit("true");
}
set_window("Confirm SQL User Delete_1",0);
button_press ("Yes");

#=============================================================================================
# @STEP 7		check if user was deleted
#=============================================================================================	



if (win_exists("Configuration Wizard",0) != E_OK)
{
	tl_step ("No Configuration Wizard window",1,"Testname: " & TestName & ", Line:" & getvar("line_no"));
	texit("true");
}

set_window("Configuration Wizard");
wait(2);
list_get_info("lvwSQLUser","count",item_count);
if (item_count != item_count_before_del-1 )
{
	tl_step ("More than one item was deleted",1,"Testname: " & TestName & ", Line:" & getvar("line_no"));
	Failure = 1;
}
for(i=0;i<item_count;i++)
{
	list_get_item("lvwSQLUser",i,item_value);
	if (item_value == user)
	{
		tl_step (user & " still exists after deleting",1,"Testname: " & TestName & ", Line:" & getvar("line_no"));
		Failure = 1;
	}
}

toolbar_button_press ("msvb_lib_toolbar", "Close User Group");

#end of function del_user
return (Failure);
}

#=============================================================================================
# @STEP 8		call function -del_user-
#=============================================================================================	
Failure = del_user("TEST_USER_GROUP",TestName,Failure);

#=============================================================================================
# @STEP 9		check if test passed successfully
#=============================================================================================	
if (Failure == 0)
	tl_step ("Test passed successfully",0,"Testname: " & TestName & ", Line:" & getvar("line_no"));	
