使用COBOL语言在文件中保存输出
我需要帮助用COBOL编写一个小程序。 我写了这段代码:使用COBOL语言在文件中保存输出,cobol,Cobol,我需要帮助用COBOL编写一个小程序。 我写了这段代码: 识别部门。 程序ID.CallC。 数据司。 工作和储存科。 图X(10)中的01 INITBUF。 图X(10)中的01 SHOWBUF。 01 BUF用法是指针。 01个图片9(10)。 程序司。 移动10到NUM。 使用返回BUF的BY VALUE NUM调用“getBuffer”。 使用返回INITBUF的按值BUF调用“initBuffer”。 使用按值BUF调用“showBuffer”,返回SHOWBUF。 显示SHOWBUF
识别部门。
程序ID.CallC。
数据司。
工作和储存科。
图X(10)中的01 INITBUF。
图X(10)中的01 SHOWBUF。
01 BUF用法是指针。
01个图片9(10)。
程序司。
移动10到NUM。
使用返回BUF的BY VALUE NUM调用“getBuffer”。
使用返回INITBUF的按值BUF调用“initBuffer”。
使用按值BUF调用“showBuffer”,返回SHOWBUF。
显示SHOWBUF。
停,跑。
如何将
显示结果写入文件?比尔。按照下面的示例声明文件。将想要输出的内容移动到输出变量中,然后写入outputVar
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
SELECT PARM-OUT ASSIGN TO PARMOUT.
*************************************************
DATA DIVISION.
FILE SECTION.
FD PARM-OUT
RECORDING MODE F.
01 PARMIN-REC.
05 PSID-IN PIC 9(09).
05 PCID-IN PIC 9(08).
05 IN-PCIDSEQ PIC 9(03).
以通常的方式。将输出重定向到文件。详细信息取决于你的操作系统,但搜索引擎很容易找到。这个URL对我很有帮助。你介意告诉我怎么做吗?这是我的账单吗?若有,原因为何?您所显示的内容将如何影响显示语句?outputVar在哪里?好的。谢谢你的建议。在Windows环境中,我可以在哪里测试代码?这在Windows中是不可能的吗?@snori如前所述,“Windows输出重定向”。提供的代码与操作系统无关。“它在任何操作系统上都做不到你想要的。”比尔伍德,谢谢你的回答。我该如何改写环境部。配置部分。对于Windows和任何Linux操作系统?@snori,您应该能够找到许多将硬编码分配给文件名的示例。你可以找到其他的例子。一般来说,这不会影响显示。您的意思是希望输出始终转到文件,使用“打开”、“写入”和“关闭”?