PMC:QA:Research Sahi:Sample Script - Create and Test Order

From ADempiere
Jump to: navigation, search
This Wiki is read-only for reference purposes to avoid broken links.

Here is a sample script that opens a sales order, adds a product, saves the order and checks the grand total.

// Variable declarations

var $server = "http://asds1.adempiere.de/webui/";
var $release = "Release 3.6.0LTS";
var $usr = "GardenAdmin";
var $pwd = "GardenAdmin";
var $client = "GardenWorld";
var $org = "*";
var $rememberMe = "No";


// Function declarations

function login($usr, $pwd){
	// Used from the main login screen
	_setValue(_textbox(0), $usr);
	_setValue(_password(0), $pwd);
	_assertExists(_checkbox(0));
	_assert(_isVisible(_checkbox(0)));
	if ($rememberMe == "No") {
		if (_condition(_checkbox(0).checked)){
			_click(_checkbox(0)); // Remember Me check box is selected. Deselect it.
		}
	} 
	else {
		if ($rememberMe == "Yes") {
			if (_condition(_checkbox(0).checked)){
				// No change required
			}
			else {
				_click(_checkbox(0));  // Remember Me check box is deselected. Select it.
			}
		}
	}
	_click(_image("Ok24.png")); //Login - Connection
	// TODO: Add sets/tests for Role and Org
	_click(_image("Ok24.png")); //Roles and Organization
}

function testVersion($Version){
	// Used on login screen to test the version number
	_assertExists(_cell($Version));
	_assert(_isVisible(_cell($Version)));
	_assertEqual($Version, _getText(_cell($Version)));
	_assertContainsText($Version, _cell($Version));
}

function verifyLogin($usr, $client, $org){
	// Test the login id that appears in the top right corner of the browser
	var $zkLoginID = "zk_comp_109"; // The zk ID of the login id
	var $loginID;
	$loginID = $usr + "@" + $client + "." + $org;
	
	__assertExists(_span($zkLoginID));
	__assert(_isVisible(_span($zkLoginID)));
	__assertEqual($loginID, _getText(_span($zkLoginID)));
	//_assertContainsText($loginID, _span($zkLoginID));
}	


// Start test	

_navigateTo($server);
//_click(_link("ADempiere ZK webUI")); // If starting from the server monitor page.

testVersion($release);
login($usr, $pwd);

//_wait(1000); //Wait for the page to load
_click(_span("z-tree-ico z-tree-root-close[3]")); //Quote to invoice
_click(_span("z-tree-ico z-tree-tee-close[18]")); //Sales Orders
_click(_div("Sales Order"));
_click(_link("New Record"));
_setValue(_textbox(/^Field_AD_Org_ID/), "Fertilizer");
_setValue(_textbox(/^Field_C_DocTypeTarget/), "POS Order");
_setValue(_textbox(/^zk/,_in(_div(/^Field_C_BPartner_ID/))), "Joe Block");
_setValue(_textbox(/^Field_M_Warehouse_ID/), "Fertilizer");
_setValue(_textbox(/^Field_M_PriceList_ID/), "Standard");
_setValue(_textbox(/^Field_SalesRep_ID/), "GardenAdmin");
_click(_div("Save Changes"));

_click(_submit("Order Line"));  //Open the order line tab
_click(_image(/^Product/, _in(_div(/^Field_M_Product_ID/))));  //Open the product window
_click(_image("Refresh24.png[1]"));  //Refresh the list of products
_wait(1000); //Wait for the page to load
_click(_div("Mary Consultant"));  //Select Mary
_click(_image("Ok24.png")); // Confirm
_setValue(_textbox(/^Field_C_Tax_ID/), "Standard");
_click(_link("Save changes"));  // Save

_click(_submit("Order"));
_assertEqual("90.00", _getValue(_textbox(/^z-decimalbox/, _in(_div(/^Field_GrandTotal/)))));
_click(_link(/close$/, _in(_div("z_tabs_header"))));  // Close the window

_click(_link("Log Out"));


_log("Test Completed", "info") // Test Completed.

// End of test