COBOLⅠ-第2章 ID ENTIFICATION DIVISION 至 DATA VISION(中文翻译版).doc

第二章21 例题1将软盘里的进货数据输入硬盘做成进货文件。 输入输出数据形式 （a） 输入数据形式（b） 输出数据形式（注）本书中，数据形式以下列符号表示。 X英数字项目 N日语项目 9数字项目（ZONE形式） P数字项目（PACK形式） 处理标准 输入文件以50记录/存储块为单位输出 单价，采购数量，采购额以PACK形式输出 采购额用下列公式求出采购额 = 单价 * 采购数量22 IDENTIFICATION DIVISION IDENTIFICATION DIVISION被叫做标识部，是COBOL第一个记述的DIVISION这里，要记述的是程序名。221 IDENTIFICATION DIVISION的构成一般的书写方法和编程上的注意问题 （a） 约定用语与使用者用语 一般情况下，用英文大写字母表示的单词属于COBOL中的约定用语。因为约定用语的写法及意义都是事先决定的，在记述中一定要按照规定书写。 同时，一般情况下，用假名及汉字记述的某种语言，被称为COBOL的使用者用语。使用者用语虽然可以根据规则随意书写，但不能像约定用语一样的写法。（b）空格，终止符 为区分语句（约定用语，使用者用语），必须有1个字以上的空格。 在要求的地方一定要用终止符，终止符后，要求有1个字以上的空格。222 PROGRAM-ID PROGRAM-ID记述程序名。（）程序名 程序名即为程序起的名字，依照下列规则指定， 可以使用的文字有英文，数字，以及连字符。 开头的文字必须是英文 文字的长度在8个字之内（）PROGRAM-ID与程序名后必须有终止符 终止符后必须有1字以上的空格。练习题2-11下面的文章是关于到现在为止所学内容的。在（）中填入适当的语句。 中最初记述的DIVISION是（）DIVISION。 （）DIVISION，是指定（）名。 在COBOL程序中记述的语言，可以遵循规则任意写入的是（），写法及意义已经决定了的是（）。2在下面的程序名中，选出没有遵循规则的，并说明理由。23 ENVIRONMENT DIVISION ENVIRONMENT DIVISION被叫做环境部，COBOL中第二个记述的DIVISION、在这里指定输入输出存储及装置。231 ENVIRONMENT DIVISION的构成 （）SELECT必须记述每一个使用的存储 （）SELECT记述在12位以后，为让ASSIG以后更便于阅读，写在下一行的12位以后。 （）文件名 文件名，是为系统中使用的文件所起的名字。一般在系统设计阶段就被决定了。名字根据下列规则指定。 可以使用的文字有，英文，数字，连字符，长度在30个文字以内 使用日文文字时，长度在13个文字以内。 最少包含一个英文，日文文字 连字符不能用在开头和结尾 （）理论装置名称 理论装置名称，是为在程序中所使用的文件的设备起的名字。在系统设计阶段即被决定。写法如下： SYSx x是由数字，英文组成的15个文字的文字列。（注）但是要注意x所指定的文字，根据系统不同有所差别。 （） 装置级别 （）装置名 （） 编成 所谓编成，也可以说是文件的构成，为了使数据处理更有效率，根据处理目的的不同，有不同的编成方法。本书中，全部使用顺编成。 顺编成文件是，从文件的开头起将记录按顺序记录，因此输出记录时也要按顺序从头输出，顺编成文件S （） 理论装置名，装置级别，装置名，编成间的连字符的前后不能加空格。 练习题2-2 1 下面的文章是关于到现在为止所学内容的。在（）中填入适当的语句。 ENVIRONMENT DIVISION中，（）SECTION被记入，指定输入输出文件和装置。 （）SECTION的下一行写（），在下一行写SELECT，为程序中所使用的（）起名。SELECT以后的指定，所有使用的文件都要进行说明。 2下列文件名中，选择不符合文件名规则的，并说明理由。3用下列条件SELECT以后的编程。问题1 SELECT记述时，必须按输入文件，输出文件的顺序进行吗？答：先写哪个没有关系，在本书中统一按照输入文件，输出文件的顺序记述。问题2 在文件编成中，除了顺编成还有什么？答：还有索引顺编成文件，直接编成文件，VSAM编成文件等。 详细情况参见介绍资料。24 DATA DIVISION DATA DIVISION被称作数据部分，是COBOL中第三个记述的DIVISION。在这里，用ENVIRONMENT DIVISION指定文件的特性，文件中记录的构成，定义处理中必要的数据项目。241 DATA DIVISION的构成 DATA DIVISIOILE是由FILE SECTION和WORKING-STORAGE SECTION构成。20242 FILE SECTION FILE SECTION中记述着每个文件中的FD开始的文件记述和从01开始的记录记述。在文件记述中指定使用文件中的模块里的记录个数，在记录记述中，指定记录的构成。243 文件记述 文件记述，指定1个存储块中记录的数量。 （）表示文件记述开始的FD，从第8位开始写，文件名从第12位开始写。 （）文件名，必须是ENVIRONMENT DIVISIOT中的SELECT所指定的文件名。 （）BLOCK 整数 RECORDS 1个存储块中记录的数量被指定为整数。非存储块的记录的时候则省略。 （）文件记录的最后一定要有终止符。（注）一般形式的大括号 用包围起来的部分，表示可以省略。编程时“”的符号不要记述。练习题2-31 下面的文章是关于到现在为止所学的内容。在（）中填入适当的语句。 DATA DIVISIOILE的写法 DATA DIVISIOILE由（）SECTION和（）SECTION两个SECTION组成。（）SECTION，记述文件的特性，以及这个文件中记录的构成。 所谓的记述文件特性的部分（），记述记录的构成部分（），是对每个文件进行说明。 文件的记述 文件记述的开始，从第8位起写（），从第12位写由ENVIRONMENT DIVISION的SELECT指定的()。 记录被块读写的时候，先写（），之后将1个块中记录的数量指定为整数，然后写（）。244 记录记述的作用 从文件中输入记录时，记忆装置中需要有一个场所可以放置1个记录大小的数据。这个场所被称为输入区域。向文件中输出记录时，也需要有一个场所来放置输出的1记录大小的数量，这个场所被称为输出区域。 输出区域与输入区域，是按照记录记述的指定得到。245 记录的构成 记录记述，是说明所使用的文件的记录构成。如下所示，以工资的记录为基础，考虑记录的构成。工资的纪录，各个项目的从属关系用数字表示，如下图所示层号 在COBOL中，为构成记录的各个项目标上序号，表示从属关系。这个序号就叫做层号。 基本项目 在项目中，不可能再更细的划分的项目叫做基本项目。基本项目的形式和长度都必须指定。在工资的记录的例子中，部，科，姓名，原始工资为基本项目。集团项目 将若干个项目集合在一起叫做集团项目。集团项目的形式和长度没有指定。 在工资记录的例子中，工资记录，是集团项目。 记录构成的表示方法 项目的从属关系用层号表示。 基本项目，指定项目的形式和长度。246 记录记述 在记录记述中，指定记录中项目的从属关系，各个项目的形式长度以及为项目起名。 （）这个记述，每个项目都要进行。 （）层号 所谓层号，表示1个记录中项目的从属关系，可以使用0149，记录名必须用01。 层号01必须从第8位开始写。0249从第8位以后开始写。 （）记录名与数据名 记录名，是为记录取的名字。而数据名，是为在处理中所使用的项目起的名字，一般在系统设计时决定，写法与文件名写法相同。可以使用的文字有，英文，数字，连字符，长度在30个文字以内使用日文文字时，长度在13个文字以内英文，日文最少包含一个文字连字符不能用在开头和结尾 层号 01必须从第8位开始写，0249只要是写在第8位以后就可以，为阅读方便，尽量减少文字。 像01，03，05这样，取不连接的号也可以。本书中所使用的记录号，数据名的起名方法 在本书中，记录名数据名使用日文文字。 在名字的开始，为了明表示出是属于哪个存储的数据，输入文件用I（input），输出文件用O（output）用连字符加在名字上，要起容易理解数据内容的名字。在数据名中使用的I-，O-是日文文字中的英文，因此在编程用纸上1个文字占2位。 数据的形式及长度 （）PICTURE形式的指定，基本项目必须指定，集团项目不需指定。形式上，数据的形式和长度都要指定。 （）形式 英数字项目X表示文字的1位 数字项目 9 表示数字的1位 S 表示符号 V 表示小数点的位置 日文项目N 表示日语文字的1位 （）COMPUTATIONAL-3表示为PACK形式。 （）PIC，PICTURE，COMP-3都是COMPUTATIONAL-3的简称。本书使用简称。（a）英数字项目 根据指定，英数字项目在主存储器内保有5位的区域。这个区域被命名为数据1， 1个字节内可放入1个字符的数据。 （b）ZONE形式的数字项目 根据这个指定，保有5个字节的区域，数字的1位放入1个字节内。S和V是不占位的（隐含的符号、小数点）。 程序中使用的数据不带小数点。比如，数据+123、45，小数点省略变为+12345。因此在程序中，在应该有小数点的地方放置指定的V。 指定S，作为数据拥有的符号，不指定S，数据就与它前面的符号脱离了关系，全部被认为是正数加以使用。在ZONE形式时，符号隐含在最后一位的数据中。 用于计算的数字项目要指定S。 根据这一指定，保有5位的区域。如果是没有小数点的数字，不使用表示小数点的V也可以。省略V，假定小数点在最右端。（c）PACK形式的数字项目根据上述指定，保有PACK形式5位数字的区域（3个字节），1个字符放入2位数字。PACK形式时，右边必须有符号（右面4个的区域为符号部）。V省略，也是假定小数点在符号部前面。（d）日语项目根据这个指定，日语项目保有3位的区域，2个字节放入1个汉字。例题FILE SECTION的编程 集团项目时，只需指定数据名。但是基本项目时，要指定PIC，PACK形式时，要指定COMP-3。 而且各个项目记述结束后都要加上终止符。247 WORKING-STORAGE SECTIONWORKING-STORAGE SECTION是与DATA DIVISION的SECTION相接续的SECTION。保除输入区、输出区以外，其他必要的数据项目的工作区，一般在WORKING-STORAGE SECTION进行记述。（）写法与FILE SECTION记录的写法一样。例题的WORKING-STORAGE SECTION的编程在例题中，是用了这种数据项目，工作区域中定义。，数据名为W-，英数字项目为1位区域。的用途在第3章进行说明。25 总结 在这一章COBOL程序中，从IDENTIFICATION开始到DATA DIVISION的写法。约定用语与使用者用语 约定用语COBOL中拼写和意义都事先决定好的单词（英语） 使用者用语可以由程序员自己命名的项目名等空格和终止符 语句和语句之间要有大于1个文字的空格。在决定的地方一定要有终止符，终止符的后面也要有一个文字以上的空格。IDENTIFICATION DIVISION PROGRAM-ID 指定程序、ENVIRONMENT DIVISION INPUT-OUTPUT SECTION SELECT指定输入输出存储的装置DATA DIVISION FILE SECTION 文件节（文件的输入区，输出区） FD文件记述（文件输入区，输出区的定义） WORKING-STORAGE SECTION 工作存储节文件记述 文件名和块读写时，要指定1个存储块中的记录数。记录记述 用下面的指定表示记录的构成。 层号 记录名以及数据名 形式及长度（位数） 练习题2-4 1用下列条件，写出文件记述和记录记述。 问题1 对于同一个文件，文件记述与记录记述，一定要按照顺序对应吗？ 答：是的，不能把文件记述全都先写出来，也不能先写出记录记述。 问题2 文件记述与记录记述的记述写的顺序，一定要按照输入文件，输出文件的顺序来写吗？或者说，一定要按照ENVIRONMENT DIVISION的SECTION指定的顺序来写吗？ 答：不是，不管从哪个开始写都可以。但是为阅读简便，要按照ENVIRONMENT DIVISION的SECTION指定的顺序依次来做。本书是按照输入文件，输出文件的顺序来写的。问题3 文件名在用日文文字表示是长度为13个文字，日本文字还可以在哪些地方使用？答：日本文字用在除了程序名以外的利用者语。 日本文字不能用在已经决定了拼写方式的预约语中。 在使用日本文字时，保证其中的文字全是日语（全角文字），在13字之内。在编程用纸上，2位为一个文字。问题4 在本书例题