#=============================================================================================
# @TITLE					Check - Command - Check table
#
# @NUMBER					WDBM_FKT_02045
#
# @DESCRIPTION		The link for 'Check - Command' will be used and the shown table will be
# @								checked.
#
# @EXP_RESULT			The command line window will show up.
#
# @REQUIREMENTS		Test: WDBM_FKT_01000; WDBM_FKT_00100; WDBM_FKT_01010;
#=============================================================================================

public function trim (in str) {
	if (substr(str, 1, 1) == " ") {

		str = trim(substr(str, 2));
	}
	if (substr(str, length(str)) == " ") {
		str = trim(substr(str, 1, length(str)-1));
	}
	return (str);
}

#=============================================================================================
# @STEP 1			Clicking the link for Check - Backup.
#=============================================================================================
set_window (menu_window, 3);
web_link_click("Command");
#=============================================================================================
# @STEP 2			Checking window title.
#=============================================================================================
set_window(work_window, 1);
if (new_interface == "1") {
	web_obj_get_text ("Information - CACHES - DB73", "#1", "#1", cell_value_1, "", "", 1);
} else {
	tbl_get_cell_data ("Database/Servername", "#1", "#1", cell_value_1);
}

if ((cell_value_1 == "Command" && version == "7.3.00") ||
	(cell_value_1 == "Check - Command" && (version == "7.4.03" || version == "7.5.00" || version == "7.5.01" || version == "7.6.00"))) {
	
	tl_step(cell_value & "window has shown up","0","correct");
} else {
	tl_step(cell_value & "window has not shown up","1","incorrect");
}
#=============================================================================================
# @STEP 3			Checking window content.
#=============================================================================================
set_window(work_window, 1);

if (new_interface == "1") {
	web_obj_get_text ("Database Users", "#1", "#1", cell_value_2, "", "", 1);
} else {
	tbl_get_cell_data ("1x1_1", "#1", "#2", cell_value_2);
}

if ((trim(cell_value_2) == "DBM Server Command" && new_interface == 1) ||
	(trim(cell_value_2) == "Enter a DBM Server command." && new_interface == 0)) {
	tl_step("Test in window","0","is correct");
} else {
	tl_step("Test in window","1","is incorrect");
}
#=============================================================================================
# @STEP 4			Setting dbm commando.
#=============================================================================================
set_window (work_window, 9);
edit_set("Command","db_state");
web_link_click("Execute");
wait(3);
set_window (work_window, 9);
web_link_click("Execute");
#=============================================================================================
# @STEP 5			Checking result set.
#=============================================================================================
wait(5);
set_window (work_window, 9);

if (new_interface == "1") {
	web_obj_get_text ("1x1", "#1", "#1", cell_value_2, "", "", 1);
	web_obj_get_text ("1x1", "#2", "#1", cell_value_3, "", "", 1);
} else {
	tbl_get_cell_data ("Install database instance", "#1", "#1", cell_value_2);
	tbl_get_cell_data ("1x1_4", "#1", "#2", cell_value_3);
}
L_RC_1 = match(cell_value_3,"OK");
L_RC_2 = match(cell_value_3,"State");

if (version == "7.3.00") {
	L_RC_3 = match(cell_value_3,"WARM");
} else {
	L_RC_3 = match(cell_value_3,"ONLINE");
}

if ((cell_value_2 == "Result" && L_RC_1 != 0 && L_RC_2 != 0 && L_RC_3 != 0 && version == "7.3.00") ||
	(cell_value_2 == "Check - Command Result" && L_RC_1 != 0 && L_RC_2 != 0 && L_RC_3 != 0 && (version == "7.4.03" || version == "7.5.00" || version == "7.5.01" || version == "7.6.00"))) {
	
	tl_step("Result set","0","is correct");
} else {
	tl_step("Result set","1","is incorrect");
}
