OrderCursor = database.cursor ("select order_no from order_header where order_no = '" + request.OrderNo + "'"); CustCursor = database.cursor("select customer_no from customer where customer_no = '" + request.CustomerNo + "'"); ItemCursor = database.cursor("select part_no from item_master where part_no = '" + request.ItemNo1 + "'"); var ok=false; var herrorno=0; var lerrorno=0; var shopno=''; if(OrderCursor.next()){ if(request.TrxType != "U"){ redirect("osorderr.htm"); } } else if(!CustCursor.next()){ redirect("oscuserr.htm"); } else if(!ItemCursor.next()){ redirect("ositmerr.htm"); } else{ ok=true; } if(ok && request.TrxType != "U"){ herrorno=database.execute("insert into order_header values ('" + request.OrderNo + "','" + request.CustomerNo + "','" + request.CustomerPO + "','" + request.OrderDate + "')") } if(ok && request.TrxType != "U"){ if(request.QtyShipped1 == ""){ request.QtyShipped1 = 0; } lerrorno=database.execute("insert into order_line values ('" + request.OrderNo + "','" + request.LineNo1 + "','" + request.ItemNo1 + "','" + request.WhseLocation1 + "','" + request.QtyOrder1 + "','" + request.QtyShipped1 + "','" + request.LinePrice1 + "','" + shopno + "')") } if(ok && request.ItemNo2 != '' && request.TrxType != "U"){ if(request.QtyShipped2 == ""){ request.QtyShipped2 = 0; } lerrorno=database.execute("insert into order_line values ('" + request.OrderNo + "','" + request.LineNo2 + "','" + request.ItemNo2 + "','" + request.WhseLocation2 + "','" + request.QtyOrder2 + "','" + request.QtyShipped2 + "','" + request.LinePrice2 + "','" + shopno + "')") } if(ok && request.ItemNo3 != '' && request.TrxType != "U"){ if(request.QtyShipped3 == ""){ request.QtyShipped3 = 0; } lerrorno=database.execute("insert into order_line values ('" + request.OrderNo + "','" + request.LineNo3 + "','" + request.ItemNo3 + "','" + request.WhseLocation3 + "','" + request.QtyOrder3 + "','" + request.QtyShipped3 + "','" + request.LinePrice3 + "','" + shopno + "')") } if(ok && request.ItemNo4 != '' && request.TrxType != "U"){ if(request.QtyShipped4 == ""){ request.QtyShipped4 = 0; } lerrorno=database.execute("insert into order_line values ('" + request.OrderNo + "','" + request.LineNo4 + "','" + request.ItemNo4 + "','" + request.WhseLocation4 + "','" + request.QtyOrder4 + "','" + request.QtyShipped4 + "','" + request.LinePrice4 + "','" + shopno + "')") } if(ok && request.TrxType == "U"){ herrorno=database.execute("update order_header set " + "order_no = '" + request.OrderNo + "', " + "customer_no = '" + request.CustomerNo + "', " + "customer_po = '" + request.CustomerPO + "', " + "order_date = '" + request.OrderDate + "' " + "where order_no = '" + request.OrderNo + "'") } if(ok && request.TrxType == "U"){ if(request.QtyShipped1 == ""){ request.QtyShipped1 = 0; } lerrorno=database.execute("update order_line set " + "order_no = '" + request.OrderNo + "', " + "line_no = '" + request.LineNo1 + "', " + "item_no = '" + request.ItemNo1 + "'," + "location = '" + request.WhseLocation1 + "', " + "qty_ordered = '" + request.QtyOrder1 + "', " + "qty_shipped = '" + request.QtyShipped1 + "', " + "price = '" + request.LinePrice1 + "', " + "shop_order_no = '" + shopno + "' " + "where order_no = '" + request.OrderNo + "'" + "and line_no = '" + request.LineNo1 + "' ") } if(ok && request.ItemNo2 != '' && request.TrxType == "U"){ if(request.QtyShipped2 == ""){ request.QtyShipped2 = 0; } lerrorno=database.execute("update order_line set " + "order_no = '" + request.OrderNo + "', " + "line_no = '" + request.LineNo2 + "', " + "item_no = '" + request.ItemNo2 + "'," + "location = '" + request.WhseLocation2 + "', " + "qty_ordered = '" + request.QtyOrder2 + "', " + "qty_shipped = '" + request.QtyShipped2 + "', " + "price = '" + request.LinePrice2 + "', " + "shop_order_no = '" + shopno + "' " + "where order_no = '" + request.OrderNo + "'" + " and line_no = '" + request.LineNo2 + "' ") }