<%
' Comersus BackOffice Lite
' e-commerce ASP Open Source
' Comersus Open Technologies LC
' 2005
' http://www.comersus.com 
%>

<!--#include file="../includes/settings.asp"-->    
<!--#include file="../includes/databaseFunctions.asp"-->    
<!--#include file="../includes/getSettingKey.asp"--> 
<!--#include file="../includes/sessionFunctions.asp"--> 

<% 
on error resume next 

dim mySQL, conntemp, rstemp

pRunInstallationWizard 	= getSettingKey("pRunInstallationWizard")

if pRunInstallationWizard<>"-1" then response.redirect "comersus_backoffice_message.asp?message="&Server.UrlEncode("Sorry, the Installation Wizard is disabled")

pPayPalMerchantEmail	=request.form("pPayPalMerchantEmail")
p2CheckoutSID		=request.form("p2CheckoutSID")
pUseOffLineCreditCards  =request.form("pUseOffLineCreditCards")
pChecks			=request.form("pChecks")
pChecksComments		=request.form("pChecksComments")
pWireTransfer		=request.form("pWireTransfer")
pWireComments		=request.form("pWireComments")

if pPayPalMerchantEmail<>"" then
  mySQL1="UPDATE settings SET settingValue='" &pPayPalMerchantEmail& "' WHERE settingKey='pPayPalMerchantEmail' AND idStore=" &pIdStore
  call updateDatabase(mySQL1, rstemp, "comersus_backoffice_install.asp") 
  
  mySQL1="INSERT INTO payments (paymentDesc, redirectionUrl, quantityUntil, weightUntil, priceUntil, idCustomerType, idStore) VALUES ('PayPal','comersus_gatewayPayPal.asp',9999,9999,999999,NULL," &pIdStore& ")"
  call updateDatabase(mySQL1, rstemp, "comersus_backoffice_install.asp") 
  
end if

if p2CheckoutSID<>"" then
  mySQL1="UPDATE settings SET settingValue='" &p2CheckoutSID& "' WHERE settingKey='p2CheckoutSID' AND idStore=" &pIdStore
  call updateDatabase(mySQL1, rstemp, "comersus_backoffice_install.asp") 
  
  mySQL1="INSERT INTO payments (paymentDesc, redirectionUrl, quantityUntil, weightUntil, priceUntil, idCustomerType, idStore) VALUES ('Credit Cards with 2Checkout','comersus_gateway2CheckOut.asp',9999,9999,999999,NULL,"&pIdStore&")"
  call updateDatabase(mySQL1, rstemp, "comersus_backoffice_install.asp") 
end if

' other settings

if pUseOffLineCreditCards="-1" then

 ' check if the payment method is already inserted
 mySQL1="SELECT idPayment FROM payments WHERE redirectionURL='comersus_offLinePaymentForm.asp' AND idStore=" &pIdStore
 call getFromDatabase(mySQL1, rstemp, "comersus_backoffice_install.asp") 
 
 if rstemp.eof then
  ' the payment method is not inserted
  mySQL1="INSERT INTO payments (paymentDesc, redirectionUrl, quantityUntil, weightUntil, priceUntil, idCustomerType, idStore) VALUES ('Credit Cards','comersus_offLinePaymentForm.asp',9999,9999,999999,NULL,"&pIdStore&")"
  call updateDatabase(mySQL1, rstemp, "comersus_backoffice_install.asp") 
 end if
 
 ' cards accepted
 pOffLineCardsAccepted=""
 if request.form("vi")="-1" then pOffLineCardsAccepted=pOffLineCardsAccepted&"VI, "
 if request.form("ma")="-1" then pOffLineCardsAccepted=pOffLineCardsAccepted&"MA, "
 if request.form("am")="-1" then pOffLineCardsAccepted=pOffLineCardsAccepted&"AM, "
 if request.form("din")="-1" then pOffLineCardsAccepted=pOffLineCardsAccepted&"DIN, "
 if request.form("dis")="-1" then pOffLineCardsAccepted=pOffLineCardsAccepted&"DIS, "
 if request.form("jc")="-1" then pOffLineCardsAccepted=pOffLineCardsAccepted&"JC, "
 
 if pOffLineCardsAccepted<>"" then
  mySQL1="UPDATE settings SET settingValue='" &pOffLineCardsAccepted& "' WHERE settingKey='pOffLineCardsAccepted' AND idStore=" &pIdStore
  call updateDatabase(mySQL1, rstemp, "comersus_backoffice_install.asp") 
 end if

