R9批量删除无余额无发生额的往来科目

rcldc

R9批量删除无余额无发生额的往来科目
方法：如想删除110科目下无无余额无发生额的往来科目，在查询分析器中选择要操作的账套，运行如下代码即可
select * from gl_kmxx where (gsdm='' or gsdm='2008') and kmdm in (select kmdm from gl_kmye where kmdm like '110%' and kmncj+kmncd+kmjf1+kmjf2+kmjf3+kmjf4+kmjf5+kmjf6+kmjf7+kmjf8+kmjf9+kmjf10+kmjf11+kmjf12+kmdf1+kmdf2+kmdf3+kmdf4+kmdf5+kmdf6+kmdf7+kmdf8+kmdf9+kmdf10+kmdf11+kmdf12=0 and kjnd=2008 and len(kmdm)>3)
select * from gl_kmye where kmdm like '110%' and kmncj+kmncd+kmjf1+kmjf2+kmjf3+kmjf4+kmjf5+kmjf6+kmjf7+kmjf8+kmjf9+kmjf10+kmjf11+kmjf12+kmdf1+kmdf2+kmdf3+kmdf4+kmdf5+kmdf6+kmdf7+kmdf8+kmdf9+kmdf10+kmdf11+kmdf12=0 and kjnd=2008 and len(kmdm)>3
select * from gl_kmyek where kmdm like '110%' and kmncj+kmncd+kmjf1+kmjf2+kmjf3+kmjf4+kmjf5+kmjf6+kmjf7+kmjf8+kmjf9+kmjf10+kmjf11+kmjf12+kmdf1+kmdf2+kmdf3+kmdf4+kmdf5+kmdf6+kmdf7+kmdf8+kmdf9+kmdf10+kmdf11+kmdf12=0 and kjnd=2008 and len(kmdm)>3


delete  from gl_kmxx where (gsdm='' or gsdm='2008') and kmdm in (select kmdm from gl_kmye where kmdm like '110%' and kmncj+kmncd+kmjf1+kmjf2+kmjf3+kmjf4+kmjf5+kmjf6+kmjf7+kmjf8+kmjf9+kmjf10+kmjf11+kmjf12+kmdf1+kmdf2+kmdf3+kmdf4+kmdf5+kmdf6+kmdf7+kmdf8+kmdf9+kmdf10+kmdf11+kmdf12=0 and kjnd=2008 and len(kmdm)>3)
delete  from gl_kmye where kmdm like '110%' and kmncj+kmncd+kmjf1+kmjf2+kmjf3+kmjf4+kmjf5+kmjf6+kmjf7+kmjf8+kmjf9+kmjf10+kmjf11+kmjf12+kmdf1+kmdf2+kmdf3+kmdf4+kmdf5+kmdf6+kmdf7+kmdf8+kmdf9+kmdf10+kmdf11+kmdf12=0 and kjnd=2008 and len(kmdm)>3
delete  from gl_kmyek where kmdm like '110%' and kmncj+kmncd+kmjf1+kmjf2+kmjf3+kmjf4+kmjf5+kmjf6+kmjf7+kmjf8+kmjf9+kmjf10+kmjf11+kmjf12+kmdf1+kmdf2+kmdf3+kmdf4+kmdf5+kmdf6+kmdf7+kmdf8+kmdf9+kmdf10+kmdf11+kmdf12=0 and kjnd=2008 and len(kmdm)>3

[ 本帖最后由 rcldc 于 2008-7-4 10:07 编辑 ]

jh4617233

还有个方法 就是修改一下gl—kmxx， 把无余额无发生额的往来科目本年度 （一定是本年度即 gsdm=‘’ 其他年度不要改 ）里的syzt  改为 0 就可以去前台删除往来科目了。（修改数据库有风险 修改前要做备份）