今天修改了数据库的库结构,主要是修改月末结算的imbalance和exbalance两个数据表
先说明一下这两个数据表的作用:当用户点击月末结算后,入库单与出库单将被清除,而当月出入库单将结合产品库数据再经过一定的计算产生完整出/入库数据表,完整出入库数据表除了包括基本数据外,还计算得到销售税金、价税合计、应收金额、折扣金额等数据,这些在生成其它数据报表时就无须再计算,而只需要从完整出/入库数据表中挑数据即可。
到今天为止,财务共给了下面6个报表需求:
.华仪公司库房入库单
.x年x月销售流水报表
.x年x月销售结算报表
.x年x月销售结算汇总报表
.x年x月华仪公司库房明细帐
.x年x月华仪公司库房总帐
目前已经生成了其它的三个报表,但还有三个报表需要进行上期与本期的比较,这个还没有做。另外,生成的数据报表能按月生成,这个也没有做,现在是全部生成,不过我想修改这些应该不难。
编号问题:
我使用的数据库是Access(单机使用),相信大家都知道其中的自动编号有好处,但也有坏处。好处就是能自动递增,方便。但坏处是编号具有记忆功能,即例如当前记录编号值是20,将其中所有记录全部删除后,再添加一条新记录,则编号值是从21开始,而不会从1开始递值,因此,我用如下代码来修正自动编号功能。
s3="select * from imbalance";
DataModule1->ClientQuery->Close();
DataModule1->ClientQuery->SQL->Clear();
DataModule1->ClientQuery->SQL->Add(s3);
DataModule1->ClientQuery->Open();
DataModule1->ClientQuery->Last();
if(DataModule1->ClientQuery->FieldByName("编号"

->AsString==""

{
Num="0";
}
else
{
Num=DataModule1->ClientQuery->FieldByName("编号"

->AsString;
}
另外,今天还重写了"月末结算"功能代码,同时写了生成三个数据报表的模块代码,另外还修正了产品库、客户库、出入库单中的自动编号问题。