Question

cobol程序中涉及的输入输出文件

cobol程序中涉及的输入输出文件，在400下如何建立并进行连接
INPUT-OUTPUT SECTION.
FILE-CONTROL.
SELECT FILE1
ASSIGN TO DATABASE-FILE1
这个文件FILE1是pf文件吗，可以详细说一下吗？谢谢，在线等ING！

Answer 1

我只知道在大型机下：
这个语句是在COBOL中用FILE1这个名称来和外部文件名连接起来。比如：
select file1 assign to ddname.
COBOL中用FD来描述file1:
FD FILE1.
01 A PIC X(80).
然后在JCL中指定ddname描述的是哪个文件：
//ddname dd dsn=a.b.c,disp=shr
整个连起来，意思就是COBOL中file1指的就是a.b.c这个DATASET。
通俗地说，楼主的问题中，就是DATABASE-FILE1所指定的外部文件在COBOL中使用时，它用FILE1这个名称来表示。
不知道我回答的对不对题，对楼主有没有帮助？

Answer 2

SELECT FT01
ASSIGN USING IN1-UFS
ORGANIZATION IS LINE SEQUENTIAL
ACCESS MODE IS SEQUENTIAL

FT01 是文件别名。。。下边用的时候都用 FT01进行操作，IN1-UFS 是实际的物理文件名（外部文件），至于什么后缀的 要看你写的 编译bat 里了。
ORGANIZATION IS LINE SEQUENTIAL
ACCESS MODE IS SEQUENTIAL 为顺序读取文件内容。
希望可以帮到你 ,上边的是 我的小号 哈哈

Answer 3

SELECT FT01
ASSIGN USING IN1-UFS
ORGANIZATION IS LINE SEQUENTIAL
ACCESS MODE IS SEQUENTIAL

FT01 是文件别名。。。下边用的时候都用 FT01进行操作，IN1-UFS 是实际的物理文件名（外部文件），至于什么后缀的 要看你写的 编译bat 里了。
ORGANIZATION IS LINE SEQUENTIAL
ACCESS MODE IS SEQUENTIAL 为顺序读取文件内容。
希望可以帮到你