PageRenderTime 27ms CodeModel.GetById 0ms RepoModel.GetById 0ms app.codeStats 0ms

/ES/m009e0401.asp

http://github.com/boss2009/ASP-site
ASP | 390 lines | 374 code | 16 blank | 0 comment | 25 complexity | cd9f9478e9d54e817e3612b13622d96a MD5 | raw file
  1. <%@language="JAVASCRIPT"%>
  2. <!--#include file="../inc/ASPUtility.inc" -->
  3. <!--#include file="../inc/ASPCheckLogin.inc" -->
  4. <!--#include file="../Connections/cnnASP02.asp" -->
  5. <%
  6. var MM_editAction = Request.ServerVariables("URL");
  7. if (Request.QueryString) {
  8. MM_editAction += "?" + Request.QueryString;
  9. }
  10. if (String(Request("MM_action")) == "update") {
  11. var WayBillNumber = ((String(Request.Form("WayBillNumber"))!="undefined")?String(Request.Form("WayBillNumber")).replace(/'/g, "''"):"");
  12. var ScheduledArrivalDate = ((String(Request.Form("ScheduledArrivalDate"))=="undefined")?"1/1/1900":Request.Form("ScheduledArrivalDate"));
  13. var DeliveryDateArranged = ((String(Request.Form("DeliveryDateArranged"))=="undefined")?"1/1/1900":Request.Form("DeliveryDateArranged"));
  14. var Notes = String(Request.Form("Notes")).replace(/'/g, "''");
  15. var MorningPickUp = null;
  16. if (String(Request.Form("Morning"))=="on") MorningPickUp = 1;
  17. if (String(Request.Form("Afternoon"))=="on") MorningPickUp = 0;
  18. var rsShippingMethod = Server.CreateObject("ADODB.Recordset");
  19. rsShippingMethod.ActiveConnection = MM_cnnASP02_STRING;
  20. rsShippingMethod.Source = "{call dbo.cp_eqpsrv_ship_method("+Request.Form("MM_recordId")+","+Request.Form("ShippingStatus")+","+Request.Form("ShippedBy")+","+Request.Form("ShippingMethod")+",'"+WayBillNumber+"','"+DeliveryDateArranged+"','"+ScheduledArrivalDate+"',"+MorningPickUp+",'"+Notes+"',"+Session("insStaff_id")+",0,'E',0)}";
  21. rsShippingMethod.CursorType = 0;
  22. rsShippingMethod.CursorLocation = 2;
  23. rsShippingMethod.LockType = 3;
  24. rsShippingMethod.Open();
  25. Response.Redirect("UpdateSuccessful2.asp?page=m009e0401.asp&intEquip_srv_id="+Request.Form("MM_recordId")+"&intShip_Dtl_id="+Request.Form("intShip_Dtl_id"));
  26. }
  27. var rsEquipmentService = Server.CreateObject("ADODB.Recordset");
  28. rsEquipmentService.ActiveConnection = MM_cnnASP02_STRING;
  29. rsEquipmentService.Source = "{call dbo.cp_get_eqp_srv("+ Request.QueryString("intEquip_Srv_id") + ",0,0,'',1,'Q',0)}";
  30. rsEquipmentService.CursorType = 0;
  31. rsEquipmentService.CursorLocation = 2;
  32. rsEquipmentService.LockType = 3;
  33. rsEquipmentService.Open();
  34. var rsUserType = Server.CreateObject("ADODB.Recordset");
  35. rsUserType.ActiveConnection = MM_cnnASP02_STRING;
  36. // + nOV.04.2005
  37. //rsUserType.Source = "{call dbo.cp_FrmHdr_9A("+ Request.QueryString("intEquip_Srv_id") + ",0)}";
  38. rsUserType.Source = "{call dbo.cp_FrmHdr_9("+ Request.QueryString("intEquip_Srv_id") + ",0)}";
  39. rsUserType.CursorType = 0;
  40. rsUserType.CursorLocation = 2;
  41. rsUserType.LockType = 3;
  42. rsUserType.Open();
  43. var User = 0;
  44. if (!rsUserType.EOF) {
  45. switch (String(rsUserType.Fields.Item("insEq_user_type").Value)) {
  46. //staff
  47. case "1":
  48. User = 5;
  49. break;
  50. //client
  51. case "3":
  52. User = 1;
  53. break;
  54. //school
  55. case "4":
  56. User = 2;
  57. break;
  58. //no user
  59. default:
  60. User = 3;
  61. break;
  62. }
  63. }
  64. var rsShippingMethod = Server.CreateObject("ADODB.Recordset");
  65. rsShippingMethod.ActiveConnection = MM_cnnASP02_STRING;
  66. rsShippingMethod.Source = "{call dbo.cp_eqpsrv_ship_method("+Request.QueryString("intEquip_srv_id")+",'',0,0,'','','',0,'',0,1,'Q',0)}";
  67. rsShippingMethod.CursorType = 0;
  68. rsShippingMethod.CursorLocation = 2;
  69. rsShippingMethod.LockType = 3;
  70. rsShippingMethod.Open();
  71. var rsStaff = Server.CreateObject("ADODB.Recordset");
  72. rsStaff.ActiveConnection = MM_cnnASP02_STRING;
  73. rsStaff.Source = "{call dbo.cp_ASP_lkup(10)}";
  74. rsStaff.CursorType = 0;
  75. rsStaff.CursorLocation = 2;
  76. rsStaff.LockType = 3;
  77. rsStaff.Open();
  78. var rsShippingStatus = Server.CreateObject("ADODB.Recordset");
  79. rsShippingStatus.ActiveConnection = MM_cnnASP02_STRING;
  80. rsShippingStatus.Source = "{call dbo.cp_ship_rtn_status(0,'',0,'Q',0)}";
  81. rsShippingStatus.CursorType = 0;
  82. rsShippingStatus.CursorLocation = 2;
  83. rsShippingStatus.LockType = 3;
  84. rsShippingStatus.Open();
  85. var rsMethod = Server.CreateObject("ADODB.Recordset");
  86. rsMethod.ActiveConnection = MM_cnnASP02_STRING;
  87. rsMethod.Source = "{call dbo.cp_shipping_method(0,0)}";
  88. rsMethod.CursorType = 0;
  89. rsMethod.CursorLocation = 2;
  90. rsMethod.LockType = 3;
  91. rsMethod.Open();
  92. //Set bitIs_BackOrder = 1 for Equip. Service shipping
  93. //Set bitIs_Backorder = 0 for Out Service
  94. var intShip_Dtl_id = ((rsEquipmentService.Fields.Item("intShip_Dtl_id").Value!=null)?rsEquipmentService.Fields.Item("intShip_Dtl_id").Value:0);
  95. var rsBoxes = Server.CreateObject("ADODB.Recordset");
  96. rsBoxes.ActiveConnection = MM_cnnASP02_STRING;
  97. rsBoxes.Source = "{call dbo.cp_eqpsrv_ship_box(0,"+intShip_Dtl_id+",0,0,"+Request.QueryString("intEquip_Srv_id")+",1,0,'Q',0)}";
  98. rsBoxes.CursorType = 0;
  99. rsBoxes.CursorLocation = 2;
  100. rsBoxes.LockType = 3;
  101. //Response.Redirect(rsBoxes.Source);
  102. rsBoxes.Open();
  103. var count = 0;
  104. var total = 0;
  105. while (!rsBoxes.EOF) {
  106. count++;
  107. total = total + rsBoxes.Fields.Item("insBox_Wgt").Value;
  108. rsBoxes.MoveNext();
  109. }
  110. %>
  111. <html>
  112. <head>
  113. <title>Shipping Method</title>
  114. <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
  115. <link rel="stylesheet" href="../css/MyStyle.css" type="text/css">
  116. <script language="Javascript" src="../js/MyFunctions.js"></script>
  117. <script for="document" event="onkeyup()" language="JavaScript">
  118. if (window.event.ctrlKey) {
  119. switch (window.event.keyCode) {
  120. case 83 :
  121. //alert("S");
  122. Save();
  123. break;
  124. case 85:
  125. //alert("U");
  126. document.frm0401.reset();
  127. break;
  128. }
  129. }
  130. </script>
  131. <script language="Javascript">
  132. function Init(){
  133. switch (document.frm0401.ShippingMethod.value) {
  134. //dynamex
  135. case "9":
  136. document.frm0401.DeliveryDateArranged.disabled = false;
  137. document.frm0401.Morning.disabled = false;
  138. document.frm0401.Afternoon.disabled = false;
  139. document.frm0401.WayBillNumber.disabled = false;
  140. break;
  141. //picked up by client
  142. case "10":
  143. document.frm0401.DeliveryDateArranged.disabled = false;
  144. document.frm0401.Morning.disabled = false;
  145. document.frm0401.Afternoon.disabled = false;
  146. document.frm0401.WayBillNumber.disabled = true;
  147. break;
  148. //taken by consultant
  149. case "1":
  150. document.frm0401.DeliveryDateArranged.disabled = false;
  151. document.frm0401.Morning.disabled = true;
  152. document.frm0401.Afternoon.disabled = true;
  153. document.frm0401.WayBillNumber.disabled = true;
  154. break;
  155. //loomis
  156. case "4":
  157. document.frm0401.DeliveryDateArranged.disabled = false;
  158. document.frm0401.Morning.disabled = true;
  159. document.frm0401.Afternoon.disabled = true;
  160. document.frm0401.WayBillNumber.disabled = false;
  161. break;
  162. //Third Party
  163. case "11":
  164. document.frm0401.DeliveryDateArranged.disabled = false;
  165. document.frm0401.Morning.disabled = true;
  166. document.frm0401.Afternoon.disabled = true;
  167. document.frm0401.WayBillNumber.disabled = false;
  168. break;
  169. //none
  170. default:
  171. document.frm0401.DeliveryDateArranged.disabled = false;
  172. document.frm0401.Morning.disabled = true;
  173. document.frm0401.Afternoon.disabled = true;
  174. document.frm0401.WayBillNumber.disabled = true;
  175. break;
  176. }
  177. <%
  178. if (intShip_Dtl_id == 0) {
  179. %>
  180. document.frm0401.ShippingStatus.value = "<%=User%>";
  181. document.frm0401.ShippedBy.value = "<%=Session("insStaff_id")%>";
  182. <%
  183. }
  184. %>
  185. document.frm0401.ShippingStatus.focus();
  186. }
  187. function ChangeShippingMethod(){
  188. switch (document.frm0401.ShippingMethod.value) {
  189. //dynamex
  190. case "9":
  191. document.frm0401.DeliveryDateArranged.disabled = false;
  192. document.frm0401.DeliveryDateArranged.value="<%=CurrentDate()%>";
  193. document.frm0401.ScheduledArrivalDate.value="<%=CurrentDate()%>";
  194. document.frm0401.Morning.disabled = false;
  195. document.frm0401.Afternoon.disabled = false;
  196. document.frm0401.WayBillNumber.disabled = false;
  197. break;
  198. //picked up by client
  199. case "10":
  200. document.frm0401.DeliveryDateArranged.disabled = false;
  201. document.frm0401.DeliveryDateArranged.value="<%=CurrentDate()%>";
  202. document.frm0401.ScheduledArrivalDate.value="<%=CurrentDate()%>";
  203. document.frm0401.Morning.disabled = false;
  204. document.frm0401.Afternoon.disabled = false;
  205. document.frm0401.WayBillNumber.disabled = true;
  206. break;
  207. //taken by consultant
  208. case "1":
  209. document.frm0401.DeliveryDateArranged.disabled = false;
  210. document.frm0401.DeliveryDateArranged.value = "";
  211. document.frm0401.ScheduledArrivalDate.value="<%=CurrentDate()%>";
  212. document.frm0401.Morning.disabled = true;
  213. document.frm0401.Afternoon.disabled = true;
  214. document.frm0401.WayBillNumber.disabled = true;
  215. break;
  216. //loomis
  217. case "4":
  218. document.frm0401.DeliveryDateArranged.disabled = false;
  219. document.frm0401.DeliveryDateArranged.value = "";
  220. document.frm0401.ScheduledArrivalDate.value=ForwardDay(1);
  221. document.frm0401.Morning.disabled = true;
  222. document.frm0401.Afternoon.disabled = true;
  223. document.frm0401.WayBillNumber.disabled = false;
  224. break;
  225. //Third Party
  226. case "11":
  227. document.frm0401.DeliveryDateArranged.disabled = false;
  228. document.frm0401.DeliveryDateArranged.value = "";
  229. document.frm0401.ScheduledArrivalDate.value="<%=CurrentDate()%>";
  230. document.frm0401.Morning.disabled = true;
  231. document.frm0401.Afternoon.disabled = true;
  232. document.frm0401.WayBillNumber.disabled = false;
  233. break;
  234. //none
  235. default:
  236. document.frm0401.DeliveryDateArranged.disabled = false;
  237. document.frm0401.DeliveryDateArranged.value = "";
  238. document.frm0401.ScheduledArrivalDate.value="<%=CurrentDate()%>";
  239. document.frm0401.Morning.disabled = true;
  240. document.frm0401.Afternoon.disabled = true;
  241. document.frm0401.WayBillNumber.disabled = true;
  242. break;
  243. }
  244. }
  245. function openWindow(page){
  246. if (page!='nothing') win1=window.open(page, "", "width=300,height=300,scrollbars=1,left=300,top=300,status=1");
  247. return ;
  248. }
  249. function ListBoxes(){
  250. openWindow('m009pop3.asp?intEquip_Srv_id=<%=Request.QueryString("intEquip_Srv_id")%>&intShip_Dtl_id=<%=intShip_Dtl_id%>');
  251. }
  252. function Save(){
  253. if (!CheckTextArea(document.frm0401.Notes, 4000)){
  254. alert("Text area cannot exceed 4000 characters.");
  255. return ;
  256. }
  257. if (!CheckDate(document.frm0401.DeliveryDateArranged.value)){
  258. alert("Invalid Delivery Date Arranged.");
  259. document.frm0401.DeliveryDateArranged.focus();
  260. return ;
  261. }
  262. if (!CheckDate(document.frm0401.ScheduledArrivalDate.value)){
  263. alert("Invalid Scheduled Arrival Date.");
  264. document.frm0401.ScheduledArrivalDate.focus();
  265. return ;
  266. }
  267. document.frm0401.submit();
  268. }
  269. </script>
  270. </head>
  271. <body onLoad="Init();">
  272. <form ACTION="<%=MM_editAction%>" METHOD="POST" name="frm0401">
  273. <h5>Shipping Method</h5>
  274. <hr>
  275. <table cellpadding="1" cellspacing="1">
  276. <tr>
  277. <td nowrap>Shipping Status:</td>
  278. <td nowrap><select name="ShippingStatus" tabindex="1" onChange="alert('Changing this field may affect integrity of inventory status.');" accesskey="F">
  279. <%
  280. while (!rsShippingStatus.EOF){
  281. %>
  282. <option value="<%=rsShippingStatus.Fields.Item("insRtn_to_User").Value%>" <%=((rsShippingMethod.Fields.Item("chrRtn_to_User").Value==String(rsShippingStatus.Fields.Item("insRtn_to_User").Value))?"SELECTED":"")%>><%=rsShippingStatus.Fields.Item("chvRtoUser_Desc").Value%>
  283. <%
  284. rsShippingStatus.MoveNext();
  285. }
  286. %>
  287. </select></td>
  288. </tr>
  289. <tr>
  290. <td nowrap>Shipped By:</td>
  291. <td nowrap><select name="ShippedBy" tabindex="2">
  292. <option value="0">(none)
  293. <%
  294. while (!rsStaff.EOF) {
  295. %>
  296. <option value="<%=(rsStaff.Fields.Item("insStaff_id").Value)%>" <%=((rsStaff.Fields.Item("insStaff_id").Value==rsShippingMethod.Fields.Item("insShip_Staff_id").Value)?"SELECTED":"")%>><%=(rsStaff.Fields.Item("chvName").Value)%>
  297. <%
  298. rsStaff.MoveNext();
  299. }
  300. %>
  301. </select></td>
  302. </tr>
  303. <tr>
  304. <td nowrap>Shipping Method:</td>
  305. <td nowrap><select name="ShippingMethod" onChange="ChangeShippingMethod();" tabindex="3">
  306. <option value="0">(none)
  307. <%
  308. while (!rsMethod.EOF) {
  309. if (rsMethod.Fields.Item("bitis_active").Value == "1") {
  310. %>
  311. <option value="<%=(rsMethod.Fields.Item("intship_method_id").Value)%>" <%=((rsMethod.Fields.Item("intship_method_id").Value==rsShippingMethod.Fields.Item("insShip_Method_id").Value)?"SELECTED":"")%>><%=(rsMethod.Fields.Item("chvname").Value)%>
  312. <%
  313. }
  314. rsMethod.MoveNext();
  315. }
  316. %>
  317. </select></td>
  318. </tr>
  319. <tr>
  320. <td nowrap>Waybill Number:</td>
  321. <td nowrap><input type="text" name="WayBillNumber" value="<%=(rsShippingMethod.Fields.Item("chvWayBill_No").Value)%>" size="15" tabindex="4"></td>
  322. </tr>
  323. <tr>
  324. <td nowrap>Number of Boxes:</td>
  325. <td nowrap>
  326. <input type="text" name="NumberOfBoxes" size="2" maxlength="3" value="<%=count%>" tabindex="5" style="border: none" readOnly> Total Weight:
  327. <input type="text" name="TotalWeight" size="4" value="<%=total%>" tabindex="6" style="border: none" readOnly> LB
  328. <input type="button" value="Add/Update" tabindex="7" onClick="<%=((intShip_Dtl_id>0)?"ListBoxes();":"alert('Please save first, before adding shipping boxes.');")%>" class="btnstyle">
  329. </td>
  330. </tr>
  331. <tr>
  332. <td nowrap>Delivery Date Arranged:</td>
  333. <td nowrap>
  334. <input type="text" name="DeliveryDateArranged" size="11" maxlength="10" value="<%=FilterDate(rsShippingMethod.Fields.Item("dtsDlvy_date").Value)%>" tabindex="8" onChange="FormatDate(this)">
  335. <span style="font-size: 7pt">(mm/dd/yyyy)</span>
  336. </td>
  337. </tr>
  338. <tr>
  339. <td nowrap>Scheduled Arrival Date:</td>
  340. <td nowrap>
  341. <input type="text" name="ScheduledArrivalDate" size="11" maxlength="10" value="<%=FilterDate(rsShippingMethod.Fields.Item("dtsSch_Arv_date").Value)%>" tabindex="9" onChange="FormatDate(this)">
  342. <span style="font-size: 7pt">(mm/dd/yyyy)</span>
  343. </td>
  344. </tr>
  345. <tr>
  346. <td nowrap>Picked Up:</td>
  347. <td nowrap>
  348. <input type="checkbox" name="Morning" tabindex="10" <%=((rsShippingMethod.Fields.Item("BitPkup_morning").Value=="1")?"CHECKED":"")%> class="chkstyle">Morning
  349. <input type="checkbox" name="Afternoon" tabindex="11" <%=((rsShippingMethod.Fields.Item("BitPkup_morning").Value=="0")?"CHECKED":"")%> class="chkstyle">Afternoon
  350. </td>
  351. </tr>
  352. <tr>
  353. <td nowrap valign="top">Shipping Notes:</td>
  354. <td nowrap valign="top"><textarea name="Notes" cols="65" rows="3" tabindex="12" accesskey="L"><%=rsShippingMethod.Fields.Item("chvNote_Desc").Value%></textarea></td>
  355. </tr>
  356. </table>
  357. <hr>
  358. <table cellpadding="1" cellspacing="1">
  359. <tr>
  360. <td><input type="button" value="Save" tabindex="13" onClick="Save();" class="btnstyle"></td>
  361. <td><input type="reset" value="Undo Changes" tabindex="14" class="btnstyle"></td>
  362. </tr>
  363. </table>
  364. <input type="hidden" name="MM_action" value="update">
  365. <input type="hidden" name="MM_recordId" value="<%=rsShippingMethod.Fields.Item("intEquip_srv_id").Value %>">
  366. <input type="hidden" name="intShip_Dtl_id" value="<%=intShip_Dtl_id%>">
  367. </form>
  368. </body>
  369. </html>
  370. <%
  371. rsShippingMethod.Close();
  372. rsStaff.Close();
  373. rsMethod.Close();
  374. %>