管理者软件
专业源于专注
www. onlyIt. cn   
软件交流 管理软件 软件手册 微博 »
管理模型 管理资料

    

 8  1/1   1  
作者
内容
afoo  [个人空间]
QQ名  常德-ZEN


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

级别  会员
#1»发布于2015-01-13 21:47

其实这个是有瑕疵的,只要勾选部门汇总或科目汇总即可查询,完全可以不要后面的部门选择框框和科目选择框框。这点需要跟meng总 
体建议增加一个纯粹的逻辑勾选控件。 
 
自定义报表分为两个部分: 
 
第一部分是在配制管理->数据脚本里面建立一个扩展查询: 
查询脚本如下: 
int func_def_lmt() 

  dt_define('cycle','select cycle_id,cycle_id  from asset_cycle'); 
  def_lmt_dict('lmt_dict_id','折旧月份','cycle'); 
 
  dt_define('dept','select max(a.dept_id) as deptid,b.dept_name from asset_dept_apart a left join app_dept b on a.dept_id = b.dept_id group by dept_name'); 
  def_lmt_dict('lmt_dept_yesno','部门汇总','dept'); 
 
  dt_define('subid','select max(a.subject_id) as subid,b.name from asset_dept_apart a left join evm_subject b on a.subject_id = b.subject_id group by name'); 
  def_lmt_dict('lmt_subid_yesno','科目汇总','subid'); 
 
  def_lmt_set_val('lmt_yes_no',"yes"); 
  return 1; 
}; 
 
int func_init_lmt_val() 

  return 1; 
}; 
 
int func_def_field() 

  db_set_field_count(6); 
  db_set_field_info(0,'dict_id',"折旧月份",100); 
  db_set_field_info(1,'code',"折旧金额",80); 
  db_set_field_info(2,'dept_id',"所属部门编号",80); 
  db_set_field_info(3,'name',"所属部门",100); 
  db_set_field_info(4,'sub_id',"科目ID",100); 
  db_set_field_info(5,'sub_name',"科目名称",100); 
  return 1; 
}; 
 
int func_def_imp() 

  return 1; 
}; 
 
int func_init() 

  return 1; 
}; 
 
int func_query() 

  string sql,sql_bydept,sql_normal,sql3,sql4,sql5,sql_special,logic; 
 
  sql_bydept="select a.cycle_id,sum(a.val_depre) as val,c.dept_id,d.dept_name,c.subject_id,e.name "; 
  sql_normal="select a.cycle_id,a.val_depre,c.dept_id,d.dept_name,c.subject_id,e.name "; 
  sql3="from ((asset_acc a left join asset_dept_apart c on c.asset_id=a.asset_id) "; 
  sql4="left join app_dept d on d.dept_id=c.dept_id) "; 
  sql5="left join evm_subject e on c.subject_id=e.subject_id "; 
 
  logic=lmt_checked("lmt_dict_id") +""+ lmt_checked("lmt_dept_yesno") +""+ lmt_checked("lmt_subid_yesno"); 
 
  switch(logic) 
  { 
    case "000": 
      sql=sql_normal+sql3+sql4+sql5; 
      //msg("啥都没被勾选"); 
      break; 
    case "100": 
      sql=sql_normal+sql3+sql4+sql5+" where a.cycle_id='" + lmt_val("lmt_dict_id") + "'"; 
      //msg("折旧月份被勾选"); 
      break; 
    case "010": 
      sql=sql_bydept+sql3+sql4+sql5+" group by a.cycle_id,c.dept_id,d.dept_name,c.subject_id,e.name"; 
      //msg("部门汇总被勾选"); 
      break; 
    case "001": 
      sql="select a.cycle_id,sum(a.val_depre) as val,'NULL','NULL',c.subject_id,e.name "; 
      sql=sql+"from ((asset_acc a left join asset_dept_apart c on c.asset_id=a.asset_id) "; 
      sql=sql+"left join app_dept d on d.dept_id=c.dept_id) "; 
      sql=sql+"left join evm_subject e on c.subject_id=e.subject_id "; 
      sql=sql+" group by a.cycle_id,c.dept_id,c.subject_id,e.name"; 
      //msg("科目汇总被勾选"); 
      break; 
    case "110": 
      sql=sql_bydept+sql3+sql4+sql5+" where a.cycle_id='" + lmt_val("lmt_dict_id") + "' group by a.cycle_id,c.dept_id,d.dept_name,c.subject_id,e.name"; 
      //msg("折旧月份、部门汇总被勾选"); 
      break; 
    case "011": 
      warn("请检查!部门汇总、科目汇总不能同时被勾选。"); 
      break; 
    case "101": 
      sql="select a.cycle_id,sum(a.val_depre) as val,'NULL','NULL',c.subject_id,e.name "; 
      sql=sql+"from ((asset_acc a left join asset_dept_apart c on c.asset_id=a.asset_id) "; 
      sql=sql+"left join app_dept d on d.dept_id=c.dept_id) "; 
      sql=sql+"left join evm_subject e on c.subject_id=e.subject_id "; 
      sql=sql+" where a.cycle_id='" + lmt_val("lmt_dict_id") + "' group by a.cycle_id,c.dept_id,c.subject_id,e.name"; 
      //msg("折旧月份、科目汇总被勾选"); 
      break; 
    case "111": 
      warn("折旧月份、部门汇总、科目汇总被勾选。"+nl()+"请检查!部门汇总、科目汇总不能同时被勾选。"); 
      break; 
  }; 
  db_run(sql); 
  return 1; 
}; 
 
