在查看产品资料的时候为了更快捷的查询库存明细，在产品编辑界面右侧下方添加一个库存明细控件，用来查询成品（成品库存添加了销售订单下单日期，订单数量，预计交期等信息）和非成品类的库存
1. 在产品记录编辑脚本定义里面添加生成库存明细控件的脚本
int func_show_win()
{
gui_create_speedbutton("Panel_Func","Stock query",6,435,70,22,"库存明细","call_prog.cpkc_csp");//控件位置根据实际情况修改
//msg('show win');
return 1;
};
2. 将下列脚本另存为cpkc_csp即可
int test()
{
return 1;
};
int main()
{
string sql,v_res_id,m_xz;
v_res_id =gui_get_val("Edit_Res_Id")
m_xz = gui_get_val("ComboBox_Ext_Res_Kind")
if(m_xz == '30')
{
sql ="SELECT res.ext_5 as 客户名称,res.res_id as 成品编号,res.res_name as 成品名称,res.ext_4 as 每箱数量,res.res_unit_type as 单位,edt_res.produce_date as 接单日期,edt_res.sub_attr_val_1 as PO#,"
sql =sql+"ebs_vr_item.std_num as 订单数量,ebs_vr_item.item_date_lmt as 预计交期,edt_res.num as 库存数量,edt_res.ass_num as 库存辅量,"
sql =sql+"res.ass_unit_type as 辅助单位,edt_res.edt_id as 仓库名称,edt_res.edt_site_id as 库位编号 FROM edt_res,ebs_vr_item,res"
sql =sql+" WHERE edt_res.res_id= res.res_id and edt_res.res_id=ebs_vr_item.res_id AND edt_res.res_id='"+v_res_id+"' and edt_res.sub_attr_val_1=ebs_vr_item.sub_attr_val_1"
sql =sql+" and ebs_vr_item.ref_voucher_type in('')"
db_run(sql)
db_map("eba","客户名称","客户名称");
db_map("res_unit_type","单位","单位");
db_map("res_unit_type","辅助单位","辅助单位");
db_map("edt","仓库名称","仓库名称");
db_set_field_sum_flag("库存数量");
db_set_field_sum_flag("库存辅量");
db_show('成品库存明细')
};
else
{
sql ="SELECT res.res_id as 料号,res.res_name as 品名,res.res_unit_type as 单位,edt_res.sub_attr_val_2 as 采购单号,edt_res.sub_attr_val_1 as PO#,edt_res.sub_attr_val_3 as 成品编号,edt_res.num as 库存数量,"
sql =sql+"edt_res.produce_date as 入库日期,edt_res.batch_no as 批次,edt_res.edt_id as 仓库名称,edt_res.edt_site_id as 库位 FROM edt_res,res WHERE edt_res.res_id= res.res_id AND edt_res.res_id='"+v_res_id+"'"
db_run(sql)
db_map("res_unit_type","单位","单位");
db_map("edt","仓库名称","仓库名称");
db_set_field_sum_flag("库存数量");
db_show('材料库存明细')
};
return 1;
}; |
