插座和COBOL

Question

我在一家医院得到了一份工作，它仍然使用COBOL进行所有的组织工作，整个数据库(现在是20 of )(这是一个自制的数据库，你猜怎么着，COBOL)充满了过去45年(大约)以来每个病人的数据。

这就是我的故事。关于我的问题：

目前，所有套接字(据我所见)都是由COBOL程序实现的，这些程序将它们的数据写入文件。这些文件随后由C++程序(这是上世纪80年代末添加的另一个模块)读取，并使用发送到数据库的C++套接字。

现在，这个解决方案已经停止工作，因为他们正在将数据库从COBOL移动到COBOL，是的--他们没有使用MySQL之类的--他们在COBOL中实现了一个新的数据库。我问在我之前在那里工作的人(他现在大约70岁了)，为什么有人会这么做?他告诉我，他非常擅长COBOL，所以他不想用任何其他语言写。

到目前为止，我的问题是：

• 如何在COBOL中实现套接字连接？我需要为外部COBOL数据库创建一个接口，例如位于192.168.1.23:283上。

Answer 1

您需要提供有关操作系统和编译器的更多信息。

如果您在IBM /OS上使用了语言环境支持的编译器，则可以从z/OS通信服务调用EZASOCK函数。这些调用在它们的引用中有很好的文档，并且有很好的Cobol示例。

其他平台将有其他选择。

在大多数情况下，您只需“调用”用您需要的任何语言编写的外部模块，但是可以调用DLL或sharedLib或其他任何语言。

你能给出更多关于你的环境的细节吗？

你为什么不直接从Cobol程序直接写到数据库呢？

Answer 2

IBM大型机有两个套接字API，可以从COBOL中使用。一个用于在CICS程序中使用(其中有特殊的线程安全和envrinment考虑)，另一个用于普通批处理或IMS程序。

完整的TCP/IP功能已经实现，它的可靠性足以处理MVA标准的信用卡协议(我知道我已经这么做了)。

Answer 3

大多数COBOL编译器将允许您链接和调用对象模块或DLL。正如Kati所说，我知道我可以帮忙，但我需要更多的信息。我以前从windows到DEC都这样做过，所以我知道这是可以做到的。