pb LPT打印

//

//空一行代码:CHAR(13)+CHAR(10)

Int handle1,i
DateTime ldt

ldt = DateTime(Date(Today()),Time('00:00:00'))

i = ds_print.Retrieve(al_max_dh,ldt)

IF i = 0 THEN RETURN


handle1 = FileOpen("PRN",linemode!,Write!,lockwrite!,Replace!)

FileWrite(handle1,Char(27)+"I") //设置字体(针对EPSON绝对有效，其他类型打印机没有测试）  


FileWrite(handle1,space(9) + String(ds_print2.Object.内容[1]))

FileWrite(handle1,"日期:"+String(Today(),'yyyy.mm.dd')+' 单号:'+String(al_max_dh,'000'))
string ls_user,ls_sales
ls_user = ds_print.Object.t_user_收银员[1]
ls_sales = ds_print.Object.t_user_营业员[1]
if isnull(ls_user) then ls_user = ' '
if isnull(ls_sales) then ls_sales = ' '
FileWrite(handle1,"收银员:" +String(ls_user)+ " 营业员:" + String(ls_sales))

FileWrite(handle1,"========================================")
FileWrite(handle1,"款号 品名 颜色 尺码 数量 原价 折扣 金额")

FOR i = 1 TO ds_print.RowCount()
FileWrite(handle1,String(ds_print.Object.product_款号[i]) + ' ' + String(ds_print.Object.t_type_mc[i]) + ' ' + String(ds_print.Object.t_color_color_mc[i])+ ' ' + String(ds_print.Object.t_cm_cm_mc[i])+ ' ' + String(round(ds_print.Object.product_out_数量[i],0))+ ' ' + String(int(ds_print.Object.product_out_原价[i]))+ ' ' + String(ds_print.Object.jk[i],'0.##')+ ' ' + String(int(ds_print.Object.product_out_金额[i])))
NEXT

FileWrite(handle1,space(27) + "合计:"+String(ds_print.Object.compute_1[1],'#.00'))
FileWrite(handle1,"================="+String(now(),'hh:mm')+"=================")

FOR i = 2 TO ds_print2.RowCount()
FileWrite(handle1,String(ds_print2.Object.内容[i]))
NEXT

//FileWrite(handle1,"多谢惠顾,欢迎下次光临!")
//FileWrite(handle1,"请保管好小票,三天内保持")
//FileWrite(handle1,"货品原样凭票更换")
FileWrite(handle1,''+char(13)+char(10))
FileWrite(handle1,''+char(13)+char(10))
FileWrite(handle1,''+char(13)+char(10))
FileClose(handle1)