使用cobol程序匹配不同文件中的金额

比诺兹

我有两个不同的文件，我需要匹配数量。如果数量匹配，我需要消除记录。

sandeep1dimri · 新的用户 已加入：2006年10月30日 帖子：76

你好

沙丁鱼 · 发表：2007年7月19日，星期四2:50 pm

是的，我同意，我们需要通过示例详细了解您的“规则”。
也许从规则2和3如何适用于所示示例开始。

比诺兹 · 发表：2007年7月19日，星期四3:11 pm

嗨桑迪普，

是的，我有一个键字段存在索偿编号，相同索偿编号不存在，我可能会得到重复的记录。在重复操作中，我需要匹配金额。

为什么我没有从文件1中删除7到11条记录意味着文件2中没有匹配量。文件2仅存在一个4000数量与第一个文件中的5条记录匹配。（以先到先服务为基础）。

对于第二种情况，我可以从上面的示例中获取记录是从第一个文件2,5,7到11个记录。从第二个文件中我将获得5,6,7,8个记录。

我会从第一个文件中添加一个或多个金额，并与第二个文件匹配。

在第二种情况下，我也无法消除任何记录，那么我需要进行第三种情况。

谢谢，
Thanooz。

比诺兹 · 发表：2007年7月19日，星期四3:13 pm

嗨桑迪普，

是的。对于第二种情况，我需要进行许可和组合。

谢谢，
Thanooz。

沙丁鱼

只是为了了解，
如果在第一轮淘汰之后，您仍然在文件1中
1000
3000
4000（X5）

并在文件2中
5000
6000
8000
11000

并且您希望将文件1与文件2的组合进行匹配以进一步消除。

例如方法1

从文件2中的第1条剩余记录开始，然后寻找匹配项
5000 =（1000 + 4000）离开
文件1中的3000、4000（x4）不匹配

6000与文件1中剩余的任何排列不匹配

8000 =（4000 + 4000）离开
3000、4000（X2）

11000 =（3000 + 4000 + 4000）

因此所有匹配，除了file2中的6000

或方法2

以file1开头
1000 + 3000没有匹配项
1000 + 3000 + 4000 = 8000
4000 + 4000没有匹配项
4000 + 4000 + 4000没有匹配项

离开
文件1中的4000（x4）和文件2中的5000、6000、11000

那么您是否可以继续进行选项3），即文件2的组合
例如
5000 + 6000没有匹配项
5000 + 6000 + 11000没有匹配项
5000 + 11000 =（4000 + 4000 + 4000 + 4000）
从而
保留文件2中不匹配的6000（与方法1相同的结果）

比诺兹

你好

您的解释是正确的，它必须像method1一样工作。

在上面的例子中，我给出了一些记录，我不知道file1和file2有多少记录，我必须为方法一编写cobol代码。

谢谢，
Thanooz。

迪克·谢勒

你好，

您要寻找的内容听起来与某些Accounts Reveivable系统中使用的“现金应用程序”算法非常相似。当客户发送付款时，确切付款金额的发票会“匹配”。对于与发票不完全匹配的支票，发票被“分组”，并且如果一组总计与付款相同，则全部由该付款“支付”。如果付款与单个发票不匹配且与“组”不匹配，则通常将付款应用于最早的发票。

这通常是使用代码中的数组来完成的。

我提到所有这些以确保您要执行的操作与我描述的过程相似。如果是这样，您可以在网络上搜索一些针对A / R执行此操作的真实或伪代码，并将其克隆以供使用。

比诺兹 · 发表：2007年7月19日，星期四8:04 pm

你好

您是正确的。能否提供任何代码或任何可以提供一些想法的网站。

谢谢，
Thanooz。

迪克·谢勒

你好，

抱歉，但是我没有代码-当我处理其中的一些代码时，那是在下载源代码之前。

这就是为什么我建议您可以在网络上进行一些搜索的原因-我只是使用“现金应用程序”和“应收款”作为搜索词进行了搜索，并获得了21,000多次匹配。我怀疑其中有您可以使用的东西。

沙丁鱼

您的商店也极有可能已经在某个地方运行了该算法。
值得一问吗？

比诺兹

大家好，

非常感谢您的支持。

谢谢，
Thanooz。