<% @language = vbscript %>
<% if request("userid") = "" then Response.Redirect "login.asp?menu=school" %>

<!--#include file="_ScriptLibrary/adovbs.inc"-->
<!--#include file="datastore.asp"-->

<BASEFONT FACE="Arial" COLOR="DarkBlue">
<% 
	Dim sTitle 
	sTitle = "List Jobs in Database for User"
%>
<!--#include file=header.asp-->
<!--#include file=top.asp-->

<div align="center">
	<table width="600" cellspacing="0" cellpadding="0" border="0" bgcolor="#FFFFFF">
	<tr>
		<td width="240" valign="top">
			<img src="images/myjobs.jpg" border="0" WIDTH="240" HEIGHT="50">
			<font face=arial color=brown><b>You currently have the following jobs listed</b></font>
		</td>
		<td width="180" valign="top">
			<table width="100%" cellspacing="0" cellpadding="0" border="0">
				<tr>
					<td bgcolor="#003399">
						<table bgcolor="#003399" width="100%" cellspacing="2" cellpadding="2" border="0">
							<tr bgcolor="#003399"><td bgcolor="lightgreen" align="center"><a href="research.asp?userid=<%=request("userid")%>"><font color="brown">Search Resumes</font></a></td></tr>
							<tr><td bgcolor="lightgreen" align="center"><a href="schlist.asp?userid=<%=request("userid")%>"><font color="brown">Post New Jobs</font></a></td></tr>
							<tr><td bgcolor="lightgreen" align="center"><b>List My Jobs</b></td></tr>
							<tr><td bgcolor="lightgreen" align="center"><a href="schlist.asp?userid=<%=request("userid")%>"><font color="brown">Edit My Registration</font></a></td></tr>
						</table>
					</td>
				</tr>
			</table>
		</td>
		<td width="180" valign="top">
			<table width="100%" cellspacing="0" cellpadding="0" border="0">
				<tr>
					<td bgcolor="#003399">
						<table bgcolor="#003399" width="100%" cellspacing="2" cellpadding="2" border="0">
							<tr><td bgcolor="#6699FF" align="center"><a href="default.asp">Job Search</a></td></tr>
							<tr><td bgcolor="#6699FF" align="center"><a href="login.asp?menu=teacher">My Resume</a></td></tr>
							<tr><td bgcolor="#6699FF" align="center"><a href="login.asp?menu=school">For Schools</a></td></tr>
							<tr><td bgcolor="#6699FF" align="center"><a href="faqs.asp">FAQs</a></td></tr>
						</table>
					</td>
				</tr>
			</table>
		</td>
	</tr>
	</table>	
</div>


<%
Dim sUserID
sUserID = trim(Request("userid"))

Dim objConn
Dim rsJobs
Dim sSQL

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

'open the connection object
	if objConn.State = 0 then	'only open if the connection is closed
		objConn.Open sConnect
	end if
'create SQL statement
sSQL = "SELECT JOB.*, SCHOOL.name FROM (MANAGER INNER JOIN SCHOOL ON MANAGER.managerid = SCHOOL.manager_id) INNER JOIN JOB ON SCHOOL.schoolid = JOB.school_id WHERE MANAGER.managerid='" & sUserID & "';"

'open the JOB table
rsJobs.Open sSQL, objConn, adOpenStatic

  if not rsJobs.EOF then
%>
<p></p>
<TABLE align=center BORDER="1" CELLSPACING="3" CELLPADDING="3">
<TR>
  <TH>Job ID<BR><FONT SIZE="-1">Click to Edit</FONT></TH>
  <TH>Status</TH>
  <TH>Job Title</TH><TH>Salary</TH>
  <TH>Date Submitted</TH><TH>School Name</TH>
</TR>

<%
  do while not rsJobs.EOF
    Response.Write "<TR align=center><TD>"
    Response.Write "<A HREF=""postjob.asp?action=edit&job=" & rsJobs("jobid") & "&schoolid=" & rsJobs("school_id") & "&userid=" & sUserID & """>"
    Response.Write rsJobs("jobid")
    Response.Write "</a></TD><TD>"
    if rsJobs("active") then
		Response.Write "<font color=green>" & "<b>" & "active" & "</b>" & "</font>"
	else
		Response.Write "<font color=red>" & "<b>" & "inactive" & "</b>" &  "</font>"
	end if
    Response.Write "</TD><TD>"
    Response.Write rsJobs("title")
    Response.Write "</TD><TD>"
    Response.Write FormatCurrency(rsJobs("minsalary")) & " - " & FormatCurrency(rsJobs("maxsalary"))
    Response.Write "</TD><TD>"
    Response.Write FormatDateTime(rsJobs("date_submitted"),2)
    Response.Write "</TD><TD>"
    Response.Write rsJobs("name")
    Response.Write "</TD></TR>"

    rsJobs.MoveNext
  loop
  rsJobs.close
  objConn.Close
%>		
</TABLE>

<% 
Else%>
  <P><H2><center>No Jobs in Database</center></H2></P>
<% 
End If %>
<HR>

</center>
<!--#include file=bottom.asp-->
<!--#include file=footer.asp-->