<!--#INCLUDE FILE="../HXINCLUDE/HXINCLUDEHEAD.ASP"-->
<%action=request("action"):WS_Uid=request("WS_Uid"):ColumnName="":Tablename="HX_Wageinfo":Orderby=""
 yyyy=request("yy"):mmmm=request("mm")
 if yyyy<>"" and mmmm<>"" then Orderby=" where WS_dotime=#"&yyyy&"-"&mmmm&"-15"&"#"  else yyyy=year(date):mmmm=month(date) end if
 set rs=WS_S.HX_SetRSD(ColumnName,Tablename,Orderby)
  response.Write "<head><title>工资报表</title><link rel=stylesheet type=text/css href='../HXinclude/HX_Style.css'><meta http-equiv='Content-Type' content='text/html; charset=gb2312'></head><body topmargin='20' leftmargin='0' bottommargin='20'><table width='609'  border='0' cellspacing='1' cellpadding='0' align=center bgcolor='#613c25'><tr><td width='609' colspan='2' bgcolor=FFFBE8><table width='609'  border='0' cellspacing='0' cellpadding='0'><tr><td width='609' height='25' background='../hximages/titleline.gif'><font class='fontmenu'>工资报表</font></td></tr></table><table width='100%' cellspacing cellpadding><tr><td width='100%'><table width='100%' border='0' cellspacing='1' cellpadding='0' bgcolor='#613c25' height='100%'><form method='post' action='wagemonth.asp' name='form1'><tr><td height='27' bgcolor=FFFBE8><select name='yy'>"
  for i=year(date)-20 to year(date)+1 
   response.Write "<option value='"&i&"'"
     if i=cint(yyyy) then response.Write " selected"
  response.Write ">"&i&"</option>"
  next
  response.Write "</select>年 <select name='mm' onchange='form1.submit()'>"
  for i=1 to 12
    response.Write "<option value='"&i&"'"
	  if i=cint(mmmm) then response.Write " selected"
	response.Write ">"&i&"</option>"
	next
	response.Write "</select>月工资表 </span> &nbsp;&nbsp;&nbsp;新增员工 <select name='select2' onChange=""if(this.value!='请选择') window.location='wagelist.asp?action=add&WS_Uid='+this.value""><option>请选择</option>"
	set rs1=WS_S.HX_SetRSD("","HX_CompanyUser"," where WS_leave=False")
	while not rs1.eof
	  response.Write "<option value='"&rs1("WS_Uid")&"'>"&rs1("WS_name")&"</option>"
	rs1.movenext
	wend
	response.Write "</select>的工资记录  </td></tr></form>"
  if rs.recordcount>0 then
  response.Write "<tr><td bgcolor=FFFBE8><table width='100%' border='0' cellpadding='3' cellspacing='1' bgcolor=BF9B73><tr bgcolor='BF9B73' class=td34><td>员工</td><td>基本薪资</td><td>提成工资</td><td colspan='4'>其它应得款</td><td colspan='4'>应扣款项</td><td>实发薪资</td></tr><tr bgcolor='FFFBE8'><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>住房补贴</td><td>餐费补贴</td><td>出差补贴</td><td>其它</td><td>考勤扣款</td><td>所得税</td><td>保险扣款</td><td>其它</td><td>&nbsp;</td></tr>"
	rs.PageSize =15 '每页记录条数
	iCount=rs.RecordCount '记录总数
	iPageSize=rs.PageSize
    	maxpage=rs.PageCount 
    	page=request("page")
    
    if Not IsNumeric(page) or page="" then
        page=1
    else
        page=cint(page)
    end if
    
    if page<1 then
        page=1
    elseif  page>maxpage then
        page=maxpage
    end if
    
    rs.AbsolutePage=Page

	if page=maxpage then
		x=iCount-(maxpage-1)*iPageSize
	else
		x=iPageSize
	end if
	i=0
	do while not rs.EOF
      response.Write "<tr "
	  if i mod 2 =0 then response.write "bgcolor=#FFFBE8" else response.write "bgcolor=#FFFBE8"
	  response.Write "><td>"
	  WS_S.HX_OutUserInfo rs("WS_Uid")
	  response.Write "<a href='wagelist.asp?WS_Uid="&rs("WS_Uid")&"'><b><font color='#0000FF'>"&OutName&"</font></b></a></td><td>"&rs("WS_wage")&"</td><td>"&rs("WS_pay")&"</td><td>"&rs("WS_house")&"</td><td>"&rs("WS_lunch")&"</td><td>"&rs("WS_outpay")&"</td><td>"&rs("WS_bonus")&"</td><td>"&rs("WS_card")&"</td><td>"&rs("WS_ratal")&"</td><td>"&rs("WS_safe")&"</td><td>"&rs("WS_other")&"</td><td>"&rs("WS_lastmoney")&"</td></tr>"
      i=i+1
	  if i>=rs.PageSize then Exit Do
	  rs.movenext
      loop
      call WS_S.PageControl(iCount,maxpage,page,"border=0 align=right","<p align=right>",12)
      response.Write "</table></td></tr><tr bgcolor='#FFFBE8'><td height='30' align=right><input type='button' name='WS_Submit2' value=' 返 回 ' onclick='javascript:history.go(-1);'> <input type='button' name='WS_Submit2' value=' 打 印 ' onclick='javascript:print();'></td></tr>"
 end if	
 response.Write "</table></td></tr></table></td></tr></table>"
%>