Code Snippets COBOL

Short texts COBOL 🧑‍💻 Code snippets COBOL ✍️ Reading lists COBOL 👀

Exemplo crud em cobol para cadastro de clientes

IDENTIFICATION DIVISION. PROGRAM-ID. CLIENTES. ENVIRONMENT DIVISION. INPUT-OUTPUT SECTION. FILE-CONTROL. SELECT FILE1 ASSIGN TO DISK ORGANIZATION IS INDEXED ACCESS MODE IS RANDOM FILE STATUS IS FS-STAT RECORD KEY IS FS-KEY. DATA DIVISION. FILE SECTION. FD FILE1 VALUE OF FILE-ID IS “clientes.dat”. 01 FILE1-REC. 05 FS-KEY. 10 FS-FONE PIC 9(09) BLANK WHEN ZEROS. 05 FS-NOME PIC X(40). […]

hello.cob

identification division. program-id. hello. procedure division. display “Hello, World”. stop run.