end if

if pChecks<>"" and pChecksComments<>"" then
  mySQL1="INSERT INTO payments (paymentDesc, emailText, quantityUntil, weightUntil, priceUntil, idCustomerType, idStore) VALUES ('Checks','" &pChecksComments& "',9999,9999,999999,NULL,"&pIdStore&")"
  call updateDatabase(mySQL1, rstemp, "comersus_backoffice_install.asp") 
end if

if pWireTransfer<>"" and pWireComments<>"" then
  mySQL1="INSERT INTO payments (paymentDesc, emailText, quantityUntil, weightUntil, priceUntil, idCustomerType, idStore) VALUES ('Wire Transfer','" &pWireComments& "',9999,9999,999999,NULL, "&pIdStore&")"
  call updateDatabase(mySQL1, rstemp, "comersus_backoffice_install.asp") 
end if

%>
<!--#include file="header.asp"--> 
<!--#include file="./includes/settings.asp"-->

<br><font size="3"><b>Installation Wizard</b></font><br>

<br>Step 5 - Shipping<br><br>
<form method="post" name="install6" action="comersus_backoffice_install6.asp">
<table width="418" border="0">

     <tr> 
      <td width="189">By pass shipping (digital goods and service stores)</td>
      <td width="219">        
        <select name="pByPassShipping">
        <option value='-1'>Yes</option>
        <option value='0' selected>No</option>
        </select>
      </td>
    </tr>
    
     <tr> 
      <td width="189">Service type</td>
      <td width="219">                        
        <input type="text" name="pServiceType1" value="">        
      </td>
    </tr>
    <tr> 
      <td width="189">Weight rule</td>
      <td width="219">                
        From <input type="text" name="pWeightFrom1" value="0" size=3>  Until <input type="text" name="pWeightUntil1" value="9999" size=4>  
      </td>
    </tr>    
    <tr> 
      <td width="189">Destination Zip</td>
      <td width="219">       
      <input type="text" name="pZip1" value="">        
      </td>
    </tr>    
    <tr> 
      <td width="189">Shipping amount</td>
      <td width="219">        
        <input type="text" name="pShippingAmount1" value="0.00">        
      </td>
    </tr>
    <tr> 
      <td width="189">&nbsp;</td>
      <td width="219">&nbsp;</td>
    </tr>
<tr> 
      <td width="189">Service type</td>
      <td width="219">                
        <input type="text" name="pServiceType2" value=""> 
      </td>
    </tr>
    <tr> 
      <td width="189">Weight rule</td>
      <td width="219">                
        From <input type="text" name="pWeightFrom2" value="0" size=3>   Until <input type="text" name="pWeightUntil2" value="9999" size=4>  
      </td>
    </tr>    
    <tr> 
      <td width="189">Zip</td>
      <td width="219">       
      <input type="text" name="pZip2" value=""> 
      </td>
    </tr>    
    <tr> 
      <td width="189">Shipping amount</td>
      <td width="219">        
        <input type="text" name="pShippingAmount2" value="0.00"> 
      </td>
    </tr>
    <tr> 
      <td width="189">&nbsp;</td>
      <td width="219">&nbsp;</td>
    </tr>
    
    <tr> 
      <td width="189">Service type (outside your country)</td>
      <td width="219">                
        <input type="text" name="pServiceType3" value=""> 
      </td>
    </tr>
    <tr> 
      <td width="189">Weight rule</td>
      <td width="219">                
        From <input type="text" name="pWeightFrom3" value="0" size=3>  Until <input type="text" name="pWeightUntil3" value="9999" size=4>  
      </td>
    </tr>            
    <tr> 
      <td width="189">Shipping amount</td>
      <td width="219">        
          <input type="text" name="pShippingAmount3" value="0.00"> 
      </td>
    </tr>
    <tr> 
      <td width="189">&nbsp;</td>
      <td width="219">&nbsp;</td>
    </tr>        
    <tr> 
      <td colspan="2"> 
        <br>
        <input type="submit" name="Submit" value="Continue">
      </td>
    </tr>
</table>    
</form>

<br>Additional information 
<br>(1) Here you can configure some basic off line shipping quotes. You can add more shipping quotes from BackOffice and you can also configure online shipping quotation methods. 
<!--#include file="footer.asp"-->
<%call closeDb()%>