管理者软件
专业源于专注
www. myOIT. cn   
软件交流 管理软件 软件手册 »

    

 3  1/1   1  
作者
内容
广州-英飞  [个人空间]


注册  2014-05-24
发贴数  7
精华贴  1
原创贴  1
来自  
状态  正常

级别  会员
#1»发布于2014-08-13 22:18

我们根据不同的外加工商有不同的情况。有时候只需要打印主物资,有时候只需要打印明细物资。 
参考了吴老师的脚本:http://www.onlyit.cn/topic_list_detail?subject_id=3&topic_id=70744&topic_page_id=1 
 
添加字典:打印切换  编号 A01 Y:打印主物资 N:打印明细物资 , 留空侧完整打印。 
单据添加属性扩展A01:把这字典选上。如果是第一个扩展下面不用改,如果第二个。那type_id=gui_get_val("ext_A01")中的ext_A01要改成相应的。 
 
这下应该通用了。。。 
 
int func_before_print()  
{  
  //can_print=1;  
string p,v1 
int i,j,k,n1 
p=gui_get_val("ext_A01"); 
db_select_dbio("data");  
n1=db_row_count(); 
//db_sort_ext('item_id'); 
//==================================// 
if(p=="Y"||p=="N");//删除没内容的记录 
{; 
for(i=1;i<n1;i++); 
{; 
v1=db_res_ext('item_id'); 
//msg(v1); 
if(v1=="-"||v1==""); 
{; 
db_del_row(); 
i=i-1; 
}; 
db_go_row(i); 
}; 
db_go_head(); 
}; 
//=================================// 
if(p=="Y");//删除主物资记录 
{; 
for(j=0;j<n1;j++); 
{; 
v1=db_res_ext('is_main'); 
//msg(v1); 
if(v1=="Y"); 
{; 
db_del_row(); 
j=j-1; 
}; 
db_go_row(j); 
}; 
}; 
//==================================// 
if(p=="N");//删除明细物资记录 
{; 
for(k=0;k<n1;k++); 
{; 
v1=db_res_ext('is_main'); 
//msg(v1); 
if(v1==""); 
{; 
db_del_row(); 
k=k-1; 
}; 
db_go_row(k); 
}; 
}; 
 return 1;  
};  
 
///////////////////////////////////////////////////// 
有个问题就是主物资的总数不统计,再研究研究。












        于 2014-08-13 22:18 被 广州-英飞 修改





商贸进销存 管理軟體, 綠色免費

afoo  [个人空间]
QQ名  常德-ZEN


注册  2010-04-08
发贴数  192
精华贴  6
原创贴  6
来自  常德-ZEN
状态  正常

级别  会员
#2»发布于2014-08-13 16:00

太强大了,多谢分享!






官方认证第三方服务团队  蒋逸凡(常德-ZEN) QQ:50636277
服务介绍: http://www.onlyit.cn/user_home?user_id=13498

人力資源管理軟體, 綠色免費

xwb514  [个人空间]
QQ名  无锡-流浪(340298101)


注册  2010-03-19
发贴数  415
精华贴  6
原创贴  7
来自  
状态  正常

级别  会员
#3»发布于2014-08-13 22:22

学习了。感谢英飞的分享。






官方认证第三方服务团队  徐文标(无锡-流浪) QQ:340298101
服务介绍:http://www.onlyit.cn/onlyit_service.html

庫存管理軟體, 綠色免費


 3  1/1   1  


登录后方可发贴


[ 电话: 0571-85462761 王先生 QQ: 124520435 加入软件QQ群 - 中国杭州 - 备案号码 浙ICP备19051128号]