1. Home
  2. /
  3. Cobol-variants
  4. /
  5. COBOL File Write Example

COBOL File Write Example - Cobol-variants Typing CST Test

Loading…

COBOL File Write Example — Cobol-variants Code

Write a record to a sequential file.

IDENTIFICATION DIVISION.
PROGRAM-ID. WRITE-FILE.
ENVIRONMENT DIVISION.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
	SELECT OUT-FILE ASSIGN TO 'OUTPUT.DAT'
	ORGANIZATION IS LINE SEQUENTIAL.
DATA DIVISION.
FILE SECTION.
FD OUT-FILE.
01 OUT-REC PIC A(30).
WORKING-STORAGE SECTION.
01 MESSAGE PIC A(30) VALUE 'Hello COBOL World'.
PROCEDURE DIVISION.
OPEN OUTPUT OUT-FILE.
MOVE MESSAGE TO OUT-REC.
WRITE OUT-REC.
CLOSE OUT-FILE.
STOP RUN.

Cobol-variants Language Guide

COBOL Variants refer to the different dialects and implementations of COBOL (Common Business-Oriented Language), a legacy programming language widely used in business, finance, and administrative systems.

Primary Use Cases

  • ▸Processing batch payroll and accounting tasks
  • ▸Maintaining enterprise resource planning (ERP) systems
  • ▸Handling large-scale transaction processing
  • ▸Integrating with mainframe databases like DB2 or IMS
  • ▸Reporting and regulatory compliance in finance

Notable Features

  • ▸Readable English-like syntax
  • ▸Structured programming constructs (PERFORM, IF, EVALUATE)
  • ▸File handling and batch processing capabilities
  • ▸Database integration via embedded SQL
  • ▸Object-oriented features in modern COBOL (OO-COBOL)

Origin & Creator

Developed in 1959 by a consortium including CODASYL and led by Grace Hopper to provide a standardized business programming language.

Industrial Note

Extensively used in banking, insurance, government payroll systems, and mainframe applications where decades-old COBOL systems still operate mission-critical workloads.

More Cobol-variants Typing Exercises

IBM COBOL Simple ReportMicro Focus COBOL File ProcessingCOBOL Calculation ExampleCOBOL IF-ELSE ExampleCOBOL PERFORM Loop ExampleCOBOL String ConcatenationCOBOL Table ProcessingCOBOL REDEFINES ExampleCOBOL MOVE CORRESPONDING Example

Practice Other Languages

CReactPythonC++RustTypeScriptKotlinPHPJavaC#RubyMqlCqlN1qlCypher