Vb6计算更新

Question

如何计算和更新refundamt？

我最初在数据库中有以下三行：

NO  |  TRANAMT  |  REFUNDAMT
1   |  100      |  0 
2   |  200      |  0
3   |  300      |  0

如果退款为350，退款将更新如下，退款不能大于转账：

NO  |  TRANAMT  |  REFUNDAMT
1   |  100      |  100 
2   |  200      |  200
3   |  300      |  50

当再次退款50时，只更新最后一条记录，退款将更新如下：

NO  |  TRANAMT  |  REFUNDAMT
1   |  100      |  100 
2   |  200      |  200
3   |  300      |  100

Answer 1

这里有一个简单的算法(不考虑多线程和锁)：

1. 假设RF是总退款行，查找第一行，其中DIFF = TRANAMT并将其命名为
2. 计算行的差值DIFF : DIFF = TRANAMT - REFUNDAMT
   • 如果DIFF >= RF，则将行中的REFUNDAMT更新为REFUNDAMT+RF，您就完成了。

   H19如果DIFF< RF，则将行中的REFUNDAMT更新为TRANAMT，让RF = RF-DIFF并转到步骤2.

​