机房收费系统之结账

结账

1、student——售卡张数

cancel——退卡张数、退卡金额

recharge——充值金额【前提是注册金额已经加到充值表里面了】

应收金额=充值-退卡

总售卡数=售卡张数

临时收费金额：临时用户的充值-退卡（下机）

2、先选择操作员

<span style="font-size:24px;">    txtSQL = "select * from user_info where level= '" & "操作员" & "'"
    Set mrcu = executeSQL(txtSQL, MsgText)
    
    While mrcu.EOF = False
        cmbuserid.AddItem Trim(mrcu.Fields(0))
        mrcu.MoveNext
    Wend
    mrcu.Close</span>

3、将student、recharge、cancel表中的所有未结账的汇总到一个表格中，注意：该操作员的一个注册信息对应一个充值信息
那么先在student表把这些临时用户提出来（即卡号），再将这些卡号对应的充值信息加到一块。退卡的金额加到一块。两者相减。
【注意】这里会出现一些错误如：3021，引用无效null行，等等。

4、将student、recharge、cancel表中的该操作员下所有的“未结账”改为“已结账”
这时刷新上面的那个表。

5、将此记录放到checkday和checkweek表中。上期和本期充值卡金额未student表中的总金额、本日充值即recharge表中总金额、本日消费金额即line表中总消费金额，本日退卡即cancel表中总退卡金额。