COBOL 中的工作存储部分
Cobol是一种高级语言，它有自己的编译器。 COBOL 编译器将 COBOL 程序翻译成最终执行的目标程序。
要无错误地执行 COBOL 程序，必须按照以下指定的顺序编写这些分区：
一、鉴定科：
在这个部分，我们写下有关程序的详细信息，例如作者姓名、执行日期、编写代码的日期等。
句法：
IDENTIFICATION DIVISION.
PROGRAM-ID. Entry
[AUTHOR. Entry].
[INSTALLATION Entry].
[DATE-WRITTEN. Entry].
[DATA-COMPILED. Entry].
[SECURITY. Entry.
[REMARKS. Entry.]2、环境事业部：
在本部分中，我们编写有关编写和执行程序的计算机环境的详细信息。
句法：
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. Source-computer-entry.
OBJECT-COMPUTER. Object-computer-entry.
[SPECIAL NAMES. Special-computer-entry.]
INPUT-OUTPUT SECTION.
FILE CONTROL. File-control-entry.
[I-O CONTROL. Input-output-control-entry].3. 数据划分：
在这一部分中，我们声明了将在程序中使用的变量、它们的数据类型、大小、使用类型等。它是 COBOL 程序结构中最重要的划分。
句法：
DATA DIVISION.
FILE SECTION. File-section-entry.
WORKING-STORAGE SECTION. Variables.
LINKAGE SECTION.[Linkage-section-entry].
REPORT SECTION.4. 程序部：
在这个分区中，编写了可执行的COBOL 语句，即主程序代码。它必须至少包含一个语句。为了停止程序的执行，我们编写 STOP（在调用程序的情况下）或 EXIT（在被调用的程序的情况下）。
句法：
PROCEDURE DIVISION[USING DATA-NAME1[,DATA-NAME2,...]]. 工作存储部分。
- WORKING-STORAGE SECTION 在 COBOL 结构中的 DATA DIVISION 下声明。
- 它必须使用带有分隔符句点 (.) 的标题 WORKING-STORAGE SECTION 声明。
- 它是 Cobol 编程中最重要的部分之一，因为我们在此部分声明了所有变量和文件结构、它们的类型、大小等。
- 段中声明的变量可以在声明时以及程序流程中赋值。
- 我们使用级别 77 来声明基本变量，级别 01 到 49 用于声明分组变量。
- 在本节中，我们还定义了不属于记录但用于将记录写入文件的记录描述条目。
- 内存在程序执行时分配给所有在WORKING-STORAGE SECTION中声明的变量和文件结构，并在程序结束时立即释放。
- 本节中声明的变量只能在程序内部使用，不能在程序外部使用。
句法：
DATA DIVISION.
WORKING-STORAGE SECTION.
Record-description-entries.
Variable-description-entries.例子：
Cobol
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLOWORD.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
77 VARIABLE1 PIC 99.
77 VARIABLE2 PIC A.
01 GROUPEDATA.
02 GROUPVAR1 PIC 99.
02 GROUPVAR2 PIC A(5).
PROCEDURE DIVISION.
DISPLAY "WELCOME To GEEKSFORGEEKS".
STOP RUN.输出：
WELCOME To GEEKSFORGEEKS解释：
在上面给出的示例代码中，我们展示了 WORKING-STORAGE SECTION 中的变量声明。 VARIABLE1 和 VARIABLE2 分别是整数数据类型和字符数据类型的基本数据，GROUPEDATA 是级别为 01 和 02 的分组数据。分组数据用于声明数组等结构。现在看清楚，我们在DATA DIVISION下写了WORKING-STORAGE SECTION，并带有分隔符句点。