PageRenderTime 56ms CodeModel.GetById 16ms RepoModel.GetById 0ms app.codeStats 1ms

/beta/order/TraceOrder.asp

http://github.com/khaneh/Orders
ASP | 1452 lines | 1364 code | 72 blank | 16 comment | 126 complexity | 1361e962bb4993bf454338dd38a68986 MD5 | raw file
    

  1. <%@LANGUAGE="VBSCRIPT" CODEPAGE="1256"%><%
    2. 

  2. 'Order (2)
    3. 

  3. PageTitle="پيگيري سفارش"
    4. 

  4. SubmenuItem=3
    5. 

  5. if not Auth(2 , 3) then NotAllowdToViewThisPage()
    6. 

  6. %>
    7. 

  7. <!--#include file="top.asp" -->
    8. 

  8. <!--#include File="../include_farsiDateHandling.asp"-->
    9. 

  9. <!--#include File="../include_UtilFunctions.asp"-->
    10. 

  10. <%
    11. 

  11. 'Server.ScriptTimeout = 3600
    12. 

  12. %>
    13. 

  13. <STYLE>
    14. 

  14. 	.CustTable {font-family:tahoma; width:80%; border:1 solid black; direction: RTL; background-color:black;}
    15. 

  15. 	.CustTable td {padding:5;}
    16. 

  16. 	.CustTable a {text-decoration:none;color:#000088}
    17. 

  17. 	.CustTable a:hover {text-decoration:underline;}
    18. 

  18. 	.CusTableHeader {background-color: #33AACC; text-align: center; font-weight:bold;}
    19. 

  19. 	.CusTD1 {background-color: #CCCC66; text-align: left; font-weight:bold;}
    20. 

  20. 	.CusTD2 {background-color: #DDDDDD; direction: LTR; text-align: right; font-size:9pt;}
    21. 

  21. 	.CusTD3 {background-color: #DDDDDD; direction: LTR; text-align: center; font-size:9pt;}
    22. 

  22. 	.CusTD4 {background-color: #CCCC66; direction: LTR; text-align: center; font-size:9pt;}
    23. 

  23. 	a.aYellow:link {color: yellow;}
    24. 

  24. 	a.aYellow:visited {color: green;}
    25. 

  25. 	a.aYellow:hover {color: gray;}
    26. 

  26. 	.mySection{border: 1px #F90 dashed;margin: 15px 10px 0 15px;padding: 5px 0 5px 0;}
    27. 

  27. 	.myRow{border: 2px #F05 dashed;margin: 10px 0 10px 0;padding: 0 3px 5px 0;}
    28. 

  28. 	.exteraArea{border: 1px #33F dotted;margin: 5px 0 0 5px;padding: 0 3px 5px 0;}
    29. 

  29. 	.myLabel {margin: 0px 3px 0 0px;white-space: nowrap;padding: 5px 0 5px 0;}
    30. 

  30. 	.myProp {font-weight: bold;color: #40F; margin: 0px 3px 0 0px;padding: 5px 0 5px 0;}
    31. 

  31. 	div.btn label{background-color:yellow;color: blue;padding: 3px 30px 3px 30px;cursor: pointer;}
    32. 

  32. 	div.btn{margin: -5px 250px 0px 5px;}
    33. 

  33. 	div.btn img{margin: 0px 20px -5px 0;cursor: pointer;}
    34. 

  34. 	div.report{visibility: collapse; height: 0px;}
    35. 

  35. 	div.price{float: left;border: 1px solid #999;margin: 0 0 0 10px;color: black;background-color: yellow;padding: 1px 3px 1px 3px;}
    36. 

  36. 	.time{direction: ltr;}
    37. 

  37. </STYLE>
    38. 

  38. <script type="text/javascript" src="/js/jquery-1.7.min.js"></script>
    39. 

  39. <script type="text/javascript" src="/js/jquery.printElement.min.js"></script>
    40. 

  40. <SCRIPT LANGUAGE='JavaScript'>
    41. 

  41. <!--
    42. 

  42. function checkValidation(){
    43. 

  43. 	if (document.all.search_box.value != ''){
    44. 

  44. 		return true;
    45. 

  45. 	}
    46. 

  46. 	else{
    47. 

  47. 		document.all.search_box.focus();
    48. 

  48. 		return false;
    49. 

  49. 	}
    50. 

  50. }
    51. 

  51. 

  52. //-->
    53. 

  53. 

  54. </SCRIPT>
    55. 

  55. 

  56. <%
    57. 

  57. if request("act")="" then
    58. 

  58. %>
    59. 

  59. 	<hr>
    60. 

  60. 	<TABLE border="4" cellspacing="0" cellpadding="0" width="600" align="center" bordercolor="#555599">
    61. 

  61. 	<FORM METHOD=POST ACTION="TraceOrder.asp?act=search" onSubmit="return checkValidation();">
    62. 

  62. 	<TR><TD>
    63. 

  63. 		<TABLE border="0" cellspacing="0" cellpadding="5" dir="RTL" width="100%">
    64. 

  64. 		<TR bgcolor="#AAAAEE">
    65. 

  65. 			<TD>نام مشتري يا شركت يا شماره سفارش:</TD>
    66. 

  66. 			<TD><INPUT TYPE="text" NAME="search_box" value="<%=request.form("search_box")%>"></TD>
    67. 

  67. 			<TD><INPUT TYPE="submit" NAME="SubmitB" Value="جستجو" style="font-family:tahoma,arial; font-size:10pt;width:100px;"></TD>
    68. 

  68. 			<TD align="left"><% if Auth(2 , 5) then %><A HREF="TraceOrder.asp?act=advancedSearch">جستجوي پيشرفته</A><% End If %></TD>
    69. 

  69. 		</TR>
    70. 

  70. 		</TABLE>
    71. 

  71. 	</TD></TR>
    72. 

  72. 	</FORM>
    73. 

  73. 	</TABLE>
    74. 

  74. 	<script language="JavaScript">
    75. 

  75. 	<!--
    76. 

  76. 		document.all.search_box.focus();
    77. 

  77. 	//-->
    78. 

  78. 	</script>
    79. 

  79. 	<hr>
    80. 

  80. <%
    81. 

  81. 	'
    82. 

  82. elseif request("act")="search" then
    83. 

  83. %>
    84. 

  84. 	<hr>
    85. 

  85. 	<TABLE border="4" cellspacing="0" cellpadding="0" width="600" align="center" bordercolor="#555599">
    86. 

  86. 	<FORM METHOD=POST ACTION="TraceOrder.asp?act=search" onSubmit="return checkValidation();">
    87. 

  87. 	<TR><TD>
    88. 

  88. 		<TABLE border="0" cellspacing="0" cellpadding="5" dir="RTL" width="100%">
    89. 

  89. 		<TR bgcolor="#AAAAEE">
    90. 

  90. 			<TD>نام مشتري يا شركت يا شماره سفارش:</TD>
    91. 

  91. 			<TD><INPUT TYPE="text" NAME="search_box" value="<%=request.form("search_box")%>"></TD>
    92. 

  92. 			<TD><INPUT TYPE="submit" NAME="SubmitB" Value="جستجو" style="font-family:tahoma,arial; font-size:10pt;width:100px;"></TD>
    93. 

  93. 			<TD align="left"><% if Auth(2 , 5) then %><A HREF="TraceOrder.asp?act=advancedSearch">جستجوي پيشرفته</A><% End If %></TD>
    94. 

  94. 		</TR>
    95. 

  95. 		</TABLE>
    96. 

  96. 	</TD></TR>
    97. 

  97. 	</FORM>
    98. 

  98. 	</TABLE>
    99. 

  99. 	<script language="JavaScript">
    100. 

  100. 	<!--
    101. 

  101. 		document.all.search_box.focus();
    102. 

  102. 	//-->
    103. 

  103. 	</script>
    104. 

  104. 	<hr>
    105. 

  105. <%
    106. 

  106. 	
    107. 

  107. 	search=request("search_box")
    108. 

  108. 	if search="" then
    109. 

  109. 		'By Default show Open Orders of Current User
    110. 

  110. 		myCriteria= "Orders.CreatedBy = " & session("ID")
    111. 

  111. 	elseif isNumeric(search) then
    112. 

  112. 		search=clng(search)
    113. 

  113. 		myCriteria= "radif_sefareshat = '"& search & "'"
    114. 

  114. 	else
    115. 

  115. 		search=sqlSafe(search)
    116. 

  116. 		myCriteria= "REPLACE([company_name], ' ', '') LIKE REPLACE(N'%"& search & "%', ' ', '') OR REPLACE([customer_name], ' ', '') LIKE REPLACE(N'%"& search & "%', ' ', '')"
    117. 

  117. 	End If
    118. 

  118. 

  119. '	mySQL="SELECT orders_trace.*, OrderTraceStatus.Name AS StatusName, OrderTraceStatus.Icon FROM Orders INNER JOIN orders_trace ON Orders.ID = orders_trace.radif_sefareshat INNER JOIN OrderTraceStatus ON orders_trace.status = OrderTraceStatus.ID WHERE ("& myCriteria & ") AND (Orders.Closed=0) ORDER BY order_date DESC, radif_sefareshat DESC"	
    120. 

  120. 	'mySQL="SELECT orders_trace.*, Orders.closed, OrderTraceStatus.Name AS StatusName, OrderTraceStatus.Icon,DRV_Invoice.price, ghar.return_date as ghDate, ghar.return_time as ghTime FROM Orders INNER JOIN  orders_trace ON Orders.ID = orders_trace.radif_sefareshat INNER JOIN  OrderTraceStatus ON orders_trace.status = OrderTraceStatus.ID left outer join (select InvoiceOrderRelations.[Order],SUM(InvoiceLines.Price + InvoiceLines.Vat - InvoiceLines.Discount -InvoiceLines.Reverse) as price from InvoiceOrderRelations inner join Invoices on InvoiceOrderRelations.Invoice=Invoices.ID inner join InvoiceLines on Invoices.ID=InvoiceLines.Invoice where Invoices.Voided=0 group by InvoiceOrderRelations.[Order]) DRV_Invoice on Orders.ID=DRV_Invoice.[Order] inner join (select [order],return_date,return_time from OrderTraceLog where ID in (select min(id) from OrderTraceLog where return_date is not null group by [Order])) as ghar on orders_trace.radif_sefareshat =ghar.[order] WHERE ("& myCriteria & ") ORDER BY order_date DESC, radif_sefareshat DESC"
    121. 

  121. 	mySQL="SELECT orders_trace.*, OrderTraceStatus.Name AS StatusName, OrderTraceStatus.Icon , Invoices.ID AS InvoiceID, Invoices.Approved, Invoices.Voided, Invoices.Issued,DRV_invoice.price, ghar.return_date as ghDate, ghar.return_time as ghTime FROM Invoices INNER JOIN InvoiceOrderRelations ON Invoices.ID = InvoiceOrderRelations.Invoice RIGHT OUTER JOIN Orders INNER JOIN orders_trace ON Orders.ID = orders_trace.radif_sefareshat INNER JOIN OrderTraceStatus ON orders_trace.status = OrderTraceStatus.ID ON InvoiceOrderRelations.[Order] = Orders.ID left outer join (select InvoiceOrderRelations.[Order],SUM(InvoiceLines.Price + InvoiceLines.Vat - InvoiceLines.Discount -InvoiceLines.Reverse) as price from InvoiceOrderRelations inner join Invoices on InvoiceOrderRelations.Invoice=Invoices.ID inner join InvoiceLines on Invoices.ID=InvoiceLines.Invoice where Invoices.Voided=0 group by InvoiceOrderRelations.[Order]) DRV_invoice on Orders.id=DRV_invoice.[Order] left outer join (select [order],return_date,return_time from OrderTraceLog where ID in (select min(id) from OrderTraceLog where return_date is not null group by [Order])) as ghar on orders_trace.radif_sefareshat =ghar.[order] WHERE ("& myCriteria & ") AND (Orders.Closed=0) ORDER BY orders_trace.order_date DESC, orders_trace.radif_sefareshat DESC"
    122. 

  122. 

  123. 

  124. 	set RS1=Conn.Execute (mySQL)
    125. 

  125. 	if not RS1.eof then
    126. 

  126. 		tmpCounter=0
    127. 

  127. %>
    128. 

  128. 	<div align="center" dir="LTR" >
    129. 

  129. 	<table border="1" cellspacing="0" cellpadding="2" dir="RTL"  borderColor="#555588" >
    130. 

  130. 		<TR valign=top bgcolor="#CCCCFF">
    131. 

  131. 			<TD width="40"># سفارش</TD>
    132. 

  132. 			<TD width="65">تاريخ سفارش<br>تاريخ تحويل</TD>
    133. 

  133. 			<TD width="130">نام شركت - مشتري</TD>
    134. 

  134. 			<TD width="80">عنوان كار</TD>
    135. 

  135. 			<TD width="36">نوع</TD>
    136. 

  136. 			<TD width="45">مرحله</TD>
    137. 

  137. 			<TD width="38">سفارش گيرنده</TD>
    138. 

  138. 			<TD width="18">وضع</TD>
    139. 

  139. 			<TD width="30">فاكتور</TD>
    140. 

  140. 			<td width="50">قيمت</td>
    141. 

  141. 		</TR>
    142. 

  142. <%		Do while not RS1.eof
    143. 

  143. 			tmpCounter=tmpCounter+1
    144. 

  144. 		if isnull(RS1("price")) then
    145. 

  145. 			InvoiceStatus="<span style='color:red;'><b>ندارد</b></span>"
    146. 

  146. 		else
    147. 

  147. 			if RS1("Voided") then
    148. 

  148. 				style="style='color:Red' Title='باطل شده'"
    149. 

  149. 			elseif RS1("Issued") then
    150. 

  150. 				style="style='color:Red' Title='صادر شده'"
    151. 

  151. 			elseif RS1("Approved") then
    152. 

  152. 				style="style='color:Green' Title='تاييد شده'"
    153. 

  153. 			else
    154. 

  154. 				style="style='color:#3399FF' Title='تاييد نشده'"
    155. 

  155. 			end if
    156. 

  156. 			InvoiceStatus="<A " & style & " HREF='../AR/AccountReport.asp?act=showInvoice&invoice=" & RS1("InvoiceID")& "' Target='_blank'>" & RS1("InvoiceID") & "</A>"
    157. 

  157. 		end if
    158. 

  158. 			
    159. 

  159. 		if tmpCounter mod 2 = 1 then
    160. 

  160. 			if IsNull(RS1("return_date")) then 
    161. 

  161. 				tmpColor="#FF0000"
    162. 

  162. 			else
    163. 

  163. 				tmpColor="#FFFFFF"
    164. 

  164. 			end if
    165. 

  165. 		Else
    166. 

  166. 			if IsNull(RS1("return_date")) then 
    167. 

  167. 				tmpColor="#DD8888"
    168. 

  168. 			else
    169. 

  169. 				tmpColor="#DDDDDD"
    170. 

  170. 			end if
    171. 

  171. 		End If 
    172. 

  172. %>
    173. 

  173. 		<TR valign=top bgcolor="<%=tmpColor%>">
    174. 

  174. 			<TD DIR="LTR"><A HREF="TraceOrder.asp?act=show&order=<%=RS1("radif_sefareshat")%>" target="_blank"><%=RS1("radif_sefareshat")%></A></TD>
    175. 

  175. 			<TD DIR="LTR">
    176. 

  176. 				<div title="تاريخ تحويل قرارداد"><%=RS1("ghDate") & " ("& RS1("ghTime") & ")"%></div>
    177. 

  177. 			<% if RS1("return_date")<>RS1("ghDate") or RS1("return_time")<>RS1("ghTime") then %>
    178. 

  178. 				<div title="تاريخ تحويل عملي" style="color:#F80;"><%=RS1("return_date") & " ("& RS1("return_time") & ")"%></div>
    179. 

  179. 			<% end if%>
    180. 

  180. 			</TD>
    181. 

  181. 			<TD><%=RS1("company_name")%><br><span style='color:gray'><%=RS1("customer_name")%></span><br>تلفن:(<%=RS1("telephone")%>)&nbsp;</TD>
    182. 

  182. 			<TD><%=RS1("order_title")%>&nbsp;</TD>
    183. 

  183. 			<TD><%=RS1("order_kind")%></TD>
    184. 

  184. 			<TD><%=RS1("marhale")%></TD>
    185. 

  185. 			<TD><%=RS1("salesperson")%>&nbsp;</TD>
    186. 

  186. 			<TD><IMG SRC="<%=RS1("Icon")%>" WIDTH="20" HEIGHT="20" BORDER=0 ALT="<%=RS1("StatusName")%>"></TD>
    187. 

  187. 			<TD><%=InvoiceStatus%>&nbsp;</TD>
    188. 

  188. 			<td><%if isnull(RS1("price")) then response.write "----" else response.write Separate(RS1("price")) end if %></td>
    189. 

  189. 		</TR>
    190. 

  190. 		<TR bgcolor="#FFFFFF">
    191. 

  191. 			<TD colspan="10" style="height:10px"></TD>
    192. 

  192. 		</TR>
    193. 

  193. <%			RS1.moveNext
    194. 

  194. 		Loop
    195. 

  195. %>		<TR bgcolor="#ccccFF">
    196. 

  196. 			<TD colspan="10">تعداد نتايج جستجو: <%=tmpCounter%></TD>
    197. 

  197. 		</TR>
    198. 

  198. 	</TABLE>
    199. 

  199. 	</div>
    200. 

  200. 	<HR>
    201. 

  201. <%	elseif request("search_box")<>"" then
    202. 

  202. %>	<TABLE border="1" cellspacing="0" cellpadding="0" dir="RTL" align="center" width="600">
    203. 

  203. 		<TR bgcolor="#FFFFDD">
    204. 

  204. 			<TD align="center" style="height:40px;font-size:12pt;font-weight:bold;color:red;padding:5px;">اين سفارش قابل پيگيري نيست<br>
    205. 

  205. 			(يا قبلا فاكتور شده يا كنسل شده و يا اصلا وجود ندارد)<br><br>
    206. 

  206. 			براي اطمينان به <A HREF="TraceOrder.asp?act=show&order=<%=request("search_box")%>" style="color:blue;">اصلاح و نمايش</A> مراجعه كنيد.</TD>
    207. 

  207. 		</TR>
    208. 

  208. 	</TABLE>
    209. 

  209. <%		End If
    210. 

  210. elseif request("act")="show" then
    211. 

  211.   if isnumeric(request("order")) then
    212. 

  212. 	Order=request("order")
    213. 

  213. 	mySQL="SELECT orders_trace.*, Accounts.ID AS AccID, Accounts.AccountTitle FROM Orders INNER JOIN Accounts ON Orders.Customer = Accounts.ID INNER JOIN orders_trace ON Orders.ID = orders_trace.radif_sefareshat WHERE (orders_trace.radif_sefareshat='"& Order & "')"
    214. 

  214. 	set RS1=conn.execute (mySQL)
    215. 

  215. 	if RS1.EOF then
    216. 

  216. 		response.write "<BR><BR><BR><BR><CENTER>شماره سفارش معتبر نيست</CENTER>"
    217. 

  217. 		response.end
    218. 

  218. 	End If
    219. 

  219. 

  220. 	if RS1("Status")=2 then
    221. 

  221. 		stamp="<div style='border:2 dashed red;width:150px; text-align:center; padding: 10px;color:red;font-size:15pt;font-weight:bold;'>كنسل شده</div>"
    222. 

  222. 	End If
    223. 

  223. 

  224. %>
    225. 

  225. 	<table border="0" cellpadding="0" cellspacing="0" align="center">
    226. 

  226. 		<tr height="10">
    227. 

  227. 			<td colspan=2></td>
    228. 

  228. 		</tr>
    229. 

  229. 		<tr height="10">
    230. 

  230. 			<td width="150"></td>
    231. 

  231. 			<td valign="top"><div style='position:absolute;'><%=stamp%></div></td>
    232. 

  232. 		</tr>
    233. 

  233. 		<tr height="20">
    234. 

  234. 			<td colspan=2></td>
    235. 

  235. 		</tr>
    236. 

  236. 	</table>
    237. 

  237. 

  238. 	<CENTER>
    239. 

  239. 		<input type="button" value="اصلاح" Class="GenButton" onclick="window.location='OrderEdit.asp?e=y&radif=<%=Order%>';">&nbsp;
    240. 

  240. 		<% 	ReportLogRow = PrepareReport ("OrderForm.rpt", "Order_ID", Order, "/beta/dialog_printManager.asp?act=Fin") %>
    241. 

  241. 		<!--INPUT TYPE="button" value=" چاپ " Class="GenButton" style="border:1 solid blue;" onclick="printThisReport(this,<%=ReportLogRow%>);"-->
    242. 

  242. 		<input type="button" value=" چاپ " class="GenButton" style="border:1 solid blue;" onclick="$('#orderProperty').printElement({overrideElementCSS:['/css/order_property.css'],pageTitle:'فرم سفارش - <%=Order%>',printMode:'popup'});">
    243. 

  243. 		<!-- ,leaveOpen:true,printMode:'popup' -->
    244. 

  244. 		<input type="button" value="فاكتور" Class="GenButton" onclick="window.location='../AR/InvoiceInput.asp?act=submitsearch&query=<%=Order%>';">
    245. 

  245. 		<!-----------------------SAM----------------------------
    246. 

  246. 		<INPUT type='button' value='فايلها' class='GenButton' style='border:1 solid blue;' onclick=''-->
    247. 

  247. 	</CENTER>
    248. 

  248. 	
    249. 

  249. 	<BR>
    250. 

  250. 	<TABLE cellspacing=0 Style="width:80%;border:2 solid #330066" align=center>
    251. 

  251. 	<TR bgcolor=white>
    252. 

  252. 		<TD>تاريخ</TD>
    253. 

  253. 		<TD>ساعت</TD>
    254. 

  254. 		<TD>مرحله</TD>
    255. 

  255. 		<TD>وضعيت</TD>
    256. 

  256. 		<TD>نام ثبت كننده</TD>
    257. 

  257. 	</TR>
    258. 

  258. 	<%
    259. 

  259. 	returnDate=""
    260. 

  260. 	actualReturnDate=""
    261. 

  261. 	returnTime=""
    262. 

  262. 	actualReturnTime=""
    263. 

  263. 	set RS_STEP=Conn.Execute ("SELECT OrderTraceLog.*, Users.RealName FROM OrderTraceLog INNER JOIN Users ON OrderTraceLog.InsertedBy = Users.ID WHERE (OrderTraceLog.[Order] = "& Order  & ") order by OrderTraceLog.ID")
    264. 

  264. 	Do while not RS_STEP.eof	
    265. 

  265. %>
    266. 

  266. 	<TR style="cursor:pointer" onclick="window.open('viewOrderLog.asp?logid=<%=RS_STEP("id")%>','orderLog','width=700, height=210')">
    267. 

  267. 		<TD  style="border-bottom: solid 1pt black" dir=ltr align=right><%=RS_STEP("InsertedDate")%> </TD>
    268. 

  268. 		<TD  style="border-bottom: solid 1pt black" dir=ltr align=right>(<%=RS_STEP("InsertedTime")%>)</TD>
    269. 

  269. 		<TD  style="border-bottom: solid 1pt black"><%=RS_STEP("StepText")%></TD>
    270. 

  270. 		<TD  style="border-bottom: solid 1pt black"><%=RS_STEP("StatusText")%></TD>
    271. 

  271. 		<TD  style="border-bottom: solid 1pt black"><%=RS_STEP("RealName")%></TD>
    272. 

  272. 	</TR>
    273. 

  273. <%
    274. 

  274. 		if returnDate="" and not IsNull(RS_STEP("return_date")) then returnDate = RS_STEP("return_date")
    275. 

  275. 		if returnTime="" and not IsNull(RS_STEP("return_time")) then returnTime = RS_STEP("return_time")
    276. 

  276. 		if returnDate<>"" and RS_STEP("return_date")<>returnDate then actualReturnDate = RS_STEP("return_date")
    277. 

  277. 		if returnTime<>"" and RS_STEP("return_time")<>returnTime then actualReturnTime = RS_STEP("return_time")
    278. 

  278. 		RS_STEP.moveNext
    279. 

  279. 	loop
    280. 

  280. 	RS_STEP.close
    281. 

  281. 	if returnDate="" then returnDate = "<font color=red>فعلا معلوم نيست!</font>"
    282. 

  282. 	if actualReturnTime<>"" and actualReturnDate="" then actualReturnDate = returnDate
    283. 

  283. 	if actualReturnDate="" then actualReturnDate = "<font color=red>ندارد</font>"
    284. 

  284. 	
    285. 

  285. 	'set RS_STEP = nothing
    286. 

  286. %>
    287. 

  287. 	<tr>
    288. 

  288. 		<td  align="center"><A HREF="../shopfloor/default.asp?orderNum=<%=order%>">تغيير مرحله</A></td>
    289. 

  289. 		<td colspan="2" title="با كليك روي اين دكمه به صورت خودكار يك ايميل به مشتري ارسال خواهد شد كه حاوي شماره مشتري و شماره سفارش خواهد بود">
    290. 

  290. 			<%
    291. 

  291. 			set rsEmail=Conn.Execute("select accounts.AccountTitle, accounts.Dear1, accounts.FirstName1, accounts.LastName1, orders.ID, orders.Customer,accounts.Email1, orders_trace.order_title from Orders inner join Accounts on orders.Customer=accounts.ID inner join orders_trace on orders_trace.radif_sefareshat=orders.ID where orders.ID=" & Order & " and accounts.EMail1 <> ''")
    292. 

  292. 			if not rsEmail.eof then 
    293. 

  293. 			%>
    294. 

  294. 			<span>
    295. 

  295. 				<form method="post" action="http://my.pdhco.com/sendMail.php">
    296. 

  296. 					<input type="hidden" name="order_id" value="<%=rsEmail("ID")%>">
    297. 

  297. 					<input type="hidden" name="customer_id" value="<%=rsEmail("customer")%>">
    298. 

  298. 					<input type="hidden" name="order_title" value="<%=rsEmail("order_title")%>">
    299. 

  299. 					<input type="hidden" name="Email" value="<%=rsEmail("Email1")%>">
    300. 

  300. 					<input type="hidden" name="AccountTitle" value="<%=rsEmail("AccountTitle")%>">
    301. 

  301. 					<input type="hidden" name="Dear" value="<%=rsEmail("Dear1")%>">
    302. 

  302. 					<input type="hidden" name="FirstName" value="<%=rsEmail("FirstName1")%>">
    303. 

  303. 					<input type="hidden" name="LastName" value="<%=rsEmail("LastName1")%>">
    304. 

  304. 					<input type="submit" name="orderSend" title='<%=rsEmail("email1")%>' value="به <%=rsEmail("Dear1") & " " & rsEmail("firstName1") & " " & rsEmail("LastName1")%> ايميل شود">
    305. 

  305. 				</form>
    306. 

  306. 			</span>
    307. 

  307. 			<%end if%>
    308. 

  308. 		</td>
    309. 

  309. 		<td colspan="2" title="با كليك روي اين دكمه به صورت خودكار يك ايميل به مشتري ارسال خواهد شد كه حاوي شماره مشتري و شماره سفارش خواهد بود">
    310. 

  310. 			<%
    311. 

  311. 			set rsEmail=Conn.Execute("select accounts.AccountTitle, accounts.Dear2, accounts.FirstName2, accounts.LastName2, orders.ID, orders.Customer,accounts.Email2, orders_trace.order_title from Orders inner join Accounts on orders.Customer=accounts.ID inner join orders_trace on orders_trace.radif_sefareshat=orders.ID where orders.ID=" & Order & " and accounts.EMail2 <> ''")
    312. 

  312. 			if not rsEmail.eof then 
    313. 

  313. 			%>
    314. 

  314. 			<span>
    315. 

  315. 				<form method="post" action="http://my.pdhco.com/sendMail.php">
    316. 

  316. 					<input type="hidden" name="order_id" value="<%=rsEmail("ID")%>">
    317. 

  317. 					<input type="hidden" name="customer_id" value="<%=rsEmail("customer")%>">
    318. 

  318. 					<input type="hidden" name="order_title" value="<%=rsEmail("order_title")%>">
    319. 

  319. 					<input type="hidden" name="Email" value="<%=rsEmail("Email2")%>">
    320. 

  320. 					<input type="hidden" name="AccountTitle" value="<%=rsEmail("AccountTitle")%>">
    321. 

  321. 					<input type="hidden" name="Dear" value="<%=rsEmail("Dear2")%>">
    322. 

  322. 					<input type="hidden" name="FirstName" value="<%=rsEmail("FirstName2")%>">
    323. 

  323. 					<input type="hidden" name="LastName" value="<%=rsEmail("LastName2")%>">
    324. 

  324. 					<input type="submit" name="orderSend" title='<%=rsEmail("email2")%>' value="به <%=rsEmail("Dear2") & " " & rsEmail("firstName2") & " " & rsEmail("LastName2")%> ايميل شود">
    325. 

  325. 				</form>
    326. 

  326. 			</span>
    327. 

  327. 			<%end if%>
    328. 

  328. 		</td>
    329. 

  329. 	</tr>
    330. 

  330. 	</TABLE>
    331. 

  331. <%
    332. 

  332. mySQL="select count(*) as id from (select Return_date,Return_time from OrderTraceLog where [Order]=" & order & " and Return_date is not null group by Return_date,return_time) as s"
    333. 

  333. set rs = Conn.Execute(mySQL)
    334. 

  334. if not rs.eof then 
    335. 

  335. 	if CInt(rs("id"))>1 then 
    336. 

  336. 		mySQL="select * from OrderTraceLog where id in (select min(id) as id from OrderTraceLog where [Order]=" & order & " and Return_date is not null group by Return_date,return_time)"
    337. 

  337. 		set rs = Conn.Execute(mySQL)
    338. 

  338. 		response.write "<TABLE cellspacing=0 Style='width:80%;border:2 solid #330066' align=center>"
    339. 

  339. 		response.write "<tr bgcolor=white><td>تاريخ</td><td>ساعت</td><td>تاريخ تحويل</td><td>ساعت تحويل</td></tr>"
    340. 

  340. 		while not rs.eof
    341. 

  341. 			response.write "<tr><td>" & rs("InsertedDate") & "</td><td>" & rs("InsertedTime") & "</td><td>" & rs("Return_date") & "</td><td class='time'>" & rs("return_time") & "</td></tr>"
    342. 

  342. 			rs.moveNext
    343. 

  343. 		wend
    344. 

  344. 		response.write "</table>"
    345. 

  345. 		rs.close
    346. 

  346. 		set rs=nothing
    347. 

  347. 	end if
    348. 

  348. end if
    349. 

  349. %>
    350. 

  350. 	<BR>
    351. 

  351. 	<BR>
    352. 

  352. <div id='orderProperty' style="direction:rtl;">	
    353. 

  353. 

  354. 	<TABLE class="" border="0" cellspacing="0" cellpadding="2" align="center" style="background-color:#CCCCCC; color:black; direction:RTL; width:700; border: 2 solid black;">
    355. 

  355. 	<TR bgcolor="black">
    356. 

  356. 		<TD align="left"><FONT COLOR="YELLOW">حساب:</FONT></TD>
    357. 

  357. 		<TD align="right" colspan=3 height="25px">
    358. 

  358. 			<span id="customer" style="color:yellow;"><%' after any changes in this span "./Customers.asp" must be revised%>
    359. 

  359. 				<span title="براي نمايش مشخصات مشتري كليك كنيد"><a class="aYellow" href='../CRM/AccountInfo.asp?act=show&selectedCustomer=<%=RS1("AccID")%>'><%=RS1("AccID") & " - "& RS1("AccountTitle")%></a></span>.
    360. 

  360. 			</span>
    361. 

  361. 		</TD>
    362. 

  362. 		<td align="left"><font color="yellow">نوع سفارش:</font></td>
    363. 

  363. 		<TD><font color="red"><b><%=RS1("order_kind")%></b></font></TD>
    364. 

  364. 	</TR>
    365. 

  365. 	
    366. 

  366. 	<TR bgcolor="black" height=30 style="color:yellow;">
    367. 

  367. 		<TD align="left">شماره سفارش:</TD>
    368. 

  368. 		<TD align="right"><%=RS1("radif_sefareshat")%></TD>
    369. 

  369. 		<TD align="left">تاريخ:</TD>
    370. 

  370. 		<TD><span dir="LTR"><%=RS1("order_date")%></span></TD>
    371. 

  371. 		<TD align="left">ساعت:</TD>
    372. 

  372. 		<TD align="right"><%=RS1("order_time")%></TD>
    373. 

  373. 	</TR>
    374. 

  374. 	<TR height=30>
    375. 

  375. 		<TD align="left">نام شركت:</TD>
    376. 

  376. 		<TD><%=RS1("company_name")%></TD>
    377. 

  377. 		<TD align="left">تاريخ تحويل قرارداد:</TD>
    378. 

  378. 		<TD align="right" dir=LTR><%=returnDate%></TD>
    379. 

  379. 		<TD align="left">ساعت تحويل:</TD>
    380. 

  380. 		<TD align="right" dir=LTR><%=returnTime%></TD>
    381. 

  381. 	</TR>
    382. 

  382. 	<TR height=30>
    383. 

  383. 		<TD align="left">نام مشتري:</TD>
    384. 

  384. 		<TD><%=RS1("customer_name")%></TD>
    385. 

  385. 		<TD align="left">تلفن:</TD>
    386. 

  386. 		<TD><%=RS1("telephone")%></TD>
    387. 

  387. 		<TD align="left">تاريخ تحويل عملي:</TD>
    388. 

  388. 		<TD align="right" dir=LTR>
    389. 

  389. 		<%
    390. 

  390. 		if actualReturnDate<>returnDate then 
    391. 

  391. 			response.write "<b>" & actualReturnDate & "</b> " 
    392. 

  392. 		else
    393. 

  393. 			response.write actualReturnDate & " "
    394. 

  394. 		end if
    395. 

  395. 		if actualReturnTime<> returnTime then 
    396. 

  396. 			response.write " <b>" & actualReturnTime & "</b>"
    397. 

  397. 		else
    398. 

  398. 			response.write " " & actualReturnTime
    399. 

  399. 		end if
    400. 

  400. 		%>
    401. 

  401. 		</TD>
    402. 

  402. 	</TR>
    403. 

  403. 	<TR height=30>
    404. 

  404. 		
    405. 

  405. 		<TD align="left">عنوان كار داخل فايل:</TD>
    406. 

  406. 		<TD colspan="3"><%=RS1("order_title")%></TD>
    407. 

  407. 		<TD align="left">سفارش گيرنده:</TD>
    408. 

  408. 		<TD><%=RS1("salesperson")%>	</TD>
    409. 

  409. 	</TR>
    410. 

  410. 	<TR height=30>
    411. 

  411. 		<TD align="left">تعداد:</TD>
    412. 

  412. 		<TD><%=RS1("qtty")%></TD>
    413. 

  413. 		<TD align="left">سايز:</TD>
    414. 

  414. 		<TD><%=RS1("PaperSize")%></TD>
    415. 

  415. 		<TD align="left">يكرو/دورو:</TD>
    416. 

  416. 		<TD><%=RS1("SimplexDuplex")%></TD>
    417. 

  417. 	</TR>
    418. 

  418. 	<TR height=30>
    419. 

  419. 		<TD align="left">مرحله:</TD>
    420. 

  420. 		<TD><%=RS1("marhale")%></TD>
    421. 

  421. 		<TD align="left">وضعيت:</TD>
    422. 

  422. 		<TD colspan="3"><%=RS1("vazyat")%></TD>
    423. 

  423. 	</TR>
    424. 

  424. 	<TR height=30>
    425. 

  425. 		<TD align="left">قيمت كل:</TD>
    426. 

  426. 		<TD><%=RS1("Price")%></TD>
    427. 

  427. 		<TD colspan="4" height="30px">&nbsp;</TD>
    428. 

  428. 	</TR>
    429. 

  429. 	<!--TR height=30>
    430. 

  430. 		<TD colspan="6" align="center"><input type="button" value="اصلاح" onclick="window.location='OrderEdit.asp?e=y&radif=<%=Order %>';"></TD>
    431. 

  431. 	</TR-->
    432. 

  432. 	</TABLE><BR>
    433. 

  433. 

  434. <%
    435. 

  435. if (not (IsNull(rs1("property")) or rs1("property")="")) then
    436. 

  436. %>
    437. 

  437. 

  438. 	<div>جزئيات سفارش</div>
    439. 

  439. 

  440. <%
    441. 

  441. 	set rs=Conn.Execute("select * from OrderTraceTypes where id="&rs1("type"))
    442. 

  442. 	set typeProp = server.createobject("MSXML2.DomDocument")
    443. 

  443. 	set orderProp = server.createobject("MSXML2.DomDocument")
    444. 

  444. 	
    445. 

  445. 	orderProp.loadXML(rs1("property"))
    446. 

  446. 	typeProp.loadXML(rs("property"))
    447. 

  447. 	set rs=nothing
    448. 

  448. sub showKey(key)
    449. 

  449. 	oldGroup="---first---"
    450. 

  450. 	oldLabel="---first---"
    451. 

  451. 	maxID=-1
    452. 

  452. 	oldID=-1
    453. 

  453. 	rowEmpty=false
    454. 

  454. 	for each mykey in orderProp.SelectNodes(key)
    455. 

  455. 		id=myKey.GetAttribute("id")
    456. 

  456. 		if maxID<id then maxID=id
    457. 

  457. 	next
    458. 

  458. 	thisRow = "<div class='myRow'>"'<div class='exteraArea' id='" & Replace(key,"/","-") & "-0'>"
    459. 

  459. 	for id = 0 to maxID
    460. 

  460. 		For Each myKey In orderProp.SelectNodes(key & "[@id='" & id & "']")
    461. 

  461. 			thisName = myKey.GetAttribute("name")
    462. 

  462. 			set typeKey = typeProp.selectNodes(key & "[@name='" & thisName & "']")(0)
    463. 

  463. 			thisType = typeKey.GetAttribute("type") 
    464. 

  464. 			thisLabel= typeKey.GetAttribute("label")
    465. 

  465. 			thisGroup= typeKey.GetAttribute("group")
    466. 

  466. 			if thisType="radio" then 
    467. 

  467. 				radioID = CInt(myKey.text)
    468. 

  468. 				set typeKey = typeProp.selectNodes(key & "[@name='" & thisName & "']")(radioID - 1)
    469. 

  469. 				thisType = typeKey.GetAttribute("type") 
    470. 

  470. 				thisLabel= typeKey.GetAttribute("label")
    471. 

  471. 				thisGroup= typeKey.GetAttribute("group")
    472. 

  472. 			end if
    473. 

  473. 			isRow =false
    474. 

  474. 			if Replace(key,"/","-")="keys-service-key" then response.write "::--------::" & myKey.text
    475. 

  475. 			if thisName<>"" then 
    476. 

  476. 				isRow=true
    477. 

  477. 				if oldID<>id then thisRow = thisRow & "<div class='exteraArea' id='" & Replace(key,"/","-") & "-" & id & "'>"
    478. 

  478. 				if (oldGroup<>thisGroup and oldID=id and oldGroup <> "---first---") then thisRow = thisRow &  "</div><div class='report'>گزارش:</div>"
    479. 

  479. 				if oldGroup<>thisGroup or oldID<>id then 
    480. 

  480. 					thisRow = thisRow & "<div class='mySection'>"
    481. 

  481. 					if typeKey.GetAttribute("grouplabel")<>"" then thisRow = thisRow & "<b>" & typeKey.GetAttribute("grouplabel") & "</b>"
    482. 

  482. 				end if
    483. 

  483. 				if oldLabel<>thisLabel and thisType<>"radio" then thisRow = thisRow &  "<label class='myLabel'>" & thisLabel & ": </label>"
    484. 

  484. 				
    485. 

  485. 				if left(thisType,6)="option" then set myOptions=typeKey
    486. 

  486. 				myText=""
    487. 

  487. 				select case thisType
    488. 

  488. 					case "option"
    489. 

  489. 						for each optKey in myOptions.selectNodes("option")
    490. 

  490. 							if optKey.text=myKey.text then 
    491. 

  491. 								myText = optKey.GetAttribute("label")
    492. 

  492. 								exit for
    493. 

  493. 							end if
    494. 

  494. 						next
    495. 

  495. 					case "option-other"
    496. 

  496. 						if left(myKey.text,6)="other:" then 
    497. 

  497. 							myText = mid(myKey.text,7)
    498. 

  498. 						else
    499. 

  499. 							for each optKey in myOptions.selectNodes("option")
    500. 

  500. 								if optKey.text=myKey.text then 
    501. 

  501. 									myText = optKey.GetAttribute("label")
    502. 

  502. 									exit for
    503. 

  503. 								end if
    504. 

  504. 							next
    505. 

  505. 						end if
    506. 

  506. 						if myText="" then myText = myKey.text
    507. 

  507. 					case "check"
    508. 

  508. 						if left(myKey.text,2)="on" then myText = "<img src='/images/Checkmark-32.png' width='15px'>"
    509. 

  509. 					case "radio"
    510. 

  510. 						myText=thisLabel
    511. 

  511. 					case "text"
    512. 

  512. 						if right(thisName,5)="price" then 
    513. 

  513. 							myText = "<div class='price'>" & myKey.text & "</div>"
    514. 

  514. 						else
    515. 

  515. 							myText = myKey.text
    516. 

  516. 						end if
    517. 

  517. 					case else
    518. 

  518. 						myText = myKey.text
    519. 

  519. 				end select
    520. 

  520. 				set myOptions=nothing
    521. 

  521. 				thisRow = thisRow & "<span class='myProp'>" & myText & "</span>"		
    522. 

  522. 			else
    523. 

  523. 				if id=0 then 
    524. 

  524. 					thisRow=""
    525. 

  525. 					rowEmpty=true
    526. 

  526. 				end if
    527. 

  527. 			end if
    528. 

  528. 			oldGroup=thisGroup
    529. 

  529. 			oldLabel=thisLabel
    530. 

  530. 			oldID=id
    531. 

  531. 			if typeKey.GetAttribute("br")="yes" then thisRow = thisRow & "<br><br>"
    532. 

  532. 		Next
    533. 

  533. 		if isRow then thisRow = thisRow & "</div><div class='report'>گزارش:</div></div>"
    534. 

  534. 	next
    535. 

  535. 	'response.write maxID
    536. 

  536. 	if not rowEmpty then thisRow = thisRow & "</div>" '"<div id='extreArea" &Replace(key,"/","-")& "'></div>"
    537. 

  537. 	response.write thisRow 'prependTo 
    538. 

  538. '	response.write 
    539. 

  539. end sub
    540. 

  540. 	oldTmp="---first---"
    541. 

  541. 	for each tmp in orderProp.selectNodes("//key")
    542. 

  542. 		if oldTmp<>tmp.parentNode.nodeName then 
    543. 

  543. 			oldTmp=tmp.parentNode.nodeName
    544. 

  544. 			call showKey("/keys/" & oldTmp & "/key")
    545. 

  545. 		end if
    546. 

  546. 	next
    547. 

  547. end if
    548. 

  548. %>
    549. 

  549. <div class='report'>امضاء و توضيحات اضافي فروشنده:</div>
    550. 

  550. </div>
    551. 

  551. <br><br>
    552. 

  552. 

  553. 	<table class="CustTable" cellspacing='1' align=center style="width:700; ">
    554. 

  554. 		<tr>
    555. 

  555. 			<td colspan="2" class="CusTableHeader"><span style="width:450;text-align:center;">يادداشت ها</span><span style="width:100;text-align:left;background-color:red;"><input class="GenButton" type="button" value="نوشتن يادداشت" onclick="window.location = '../home/message.asp?RelatedTable=orders&RelatedID=<%=Order%>&retURL=<%=Server.URLEncode("../order/TraceOrder.asp?act=show&order="&Order)%>';"></span></td>
    556. 

  556. 		</tr>
    557. 

  557. <%
    558. 

  558. 	mySQL="SELECT * FROM Messages INNER JOIN Users ON Messages.MsgFrom = Users.ID WHERE (Messages.RelatedTable = 'orders') AND (Messages.RelatedID = "& Order & ") ORDER BY Messages.ID DESC"
    559. 

  559. 	Set RS = conn.execute(mySQL)
    560. 

  560. 	if NOT RS.eof then
    561. 

  561. 

  562. 		tmpCounter=0
    563. 

  563. 		Do While NOT RS.eof 
    564. 

  564. 			tmpCounter=tmpCounter+1
    565. 

  565. %>
    566. 

  566. 			<tr class="<%if (tmpCounter MOD 2) = 1 then response.write "CusTD3" else response.write "CusTD4" %>">
    567. 

  567. 				<td>از <%=RS("RealName")%><br>
    568. 

  568. 					<%=RS("MsgDate")%> <BR> <%=RS("MsgTime")%>
    569. 

  569. 				</td>
    570. 

  570. 				<td dir='RTL'><%=replace(RS("MsgBody"),chr(13),"<br>")%></td>
    571. 

  571. 			</tr>
    572. 

  572. <%
    573. 

  573. 			RS.moveNext
    574. 

  574. 		Loop
    575. 

  575. 	else
    576. 

  576. %>
    577. 

  577. 		<tr class="CusTD3">
    578. 

  578. 			<td colspan="2">هيچ</td>
    579. 

  579. 		</tr>
    580. 

  580. <%
    581. 

  581. 	end if
    582. 

  582. 	RS.close
    583. 

  583. %>
    584. 

  584. 	</table><BR>
    585. 

  585. 		<%
    586. 

  586. 		dim fs
    587. 

  587. 		set fs=Server.CreateObject("Scripting.FileSystemObject")
    588. 

  588. 		if not fs.FolderExists(orderFolder & order)=true then
    589. 

  589. 		  fs.CreateFolder (orderFolder & order)  
    590. 

  590. 		end if
    591. 

  591. 		set fs=nothing
    592. 

  592. 		%>
    593. 

  593. 		<a href="<%=orderFolder & order%>">نمايش پوشه سفارش</a>
    594. 

  594. 		
    595. 

  595. 	<div style='direction:ltr;float:left;'><!--b>با عرض پوزش استوريج قابل دسترس نيست</b-->
    596. 

  596. 	<% ListFolderContents(orderFolder & order) %>
    597. 

  597. 	<div>
    598. 

  598. 	<TABLE border="0" cellspacing="0" cellpadding="2" align="center" style=" color:black; direction:RTL; width:700; ">
    599. 

  599. 	<TR>
    600. 

  600. 		<TD valign=top>
    601. 

  601. 			<TABLE border="0" cellspacing="0" cellpadding="2" dir="RTL" align="center" width="350" >
    602. 

  602. 			<TR bgcolor="black" >
    603. 

  603. 				<TD align="right" colspan=2 title="جهت ثبت كليك كنيد" onclick="window.location='../shopfloor/manageOrder.asp?radif=<%=order%>'" style='cursor:pointer;'><FONT COLOR="YELLOW">درخواستهاي كالا از انبار:</FONT></TD>
    604. 

  604. 			</TR>
    605. 

  605. 			<%
    606. 

  606. 			'Gets Request for services list from DB
    607. 

  607. 			'-----------------_SAM EDIT THIS 
    608. 

  608. 			set RS3=Conn.Execute ("SELECT InventoryItemRequests.*,InventoryPickuplistItems.pickupListID  FROM InventoryItemRequests left outer join InventoryPickuplistItems on InventoryItemRequests.ID=InventoryPickuplistItems.RequestID WHERE InventoryItemRequests.order_ID="& Order )
    609. 

  609. 			%>
    610. 

  610. 				<%
    611. 

  611. 				Do while not RS3.eof
    612. 

  612. 				%>
    613. 

  613. 				<TR bgcolor="#CCCCCC" title="<% 
    614. 

  614. 					Comment = RS3("Comment")
    615. 

  615. 					if Comment<>"-" then
    616. 

  616. 						response.write "توضيح: " & Comment
    617. 

  617. 					else
    618. 

  618. 						response.write "توضيح ندارد"
    619. 

  619. 					End If
    620. 

  620. 				%>">
    621. 

  621. 					<TD align="right" valign=top><FONT COLOR="black">
    622. 

  622. 					<INPUT TYPE="checkbox" NAME="outReq" VALUE="<%=RS3("id")%>" <%
    623. 

  623. 					if RS3("status") = "new" then
    624. 

  624. 						response.write " checked disabled "
    625. 

  625. 					else 
    626. 

  626. 						response.write " disabled "
    627. 

  627. 					End If
    628. 

  628. 					%>>
    629. 

  629. 					<%
    630. 

  630. 					if (not isNull(RS3("pickupListID"))) then 
    631. 

  631. 						response.write "<a href='../inventory/default.asp?ed="&RS3("pickupListID")&"'>"
    632. 

  632. 					end if
    633. 

  633. 				%>
    634. 

  634. 					<%=RS3("ItemName")%>  
    635. 

  635. 					<%
    636. 

  636. 					if RS3("CustomerHaveInvItem")  then
    637. 

  637. 						response.write "<small><b style='color:red'> ارسالي </b></small>" 
    638. 

  638. 					end if 
    639. 

  639. 					%>
    640. 

  640. 					<small dir=ltr>(تعداد: <%=RS3("qtty")%> <%=RS3("unit")%> - تاريخ: <span dir=ltr><%=RS3("ReqDate")%></span>)</small>
    641. 

  641. 				<%
    642. 

  642. 					if (not isNull(RS3("pickupListID"))) then 
    643. 

  643. 						response.write "</a>"
    644. 

  644. 					end if
    645. 

  645. 				%>
    646. 

  646. 					</font></td>
    647. 

  647. 					<td align=left width=5%><%
    648. 

  648. 					if RS3("status") = "del" then
    649. 

  649. 						response.write "<b><small>حذف شده</b></small>"
    650. 

  650. 					End If
    651. 

  651. 					%></td>
    652. 

  652. 				</tr>
    653. 

  653. 				<% 
    654. 

  654. 				RS3.moveNext
    655. 

  655. 				Loop
    656. 

  656. 				%>
    657. 

  657. 			</TABLE>
    658. 

  658. 		</TD>
    659. 

  659. 

  660. 		<TD  valign=top>
    661. 

  661. 			<TABLE border="0" cellspacing="0" cellpadding="2" dir="RTL" align="center" width="350" >
    662. 

  662. 			<TR bgcolor="black" >
    663. 

  663. 				<TD align="right" colspan=2 title="جهت ثبت كليك كنيد" onclick="window.location='../shopfloor/manageOrder.asp?radif=<%=order%>'" style='cursor:pointer;'><FONT COLOR="YELLOW">درخواستهاي خريد سرويس و كالا:</FONT></TD>
    664. 

  664. 			</TR>
    665. 

  665. 			<%
    666. 

  666. 			'Gets Request for services list from DB
    667. 

  667. 			set RS3=Conn.Execute ("SELECT PurchaseRequestOrderRelations.*,purchaseRequests.*,case when isnull(PurchaseOrders.price,-1)=-1 then purchaseRequests.price else purchaseOrders.price end as thisPrice FROM purchaseRequests LEFT OUTER JOIN PurchaseRequestOrderRelations ON PurchaseRequests.id = PurchaseRequestOrderRelations.Req_ID left outer join PurchaseOrders on PurchaseOrders.ID=PurchaseRequestOrderRelations.ord_id WHERE (order_ID="& Order & " )")
    668. 

  668. 			%>
    669. 

  669. 				
    670. 

  670. 				<%
    671. 

  671. 				Do while not RS3.eof
    672. 

  672. 				%>
    673. 

  673. 				<TR bgcolor="#CCCCCC" title="<% 
    674. 

  674. 					Comment = RS3("Comment")
    675. 

  675. 					if Comment<>"-" then
    676. 

  676. 						response.write "توضيح: " & Comment
    677. 

  677. 					else
    678. 

  678. 						response.write "توضيح ندارد"
    679. 

  679. 					End If
    680. 

  680. 				%>">
    681. 

  681. 					<TD align="right" valign=top <%if isnull(rs3("ord_ID")) then response.write " title='سفارش خريد هنوز ايجاد نشده!' "%>><FONT COLOR="black">
    682. 

  682. 						<INPUT TYPE="checkbox" NAME="outReq" VALUE="<%=RS3("id")%>" <%
    683. 

  683. 					if RS3("status") = "new" then
    684. 

  684. 						response.write " checked disabled "
    685. 

  685. 					else 
    686. 

  686. 						response.write " disabled "
    687. 

  687. 					End If
    688. 

  688. 					%>>
    689. 

  689. 					<%
    690. 

  690. 					if (not isNull(RS3("Ord_ID"))) then 
    691. 

  691. 						response.write "<a href='../purchase/outServiceTrace.asp?od="&RS3("Ord_ID")&"'>"
    692. 

  692. 					end if
    693. 

  693. 					%>
    694. 

  694. 					<%=RS3("typeName")%>  <small >(تعداد: <%=RS3("qtty")%>، قيمت: <%=RS3("thisPrice")%> - تاريخ: <span dir=ltr><%=RS3("ReqDate")%></span>)</small>
    695. 

  695. 					<%
    696. 

  696. 					if (not isNull(RS3("Ord_ID"))) then 
    697. 

  697. 						response.write "</a>"
    698. 

  698. 					end if
    699. 

  699. 					%>				
    700. 

  700. 					</font></td>
    701. 

  701. 					<td align=left width=5%><%
    702. 

  702. 					if RS3("status") = "del" then
    703. 

  703. 						response.write "<b><small>حذف شده</b></small>"
    704. 

  704. 					End If
    705. 

  705. 					%>
    706. 

  706. 					</td>
    707. 

  707. 				</tr>
    708. 

  708. 				<% 
    709. 

  709. 				RS3.moveNext
    710. 

  710. 				Loop
    711. 

  711. 				%>
    712. 

  712. 			</TABLE>
    713. 

  713. 		</TD>
    714. 

  714. 	</TR>
    715. 

  715. 	</TABLE><BR>
    716. 

  716. 	<TABLE border="0" cellspacing="0" cellpadding="2" align="center" style=" color:black; direction:RTL; width:700; ">
    717. 

  717. 	<tr bgcolor="black">
    718. 

  718. 		<td align="center" colspan="7" style="color:yellow;padding:3px 0 8px 0;">عمليات‌هاي انجام شده براي اين سفارش:</td>
    719. 

  719. 	</tr>
    720. 

  720. 	<tr bgcolor="black" style="color:yellow;">
    721. 

  721. 		<td>مركز</td>
    722. 

  722. 		<td>درايور</td>
    723. 

  723. 		<td>عمليات</td>
    724. 

  724. 		<td>تعداد</td>
    725. 

  725. 		<td>زمان</td>
    726. 

  726. 		<td>شرح</td>
    727. 

  727. 		<td>ثبت كننده</td>
    728. 

  728. 	</tr>
    729. 

  729. 	<%
    730. 

  730. function floor(x)
    731. 

  731. 	dim temp	
    732. 

  732. 	temp = Round(x)
    733. 

  733. 	if temp > x then
    734. 

  734. 	    temp = temp - 1
    735. 

  735. 	end if
    736. 

  736. 	floor = temp
    737. 

  737. end function
    738. 

  738. function ceil(x)
    739. 

  739. 	dim temp	
    740. 

  740. 	temp = Round(x)
    741. 

  741. 	if temp < x then
    742. 

  742. 	    temp = temp + 1
    743. 

  743. 	end if
    744. 

  744. 	ceil = temp
    745. 

  745. end function
    746. 

  746. 	mySQL="select costs.description,isnull(DATEDIFF(mi,costs.start_time,costs.end_time),0) as theTime,end_counter - start_counter as theCount, cost_operation_type.name as operationName, cost_drivers.name as driverName, cost_centers.name as centerName, users.RealName from costs inner join cost_operation_type on costs.operation_type=cost_operation_type.id inner join cost_drivers on cost_operation_type.driver_id=cost_drivers.id inner join cost_centers on cost_drivers.cost_center_id=cost_centers.id inner join Users on costs.user_id=users.ID where [order]=" & order
    747. 

  747. 	set rs=Conn.Execute(mySQL)
    748. 

  748. 	while not rs.eof
    749. 

  749. %>
    750. 

  750. 	<tr bgcolor="#CCCCCC">
    751. 

  751. 		<td><%=rs("centerName")%></td>
    752. 

  752. 		<td><%=rs("driverName")%></td>
    753. 

  753. 		<td><%=rs("operationName")%></td>
    754. 

  754. 		<td><%=rs("theCount")%></td>
    755. 

  755. 		<td><%=floor(cint(rs("theTime"))/60) & ":" & cint(rs("theTime")) mod 60%></td>
    756. 

  756. 		<td><%=rs("description")%></td>
    757. 

  757. 		<td><%=rs("realName")%></td>
    758. 

  758. 	</tr>
    759. 

  759. <%		
    760. 

  760. 		rs.moveNext
    761. 

  761. 	wend
    762. 

  762. 	rs.close
    763. 

  763. 	%>
    764. 

  764. 	</table>
    765. 

  765. 	<!------------------------------------------------------SAM----------------------------------------------------------->
    766. 

  766. 

  767. <%
    768. 

  768. end if
    769. 

  769. elseif request("act")="advancedSearch" then
    770. 

  770. '------  Advanced Search 
    771. 

  771. %>
    772. 

  772. <!--#include File="../include_JS_InputMasks.asp"-->
    773. 

  773. <%
    774. 

  774. 	'Server.ScriptTimeout = 3600
    775. 

  775. 	tmpTime=time
    776. 

  776. 	tmpTime=Hour(tmpTime)&":"&Minute(tmpTime)
    777. 

  777. 	if instr(tmpTime,":")<3 then tmpTime="0" & tmpTime
    778. 

  778. 	if len(tmpTime)<5 then tmpTime=Left(tmpTime,3) & "0" & Right(tmpTime,1)
    779. 

  779. 

  780. 	if request("resultsCount")="" OR not isnumeric(request("resultsCount")) then
    781. 

  781. 		resultsCount = 50
    782. 

  782. 	else
    783. 

  783. 		resultsCount = cint(request("resultsCount"))
    784. 

  784. 	end if
    785. 

  785. 

  786. %>
    787. 

  787. 	<hr>
    788. 

  788. 	<TABLE border="4" cellspacing="0" cellpadding="0" width="700" align="center" bordercolor="#555599">
    789. 

  789. 	<FORM METHOD=POST ACTION="TraceOrder.asp?act=advancedSearch" onSubmit="return checkValidation();">
    790. 

  790. 	<TR><TD>
    791. 

  791. 		<TABLE border="0" cellspacing="0" cellpadding="1" dir="RTL" width="100%" bgcolor="white">
    792. 

  792. 		<TR bgcolor="#EEEEEE">
    793. 

  793. 			<TD><INPUT TYPE="checkbox" NAME="check_sefaresh" onclick="check_sefaresh_Click()" checked></TD>
    794. 

  794. 			<TD>شماره سفارش</TD>
    795. 

  795. 			<TD><INPUT TYPE="text" NAME="az_sefaresh" dir="LTR" value="<%=request.form("az_sefaresh")%>" size="8" maxlength="6" onKeyPress="return maskNumber(this);"></TD>
    796. 

  796. 			<TD>تا</TD>
    797. 

  797. 			<TD><INPUT TYPE="text" NAME="ta_sefaresh" dir="LTR" value="<%=request.form("ta_sefaresh")%>" size="8" maxlength="6" onKeyPress="return maskNumber(this);" ></TD>
    798. 

  798. 			<td rowspan="12" style="width:1px" bgcolor="#555599"></td>
    799. 

  799. 			<TD><INPUT TYPE="checkbox" NAME="check_kind" onclick="check_kind_Click()" checked></TD>
    800. 

  800. 			<TD>نوع سفارش</TD>
    801. 

  801. 			<TD colspan="3"><SELECT NAME="order_kind_box" style='font-family: tahoma,arial ; font-size: 8pt; font-weight: bold; width: 140px'>
    802. 

  802. 				<OPTION value="افست" <%if request.form("order_kind_box")="افست" then response.write "selected" %> >افست</option>
    803. 

  803. 				<OPTION value="ديجيتال" <%if request.form("order_kind_box")="ديجيتال" then response.write "selected" %> >ديجيتال</option>
    804. 

  804. 				<OPTION value="سياه و سفيد" <%if request.form("order_kind_box")="سياه و سفيد" then response.write "selected" %> >سياه و سفيد</option>
    805. 

  805. 				<OPTION value="طراحي" <%if request.form("order_kind_box")="طراحي" then response.write "selected" %> >طراحي</option>
    806. 

  806. 				<OPTION value="صحافي" <%if request.form("order_kind_box")="صحافي" then response.write "selected" %> >صحافي</option>
    807. 

  807. 				<OPTION value="فيلم" <%if request.form("order_kind_box")="فيلم" then response.write "selected" %> >فيلم</option>
    808. 

  808. 				<OPTION value="زينك" <%if request.form("order_kind_box")="زينك" then response.write "selected" %> >زينك</option>
    809. 

  809. 				<OPTION value="لمينت" <%if request.form("order_kind_box")="لمينت" then response.write "selected" %> >لمينت</option>
    810. 

  810. 				<OPTION value="متفرقه" <%if request.form("order_kind_box")="متفرقه" then response.write "selected" %> >متفرقه</option>
    811. 

  811. 			</SELECT></TD>
    812. 

  812. 		</TR>
    813. 

  813. 		<TR bgcolor="#555599">
    814. 

  814. 			<td colspan="11" style="height:2px"></td>
    815. 

  815. 		</TR>
    816. 

  816. 		<TR>
    817. 

  817. 			<TD>
    818. 

  818. 				<INPUT TYPE="checkbox" NAME="check_tarikh_sefaresh" onclick="check_tarikh_sefaresh_Click()" checked>
    819. 

  819. 			</TD>
    820. 

  820. 			<TD>تاريخ سفارش</TD>
    821. 

  821. 			<TD>
    822. 

  822. 				<INPUT TYPE="text" NAME="az_tarikh_sefaresh" dir="LTR" value="<%=request("az_tarikh_sefaresh")%>" size="10" onKeyPress="return maskDate(this);" onBlur="if(acceptDate(this))document.all.ta_tarikh_sefaresh.value=this.value;" maxlength="10">
    823. 

  823. 			</TD>
    824. 

  824. 			<TD>تا</TD>
    825. 

  825. 			<TD>
    826. 

  826. 				<INPUT TYPE="text" NAME="ta_tarikh_sefaresh" dir="LTR" value="<%=request("ta_tarikh_sefaresh")%>" size="10" onKeyPress="return maskDate(this);" onblur="acceptDate(this)" maxlength="10">
    827. 

  827. 			</TD>
    828. 

  828. 			<TD>
    829. 

  829. 				<INPUT TYPE="checkbox" NAME="check_marhale" onclick="check_marhale_Click()" checked>
    830. 

  830. 			</TD>
    831. 

  831. 			<TD>مرحله</TD>
    832. 

  832. 			<TD>
    833. 

  833. 				<SELECT NAME="marhale_box" style='font-family: tahoma,arial ; font-size: 8pt; font-weight: bold; width: 140px'>
    834. 

  834. 					<%
    835. 

  835. 					set RS_STEP=Conn.Execute ("SELECT * FROM OrderTraceSteps WHERE (IsActive=1)")
    836. 

  836. 					Do while not RS_STEP.eof	
    837. 

  837. 					%>
    838. 

  838. 						<OPTION value="<%=RS_STEP("ID")%>" <%if cint(request.form("marhale_box"))=cint(RS_STEP("ID")) then response.write "selected" %> ><%=RS_STEP("name")%></option>
    839. 

  839. 						<%
    840. 

  840. 						RS_STEP.moveNext
    841. 

  841. 					loop
    842. 

  842. 					RS_STEP.close
    843. 

  843. 					%>
    844. 

  844. 				</SELECT>
    845. 

  845. 			</TD>
    846. 

  846. 			<TD>
    847. 

  847. 				<span id="marhale_not_check_label" style='font-weight:bold;color:red'>نباشد</span>
    848. 

  848. 			</TD>
    849. 

  849. 			<TD>
    850. 

  850. 				<INPUT TYPE="checkbox" NAME="marhale_not_check" onclick="marhale_not_check_Click();" checked>
    851. 

  851. 			</TD>
    852. 

  852. 		</TR>
    853. 

  853. 		<TR bgcolor="#555599">
    854. 

  854. 			<td colspan="11" style="height:2px"></td>
    855. 

  855. 		</TR>
    856. 

  856. 		<TR bgcolor="#EEEEEE">
    857. 

  857. 			<TD>
    858. 

  858. 				<INPUT TYPE="checkbox" NAME="check_tarikh_tahvil" onclick="check_tarikh_tahvil_Click()" checked>
    859. 

  859. 			</TD>
    860. 

  860. 			<TD>تاريخ تحويل عملي</TD>
    861. 

  861. 			<TD>
    862. 

  862. 				<INPUT TYPE="text" NAME="az_tarikh_tahvil" dir="LTR" value="<%=request.form("az_tarikh_tahvil")%>" size="10" onblur="acceptDate(this)" maxlength="10" onKeyPress="return maskDate(this);">
    863. 

  863. 			</TD>
    864. 

  864. 			<TD>تا</TD>
    865. 

  865. 			<TD>
    866. 

  866. 				<INPUT TYPE="text" NAME="ta_tarikh_tahvil" dir="LTR" value="<%=request.form("ta_tarikh_tahvil")%>" onblur="acceptDate(this)" maxlength="10" size="10" onKeyPress="return maskDate(this);">
    867. 

  867. 			</TD>
    868. 

  868. 			<TD>
    869. 

  869. 				<INPUT TYPE="checkbox" NAME="check_vazyat" onclick="check_vazyat_Click()" checked>
    870. 

  870. 			</TD>
    871. 

  871. 			<TD>وضعيت</TD>
    872. 

  872. 			<TD>
    873. 

  873. 				<SELECT NAME="vazyat_box" style='font-family: tahoma,arial ; font-size: 8pt; font-weight: bold; width: 140px'>
    874. 

  874. 				<%
    875. 

  875. 				set RS_STATUS=Conn.Execute ("SELECT * FROM OrderTraceStatus WHERE (IsActive=1)")
    876. 

  876. 				Do while not RS_STATUS.eof	
    877. 

  877. 				%>
    878. 

  878. 					<OPTION value="<%=RS_STATUS("ID")%>" <%if cint(request.form("vazyat_box"))=cint(RS_STATUS("ID")) then response.write "selected" %> ><%=RS_STATUS("Name")%></option>
    879. 

  879. 					<%
    880. 

  880. 					RS_STATUS.moveNext
    881. 

  881. 				loop
    882. 

  882. 				%>
    883. 

  883. 				</SELECT>
    884. 

  884. 			</TD>
    885. 

  885. 			<TD>
    886. 

  886. 				<span id="vazyat_not_check_label" style='font-weight:bold;color:red'>نباشد</span>
    887. 

  887. 			</TD>
    888. 

  888. 			<TD>
    889. 

  889. 				<INPUT TYPE="checkbox" NAME="vazyat_not_check" onclick="vazyat_not_check_Click();" checked>
    890. 

  890. 			</TD>
    891. 

  891. 		</TR>
    892. 

  892. 		<TR bgcolor="#EEEEEE">
    893. 

  893. 			<TD>
    894. 

  894. 				<INPUT TYPE="checkbox" NAME="check_tarikh_gharar" onclick="check_tarikh_gharar_Click()" checked>
    895. 

  895. 			</TD>
    896. 

  896. 			<TD>تاريخ تحويل قرارداد</TD>
    897. 

  897. 			<TD>
    898. 

  898. 				<INPUT TYPE="text" NAME="az_tarikh_gharar" dir="LTR" value="<%=request.form("az_tarikh_gharar")%>" size="10" onblur="acceptDate(this)" maxlength="10" onKeyPress="return maskDate(this);">
    899. 

  899. 			</TD>
    900. 

  900. 			<TD>تا</TD>
    901. 

  901. 			<TD>
    902. 

  902. 				<INPUT TYPE="text" NAME="ta_tarikh_gharar" dir="LTR" value="<%=request.form("ta_tarikh_gharar")%>" onblur="acceptDate(this)" maxlength="10" size="10" onKeyPress="return maskDate(this);">
    903. 

  903. 			</TD>
    904. 

  904. 			
    905. 

  905. 			
    906. 

  906. 			</TD>
    907. 

  907. 			<TD>
    908. 

  908. 				<INPUT TYPE="checkbox" NAME="check_closed" onclick="check_closed_Click()" checked>
    909. 

  909. 			</TD>
    910. 

  910. 			<TD colspan="4">
    911. 

  911. 				<span id="check_closed_label" style='color:black;'>فقط سفارش هاي باز</span>
    912. 

  912. 			</TD>
    913. 

  913. 		</TR>
    914. 

  914. 		<TR bgcolor="#555599">
    915. 

  915. 			<td colspan="11" style="height:2px"></td>
    916. 

  916. 		</TR>
    917. 

  917. 		<TR>
    918. 

  918. 			<TD colspan="5">
    919. 

  919. 				<input type="checkbox" name="returnIsNull" onclick="check_returnisnull_Click()" checked>
    920. 

  920. 				<span id="check_returnisnull_label" style='color:black;'>تاريخ تحويل قرارداد ندارد</span>
    921. 

  921. 			</td>
    922. 

  922. 			<TD><INPUT TYPE="checkbox" NAME="check_salesperson" onclick="check_salesperson_Click()" checked></TD>
    923. 

  923. 			<TD>سفارش گيرنده</TD>
    924. 

  924. 			<TD colspan="3">
    925. 

  925. 			<SELECT NAME="salesperson_box" style='font-family: tahoma,arial ; font-size: 8pt; font-weight: bold; width: 140px'>
    926. 

  926. <%				set RSV=Conn.Execute ("SELECT RealName FROM Users WHERE Display=1 ORDER BY RealName") 
    927. 

  927. 				Do while not RSV.eof
    928. 

  928. %>
    929. 

  929. 					<option value="<%=RSV("RealName")%>" <%if RSV("RealName")=request.form("salesperson_box") then response.write " selected "%> ><%=RSV("RealName")%></option>
    930. 

  930. <%
    931. 

  931. 				RSV.moveNext
    932. 

  932. 				Loop
    933. 

  933. 				RSV.close
    934. 

  934. %>
    935. 

  935. 			</SELECT></TD>
    936. 

  936. 		</TR>
    937. 

  937. 		<TR bgcolor="#555599">
    938. 

  938. 			<td colspan="11" style="height:2px"></td>
    939. 

  939. 		</TR>
    940. 

  940. 		<TR bgcolor="#EEEEEE">
    941. 

  941. 			<TD><INPUT TYPE="checkbox" NAME="check_company_name" onclick="check_company_name_Click()" checked></TD>
    942. 

  942. 			<TD>نام شركت</TD>
    943. 

  943. 			<TD colspan="3"><INPUT TYPE="text" NAME="company_name_box" value="<%=request.form("company_name_box")%>"></TD>
    944. 

  944. 			<TD><INPUT TYPE="checkbox" NAME="check_telephone" onclick="check_telephone_Click()" checked></TD>
    945. 

  945. 			<TD>تلفن</TD>
    946. 

  946. 			<TD colspan="3"><INPUT TYPE="text" NAME="telephone_box" value="<%=request.form("telephone_box")%>"></TD>
    947. 

  947. 		</TR>
    948. 

  948. 		<TR bgcolor="#555599">
    949. 

  949. 			<td colspan="11" style="height:2px"></td>
    950. 

  950. 		</TR>
    951. 

  951. 		<TR>
    952. 

  952. 			<TD><INPUT TYPE="checkbox" NAME="check_customer_name" onclick="check_customer_name_Click()" checked></TD>
    953. 

  953. 			<TD>نام مشتري</TD>
    954. 

  954. 			<TD colspan="3"><INPUT TYPE="text" NAME="customer_name_box" value="<%=request.form("customer_name_box")%>"></TD>
    955. 

  955. 			<TD><INPUT TYPE="checkbox" NAME="check_order_title" onclick="check_order_title_Click()" checked></TD>
    956. 

  956. 			<TD>عنوان سفارش</TD>
    957. 

  957. 			<TD colspan="3"><INPUT TYPE="text" NAME="order_title_box" value="<%=request.form("order_title_box")%>"></TD>
    958. 

  958. 		</TR>
    959. 

  959. 		<TR bgcolor="#555599">
    960. 

  960. 			<td colspan="11" style="height:2px"></td>
    961. 

  961. 		</TR>
    962. 

  962. 		<TR bgcolor="#AAAAEE">
    963. 

  963. 			<td colspan="11" style="height:30px">
    964. 

  964. 			<TABLE align="center" width="50%">
    965. 

  965. 			<TR>
    966. 

  966. 				<TD><INPUT TYPE="submit" Name="Submit" Value="تاييد" style="font-family:tahoma,arial; font-size:10pt;width:100px;"></TD>
    967. 

  967. 				<TD align="left"><INPUT TYPE="button" Name="Cancel" Value="پاك كن" style="font-family:tahoma,arial; font-size:10pt;width:100px;" onclick="window.location='TraceOrder.asp?act=advancedSearch';"></TD>
    968. 

  968. 			</TR>
    969. 

  969. 			<TR>
    970. 

  970. 				<TD align="left">تعداد نتايج:</TD>
    971. 

  971. 				<TD>&nbsp;<INPUT TYPE="Text" Name="resultsCount" value="<%=resultsCount%>" maxlength="4" size="4" onKeyPress="return maskNumber(this);"></TD>
    972. 

  972. 			</TR>
    973. 

  973. 			</TABLE>
    974. 

  974. 			</td>
    975. 

  975. 		</TR>
    976. 

  976. 		</TABLE>
    977. 

  977. 	</TD></TR>
    978. 

  978. 	</FORM>
    979. 

  979. 	</TABLE>
    980. 

  980. 	<hr>
    981. 

  981. 	<SCRIPT LANGUAGE='JavaScript'>
    982. 

  982. 	<!--
    983. 

  983. 	function check_sefaresh_Click(){
    984. 

  984. 		if ( document.all.check_sefaresh.checked ) {
    985. 

  985. 			document.all.az_sefaresh.style.visibility = "visible";
    986. 

  986. 			document.all.ta_sefaresh.style.visibility = "visible";
    987. 

  987. 			document.all.az_sefaresh.focus();
    988. 

  988. 		}
    989. 

  989. 		else{
    990. 

  990. 			document.all.az_sefaresh.style.visibility = "hidden";
    991. 

  991. 			document.all.ta_sefaresh.style.visibility = "hidden";
    992. 

  992. 		}
    993. 

  993. 	}
    994. 

  994. 

  995. 	function check_tarikh_sefaresh_Click(){
    996. 

  996. 		if ( document.all.check_tarikh_sefaresh.checked ) {
    997. 

  997. 			document.all.az_tarikh_sefaresh.style.visibility = "visible";
    998. 

  998. 			document.all.ta_tarikh_sefaresh.style.visibility = "visible";
    999. 

  999. 			document.all.az_tarikh_sefaresh.focus();
    1000. 

  1000. 		}
    1001. 

  1001. 		else{
    1002. 

  1002. 			document.all.az_tarikh_sefaresh.style.visibility = "hidden";
    1003. 

  1003. 			document.all.ta_tarikh_sefaresh.style.visibility = "hidden";
    1004. 

  1004. 		}
    1005. 

  1005. 	}
    1006. 

  1006. 

  1007. 	function check_tarikh_tahvil_Click(){
    1008. 

  1008. 		if ( document.all.check_tarikh_tahvil.checked ) {
    1009. 

  1009. 			document.all.az_tarikh_tahvil.style.visibility = "visible";
    1010. 

  1010. 			document.all.ta_tarikh_tahvil.style.visibility = "visible";
    1011. 

  1011. 			document.all.az_tarikh_tahvil.focus();
    1012. 

  1012. 		}
    1013. 

  1013. 		else{
    1014. 

  1014. 			document.all.az_tarikh_tahvil.style.visibility = "hidden";
    1015. 

  1015. 			document.all.ta_tarikh_tahvil.style.visibility = "hidden";
    1016. 

  1016. 		}
    1017. 

  1017. 	}
    1018. 

  1018. 	
    1019. 

  1019. 	function check_tarikh_gharar_Click(){
    1020. 

  1020. 		if ( document.all.check_tarikh_gharar.checked ) {
    1021. 

  1021. 			document.all.az_tarikh_gharar.style.visibility = "visible";
    1022. 

  1022. 			document.all.ta_tarikh_gharar.style.visibility = "visible";
    1023. 

  1023. 			document.all.az_tarikh_gharar.focus();
    1024. 

  1024. 		}
    1025. 

  1025. 		else{
    1026. 

  1026. 			document.all.az_tarikh_gharar.style.visibility = "hidden";
    1027. 

  1027. 			document.all.ta_tarikh_gharar.style.visibility = "hidden";
    1028. 

  1028. 		}
    1029. 

  1029. 	}
    1030. 

  1030. 	
    1031. 

  1031. 	function check_company_name_Click(){
    1032. 

  1032. 		if (document.all.check_company_name.checked) {
    1033. 

  1033. 			document.all.company_name_box.style.visibility = "visible";
    1034. 

  1034. 			document.all.company_name_box.focus();
    1035. 

  1035. 		}
    1036. 

  1036. 		else{
    1037. 

  1037. 			document.all.company_name_box.style.visibility = "hidden";
    1038. 

  1038. 		}
    1039. 

  1039. 	}
    1040. 

  1040. 

  1041. 	function check_customer_name_Click(){
    1042. 

  1042. 		if (document.all.check_customer_name.checked) {
    1043. 

  1043. 			document.all.customer_name_box.style.visibility = "visible";
    1044. 

  1044. 			document.all.customer_name_box.focus();
    1045. 

  1045. 		}
    1046. 

  1046. 		else{
    1047. 

  1047. 			document.all.customer_name_box.style.visibility = "hidden";
    1048. 

  1048. 		}
    1049. 

  1049. 	}
    1050. 

  1050. 

  1051. 	function check_kind_Click(){
    1052. 

  1052. 		if (document.all.check_kind.checked) {
    1053. 

  1053. 			document.all.order_kind_box.style.visibility = "visible";
    1054. 

  1054. 			document.all.order_kind_box.focus();
    1055. 

  1055. 		}
    1056. 

  1056. 		else{
    1057. 

  1057. 			document.all.order_kind_box.style.visibility = "hidden";
    1058. 

  1058. 		}
    1059. 

  1059. 	}
    1060. 

  1060. 

  1061. 	function check_marhale_Click(){
    1062. 

  1062. 		if (document.all.check_marhale.checked) {
    1063. 

  1063. 			document.all.marhale_box.style.visibility = "visible";
    1064. 

  1064. 			document.all.marhale_box.focus();
    1065. 

  1065. 			document.all.marhale_not_check.style.visibility = "visible";
    1066. 

  1066. 			marhale_not_check_Click();	
    1067. 

  1067. 		}
    1068. 

  1068. 		else{
    1069. 

  1069. 			document.all.marhale_box.style.visibility = "hidden";
    1070. 

  1070. 			document.all.marhale_not_check.style.visibility = "hidden";
    1071. 

  1071. 			document.all.marhale_not_check_label.style.color='#BBBBBB'
    1072. 

  1072. 		}
    1073. 

  1073. 	}
    1074. 

  1074. 

  1075. 	function check_vazyat_Click(){
    1076. 

  1076. 		if (document.all.check_vazyat.checked) {
    1077. 

  1077. 			document.all.vazyat_box.style.visibility = "visible";
    1078. 

  1078. 			document.all.vazyat_box.focus();
    1079. 

  1079. 			document.all.vazyat_not_check.style.visibility = "visible";
    1080. 

  1080. 			vazyat_not_check_Click();
    1081. 

  1081. 		}
    1082. 

  1082. 		else{
    1083. 

  1083. 			document.all.vazyat_box.style.visibility = "hidden";
    1084. 

  1084. 			document.all.vazyat_not_check.style.visibility = "hidden";
    1085. 

  1085. 			document.all.vazyat_not_check_label.style.color='#BBBBBB'
    1086. 

  1086. 		}
    1087. 

  1087. 	}
    1088. 

  1088. 

  1089. 	function check_salesperson_Click(){
    1090. 

  1090. 		if (document.all.check_salesperson.checked) {
    1091. 

  1091. 			document.all.salesperson_box.style.visibility = "visible";
    1092. 

  1092. 			document.all.salesperson_box.focus();
    1093. 

  1093. 		}
    1094. 

  1094. 		else{
    1095. 

  1095. 			document.all.salesperson_box.style.visibility = "hidden";
    1096. 

  1096. 		}
    1097. 

  1097. 	}
    1098. 

  1098. 

  1099. 	function check_telephone_Click(){
    1100. 

  1100. 		if (document.all.check_telephone.checked) {
    1101. 

  1101. 			document.all.telephone_box.style.visibility = "visible";
    1102. 

  1102. 			document.all.telephone_box.focus();
    1103. 

  1103. 		}
    1104. 

  1104. 		else{
    1105. 

  1105. 			document.all.telephone_box.style.visibility = "hidden";
    1106. 

  1106. 		}
    1107. 

  1107. 	}
    1108. 

  1108. 

  1109. 	function check_order_title_Click(){
    1110. 

  1110. 		if (document.all.check_order_title.checked) {
    1111. 

  1111. 			document.all.order_title_box.style.visibility = "visible";
    1112. 

  1112. 			document.all.order_title_box.focus();
    1113. 

  1113. 		}
    1114. 

  1114. 		else{
    1115. 

  1115. 			document.all.order_title_box.style.visibility = "hidden";
    1116. 

  1116. 		}
    1117. 

  1117. 	}
    1118. 

  1118. 

  1119. 	function marhale_not_check_Click(){
    1120. 

  1120. 		if (document.all.marhale_not_check.checked) {
    1121. 

  1121. 			document.all.marhale_not_check_label.style.color='red'
    1122. 

  1122. 		}
    1123. 

  1123. 		else{
    1124. 

  1124. 			document.all.marhale_not_check_label.style.color='#BBBBBB'
    1125. 

  1125. 		}
    1126. 

  1126. 	}
    1127. 

  1127. 

  1128. 

  1129. 	function vazyat_not_check_Click(){
    1130. 

  1130. 		if (document.all.vazyat_not_check.checked) {
    1131. 

  1131. 			document.all.vazyat_not_check_label.style.color='red'
    1132. 

  1132. 		}
    1133. 

  1133. 		else{
    1134. 

  1134. 			document.all.vazyat_not_check_label.style.color='#BBBBBB'
    1135. 

  1135. 		}
    1136. 

  1136. 	}
    1137. 

  1137. 

  1138. 	function check_closed_Click(){
    1139. 

  1139. 		if (document.all.check_closed.checked) {
    1140. 

  1140. 			document.all.check_closed_label.style.color='black'
    1141. 

  1141. 		}
    1142. 

  1142. 		else{
    1143. 

  1143. 			document.all.check_closed_label.style.color='#BBBBBB'
    1144. 

  1144. 		}
    1145. 

  1145. 	}
    1146. 

  1146. 	function check_returnisnull_Click(){
    1147. 

  1147. 		if (document.all.returnIsNull.checked) {
    1148. 

  1148. 			document.all.check_returnisnull_label.style.color='black'
    1149. 

  1149. 		}
    1150. 

  1150. 		else{
    1151. 

  1151. 			document.all.check_returnisnull_label.style.color='#BBBBBB'
    1152. 

  1152. 		}
    1153. 

  1153. 	}
    1154. 

  1154. 	
    1155. 

  1155. 

  1156. 	function Form_Load(){
    1157. 

  1157. 	<%
    1158. 

  1158. 	maybeAND = ""
    1159. 

  1159. 	myCriteria = ""
    1160. 

  1160. 	If request.form("check_sefaresh") = "on" Then
    1161. 

  1161. 		if request.form("az_sefaresh") <> "" then
    1162. 

  1162. 			myCriteria = myCriteria & maybeAND & "radif_sefareshat >= " & request.form("az_sefaresh")
    1163. 

  1163. 			maybeAND=" AND "
    1164. 

  1164. 		End If
    1165. 

  1165. 		if request.form("ta_sefaresh") <> "" then
    1166. 

  1166. 			myCriteria = myCriteria & maybeAND & "radif_sefareshat <= " & request.form("ta_sefaresh")
    1167. 

  1167. 			maybeAND=" AND "
    1168. 

  1168. 		End If
    1169. 

  1169. 		If (request.form("az_sefaresh") = "") AND (request.form("ta_sefaresh") = "") then
    1170. 

  1170. 			response.write "document.all.check_sefaresh.checked = false;" & vbCrLf
    1171. 

  1171. 			response.write "document.all.az_sefaresh.style.visibility = 'hidden';" & vbCrLf
    1172. 

  1172. 			response.write "document.all.ta_sefaresh.style.visibility = 'hidden';" & vbCrLf
    1173. 

  1173. 		End If
    1174. 

  1174. 	Else
    1175. 

  1175. 		response.write "document.all.check_sefaresh.checked = false;" & vbCrLf
    1176. 

  1176. 		response.write "document.all.az_sefaresh.style.visibility = 'hidden';" & vbCrLf
    1177. 

  1177. 		response.write "document.all.ta_sefaresh.style.visibility = 'hidden';" & vbCrLf
    1178. 

  1178. 

  1179. 	End If
    1180. 

  1180. 

  1181. 	If request("check_tarikh_sefaresh") = "on" Then
    1182. 

  1182. 		if request("az_tarikh_sefaresh") <> "" then
    1183. 

  1183. 			myCriteria = myCriteria & maybeAND & "order_date >= '" & request("az_tarikh_sefaresh") & "'"
    1184. 

  1184. 			maybeAND=" AND "
    1185. 

  1185. 		End If
    1186. 

  1186. 		if request("ta_tarikh_sefaresh") <> "" then
    1187. 

  1187. 			myCriteria = myCriteria & maybeAND & "order_date <= '" & request("ta_tarikh_sefaresh") & "'"
    1188. 

  1188. 			maybeAND=" AND "
    1189. 

  1189. 		End If 
    1190. 

  1190. 		If (request("az_tarikh_sefaresh") = "") AND (request("ta_tarikh_sefaresh") = "") then
    1191. 

  1191. 			response.write "document.all.check_tarikh_sefaresh.checked = false;" & vbCrLf
    1192. 

  1192. 			response.write "document.all.az_tarikh_sefaresh.style.visibility = 'hidden';" & vbCrLf
    1193. 

  1193. 			response.write "document.all.ta_tarikh_sefaresh.style.visibility = 'hidden';" & vbCrLf
    1194. 

  1194. 		End If
    1195. 

  1195. 	Else
    1196. 

  1196. 		response.write "document.all.check_tarikh_sefaresh.checked = false;" & vbCrLf
    1197. 

  1197. 		response.write "document.all.az_tarikh_sefaresh.style.visibility = 'hidden';" & vbCrLf
    1198. 

  1198. 		response.write "document.all.ta_tarikh_sefaresh.style.visibility = 'hidden';" & vbCrLf
    1199. 

  1199. 	End If
    1200. 

  1200. 

  1201. 	If request.form("check_tarikh_tahvil") = "on" Then
    1202. 

  1202. 		if request.form("az_tarikh_tahvil") <> "" then
    1203. 

  1203. 

  1204. 			myCriteria = myCriteria & maybeAND & "orders_trace.return_date >= '" & request.form("az_tarikh_tahvil") & "'"
    1205. 

  1205. 			maybeAND=" AND "
    1206. 

  1206. 		End If
    1207. 

  1207. 		if request.form("ta_tarikh_tahvil") <> "" then
    1208. 

  1208. 			myCriteria = myCriteria & maybeAND & "orders_trace.return_date <= '" & request.form("ta_tarikh_tahvil") & "'"
    1209. 

  1209. 			maybeAND=" AND "
    1210. 

  1210. 		End If
    1211. 

  1211. 		If (request.form("az_tarikh_tahvil") = "") AND (request.form("ta_tarikh_tahvil") = "") then
    1212. 

  1212. 			response.write "document.all.check_tarikh_tahvil.checked = false;" & vbCrLf
    1213. 

  1213. 			response.write "document.all.az_tarikh_tahvil.style.visibility = 'hidden';" & vbCrLf
    1214. 

  1214. 			response.write "document.all.ta_tarikh_tahvil.style.visibility = 'hidden';" & vbCrLf
    1215. 

  1215. 		End If
    1216. 

  1216. 	Else
    1217. 

  1217. 		response.write "document.all.check_tarikh_tahvil.checked = false;" & vbCrLf
    1218. 

  1218. 		response.write "document.all.az_tarikh_tahvil.style.visibility = 'hidden';" & vbCrLf
    1219. 

  1219. 		response.write "document.all.ta_tarikh_tahvil.style.visibility = 'hidden';" & vbCrLf
    1220. 

  1220. 	End If
    1221. 

  1221. 	
    1222. 

  1222. 	If request.form("check_tarikh_gharar") = "on" Then
    1223. 

  1223. 		if request.form("az_tarikh_gharar") <> "" then
    1224. 

  1224. 

  1225. 			myCriteria = myCriteria & maybeAND & "radif_sefareshat in (select [order] from OrderTraceLog where return_date >= '" & request.form("az_tarikh_gharar") & "' and ID in (select min(id) from OrderTraceLog where return_date is not null group by [Order]))"
    1226. 

  1226. 			maybeAND=" AND "
    1227. 

  1227. 		End If
    1228. 

  1228. 		if request.form("ta_tarikh_gharar") <> "" then
    1229. 

  1229. 			myCriteria = myCriteria & maybeAND & "radif_sefareshat in (select [order] from OrderTraceLog where return_date <= '" & request.form("ta_tarikh_gharar") & "' and ID in (select min(id) from OrderTraceLog where return_date is not null group by [Order]))"
    1230. 

  1230. 			maybeAND=" AND "
    1231. 

  1231. 		End If
    1232. 

  1232. 		If (request.form("az_tarikh_gharar") = "") AND (request.form("ta_tarikh_gharar") = "") then
    1233. 

  1233. 			response.write "document.all.check_tarikh_gharar.checked = false;" & vbCrLf
    1234. 

  1234. 			response.write "document.all.az_tarikh_gharar.style.visibility = 'hidden';" & vbCrLf
    1235. 

  1235. 			response.write "document.all.ta_tarikh_gharar.style.visibility = 'hidden';" & vbCrLf
    1236. 

  1236. 		End If
    1237. 

  1237. 	Else
    1238. 

  1238. 		response.write "document.all.check_tarikh_gharar.checked = false;" & vbCrLf
    1239. 

  1239. 		response.write "document.all.az_tarikh_gharar.style.visibility = 'hidden';" & vbCrLf
    1240. 

  1240. 		response.write "document.all.ta_tarikh_gharar.style.visibility = 'hidden';" & vbCrLf
    1241. 

  1241. 	End If
    1242. 

  1242. 

  1243. 	If (request.form("check_company_name") = "on" AND request.form("company_name_box") <> "" ) then
    1244. 

  1244. 		myCriteria = myCriteria & maybeAND & "company_name Like N'%" & request.form("company_name_box") &"%'"
    1245. 

  1245. 		maybeAND=" AND "
    1246. 

  1246. 	Else
    1247. 

  1247. 		response.write "document.all.check_company_name.checked = false;" & vbCrLf
    1248. 

  1248. 		response.write "document.all.company_name_box.style.visibility = 'hidden';" & vbCrLf
    1249. 

  1249. 	End If
    1250. 

  1250. 

  1251. 	If (request.form("check_customer_name") = "on" AND request.form("customer_name_box") <> "")then
    1252. 

  1252. 		myCriteria = myCriteria & maybeAND & "customer_name Like N'%" & request.form("customer_name_box") &"%'"
    1253. 

  1253. 		maybeAND=" AND "
    1254. 

  1254. 	Else
    1255. 

  1255. 		response.write "document.all.check_customer_name.checked = false;" & vbCrLf
    1256. 

  1256. 		response.write "document.all.customer_name_box.style.visibility = 'hidden';" & vbCrLf
    1257. 

  1257. 	End If
    1258. 

  1258. 

  1259. 	If request.form("check_kind") = "on" then
    1260. 

  1260. 		myCriteria = myCriteria & maybeAND & "order_kind = N'" & request.form("order_kind_box") & "'"
    1261. 

  1261. 		maybeAND=" AND "
    1262. 

  1262. 	Else
    1263. 

  1263. 		response.write "document.all.check_kind.checked = false;" & vbCrLf
    1264. 

  1264. 		response.write "document.all.order_kind_box.style.visibility = 'hidden';" & vbCrLf
    1265. 

  1265. 	End If
    1266. 

  1266. 

  1267. 	If request.form("check_marhale") = "on" then
    1268. 

  1268. 		If request.form("marhale_not_check") = "on" then
    1269. 

  1269. 			myCriteria = myCriteria & maybeAND & "NOT(step = " & request.form("marhale_box") & ")"
    1270. 

  1270. 		Else
    1271. 

  1271. 			myCriteria = myCriteria & maybeAND & "step = " & request.form("marhale_box") 
    1272. 

  1272. 			response.write "document.all.marhale_not_check.checked = false;" & vbCrLf
    1273. 

  1273. 			response.write "document.all.marhale_not_check_label.style.color='#BBBBBB';"& vbCrLf
    1274. 

  1274. 		End If
    1275. 

  1275. 		maybeAND=" AND "
    1276. 

  1276. 	Else
    1277. 

  1277. 		response.write "document.all.check_marhale.checked = false;" & vbCrLf
    1278. 

  1278. 		response.write "document.all.marhale_box.style.visibility = 'hidden';" & vbCrLf
    1279. 

  1279. 		response.write "document.all.marhale_not_check.style.visibility = 'hidden';" & vbCrLf
    1280. 

  1280. 		response.write "document.all.marhale_not_check_label.style.color='#BBBBBB';"& vbCrLf
    1281. 

  1281. 	End If
    1282. 

  1282. 

  1283. 	If request.form("check_vazyat") = "on" then
    1284. 

  1284. 		If request.form("vazyat_not_check") = "on" then
    1285. 

  1285. 			myCriteria = myCriteria & maybeAND & "NOT(status = " & request.form("vazyat_box") & ")"
    1286. 

  1286. 		Else
    1287. 

  1287. 			myCriteria = myCriteria & maybeAND & "status = " & request.form("vazyat_box") 
    1288. 

  1288. 			response.write "document.all.vazyat_not_check.checked = false;" & vbCrLf
    1289. 

  1289. 			response.write "document.all.vazyat_not_check_label.style.color='#BBBBBB';"& vbCrLf
    1290. 

  1290. 		End If
    1291. 

  1291. 		maybeAND=" AND "
    1292. 

  1292. 	Else
    1293. 

  1293. 		response.write "document.all.check_vazyat.checked = false;" & vbCrLf
    1294. 

  1294. 		response.write "document.all.vazyat_box.style.visibility = 'hidden';" & vbCrLf
    1295. 

  1295. 		response.write "document.all.vazyat_not_check.style.visibility = 'hidden';" & vbCrLf
    1296. 

  1296. 		response.write "document.all.vazyat_not_check_label.style.color='#BBBBBB';"& vbCrLf
    1297. 

  1297. 	End If
    1298. 

  1298. 

  1299. 	If request.form("check_salesperson") = "on" then
    1300. 

  1300. 		myCriteria = myCriteria & maybeAND & "salesperson = N'" & request.form("salesperson_box") & "'"
    1301. 

  1301. 		maybeAND=" AND "
    1302. 

  1302. 	Else
    1303. 

  1303. 		response.write "document.all.check_salesperson.checked = false;" & vbCrLf
    1304. 

  1304. 		response.write "document.all.salesperson_box.style.visibility = 'hidden';" & vbCrLf
    1305. 

  1305. 	End If
    1306. 

  1306. 

  1307. 	If (request.form("check_order_title") = "on" AND request.form("order_title_box") <> "")then
    1308. 

  1308. 		myCriteria = myCriteria & maybeAND & "order_title Like N'%" & request.form("order_title_box") &"%'"
    1309. 

  1309. 		maybeAND=" AND "
    1310. 

  1310. 	Else
    1311. 

  1311. 		response.write "document.all.check_order_title.checked = false;" & vbCrLf
    1312. 

  1312. 		response.write "document.all.order_title_box.style.visibility = 'hidden';" & vbCrLf
    1313. 

  1313. 	End If
    1314. 

  1314. 

  1315. 	If (request.form("check_telephone") = "on" AND request.form("telephone_box") <> "")then
    1316. 

  1316. 		myCriteria = myCriteria & maybeAND & "telephone Like N'%" & request.form("telephone_box") &"%'"
    1317. 

  1317. 		maybeAND=" AND "
    1318. 

  1318. 	Else
    1319. 

  1319. 		response.write "document.all.check_telephone.checked = false;" & vbCrLf
    1320. 

  1320. 		response.write "document.all.telephone_box.style.visibility = 'hidden';" & vbCrLf
    1321. 

  1321. 	End If
    1322. 

  1322. 	
    1323. 

  1323. 	If (request("returnIsNull") = "on") then
    1324. 

  1324. 		myCriteria = myCriteria & maybeAND & "orders_trace.return_date is null"
    1325. 

  1325. 		maybeAND=" AND "
    1326. 

  1326. 	Else
    1327. 

  1327. 		response.write "document.all.returnIsNull.checked = false;" & vbCrLf
    1328. 

  1328. 	End If
    1329. 

  1329. 	
    1330. 

  1330. 	If request("check_closed") = "on" then
    1331. 

  1331. 		myCriteria = myCriteria & maybeAND & "Orders.Closed=0"
    1332. 

  1332. 	Else
    1333. 

  1333. 		If request("Submit")="تاييد" then
    1334. 

  1334. 			response.write "document.all.check_closed.checked = false;" & vbCrLf
    1335. 

  1335. 			response.write "document.all.check_closed_label.style.color='#BBBBBB';" & vbCrLf
    1336. 

  1336. 		End If
    1337. 

  1337. 	End If
    1338. 

  1338. 

  1339. 	%>
    1340. 

  1340. 	}
    1341. 

  1341. 	function checkValidation(){
    1342. 

  1342. 		return true;
    1343. 

  1343. 	}
    1344. 

  1344. 

  1345. 	Form_Load();
    1346. 

  1346. 

  1347. 	//-->
    1348. 

  1348. 	</SCRIPT>
    1349. 

  1349. <%
    1350. 

  1350. 	if request("Submit")="تاييد" then
    1351. 

  1351. 		IF maybeAND <> " AND " THEN
    1352. 

  1352. 			response.write "Nothing !!!!!!!!!!"
    1353. 

  1353. 			response.write "<br>" & myCriteria
    1354. 

  1354. 		ELSE
    1355. 

  1355. 			mySQL="SELECT orders_trace.*, Orders.closed, OrderTraceStatus.Name AS StatusName, OrderTraceStatus.Icon,DRV_Invoice.price, ghar.return_date as ghDate, ghar.return_time as ghTime FROM Orders INNER JOIN  orders_trace ON Orders.ID = orders_trace.radif_sefareshat INNER JOIN  OrderTraceStatus ON orders_trace.status = OrderTraceStatus.ID left outer join (select InvoiceOrderRelations.[Order],SUM(InvoiceLines.Price + InvoiceLines.Vat - InvoiceLines.Discount -InvoiceLines.Reverse) as price from InvoiceOrderRelations inner join Invoices on InvoiceOrderRelations.Invoice=Invoices.ID inner join InvoiceLines on Invoices.ID=InvoiceLines.Invoice where Invoices.Voided=0 group by InvoiceOrderRelations.[Order]) DRV_Invoice on Orders.ID=DRV_Invoice.[Order] left outer join (select [order],return_date,return_time from OrderTraceLog where ID in (select min(id) from OrderTraceLog where return_date is not null group by [Order])) as ghar on orders_trace.radif_sefareshat =ghar.[order] WHERE ("& myCriteria & ") ORDER BY order_date DESC, radif_sefareshat DESC"	
    1356. 

  1356. 			'response.write "<br>"&mySQL&"<br>"
    1357. 

  1357. 			set RS1=Conn.Execute (mySQL)
    1358. 

  1358. 			if not RS1.eof then
    1359. 

  1359. 				tmpCounter=0
    1360. 

  1360. 'response.write mySQL
    1361. 

  1361. %>
    1362. 

  1362. 			<div align="center" dir="LTR">
    1363. 

  1363. 			<TABLE border="1" cellspacing="0" cellpadding="1" dir="RTL" borderColor="#555588">
    1364. 

  1364. 				<TR bgcolor="#CCCCFF">
    1365. 

  1365. 					<TD width="44"># سفارش</TD>
    1366. 

  1366. 					<TD width="46">تاريخ سفارش</TD>
    1367. 

  1367. 					<TD width="64">تاريخ تحويل</TD>
    1368. 

  1368. 					<TD width="122">نام شركت</TD>
    1369. 

  1369. 					<TD width="122">نام مشتري</TD>
    1370. 

  1370. 					<TD width="84">عنوان كار</TD>
    1371. 

  1371. 					<TD width="40">نوع</TD>
    1372. 

  1372. 					<TD width="53">مرحله</TD>
    1373. 

  1373. 					<TD width="36">سفارش گيرنده</TD>
    1374. 

  1374. 					<TD width="18">وضع</TD>
    1375. 

  1375. 					<td width="50">مبلغ كل</td>
    1376. 

  1376. 				</TR>
    1377. 

  1377. <%				Do while not RS1.eof and tmpCounter < resultsCount
    1378. 

  1378. 				tmpCounter = tmpCounter + 1
    1379. 

  1379. 				if tmpCounter mod 2 = 1 then
    1380. 

  1380. 					if IsNull(RS1("return_date")) then 
    1381. 

  1381. 						tmpColor="#FF0000"
    1382. 

  1382. 					else
    1383. 

  1383. 						tmpColor="#FFFFFF"
    1384. 

  1384. 					end if
    1385. 

  1385. 				Else
    1386. 

  1386. 					if IsNull(RS1("return_date")) then 
    1387. 

  1387. 						tmpColor="#DD8888"
    1388. 

  1388. 					else
    1389. 

  1389. 						tmpColor="#DDDDDD"
    1390. 

  1390. 					end if
    1391. 

  1391. 				End If
    1392. 

  1392. 

  1393. 				if RS1("Closed") then
    1394. 

  1394. 					tmpStyle="background-color:#FFCCCC;"
    1395. 

  1395. 				else
    1396. 

  1396. 					tmpStyle=""
    1397. 

  1397. 				End If
    1398. 

  1398. 				
    1399. 

  1399. %>
    1400. 

  1400. 				<TR bgcolor="<%=tmpColor%>" title="<%=RS1("StatusName")%>">
    1401. 

  1401. 					<TD width="40" DIR="LTR"><A HREF="TraceOrder.asp?act=show&order=<%=RS1("radif_sefareshat")%>" target="_blank"><%=RS1("radif_sefareshat")%></A></TD>
    1402. 

  1402. 					<TD DIR="LTR"><%=RS1("order_date")%></TD>
    1403. 

  1403. 					<TD DIR="LTR">
    1404. 

  1404. 						<div title="تاريخ تحويل قرارداد"><%=RS1("ghDate") & " ("& RS1("ghTime") & ")"%></div>
    1405. 

  1405. 					<% if RS1("return_date")<>RS1("ghDate") or RS1("return_time")<>RS1("ghTime") then %>
    1406. 

  1406. 						<div title="تاريخ تحويل عملي" style="color:#F80;"><%=RS1("return_date") & " ("& RS1("return_time") & ")"%></div>
    1407. 

  1407. 					<% end if%>
    1408. 

  1408. 					</TD>
    1409. 

  1409. 					<TD><%=RS1("company_name") & "<br>تلفن:("& RS1("telephone")& ")"%>&nbsp;</TD>
    1410. 

  1410. 					<TD><%=RS1("customer_name")%>&nbsp;</TD>
    1411. 

  1411. 					<TD><%=RS1("order_title")%>&nbsp;</TD>
    1412. 

  1412. 					<TD><%=RS1("order_kind")%></TD>
    1413. 

  1413. 					<TD style="<%=tmpStyle%>"><%=RS1("marhale")%></TD>
    1414. 

  1414. 					<TD><%=RS1("salesperson")%>&nbsp;</TD>
    1415. 

  1415. 					<TD><IMG SRC="<%=RS1("Icon")%>" WIDTH="20" HEIGHT="20" BORDER="0"></TD>
    1416. 

  1416. 					<td><%if isnull(RS1("price")) then response.write "----" else response.write Separate(RS1("price")) end if %></td>
    1417. 

  1417. 				</TR>
    1418. 

  1418. 				<TR bgcolor="#FFFFFF">
    1419. 

  1419. 					<TD colspan="11" style="height:10px"></TD>
    1420. 

  1420. 				</TR>
    1421. 

  1421. <%					RS1.moveNext
    1422. 

  1422. 				Loop
    1423. 

  1423. 

  1424. 				if tmpCounter >= resultsCount then
    1425. 

  1425. %>					<TR bgcolor="#CCCCCC">
    1426. 

  1426. 						<TD align="center" colspan="10" style="padding:15px;font-size:12pt;color:red;cursor:hand;" onclick="document.all.resultsCount.focus();"><B>تعداد نتايج جستجو بيش از <%=resultsCount%> ركورد است.</B></TD>
    1427. 

  1427. 					</TR>
    1428. 

  1428. <%				else
    1429. 

  1429. %>					<TR bgcolor="#ccccFF">
    1430. 

  1430. 						<TD colspan="11">تعداد نتايج جستجو: <%=tmpCounter%></TD>
    1431. 

  1431. 					</TR>
    1432. 

  1432. <%				end if
    1433. 

  1433. %>
    1434. 

  1434. 			</TABLE>
    1435. 

  1435. 			</div>
    1436. 

  1436. 			<BR>
    1437. 

  1437. <%			else
    1438. 

  1438. %>			<TABLE border="1" cellspacing="0" cellpadding="0" dir="RTL" align="center" width="600">
    1439. 

  1439. 				<TR bgcolor="#FFFFDD">
    1440. 

  1440. 					<TD align="center" style="height:40px;font-size:12pt;font-weight:bold;color:red">هيچ جوابي نداريم به شما بدهيم.</TD>
    1441. 

  1441. 				</TR>
    1442. 

  1442. 			</TABLE>
    1443. 

  1443. 			<hr>
    1444. 

  1444. <%			End If
    1445. 

  1445. 		End If
    1446. 

  1446. 	End If
    1447. 

  1447. End If
    1448. 

  1448. 

  1449. Conn.Close
    1450. 

  1450. %>
    1451. 

  1451. 

  1452. <!--#include file="tah.asp" -->
    1453. 

  1453.