<%
set Rsorder=dbsql.execute("select b.local_cd, (select code_nm from sta010t(nolock) where major_cd = '9016' and minor_cd = b.local_cd) local_nm, right(a.real_trans ,6) trans_date,b.cust_cd, (select cust_nm from stb010t(nolock) where cust_cd = b.cust_cd) cust_nm, b.item, b.ord_no, a.pallet_cnt, b.qty prod_qty, (select code_nm from sta010t(nolock) where major_cd = '2004' and minor_cd = a.trans_class) work_gubun, a.trans_time, right(a.prt_date,6) prt_day,d.item_class, 1 cnt, d.proc_cd1, d.good_type from bar_code a(nolock), inout_table b(nolock), boa010t c(nolock), stb040t d(nolock) where a.bar_code = b.bar_code and b.class = '1' and a.chk_bit = '1' and a.crp_id = '10' and a.goods_class = c.goods_class and a.ord_date = c.ord_date and a.ord_seq = c.ord_seq and c.cust_cd = d.cust_cd and c.good_cd = d.good_cd and b.bar_code='"& lorderno& "' and b.local_cd= (case when a.loc_no='TR' then '1' else '3' end) order by a.real_trans, a.trans_date, a.trans_time, b.cust_cd, b.item, b.ord_no,b.local_cd, a.trans_class, case when a.trans_date <> a.real_trans then '1' else '0' end , a.pallet_cnt")
if rsorder.eof and rsorder.bof then
else
'totpage=INT(rsorder("prod_qty")/lqtypallet)+1
'xpage=1
'xtotqty=int(rsorder("prod_qty"))
'lqtypallet2=lqtypallet
do while not rsorder.eof
' lqtypalletx=right("0000"&lqtypallet2,4)
%>
| ORDER NO | <%=rsorder("ord_no") %> |
| CUSTOMER | <%=rsorder("cust_nm") %> |
| ITEM | <%=rsorder("item") %> |
| QUANTITY | <%=rsorder("prod_qty") %> |
| Transfer Date: | <%=mid(rsorder("trans_date"),3,2)&"/"&mid(rsorder("trans_date"),5,2)&"/"&mid(rsorder("trans_date"),1,2) %> (mm/dd/yy) |
| Transfer Time: | <%=mid(rsorder("trans_time"),1,2)&":"&mid(rsorder("trans_time"),3,2)&":"&mid(rsorder("trans_time"),5,2) %> |
| Shift: | <%=rsorder("work_gubun") %> |
| Pallet #: | <%=rsorder("pallet_cnt") %> |
| Process: |