第二部分是在固定资产报表里面的功能菜单-》报表分组脚本定义里面添加如下脚本: 
int init() 

  rep_add_group("固定资产折旧"); 
 // rep_add_rep("hello","Eba_007","客户报表1"); 
  rep_add_csp_rep("固定资产折旧","ds_001","固定资产折旧报表"); 
  return 1; 
}; 
 
 
最终结果如图脚本还有很多优化的地方,还请高手们不吝赐教。




        于 2015-01-13 21:47 被 afoo 修改




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

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

三生石  [个人空间]
QQ名  Meng


注册  2005-09-20
发贴数  7378
精华贴  14
原创贴  6
来自  杭州
状态  正常

级别  版主
#2»发布于2015-01-13 21:34

 
非常感谢ZEN分享,原创+精华!






 三生石上旧精魂 赏月吟风莫要论 惭愧情人远相访 此身虽异性长存 

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

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


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

级别  会员
#3»发布于2015-01-13 21:39

多谢meng总点赞!






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

庫存管理軟體, 綠色免費

ayangzhi  [个人空间]


注册  2010-07-18
发贴数  519
精华贴  2
原创贴  3
来自  
状态  正常

级别  版主
#4»发布于2015-01-13 22:31

固定资产折旧方面的报表,应该直接添加到系统报表中。 
作为脚本实例分享技巧来学习是不错的。:)






杨清云,承接商贸管理、人力资源实施、综合管理实施服务
联系QQ:13836962    TEL:13058180007
www.kypeesoft.com

固定資産設備 管理軟體, 綠色免費

忘佛之人  [个人空间]
QQ名  肥仔


注册  2015-03-09
发贴数  23
精华数  0
原创贴  0
来自  湖北宜昌
状态  正常

级别  会员
#5»发布于2017-03-26 16:35

都是高手。。






学习

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

wuxuguan  [个人空间]


注册  2012-01-07
发贴数  44
精华贴  1
原创贴  0
来自  
状态  正常

级别  会员
#6»发布于2018-05-08 21:19

好角本。。。。。。





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

htc  [个人空间]


注册  2017-12-30
发贴数  74
精华数  0
原创贴  0
来自  
状态  正常

级别  会员
#7»发布于2018-05-17 15:58

收藏先.......................





庫存管理軟體, 綠色免費

webshow  [个人空间]


注册  2009-02-09
发贴数  120
精华数  0
原创贴  0
来自  
状态  正常

级别  会员
#8»发布于2018-07-13 12:59

留言收藏,好脚本。。。





固定資産設備 管理軟體, 綠色免費

 >经典理论    >职业工具    >交流论坛      >阅读1 ,2 ,3 ,4  >文本论坛    
 8  1/1   1  


登录后方可发贴


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