<%@ Language=VBScript %>
<%
option explicit
Dim sTitle 
sTitle = "Confirmation"

'get total price
Dim iTotal
iTotal = trim(Request.Form("txtTotalPrice"))

'get payment method
Dim sPayment
sPayment = trim(Request.Form("payment"))

'get user id
Dim sUserID
sUserID = trim(Request.Form("txtUserID"))

'user id must not be empty. if empty redirect to login screen
if sUserID = "" then Response.Redirect "login.asp?menu=school"
%>
<!--#include file="_ScriptLibrary/adovbs.inc"-->
<!--#include file="datastore.asp"-->
<%
	if sPayment = "Check" or sPayment = "APO" then
		'copy records corresponding to userid in cart, to jobs table
	Dim objConn
	Dim rsJobs
	Dim rsCart
	Dim sSQL

	Set objConn = server.CreateObject("ADODB.Connection")	'Connection object	
	Set rsCart = server.CreateObject("ADODB.Recordset") 	'Recordset object
	Set rsJobs = server.CreateObject("ADODB.Recordset")		'Recordset object

	'open the connection object
	objConn.Open sConnect

	'open the CART table
	rsCart.Open "CART", objConn, 3, 3

	'open the JOB table
	rsJobs.Open "SELECT * FROM JOB", objConn, 3, 3

	'Filter the recordset
	rsCart.Filter = "user_id = '" & sUserID & "'"

	If Not rsCart.EOF then 
	rsCart.MoveFirst
	
	'copy corresponding records in cart to jobs table
	Do While Not rsCart.EOF
		rsJobs.AddNew
		rsJobs("school_id") = rsCart("school_id")
		rsJobs("title") = rsCart("title")
		rsJobs("start_date") = rsCart("start_date")
		rsJobs("expertise")= rsCart("expertise")
		rsJobs("degree_req") = rsCart("degree_req")
		rsJobs("special_qual") = rsCart("special_qual")
		rsJobs("job_description") = rsCart("job_description")
		rsJobs("minsalary") = rsCart("minsalary")
		rsJobs("maxsalary") = rsCart("maxsalary")
		rsJobs("peryrhr") = rsCart("peryrhr")
		rsJobs("contact_name") = rsCart("contact_name")
		rsJobs("contact_areacode") = rsCart("contact_areacode")
		rsJobs("contact_phone") = rsCart("contact_phone")
		rsJobs("contact_email") = rsCart("contact_email")
		rsJobs("date_submitted")= Date()
		rsJobs("graceperiod")= rsCart("graceperiod")
		rsJobs("price") = rsCart("price")
		rsJobs("active")= 0
		rsJobs.Update
		
		rsCart.MoveNext
	Loop
	
	'delete related records in cart.
	objConn.Execute "DELETE * FROM CART WHERE user_id = '" & sUserID & "'"
	
	'add transaction to the transaction table
	if iTotal <> 0 then
		sSQL = "INSERT INTO JOBTRANSACT (user_id, amount, payment, datepaid) VALUES ('" & sUserID & "', " & iTotal & ", '" & sPayment & "', " & formatdatetime(Date(),0) &  ");"
		objConn.Execute (sSQL)
	end if
	
	end if 'end test empty cart
	
	'Close and release recordset
	rsJobs.Close
	Set rsJobs = Nothing
	
	'close and release recordset
	rsCart.Close
	Set rsCart = Nothing

	'close and release connection
	objConn.Close
	Set objConn = Nothing
	
	end if
%>

<%
'based on payment method selection, format page display
select case sPayment
	case "Check":
		%>
		<!--#include file=header.asp-->
		<!--#include file=top.asp-->
		
		<div align=center>
		<FONT COLOR=red face=arial><H2>Please Print This Page</h2></font>
		<b><font color="blue">Your total is : </font><font color="green"><%=FormatCurrency(iTotal)%></font></b>
		<table width=400>
		<tr>
		<td>
		<IMG align=bottom height=21 src="images/pingreen.jpg" width="21" NATURALSIZEFLAG="3">
		<B><FONT COLOR="#a52a2a"> Send a Check or Money Order</FONT></B>
		<B>
	        <p>Our address is:<br>
  
                       <p>School Jobs
                       EPICENTER, Inc.<br>
                       4200 Sheridan Street<br>
                       Hyattsville, MD 20782<br>
			</B>
			<p align=center><a href="research.asp?userid=<%=sUserID%>"><font color="brown">Search Resumes</a>
		</td>
		</tr>
		</table>
		</div>
		
		<!--#include file=bottom.asp-->
		<!--#include file=footer.asp-->
		<%
	case "APO":
		%>
		<!--#include file=header.asp-->
		<!--#include file=top.asp-->
		<div align=center>
		<FONT COLOR=red face=arial><H2>Please Print This Page</h2></font>
		<b><font color="blue">Your total is : </font><font color="green"><%=FormatCurrency(iTotal)%></font></b>
		<table width=400>
		<tr>
		<td>
		<IMG align=bottom height=21 src="images/pingreen.jpg" width="21" NATURALSIZEFLAG="3">
		<B><FONT COLOR="#a52a2a"> Send an approved purchase order</FONT></B>
		<B>
			<p>You can send us your approved<br>
	           purchase order by postal mail<br>
	           or by FAX.<br>

	        <p>Our address is:<br>
  
                       <p>School Jobs
                       EPICENTER, Inc.<br>
                       4200 Sheridan Street<br>
                       Hyattsville, MD 20782<br>
	        <p>Our FAX number is 301-864-5617 
			</B>
			<p align=center><a href="research.asp?userid=<%=sUserID%>"><font color="brown">Search Resumes</a>
		</td>
		</tr>
		</table>
		</div>
		<!--#include file=bottom.asp-->
		<!--#include file=footer.asp-->
		<%
		
	case "CC":
		%>
		<!--#include file=header.asp-->
		<!--#include file=top.asp-->
		<div align="center">
		<table width=400 border=0>
		<tr>
		<td>
		<p>&nbsp;
		<p><b><font color="blue">Your total is : </font><font color="green"><%=FormatCurrency(iTotal)%></font></b>
		<p>Secure on-line credit card transactions.
		<form method="POST" action=https://secure.linkpt.net/cgi-bin/hlppay>
           <input type="hidden" name="mode" value="payonly"> 
           <input type="hidden" name="chargetotal" value="<%=iTotal%>"> 
           <input type="hidden" name="storename" value="357068">
           <input type="hidden" name="userid" value="<%=sUserID%>">
           <input type="submit" value="Continue to Secure Payment Form"> 
		</form>
		</td>
		</tr>
		</table>
		<!--#include file=bottom.asp-->
		<!--#include file=footer.asp-->
		
		<%
	Case else:
		Response.Write "You must select a payment method."
		%>
		
<%
end select
%>