在 Cobol 中的输入行上写入输出

Writing an output on an input line in Cobol

Customer ID Name Order Date

................................................ .....................................Year Month Day

123456789 Johnny Smith

234567890 Mary Campbell

345678901 Ed Bilewicz

456789012 Tim Rahmen

567890123 Cheryl Graham

678901234 Robert Thomas McGill

所以我有一个正在处理的 .dat 文件。我只获得了 ID 和名称,并设法像这样格式化 .out 文件(这似乎不是问题)。我想知道的是如何将日、月和年添加到此 .out 文件,同时将它们与名称和 ID 保持在同一行。 我真的是 Cobol 的新手,所以有很多术语我还不明白。我尝试在我的内联文件中写入变量(例如 il-id),使用移动命令分配数字然后转移到我的大纲文件(ol-id)中的变量然后写入大纲文件但它没有似乎工作。尽管我只是做错了,这并非不可能。 对我应该做的事情的任何帮助将不胜感激。再一次,我对此很陌生,所以术语越不复杂,我就越容易理解。 非常感谢。

实际上,COBOL 中的数据定义概念看起来像平面文件 class 关联到序列化或实体 class 关联到现代编程语言中的持久映射。

这是数据定义的示例(在 DATA DIVISION 中):

WORKING-STORAGE SECTION.
...
02 OL-ID.
   05 CUSTOMER-ID    PIC X(10).
   05 CUSTOMER-NAME  PIC X(20).
   05 ORDER-DATE.
      10 YEAR   PIC X(4).
      10 FILLER PIC X(1) VALUE '-'.
      10 MONTH  PIC X(2).
      10 FILLER PIC X(1) VALUE '-'.
      10 DAY    PIC X(2).

希望对您有所帮助。