#####################################################################
#
# WEBTEST WR_FUNCS - H I G H L E V E L T S L F U N C T I O N S
#
#####################################################################
staticmarked_window ="", marked_object ="", ret_value =0, func_name ="";
staticargs_part ="", arg1 ="", arg2 ="", arg3 ="", arg4 ="", arg5 ="";
staticarg6 ="", arg7 ="", arg8 ="", arg9 ="", arg10 ="", arg11 ="";
staticarg12 ="", hl_func_name ="", test_name ="", line_number ="";
staticstop_flag =1;
publicfunctionlist_activate_item(list, item, click_offset)
{
autorc, version, org_time,old_report_name;
if(nargs() ==2)
click_offset = LIST_DEFAULT_CLICK_LOCATION;
elseif(nargs() !=3)
return(report_param_msg());
get_report_info(old_report_name);
save_report_info("list_activate_item");
if(window_is_a_browser_or_frame())
{
version = GetWindowActiveBrowserVersion();
ns_dont_pop_wizard = TRUE;
org_time = getvar("timeout_msec");
set_msec_timeout_no_report(1000);
# setvar("timeout", 1);
rc = activate_function(TLIST, list,"_list_activate_item", item, click_offset);
set_msec_timeout_no_report(org_time);
# setvar("timeout", org_time);
ns_dont_pop_wizard = FALSE;
if(rc != E_OK)
{
if(rc == E_NOT_FOUND || rc ==E_NOT_UNIQUE)
scroll_current_win();
rc = activate_function(TLIST, list,"_list_activate_item", item, click_offset);
}
}
else
rc = activate_function(TLIST, list,"_list_activate_item", item, click_offset);
save_report_info(old_report_name);
return(rc);
}
publicfunctionlist_get_item(list, item,outlabel)
{
autorc = E_GENERAL_ERROR , version,i;
autotimeout,old_report_name;
web_get_timeout(timeout);
if(nargs() !=3)
return(report_param_msg());
get_report_info(old_report_name);
save_report_info("list_get_item");
if(item <0)
{
save_report_info(old_report_name);
return(E_OUT_OF_RANGE);
}
if(window_is_a_browser_or_frame())
{
version = GetWindowActiveBrowserVersion();
ns_dont_pop_wizard = TRUE;
if(version == IE_4) {
if(is_IE4_html_msw_class(list) != E_OK) {
rc = activate_and_get_function(TLIST, list,"_list_get_item",1,1,
item, label);
## on lists on IE_4 that are not HTML_LISTBOX don't try to call web_list_get_item_num - give it to WR
}
}
if(rc != E_OK) {
for(i=0;i<timeout;i++)
{
rc = activate_and_get_function(TLIST, list,"web_list_get_num_item",1,1, item,
label);
if(rc == E_AREA_OUT)
set_window(GUI_get_window(),1);
else
break;
}
}
ns_dont_pop_wizard = FALSE;
if(rc != E_OK) {
if(rc == E_NOT_FOUND || rc ==E_NOT_UNIQUE)
scroll_current_win();
rc = activate_and_get_function(TLIST, list,"web_list_get_item_num",1,1, item,
label);
}
}
else
rc = activate_and_get_function(TLIST, list,"_list_get_item",1,1,
item, label);
save_report_info(old_report_name);
return(rc);
}
publicfunctionlist_get_item_num(list, item,outitem_num)
{
autorc = E_GENERAL_ERROR , version, i,old_report_name;
autotimeout;
web_get_timeout(timeout);
if(nargs() !=3)
return(report_param_msg());
get_report_info(old_report_name);
save_report_info("list_get_item_num");
if(window_is_a_browser_or_frame())
{
version = GetWindowActiveBrowserVersion();
ns_dont_pop_wizard = TRUE;
if(version == IE_4) {
if(is_IE4_html_msw_class(list) != E_OK) {
rc = activate_and_get_function(TLIST, list,"_list_get_item_num",1,1,
item, item_num);
## on lists on IE_4 that are not HTML_LISTBOX don't try to call web_list_get_item_num - give it to WR
}
}
if(rc!=E_OK) {
for(i=0;i<timeout;i++)
{
rc = activate_and_get_function( TLIST, list,"web_list_get_item_num",1,1,
item, item_num);
if(rc == E_AREA_OUT)
set_window(GUI_get_window(),1);
else
break;
}
}
ns_dont_pop_wizard = FALSE;
if((rc != E_OK) && (rc != E_STR_NOT_FOUND))
{
if(rc == E_NOT_FOUND || rc == E_NOT_UNIQUE)
scroll_current_win();
rc = activate_and_get_function(TLIST, list,"web_list_get_item_num",1,1,
item, item_num);
}
}
else
rc = activate_and_get_function(TLIST, list,"_list_get_item_num",1,1,
item, item_num);
save_report_info(old_report_name);
return(rc);
}
publicfunctionlist_get_items_count(list,outcount)
{
autorc,old_report_name, version, org_time;
if(nargs() !=2)
return(report_param_msg());
get_report_info(old_report_name);
save_report_info("list_get_items_count");
if(window_is_a_browser_or_frame())
{
version = GetWindowActiveBrowserVersion();
ns_dont_pop_wizard = TRUE;
org_time = getvar("timeout_msec");
set_msec_timeout_no_report(1000);
# setvar("timeout", 1);
rc = activate_and_get_function(TLIST, list,"_list_get_items_count",0,1,
count);
# setvar("timeout", org_time);
set_msec_timeout_no_report(org_time);
ns_dont_pop_wizard = FALSE;
if(rc != E_OK)
{
if(rc == E_NOT_FOUND || rc ==E_NOT_UNIQUE)
scroll_current_win();
rc = activate_and_get_function(TLIST, list,"_list_get_items_count",0,1,
count);
}
}
else
rc = activate_and_get_function(TLIST, list,"_list_get_items_count",0,1,
count);
save_report_info(old_report_name);
return(rc);
}
publicfunctionlist_get_info(list, attr,outattr_val)
{
autorc, version, list_num,old_report_name;
if(nargs() !=3)
return(report_param_msg());
get_report_info(old_report_name);
save_report_info("list_get_info");
if(window_is_a_browser_or_frame())
{
version = GetWindowActiveBrowserVersion();
ns_dont_pop_wizard = TRUE;
rc = generic_get_info(TLIST, list, attr, attr_val);
ns_dont_pop_wizard = FALSE;
if(rc != E_OK)
{
if(rc == E_NOT_FOUND || rc ==E_NOT_UNIQUE)
scroll_current_win();
rc = generic_get_info(TLIST, list, attr, attr_val);
}
if(attr =="value"<SPAN lang=EN-US style="FONT-SIZE: 10pt; COLOR: black; FONT-FA
