@ -77,8 +77,7 @@ sub create_reseller_contract {
$ self - > driver - > fill_element ( '//*[@id="contactidtable_filter"]/label/input' , 'xpath' , 'default-system@default.invalid' ) ;
ok ( $ self - > driver - > wait_for_text ( '//*[@id="contactidtable"]/tbody/tr[1]/td[4]' , 'default-system@default.invalid' ) , "Default Contact found" ) ;
$ self - > driver - > select_if_unselected ( '//*[@id="contactidtable"]/tbody/tr[1]/td[5]/input' ) ;
}
else {
} else {
ok ( $ self - > driver - > select_if_unselected ( '//*[@id="contactidtable"]/tbody/tr[1]/td[5]/input' ) , "Default Contact found" ) ;
} ;
$ self - > driver - > scroll_to_element ( $ self - > driver - > find_element ( '//*[@id="external_id"]' ) ) ;
@ -95,38 +94,58 @@ sub create_reseller_contract {
sub delete_reseller {
my ( $ self , $ name ) = @ _ ;
my ( $ self , $ name , $ cancel ) = @ _ ;
return unless $ name ;
diag ( 'Go to reseller page' ) ;
$ self - > driver - > find_element ( '//*[@id="main-nav"]//*[contains(text(),"Settings")]' ) - > click ( ) ;
$ self - > driver - > find_element ( 'Resellers' , 'link_text' ) - > click ( ) ;
diag ( 'Try to delete a reseller' ) ;
$ self - > driver - > fill_element ( '//*[@id="Resellers_table_filter"]/label/input' , 'xpath' , 'thisshouldnotexist' ) ;
ok ( $ self - > driver - > find_element_by_css ( '#Resellers_table tr > td.dataTables_empty' ) , 'Garbage text was not found' ) ;
$ self - > driver - > fill_element ( '//*[@id="Resellers_table_filter"]/label/input' , 'xpath' , $ name ) ;
ok ( $ self - > driver - > wait_for_text ( '//*[@id="Resellers_table"]/tbody/tr[1]/td[3]' , $ name ) , 'Entry found' ) ;
$ self - > driver - > move_action ( element = > $ self - > driver - > find_element ( '//*[@id="Resellers_table"]' ) ) ;
$ self - > driver - > move_action ( element = > $ self - > driver - > find_element ( '//*[@id="Resellers_table"]/tbody/tr[1]/td[3]' ) ) ;
$ self - > driver - > find_element ( '//*[@id="Resellers_table"]/tbody/tr[1]/td[5]/div/a[2]' ) - > click ( ) ;
$ self - > driver - > find_element ( '//*[@id="dataConfirmOK"]' ) - > click ( ) ;
if ( $ cancel ) {
popup_confirm_cancel ( $ self , 'We are not going to delete this reseller' ) ;
} else {
popup_confirm_ok ( $ self , 'We are going to delete this reseller' ) ;
} ;
}
sub delete_reseller_contract {
my ( $ self , $ resellerid ) = @ _ ;
my ( $ self , $ resellerid , $ cancel ) = @ _ ;
return unless $ resellerid ;
diag ( 'Go to Reseller and Peering Contracts page' ) ;
$ self - > driver - > find_element ( '//*[@id="main-nav"]//*[contains(text(),"Settings")]' ) - > click ( ) ;
$ self - > driver - > find_element ( 'Reseller and Peering Contracts' , 'link_text' ) - > click ( ) ;
diag ( 'Try to delete a reseller contract' ) ;
$ self - > driver - > fill_element ( '//*[@id="contract_table_filter"]/label/input' , 'xpath' , 'thisshouldnotexist' ) ;
ok ( $ self - > driver - > find_element_by_css ( '#contract_table tr > td.dataTables_empty' ) , 'Garbage text was not found' ) ;
$ self - > driver - > fill_element ( '//*[@id="contract_table_filter"]/label/input' , 'xpath' , $ resellerid ) ;
ok ( $ self - > driver - > wait_for_text ( '//*[@id="contract_table"]/tbody/tr/td[2]' , $ resellerid ) , 'Entry found' ) ;
$ self - > driver - > move_action ( element = > $ self - > driver - > find_element ( '//*[@id="contract_table"]' ) ) ;
$ self - > driver - > move_action ( element = > $ self - > driver - > find_element ( '//*[@id="contract_table"]/tbody/tr[1]/td[3]' ) ) ;
$ self - > driver - > find_element ( '//*[@id="contract_table"]/tbody/tr[1]/td[7]/div/a[2]' ) - > click ( ) ;
if ( $ cancel ) {
popup_confirm_cancel ( $ self , 'We are not going to delete this reseller contract' ) ;
} else {
popup_confirm_ok ( $ self , 'We are going to delete this reseller contract' ) ;
} ;
}
sub popup_confirm_ok {
my ( $ self , $ message ) = @ _ ;
diag ( $ message ) ;
$ self - > driver - > find_element ( '//*[@id="dataConfirmOK"]' ) - > click ( ) ;
}
sub popup_confirm_cancel {
my ( $ self , $ message ) = @ _ ;
diag ( $ message ) ;
$ self - > driver - > find_element ( '//*[@id="dataConfirmCancel"]' ) - > click ( ) ;
}
1 ;