#=============================================================================================
# @TITLE			Set NEW LOCATION for parallel Backup medium
#
# @NUMBER			DBM3_BackupP_018_ContinueCompleteBackupNL
#
# @DESCRIPTION		Setting new Location for parallel backup medium.
#
# @EXP_RESULT		The parallel backup will continue and will finish.
#=============================================================================================
TestName = getvar("testname");
#=============================================================================================
# @STEP 1			Check if window szill exists.
#=============================================================================================
if (win_exists("Database Manager Backup Wizard",0) == 0) {
	
	tl_step("Database Manager Backup Wizard - Window Check", "0", "Window still open. - TN: " & Testname);
#=============================================================================================
# @STEP 2			Check Header Title.
#=============================================================================================	
	set_window ("Database Manager Backup Wizard", 2);
	
	ActiveX_get_info("DBMWfr2.Framework", "HeaderTitle", Header);
	ActiveX_get_info("DBMWfr2.Framework", "HeaderSubtitle", SubHeader);
	
	if (Header == "Replace Backup Medium" &&
		SubHeader == "Replace medium and continue Complete Data backup.") {
		
		tl_step ("Medium for Backup - Back button", "0", "Header and SubHeader correct. - TN: " & Testname);
	} else {
		tl_step ("Medium for Backup - Back button", "1", "Header and SubHeader incorrect. - TN: " & Testname);
		tl_step ("Medium for Backup - Back button", "1", "Header: '" & Header & "' expected: 'Replace Medium'. - TN: " & Testname);
		tl_step ("Medium for Backup - Back button", "1", "SubHeader: '" & SubHeader & "' expected: 'Replace medium and continue Complete Data backup.'. - TN: " & Testname);
	}
#=============================================================================================
# @STEP 3			Checking entries in lvwMedia.
#=============================================================================================	
	set_window ("Database Manager Backup Wizard", 2);
	
	L_RC_1 = obj_exists("ThunderRT6OptionButton_0",0);
	L_RC_2 = obj_exists("ThunderRT6OptionButton_1",0);
	L_RC_3 = obj_exists("txtLocation",0);
	obj_get_info ("Start", "label", value);
	
	win_activate ("Database Manager Backup Wizard");
		
	if (L_RC_1 == 0 &&
		L_RC_2 == 0 &&
		L_RC_3 == 0 &&
		value == "Continue") {
		
		tl_step ("Start Backup - Summary Overview", "0", "Seems to be o.k.. - TN: " & Testname);
	} else {
		tl_step ("Start Backup - Summary Overview", "1", "At least one entry not found. - TN: " & Testname);
		tl_step ("Start Backup - Summary Overview", "1", "L_RC_1: " & L_RC_1 & " expected: 0 - 'New Location Radiobutton'. - TN: " & Testname);
		tl_step ("Start Backup - Summary Overview", "1", "L_RC_2: " & L_RC_2 & " expected: 0 - 'Ignore Radiobutton'. - TN: " & Testname);
		tl_step ("Start Backup - Summary Overview", "1", "L_RC_3: " & L_RC_3 & " expected: 0 - 'txtLocation'. - TN: " & Testname);
		tl_step ("Start Backup - Summary Overview", "1", "Caption: " & value & " expected: 'Caption'. - TN: " & Testname);
	}
#=============================================================================================
# @STEP 4			Setting new Location and 'Continue'.
#=============================================================================================
	set_window ("Database Manager Backup Wizard", 2);

	edit_set ("txtLocation", database & "_COM_NL_03");
	button_press ("Start");							# Continue button - Caption is Continue
	
	wait(10);
} else {
	
	tl_step("Database Manager Backup Wizard - Window Check", "1", "Window not open. - TN: " & Testname);
	WizardOpen = 0;
}
