Added product and price list setup and the beginning of RFQ testing.
1.1 Binary file adempiere_test_suite/sahi/accounts_payable_management/tf_mft_rfq_response_tests.xls has changed
2.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
2.2 +++ b/adempiere_test_suite/sahi/accounts_payable_management/tf_mft_rfq_setup.csv Fri Feb 03 15:48:37 2012 -0500
2.3 @@ -0,0 +1,2 @@
2.4 +RFQ Test 1 ,Test Org,RFQ Test 1,RFQ Test 1,RFQ Test,Quote Selected Lines,N,Y,N,01/30/2012,,USD,3,,10,2000000,,3,,10,Each,5000,Y,0,Y,Y
2.5 +RFQ Test 1 ,Test Org,RFQ Test 1,RFQ Test 1,RFQ Test,Quote Selected Lines,N,Y,N,01/30/2012,,USD,3,,20,2000001,,3,,10,Each,5000,Y,0,Y,Y
3.1 Binary file adempiere_test_suite/sahi/accounts_payable_management/tf_mft_rfq_setup.xls has changed
4.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
4.2 +++ b/adempiere_test_suite/sahi/accounts_payable_management/tf_mft_rfq_to_po.sah Fri Feb 03 15:48:37 2012 -0500
4.3 @@ -0,0 +1,195 @@
4.4 +/******************************************************************************
4.5 + * Product: Adempiere ERP & CRM Smart Business Solution *
4.6 + * Copyright (C) 2011, Michael McKay, All Rights Reserved. *
4.7 + * This program is free software; you can redistribute it and/or modify it *
4.8 + * under the terms version 2 of the GNU General Public License as published *
4.9 + * by the Free Software Foundation. This program is distributed in the hope *
4.10 + * that it will be useful, but WITHOUT ANY WARRANTY; without even the implied *
4.11 + * warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
4.12 + * See the GNU General Public License for more details. *
4.13 + * You should have received a copy of the GNU General Public License along *
4.14 + * with this program; if not, write to the Free Software Foundation, Inc., *
4.15 + * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. *
4.16 + * *
4.17 + * @Author Michael McKay (mjmckay) *
4.18 + * *
4.19 + ******************************************************************************/
4.20 +/**
4.21 + * Test Flow Main Functional Tests
4.22 + *
4.23 + * RFQ to PO
4.24 + *
4.25 + * This test flow sets up a RFQ process that results in POs.
4.26 + *
4.27 + * See http://www.adempiere.com/Functional_Tests
4.28 + *
4.29 + *
4.30 + **/
4.31 +
4.32 +var $mft_rfq_topic_setup_CSVFilePath = "../accounts_payable_management/tf_mft_rfq_topic_setup.csv";
4.33 +var $mft_rfq_setup_CSVFilePath = "../accounts_payable_management/tf_mft_rfq_setup.csv";
4.34 +var $mft_rfq_topic_OldName = "";
4.35 +var $mft_rfq_topic_OldBP = "";
4.36 +var $mft_rfq_topic_OldRestriction = "";
4.37 +var $mft_rfq_OldDocNo = "";
4.38 +var $mft_rfq_OldLine = "";
4.39 +var $mft_rfq_OldQtyCode = "";
4.40 +var $mft_rfq_to_po_rndtext = "";
4.41 +
4.42 +function mft_rfq_topic_setup_detail(
4.43 + $Name,
4.44 + $Description,
4.45 + $C_BPartner_ID,
4.46 + $C_BPartner_Location_ID,
4.47 + $AD_User_ID,
4.48 + $RestrictionCode,
4.49 + $HasRestriction,
4.50 + $M_Product_ID,
4.51 + $M_Product_Category_ID
4.52 + ){
4.53 + if($mft_rfq_topic_OldName!=$Name){
4.54 + wOpenTab("Topic");
4.55 + iFormView();
4.56 + iNewRecord();
4.57 + fSetText("Name",$Name+$mft_rfq_to_po_rndtext);
4.58 + fSetText("Description",$Description);
4.59 + iSaveRecord();
4.60 +
4.61 + $mft_rfq_topic_OldName=$Name;
4.62 + $mft_rfq_topic_OldBP = "";
4.63 + }
4.64 +
4.65 + if($mft_rfq_topic_OldBP != $C_BPartner_ID){
4.66 + wOpenTab("Subscriber");
4.67 + iFormView();
4.68 + iNewRecord();
4.69 + fSetSearch("C_BPartner_ID",$C_BPartner_ID);
4.70 + fSetListRq("C_BPartner_Location_ID",$C_BPartner_Location_ID,"N");
4.71 + fSetListRq("AD_User_ID",$AD_User_ID);
4.72 + iSaveRecord();
4.73 +
4.74 + $mft_rfq_topic_OldBP = $C_BPartner_ID;
4.75 + $mft_rfq_topic_OldRestriction = "";
4.76 + }
4.77 +
4.78 + if($mft_rfq_topic_OldRestriction != $RestrictionCode && $HasRestriction == "Y"){
4.79 + wOpenTab("Restriction");
4.80 + iFormView();
4.81 + iNewRecord();
4.82 + if($M_Product_ID != ""){
4.83 + fSetSearch("M_Product_ID",$M_Product_ID);
4.84 + }
4.85 + if($M_Product_Category_ID != ""){
4.86 + fSetSearch("M_Product_Category_ID",$M_Product_Category_ID);
4.87 + }
4.88 + iSaveRecord();
4.89 + }
4.90 +
4.91 +}
4.92 +
4.93 +function mft_rfq_setup_detail(
4.94 + $DocumentNo,
4.95 + $AD_Org_ID,
4.96 + $Name,
4.97 + $Description,
4.98 + $C_RfQ_Topic_ID,
4.99 + $QuoteType,
4.100 + $IsQuoteAllQty,
4.101 + $IsInvitedVendorsOnly,
4.102 + $IsRfQResponseAccepted,
4.103 + $DateResponse,
4.104 + $DateWorkStart,
4.105 + $C_Currency_ID,
4.106 + $DeliveryDays,
4.107 + $DateWorkComplete,
4.108 + $Line,
4.109 + $M_Product_ID,
4.110 + $Line_DateWorkStart,
4.111 + $Line_DeliveryDays,
4.112 + $Line_DateWorkComplete,
4.113 + $Qty_Code,
4.114 + $Qty_C_UOM_ID,
4.115 + $Qty_Qty,
4.116 + $Qty_IsRfQQty,
4.117 + $Qty_BenchmarkPrice,
4.118 + $Qty_IsPurchaseQty,
4.119 + $Qty_IsOfferQty
4.120 + ){
4.121 +
4.122 + if($mft_rfq_OldDocNo != $DocumentNo){
4.123 + wOpenTab("RfQ");
4.124 + iFormView();
4.125 + iNewRecord();
4.126 + fSetList("AD_Org_ID",$AD_Org_ID);
4.127 + fSetText("DocumentNo",$DocumentNo + $mft_rfq_to_po_rndtext);
4.128 + fSetText("Name",$Name);
4.129 + fSetText("Description",$Description);
4.130 + fSetListRq("C_RfQ_Topic_ID",$C_RfQ_Topic_ID + $mft_rfq_to_po_rndtext,"Y");
4.131 + fSetListRq("QuoteType",$QuoteType,"Y");
4.132 + fSetCheckbox("IsQuoteAllQty",$IsQuoteAllQty);
4.133 + fSetCheckbox("IsInvitedVendorsOnly",$IsInvitedVendorsOnly);
4.134 + fSetCheckbox("IsRfQResponseAccepted",$IsRfQResponseAccepted);
4.135 + fSetText("DateResponse",$DateResponse);
4.136 + fSetText("DateWorkStart", $DateWorkStart);
4.137 + fSetList("C_Currency_ID",$C_Currency_ID);
4.138 + fSetAmount("DeliveryDays",$DeliveryDays);
4.139 + fSetText("DateWorkComplete",$DateWorkComplete);
4.140 + iSaveRecord();
4.141 +
4.142 + $mft_rfq_OldDocNo = $DocumentNo;
4.143 + $mft_rfq_OldLine = "";
4.144 + $mft_rfq_OldQtyCode = "";
4.145 +
4.146 + }
4.147 +
4.148 + if($mft_rfq_OldLine != $Line){
4.149 + wOpenTab("Line");
4.150 + iFormView();
4.151 + iNewRecord();
4.152 + fSetAmount("Line",$Line);
4.153 + fSetSearch("M_Product_ID",$M_Product_ID);
4.154 + fSetText("DateWorkStart", $Line_DateWorkStart);
4.155 + fSetAmount("DeliveryDays",$Line_DeliveryDays);
4.156 + fSetText("DateWorkComplete",$Line_DateWorkComplete);
4.157 +
4.158 + $mft_rfq_OldLine = $Line;
4.159 + $mft_rfq_OldQtyCode = "";
4.160 + }
4.161 +
4.162 + if($mft_rfq_OldQtyCode != $Qty_Code){
4.163 + wOpenTab("Quantity");
4.164 + iFormView();
4.165 + iNewRecord();
4.166 + fSetList("C_UOM_ID",$Qty_C_UOM_ID);
4.167 + fSetAmount("Qty",$Qty_Qty);
4.168 + fSetCheckbox("IsRfQQty",$Qty_IsRfQQty);
4.169 + fSetAmount("BenchmarkPrice",$Qty_BenchmarkPrice);
4.170 + fSetCheckbox("IsPurchaseQty",$Qty_IsPurchaseQty);
4.171 + fSetCheckbox("IsOfferQty",$Qty_IsOfferQty);
4.172 + iSaveRecord();
4.173 +
4.174 + $mft_rfq_OldQtyCode = $Qty_Code;
4.175 + }
4.176 +}
4.177 +
4.178 +
4.179 +
4.180 +function test_mft_rfq_to_po(){
4.181 +
4.182 + $mft_rfq_to_po_rndtext = random_string(4);
4.183 +
4.184 + var $data = _readCSVFile($mft_rfq_topic_setup_CSVFilePath);
4.185 + wOpenWindow("RfQ Topic");
4.186 + _dataDrive(mft_rfq_topic_setup_detail, $data);
4.187 + wCloseWindow("RfQ Topic");
4.188 +
4.189 + $data = _readCSVFile($mft_rfq_setup_CSVFilePath);
4.190 + wOpenWindow("RfQ");
4.191 + _dataDrive(mft_rfq_setup_detail, $data);
4.192 + fClickButton("PublishRFQ");
4.193 + iOk();
4.194 + wCloseWindow("RfQ");
4.195 +
4.196 + _log("MFT_RFQ_To_PO completed");
4.197 +}
4.198 +
5.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
5.2 +++ b/adempiere_test_suite/sahi/accounts_payable_management/tf_mft_rfq_topic_setup.csv Fri Feb 03 15:48:37 2012 -0500
5.3 @@ -0,0 +1,2 @@
5.4 +RFQ Test,A test of the RFQ Process,Arrow Electronics,Ottawa,,1,N,,,
5.5 +RFQ Test,A test of the RFQ Process,Digi-Key Corporation,Ottawa,,2,N,,,
6.1 Binary file adempiere_test_suite/sahi/accounts_payable_management/tf_mft_rfq_topic_setup.xls has changed
7.1 Binary file adempiere_test_suite/sahi/financial_management/tf_mft_warehouse_setup.xls has changed
8.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
8.2 +++ b/adempiere_test_suite/sahi/material_management/tf_mft_bpartner_setup.csv Fri Feb 03 15:48:37 2012 -0500
8.3 @@ -0,0 +1,31 @@
8.4 +DCassano,Darren Cassano,Darren Cassano,Customer,Y,Immediate,After Receipt,Cash,50% Immediate - 50% in 30 days,0,N,,,,N,Home,All,13912 Cherry St,,,,Westminster,CA,United States,92683-3842,Darren Cassano,EMail
8.5 +NMcniff,Neva Mcniff,Neva Mcniff,Customer,Y,Immediate,Availability,Check,4 Monthly payments,1000,N,,,,N,Home,All,303 E 57th St,,,,New York,NY,United States,10022-2947,Neva Mcniff,EMail+Notice
8.6 +AThill,Ashlee Thill,Ashlee Thill,Customer,Y,Immediate,Complete Line,Credit Card,Net 30,10000,N,,,,N,Home,All,11409 Sequoia Ln,,,,Beltsville,MD,United States,20705-1464,Ashlee Thill,None
8.7 +DSannicolas,Darren Sannicolas,Darren Sannicolas,Customer,Y,Immediate,Complete Order,Direct Debit,"10% discount if paid in 2 days, else Net30",0,N,,,,N,Home,All,235 E Garvey Ave,,,,Monterey Park,CA,United States,91755-1811,Darren Sannicolas,Notice
8.8 +ASlaybaugh,Alana Slaybaugh,Alana Slaybaugh,Customer,Y,Immediate,Force,Direct Deposit,"Fixed, due on 23rd",1000,N,,,,N,Home,All,561 Beach D,Suite 203,,,Seaside,OR,United States,97138-5601,Alana Slaybaugh,EMail
8.9 +KFinck,Katy Finck,Katy Finck,Customer,Y,Immediate,Manual,On Credit,Next business day,10000,N,,,,N,Home,All,1201 Ohio Ave,,,,Long Beach,CA,United States,90804-3645,Katy Finck,EMail+Notice
8.10 +LReves,Lance Reves,Lance Reves,Customer,Y,Immediate,,,Net 15 After Delivery,0,N,,,,N,Home,All,11 Warner Pond Ln,,,,Hebron,CT,United States,06248-1369,Lance Reves,None
8.11 +MKosak,Margery Kosak,Margery Kosak,Customer,Y,After Delivery,After Receipt,Cash,Monday,1000,N,,,,N,Home,All,207 W William Cannon Dr,,,,Austin,TX,United States,78745-5660,Margery Kosak,Notice
8.12 +JLevison,Jeanie Levison,Jeanie Levison,Customer,Y,After Delivery,Availability,Check,50% Immediate - 50% in 30 days,10000,N,,,,N,Home,All,1 Lowell Ct,,,,Brownsburg,IN,United States,46112-8009,Jeanie Levison,EMail
8.13 +GPlanas,Gay Planas,Gay Planas,Customer,Y,After Delivery,Complete Line,Credit Card,4 Monthly payments,0,N,,,,N,Home,All,3233 E Drexel Rd,,,,Tuscon,AZ,United States,85706-2839,Gay Planas,EMail+Notice
8.14 +JCessna,Jessie Cessna,Jessie Cessna,Customer,Y,After Delivery,Complete Order,Direct Debit,Net 30,1000,N,,,,N,Home,All,315 W El Prado Rd,,,,Chandler,AZ,United States,85225-3432,Jessie Cessna,None
8.15 +AIndelicato,Allie Indelicato,Allie Indelicato,Customer,Y,After Delivery,Force,Direct Deposit,"10% discount if paid in 2 days, else Net30",10000,N,,,,N,Home,All,56 Charing Cross Road,,,,London,,United Kingdom,WC2H 0QA,Allie Indelicato,Notice
8.16 +PTaing,Penelope Taing,Penelope Taing,Customer,Y,After Delivery,Manual,On Credit,"Fixed, due on 23rd",0,N,,,,N,Home,All,9 Harrington Road,,,,South Kensington,,United Kingdom,SW7 3ES,Penelope Taing,EMail
8.17 +ETostado,Erik Tostado,Erik Tostado,Customer,Y,After Delivery,,,Next business day,1000,N,,,,N,Home,All,25 Old Bond St,,,,London,,United Kingdom,W1S 4QB,Erik Tostado,EMail+Notice
8.18 +JPolin,Jamie Polin,Jamie Polin,Customer,Y,Customer Schedule after Delivery,After Receipt,Cash,Net 15 After Delivery,10000,N,,,,N,Home,All,1295 Ossington Drive,,,,Ottawa,Ontario,Canada,K1S 3C4,Jamie Polin,None
8.19 +JZacharias,Jamie Zacharias,Jamie Zacharias,Customer,Y,Customer Schedule after Delivery,Availability,Check,Monday,0,N,,,,N,Home,All,1575 Tillborne Ave,,,,Toronto,Ontario,Canada,L4M 2D7,Jamie Zacharias,Notice
8.20 +EWimberley,Earlene Wimberley,Earlene Wimberley,Customer,Y,Customer Schedule after Delivery,Complete Line,Credit Card,50% Immediate - 50% in 30 days,1000,N,,,,N,Home,All,3 Wishbone St,Suite 1550,,,Victoria,British Columbia,Canada,V1G 7K2,Earlene Wimberley,EMail
8.21 +GHagins,Guy Hagins,Guy Hagins,Customer,Y,Customer Schedule after Delivery,Complete Order,Direct Debit,4 Monthly payments,10000,N,,,,N,Home,All,1551 Crescent Rd,,,,Moncton,New Brunswick,Canada,B3G 9T7,Guy Hagins,EMail+Notice
8.22 +MWeisner,Mallory Weisner,Mallory Weisner,Customer,Y,Customer Schedule after Delivery,Force,Direct Deposit,Net 30,0,N,,,,N,Home,All,621 Mansfield St,,,,Montreal,Québec,Canada,H4D 3J5,Mallory Weisner,None
8.23 +GBarriga,Guy Barriga,Guy Barriga,Customer,Y,Customer Schedule after Delivery,Manual,On Credit,"10% discount if paid in 2 days, else Net30",1000,N,,,,N,Home,All,1234 Main St,,,,Greenville,Saskatchewan,Canada,R7G 4H8,Guy Barriga,Notice
8.24 +BigCo,Big Company,Big Company,Customer,Y,After Delivery,Complete Order,Check,Net 30,50000,N,Check,Net 30,Y,N,Ship To,Ship,Ship To road,,,,Backwater,NE,United States,63154-2002,Betty R. Goode,EMail
8.25 +BigCo,Big Company,Big Company,Customer,Y,After Delivery,Complete Order,Check,Net 30,50000,N,Check,Net 30,Y,N,Ship To,Ship,Ship To road,,,,Backwater,NE,United States,63154-2002,Maya Amick,EMail+Notice
8.26 +BigCo,Big Company,Big Company,Customer,Y,After Delivery,Complete Order,Check,Net 30,50000,N,Check,Net 30,Y,N,Ship To,Ship,Ship To road,,,,Backwater,NE,United States,63154-2002,Joshua Levy,None
8.27 +BigCo,Big Company,Big Company,Customer,Y,After Delivery,Complete Order,Check,Net 30,50000,N,Check,Net 30,Y,N,Ship To,Ship,Ship To road,,,,Backwater,NE,United States,63154-2002,Isabel Johnson,Notice
8.28 +BigCo,Big Company,Big Company,Customer,Y,After Delivery,Complete Order,Check,Net 30,50000,N,Check,Net 30,Y,N,Pay From,Pay,Pay from street,,,,Backwater,NE,United States,63154-2002,Viola Hanson,Notice
8.29 +BigCo,Big Company,Big Company,Customer,Y,After Delivery,Complete Order,Check,Net 30,50000,N,Check,Net 30,Y,N,Invoice,Invoice,Invoice ave,,,,Backwater,NE,United States,63154-2002,Diane Hill,Notice
8.30 +BigCo,Big Company,Big Company,Customer,Y,After Delivery,Complete Order,Check,Net 30,50000,N,Check,Net 30,Y,N,Remit to,Remit,Remit To Cres,,,,Backwater,NE,United States,63154-2002,Zachary Williams,Notice
8.31 +Lego,The Lego(tm) Store,The Lego(tm) Store,Vendor,N,After Delivery,Complete Order,Check,Net 30,50000,Y,Check,Net 30,Y,N,Main,All,Fairview Mall,1800 Sheppard Avenue East,,,Toronto,Ontario,Canada,M2J 5A7,,
8.32 +Arrow,Arrow Electronics,Arrow North American Components - Ottawa,Vendor,N,After Delivery,Complete Order,Check,Net 30,50000,Y,Check,Net 30,N,N,Ottawa,All,"84 Hines Rd, Suite 100",,,,Kanata,Ontario,Canada,K2K 3G3,,
8.33 +Digikey,Digi-Key Corporation,Digi-Key Corporation,Vendor,N,After Delivery,Complete Order,Check,Net 30,50000,Y,Check,Net 30,N,N,Ottawa,All,701 Brooks Avenue South,,,,Thief River Falls,MN,United States,56701,,
8.34 +ACME,ACME Supply Co,ACME Supply Co,Vendor,N,After Delivery,Complete Order,Check,Net 30,50000,Y,Check,Net 30,N,N,Main,All,1010 Main St,,,,New York,NY,United States,10022-2947,John Clerk,EMail+Notice
9.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
9.2 +++ b/adempiere_test_suite/sahi/material_management/tf_mft_pricelist_schema_setup.csv Fri Feb 03 15:48:37 2012 -0500
9.3 @@ -0,0 +1,10 @@
9.4 +Purchase-Arrow,Purchases from Supplier,01/15/2012,Pricelist,10,Spot,01/15/2012,Arrow Electronics,,,,,,Limit (PO) Price,,0,0,0,0,No Rounding,Limit (PO) Price,,0,0,0,0,No Rounding,Limit (PO) Price,,0,0,0,0,No Rounding
9.5 +Purchase-Digi-Key,Purchases from Supplier,01/15/2012,Pricelist,10,Spot,01/15/2012,Digi-Key Corporation,,,,,,Limit (PO) Price,,0,0,0,0,No Rounding,Limit (PO) Price,,0,0,0,0,No Rounding,Limit (PO) Price,,0,0,0,0,No Rounding
9.6 +Purchase-Lego,Purchase of Lego parts,01/15/2012,Pricelist,10,Spot,01/15/2012,The Lego(tm) Store,,Bricks,,,,List Price,,0,0,0,0,Currency Precision,List Price,,0,0,0,25,Currency Precision,List Price,,0,0,0,25,Currency Precision
9.7 +Purchase-Lego,Purchase of Lego parts,01/15/2012,Pricelist,20,Spot,01/15/2012,The Lego(tm) Store,,Plates,,,,List Price,,0,0,0,0,Currency Precision,List Price,,0,0,0,35,Currency Precision,List Price,,0,0,0,35,Currency Precision
9.8 +Purchase-Lego,Purchase of Lego parts,01/15/2012,Pricelist,30,Spot,01/15/2012,The Lego(tm) Store,,Figure Parts,,,,List Price,,0,0,0,0,Currency Precision,List Price,,0,0,0,45,Currency Precision,List Price,,0,0,0,45,Currency Precision
9.9 +Purchase-Lego,Purchase of Lego parts,01/15/2012,Pricelist,40,Spot,01/15/2012,The Lego(tm) Store,,Kits,,,,List Price,,0,0,0,0,Currency Precision,List Price,,0,0,0,50,Currency Precision,List Price,,0,0,0,50,Currency Precision
9.10 +Purchase-Widgets,Purchase of Widget parts,01/15/2012,Pricelist,40,Spot,01/15/2012,,Tubular wdiget with frangible spleen,,,,,List Price,,0,0,0,0,Currency Precision,List Price,,0,0,0,50,Currency Precision,List Price,,0,0,0,50,Currency Precision
9.11 +Purchase-Widgets,Purchase of Widget parts,01/15/2012,Pricelist,40,Spot,01/15/2012,,Boxy looking thingamagummy with a whatchamacallit attached,,,,,List Price,,0,0,0,0,Currency Precision,List Price,,0,0,0,50,Currency Precision,List Price,,0,0,0,50,Currency Precision
9.12 +Sales-Lego,Sales-Lego our sales price with a Minimum 40% margin,01/15/2012,Pricelist,40,Spot,01/15/2012,,,,,,,List Price,,0,0,0,0,Currency Precision,List Price,,0,0,0,0,Currency Precision,Standard Price,,40,0,0,0,Currency Precision
9.13 +Sales-Widgets,Sales of widget parts,01/15/2012,Pricelist,40,Spot,01/15/2012,,,,,,,List Price,,0,0,0,0,Currency Precision,List Price,,0,0,0,35,Currency Precision,Limit (PO) Price,,0,0,0,0,Currency Precision
10.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
10.2 +++ b/adempiere_test_suite/sahi/material_management/tf_mft_pricelist_schema_setup.sah Fri Feb 03 15:48:37 2012 -0500
10.3 @@ -0,0 +1,142 @@
10.4 +/******************************************************************************
10.5 + * Product: Adempiere ERP & CRM Smart Business Solution *
10.6 + * Copyright (C) 2011, Michael McKay, All Rights Reserved. *
10.7 + * This program is free software; you can redistribute it and/or modify it *
10.8 + * under the terms version 2 of the GNU General Public License as published *
10.9 + * by the Free Software Foundation. This program is distributed in the hope *
10.10 + * that it will be useful, but WITHOUT ANY WARRANTY; without even the implied *
10.11 + * warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
10.12 + * See the GNU General Public License for more details. *
10.13 + * You should have received a copy of the GNU General Public License along *
10.14 + * with this program; if not, write to the Free Software Foundation, Inc., *
10.15 + * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. *
10.16 + * *
10.17 + * @Author Michael McKay (mjmckay) *
10.18 + * *
10.19 + ******************************************************************************/
10.20 +/**
10.21 + * Test Flow Main Functional Tests
10.22 + *
10.23 + * Pricelist Schema Setup
10.24 + *
10.25 + * This test flow creates the price list schemas used in the Main
10.26 + * Functional Tests
10.27 + *
10.28 + * See http://www.adempiere.com/Functional_Tests
10.29 + *
10.30 + **/
10.31 +
10.32 +var $mft_pricelist_schema_setup_CSVFilePath = "../material_management/tf_mft_pricelist_schema_setup.csv";
10.33 +var $mft_pricelist_schema_setup_OldName = "";
10.34 +
10.35 +function mft_pricelist_schema_setup_detail(
10.36 + $Name,
10.37 + $Description,
10.38 + $ValidFrom,
10.39 + $DiscountType,
10.40 + $SL_SeqNo,
10.41 + $SL_C_ConversionType_ID,
10.42 + $SL_ConversionDate,
10.43 + $SL_C_BPartner_ID,
10.44 + $SL_M_Product_ID,
10.45 + $SL_M_Product_Category_ID,
10.46 + $SL_Classification,
10.47 + $SL_Group1,
10.48 + $SL_Group2,
10.49 + $SL_List_Base,
10.50 + $SL_List_Fixed,
10.51 + $SL_List_MinAmt,
10.52 + $SL_List_AddAmt,
10.53 + $SL_List_MaxAmt,
10.54 + $SL_List_Discount,
10.55 + $SL_List_Rounding,
10.56 + $SL_Std_Base,
10.57 + $SL_Std_Fixed,
10.58 + $SL_Std_MinAmt,
10.59 + $SL_Std_AddAmt,
10.60 + $SL_Std_MaxAmt,
10.61 + $SL_Std_Discount,
10.62 + $SL_Std_Rounding,
10.63 + $SL_Limit_Base,
10.64 + $SL_Limit_Fixed,
10.65 + $SL_Limit_MinAmt,
10.66 + $SL_Limit_AddAmt,
10.67 + $SL_Limit_MaxAmt,
10.68 + $SL_Limit_Discount,
10.69 + $SL_Limit_Rounding
10.70 + ){
10.71 +
10.72 + // Main Schema tab
10.73 + if($mft_pricelist_schema_setup_OldName!=$Name){
10.74 +
10.75 + // New Schema
10.76 + wOpenTab("Price List Schema");
10.77 + iFormView();
10.78 + iNewRecord();
10.79 + fSetText("Name",$Name);
10.80 + fSetText("Description",$Description);
10.81 + fSetText("ValidFrom",$ValidFrom);
10.82 + fSetList("DiscountType",$DiscountType);
10.83 + iSaveRecord();
10.84 +
10.85 + $mft_pricelist_schema_setup_OldName = $Name;
10.86 + }
10.87 +
10.88 + // Schema Line tab
10.89 + wOpenTab("Schema Line");
10.90 + iFormView();
10.91 + iNewRecord();
10.92 + fSetAmount("SeqNo",$SL_SeqNo);
10.93 + fSetListRq("C_ConversionType_ID",$SL_C_ConversionType_ID,"N");
10.94 + fSetText("ConversionDate",$SL_ConversionDate);
10.95 + fSetSearch("C_BPartner_ID",$SL_C_BPartner_ID);
10.96 + fSetSearch("M_Product_ID",$SL_M_Product_ID);
10.97 + fSetListRq("M_Product_Category_ID",$SL_M_Product_Category_ID,"N");
10.98 + fSetListRq("Classification",$SL_Classification,"N");
10.99 + fSetListRq("Group1",$SL_Group1,"N");
10.100 + fSetListRq("Group2",$SL_Group2,"N");
10.101 + fSetListRq("List_Base",$SL_List_Base,"N");
10.102 + if($SL_List_Base == "Fixed"){
10.103 + fSetAmount("List_Fixed",$SL_List_Fixed);
10.104 + } else {
10.105 + fSetAmount("List_MinAmt",$SL_List_MinAmt);
10.106 + fSetAmount("List_AddAmt",$SL_List_AddAmt);
10.107 + fSetAmount("List_MaxAmt",$SL_List_MaxAmt);
10.108 + fSetAmount("List_Discount",$SL_List_Discount);
10.109 + fSetListRq("List_Rounding",$SL_List_Rounding,"N");
10.110 + }
10.111 + if($SL_Std_Base == "Fixed"){
10.112 + fSetAmount("Std_Fixed",$SL_Std_Fixed);
10.113 + } else {
10.114 + fSetAmount("Std_MinAmt",$SL_Std_MinAmt);
10.115 + fSetAmount("Std_AddAmt",$SL_Std_AddAmt);
10.116 + fSetAmount("Std_MaxAmt",$SL_Std_MaxAmt);
10.117 + fSetAmount("Std_Discount",$SL_Std_Discount);
10.118 + fSetListRq("Std_Rounding",$SL_Std_Rounding,"N");
10.119 + }
10.120 + if($SL_Limit_Base == "Fixed"){
10.121 + fSetAmount("Limit_Fixed",$SL_Limit_Fixed);
10.122 + } else {
10.123 + fSetAmount("Limit_MinAmt",$SL_Limit_MinAmt);
10.124 + fSetAmount("Limit_AddAmt",$SL_Limit_AddAmt);
10.125 + fSetAmount("Limit_MaxAmt",$SL_Limit_MaxAmt);
10.126 + fSetAmount("Limit_Discount",$SL_Limit_Discount);
10.127 + fSetListRq("Limit_Rounding",$SL_Limit_Rounding,"N");
10.128 + }
10.129 + iSaveRecord();
10.130 +
10.131 +}
10.132 +
10.133 +function mft_pricelist_schema_setup(){
10.134 +
10.135 + var $data = _readCSVFile($mft_pricelist_schema_setup_CSVFilePath);
10.136 +
10.137 + wOpenWindow("Price List Schema");
10.138 +
10.139 + _dataDrive(mft_pricelist_schema_setup_detail, $data);
10.140 +
10.141 + wCloseWindow("Price List Schema");
10.142 +
10.143 + _log("MFT_Pricelist_Schema_Setup completed");
10.144 +}
10.145 +
11.1 Binary file adempiere_test_suite/sahi/material_management/tf_mft_pricelist_schema_setup.xls has changed
12.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
12.2 +++ b/adempiere_test_suite/sahi/material_management/tf_mft_pricelist_setup.csv Fri Feb 03 15:48:37 2012 -0500
12.3 @@ -0,0 +1,8 @@
12.4 +Purchase-Arrow,Purchases from Arrow,N,USD,4,N,N,N,Pur_Arrow_Old,Old Price List,Purchase-Arrow,,12/16/2011
12.5 +Purchase-Arrow,,,,,,,,Pur_Arrow_New,New Price List,Purchase-Arrow,,01/15/2012
12.6 +Purchase-Digi-Key,Purchases from Digi-Key,N,USD,4,N,N,N,Pur_Digi_New,New Price List,Purchase-Digi-Key,,01/15/2012
12.7 +Purchase-Lego,Purchases from Lego,N,USD,2,N,N,N,Pur_Lego,Lego Purchase PL,Purchase-Lego,,01/15/2012
12.8 +Purchase-Widgets,Purchase-Widgets,N,USD,2,N,N,N,Purchase-Widgets,Purchase-Widgets,Purchase-Widgets,,01/15/2012
12.9 +Sales-Lego-Cnd,Sales-Lego-Cnd,N,CAD,2,N,N,N,Sales-Lego-Cnd,Sales-Lego-Cnd,Sales-Lego,Pur_Lego,01/15/2012
12.10 +Sales-Lego-USD,Sales-Lego-USD,N,USD,2,N,N,N,Sales-Lego-USD,Sales-Lego-USD,Sales-Lego,Pur_Lego,01/15/2012
12.11 +Sales-Widgets,Sales-Widgets,N,USD,2,N,N,N,Sales-Widgets,Sales-Widgets,Sales-Widgets,Purchase-Widgets,01/15/2012
13.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
13.2 +++ b/adempiere_test_suite/sahi/material_management/tf_mft_pricelist_setup.sah Fri Feb 03 15:48:37 2012 -0500
13.3 @@ -0,0 +1,96 @@
13.4 +/******************************************************************************
13.5 + * Product: Adempiere ERP & CRM Smart Business Solution *
13.6 + * Copyright (C) 2011, Michael McKay, All Rights Reserved. *
13.7 + * This program is free software; you can redistribute it and/or modify it *
13.8 + * under the terms version 2 of the GNU General Public License as published *
13.9 + * by the Free Software Foundation. This program is distributed in the hope *
13.10 + * that it will be useful, but WITHOUT ANY WARRANTY; without even the implied *
13.11 + * warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
13.12 + * See the GNU General Public License for more details. *
13.13 + * You should have received a copy of the GNU General Public License along *
13.14 + * with this program; if not, write to the Free Software Foundation, Inc., *
13.15 + * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. *
13.16 + * *
13.17 + * @Author Michael McKay (mjmckay) *
13.18 + * *
13.19 + ******************************************************************************/
13.20 +/**
13.21 + * Test Flow Main Functional Tests
13.22 + *
13.23 + * Pricelist Setup
13.24 + *
13.25 + * This test flow creates the price list used in the Main
13.26 + * Functional Tests
13.27 + *
13.28 + * See http://www.adempiere.com/Functional_Tests
13.29 + *
13.30 + **/
13.31 +
13.32 +var $mft_pricelist_setup_CSVFilePath = "../material_management/tf_mft_pricelist_setup.csv";
13.33 +var $mft_pricelist_setup_OldName = "";
13.34 +
13.35 +function mft_pricelist_setup_detail(
13.36 + $Name,
13.37 + $Description,
13.38 + $IsDefault,
13.39 + $C_Currency_ID,
13.40 + $PricePrecision,
13.41 + $IsSOPriceList,
13.42 + $IsTaxIncluded,
13.43 + $EnforcePriceLimit,
13.44 + $V_Name,
13.45 + $V_Description,
13.46 + $M_DiscountSchema_ID,
13.47 + $M_Pricelist_Version_Base_ID,
13.48 + $ValidFrom
13.49 + ){
13.50 +
13.51 + // Main Schema tab
13.52 + if($mft_pricelist_setup_OldName!=$Name){
13.53 +
13.54 + // New Price List
13.55 + wOpenTab("Price List");
13.56 + iFormView();
13.57 + iNewRecord();
13.58 + fSetText("Name",$Name);
13.59 + fSetText("Description",$Description);
13.60 + fSetCheckbox("IsDefault",$IsDefault);
13.61 + fSetList("C_Currency_ID",$C_Currency_ID);
13.62 + fSetAmount("PricePrecision",$PricePrecision);
13.63 + fSetCheckbox("IsSOPriceList",$IsSOPriceList);
13.64 + fSetCheckbox("IsTaxIncluded",$IsTaxIncluded);
13.65 + fSetCheckbox("EnforcePriceLimit",$EnforcePriceLimit);
13.66 + iSaveRecord();
13.67 + $mft_pricelist_setup_OldName = $Name;
13.68 + }
13.69 +
13.70 + wOpenTab("Version");
13.71 + iFormView();
13.72 + fSetText("Name",$V_Name);
13.73 + fSetText("Description",$V_Description);
13.74 + fSetListRq("M_DiscountSchema_ID",$M_DiscountSchema_ID,"Y");
13.75 + fSetListRq("M_Pricelist_Version_Base_ID",$M_Pricelist_Version_Base_ID,"Y");
13.76 + fSetText("ValidFrom",$ValidFrom);
13.77 +
13.78 + iSaveRecord();
13.79 +
13.80 + fClickButton("ProcCreate");
13.81 + iOk();
13.82 + _wait(120000,_div("Price List " + $V_Name));
13.83 + iConfirm();
13.84 + iRefresh();
13.85 +}
13.86 +
13.87 +function mft_pricelist_setup(){
13.88 +
13.89 + var $data = _readCSVFile($mft_pricelist_setup_CSVFilePath);
13.90 +
13.91 + wOpenWindow("Price List");
13.92 +
13.93 + _dataDrive(mft_pricelist_setup_detail, $data);
13.94 +
13.95 + wCloseWindow("Price List");
13.96 +
13.97 + _log("MFT_Pricelist_Setup completed");
13.98 +}
13.99 +
14.1 Binary file adempiere_test_suite/sahi/material_management/tf_mft_pricelist_setup.xls has changed
15.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
15.2 +++ b/adempiere_test_suite/sahi/material_management/tf_mft_product_setup.csv Fri Feb 03 15:48:37 2012 -0500
15.3 @@ -0,0 +1,17 @@
15.4 +1003005,Brick 1X1,,Bricks,Test Tax Category,Each,Item,Y,Y,Y,Color,The Lego(tm) Store,3005,CAD,0.11,0.08,3005,,,
15.5 +1006111,Brick 1X10,,Bricks,Test Tax Category,Each,Item,Y,Y,Y,Color,The Lego(tm) Store,6111,CAD,0.29,0.2,6111,,,
15.6 +1006112,Brick 1X12,,Bricks,Test Tax Category,Each,Item,Y,Y,Y,Color,The Lego(tm) Store,6112,CAD,0.3,0.21,6112,,,
15.7 +1002465,Brick 1X16,,Bricks,Test Tax Category,Each,Item,Y,Y,Y,Color,The Lego(tm) Store,2465,CAD,0.34,0.25,2465,,,
15.8 +1003004,Brick 1X2,,Bricks,Test Tax Category,Each,Item,Y,Y,Y,Color,The Lego(tm) Store,3004,CAD,0.17,0.12,3004,,,
15.9 +1003003,Brick 2X2,,Bricks,Test Tax Category,Each,Item,Y,Y,Y,Color,The Lego(tm) Store,3003,CAD,0.17,0.12,3003,,,
15.10 +1002420,Corner Plate 1X2X2,,Plates,Test Tax Category,Each,Item,Y,Y,Y,Color,The Lego(tm) Store,2420,CAD,0.11,0.09,2420,,,
15.11 +1003024,Plate 1X1,,Plates,Test Tax Category,Each,Item,Y,Y,Y,Color,The Lego(tm) Store,3024,CAD,0.1,0.08,3024,,,
15.12 +1003023,Plate 1X2,,Plates,Test Tax Category,Each,Item,Y,Y,Y,Color,The Lego(tm) Store,3023,CAD,0.09,0.07,3023,,,
15.13 +1093571,Ball Cup 3M Ø10.2,,Figure Parts,Test Tax Category,Each,Item,Y,Y,Y,Color,The Lego(tm) Store,93571,CAD,0.38,0.285,93571,,,
15.14 +1090661,Base 3X7x3 W. Ball Cup Ø10.2,,Figure Parts,Test Tax Category,Each,Item,Y,Y,Y,Color,The Lego(tm) Store,90661,CAD,0.69,0.5175,90661,,,
15.15 +1087837,Claw W. Ballcup,,Figure Parts,Test Tax Category,Each,Item,Y,Y,Y,Color,The Lego(tm) Store,87837,CAD,0.45,0.3375,87837,,,
15.16 +2000000,Res Thick Film 0603 100K,Res Thick Film 0603 100K Ohm 1% 1/10W ±100ppm/°C Molded SMD Paper T/R,Resistors,Test Tax Category,Each,Item,Y,Y,N,ResistorsFixedSingleSurfMount,Arrow Electronics,,USD,0.0024,0.0024,RMCF0603FT100K,SEI Stackpole Electronics,5000,5000
15.17 +2000000,Res Thick Film 0603 100K,Res Thick Film 0603 100K Ohm 1% 1/10W ±100ppm/°C Molded SMD Paper T/R,Resistors,Test Tax Category,Each,Item,Y,Y,N,ResistorsFixedSingleSurfMount,DigiKey,,USD,0.00228,0.00228,RMCF0603FT100K,SEI Stackpole Electronics,5000,5000
15.18 +2000001,Res Thick Film 0603 100K,Res Thick Film 0603 100K Ohm 1% 1/10W ±100ppm/°C Molded SMD Paper T/R,Resistors,Test Tax Category,Each,Item,Y,Y,N,ResistorsFixedSingleSurfMount,Arrow Electronics,,USD,0.0084,0.0084,CRCW0603100KFKTA,Vishay,5000,5000
15.19 +,Tubular wdiget with frangible spleen,"Distributed widget sent to VARs. We buy at 50%, sell at 35% off list.",Widgets,Test Tax Category,Each,Item,Y,Y,N,,ACME Supply Co,,USD,1000,500,Widget1,,,10
15.20 +,Boxy looking thingamagummy with a whatchamacallit attached,"Distributed widget sent to VARs. We buy at 50%, sell at 35% off list.",Widgets,Test Tax Category,Each,Item,Y,Y,N,,ACME Supply Co,,USD,2000,1000,Widget2,,,20
16.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
16.2 +++ b/adempiere_test_suite/sahi/material_management/tf_mft_product_setup.sah Fri Feb 03 15:48:37 2012 -0500
16.3 @@ -0,0 +1,119 @@
16.4 +/******************************************************************************
16.5 + * Product: Adempiere ERP & CRM Smart Business Solution *
16.6 + * Copyright (C) 2011, Michael McKay, All Rights Reserved. *
16.7 + * This program is free software; you can redistribute it and/or modify it *
16.8 + * under the terms version 2 of the GNU General Public License as published *
16.9 + * by the Free Software Foundation. This program is distributed in the hope *
16.10 + * that it will be useful, but WITHOUT ANY WARRANTY; without even the implied *
16.11 + * warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
16.12 + * See the GNU General Public License for more details. *
16.13 + * You should have received a copy of the GNU General Public License along *
16.14 + * with this program; if not, write to the Free Software Foundation, Inc., *
16.15 + * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. *
16.16 + * *
16.17 + * @Author Michael McKay (mjmckay) *
16.18 + * *
16.19 + ******************************************************************************/
16.20 +/**
16.21 + * Test Flow Main Functional Tests
16.22 + *
16.23 + * Product Setup
16.24 + *
16.25 + * This test flow creates the products used in the Main
16.26 + * Functional Tests
16.27 + *
16.28 + * See http://www.adempiere.com/Functional_Tests
16.29 + *
16.30 + **/
16.31 +
16.32 +var $mft_product_setup_CSVFilePath = "../material_management/tf_mft_product_setup.csv";
16.33 +var $mft_product_setup_OldValue = "@@@@@@@@@@@@@@@"; // "" is a valid value
16.34 +var $mft_product_setup_OldPBPID = "";
16.35 +
16.36 +function mft_product_setup_detail(
16.37 + $Value,
16.38 + $Name,
16.39 + $Description,
16.40 + $M_Product_Category_ID,
16.41 + $C_TaxCategory_ID,
16.42 + $C_UOM_ID,
16.43 + $ProductType,
16.44 + $IsStocked,
16.45 + $IsPurchased,
16.46 + $IsSold,
16.47 + $M_AttributeSet_ID,
16.48 + $P_C_BPartner_ID,
16.49 + $P_UPC,
16.50 + $P_C_Currency_ID,
16.51 + $P_PriceList,
16.52 + $P_PricePO,
16.53 + $P_VendorProductNo,
16.54 + $P_Manufacturer,
16.55 + $P_Order_Pack,
16.56 + $P_Order_Min
16.57 + ){
16.58 +
16.59 + // Main product tab
16.60 + if($mft_product_setup_OldValue!=$Value){
16.61 +
16.62 + // New Product
16.63 + wOpenTab("Product");
16.64 + iNewRecord();
16.65 + if ($Value != ""){ // If blank, don't bother to set/test
16.66 + fSetText("Value",$Value);
16.67 + $mft_product_setup_OldValue = $Value;
16.68 + _assertEqual($mft_product_setup_OldValue, $Value, "*** Not Equal!!");
16.69 + }
16.70 + else {
16.71 + // "" is a valid value for multiple products - triggers the sequence
16.72 + $mft_product_setup_OldValue = "@@@@@@@@@@@@@@@";
16.73 + }
16.74 + fSetText("Name",$Name);
16.75 + fSetText("Description",$Description);
16.76 + fSetList("M_Product_Category_ID",$M_Product_Category_ID);
16.77 + fSetList("C_TaxCategory_ID",$C_TaxCategory_ID);
16.78 + fSetList("C_UOM_ID",$C_UOM_ID);
16.79 + fSetList("ProductType",$ProductType);
16.80 + fSetCheckbox("IsStocked",$IsStocked);
16.81 + fSetCheckbox("IsPurchased",$IsPurchased);
16.82 + fSetCheckbox("IsSold",$IsSold);
16.83 + fSetList("M_AttributeSet_ID",$M_AttributeSet_ID);
16.84 + iSaveRecord();
16.85 +
16.86 + $mft_product_setup_OldPBPID = "";
16.87 +
16.88 + }
16.89 +
16.90 + // Purchasing tab
16.91 + if($mft_product_setup_OldPBPID != $P_C_BPartner_ID) {
16.92 + wOpenTab("Purchasing");
16.93 + iNewRecord();
16.94 + fSetSearch("C_BPartner_ID",$P_C_BPartner_ID);
16.95 + fSetText("UPC",$P_UPC);
16.96 + fSetList("C_Currency_ID",$P_C_Currency_ID);
16.97 + fSetAmount("PriceList",$P_PriceList);
16.98 + fSetAmount("PricePO",$P_PricePO);
16.99 + fSetText("VendorProductNo",$P_VendorProductNo);
16.100 + fSetText("Manufacturer",$P_Manufacturer);
16.101 + fSetAmount("Order_Min",$P_Order_Min);
16.102 + fSetAmount("Order_Pack",$P_Order_Pack);
16.103 + iSaveRecord();
16.104 +
16.105 + $mft_product_setup_OldPBPID = $P_C_BPartner_ID;
16.106 + }
16.107 +
16.108 +}
16.109 +
16.110 +function mft_product_setup(){
16.111 +
16.112 + var $data = _readCSVFile($mft_product_setup_CSVFilePath);
16.113 +
16.114 + wOpenWindow("Product");
16.115 +
16.116 + _dataDrive(mft_product_setup_detail, $data);
16.117 +
16.118 + wCloseWindow("Product");
16.119 +
16.120 + _log("MFT_Product_Setup completed");
16.121 +}
16.122 +
17.1 Binary file adempiere_test_suite/sahi/material_management/tf_mft_product_setup.xls has changed