Palavras reservadas
São termos específicos da linguagem que têm significados definidos e são reservados para funções específicas no código. Essas palavras têm um papel crucial na estrutura e na lógica do programa COBOL. Elas não podem ser usadas como identificadores (nomes de variáveis, seções, parágrafos, etc.) e têm uma finalidade específica na sintaxe da linguagem.
Exemplos de palavras reservadas comuns em COBOL incluem:
- DIVISION: Como em “IDENTIFICATION DIVISION” ou “DATA DIVISION”, indica as diferentes partes principais de um programa COBOL.
- SECTION: Usado em “ENVIRONMENT DIVISION,” “DATA DIVISION,” e “PROCEDURE DIVISION” para dividir essas seções em partes menores e mais gerenciáveis.
- PARAGRAPH: Denota seções menores dentro da “PROCEDURE DIVISION” que contêm instruções executáveis.
- PIC ou PICTURE: Utilizado na “DATA DIVISION” para especificar o formato de dados, como numérico, alfanumérico, ou outros.
- VALUE: Usado para atribuir um valor inicial a uma variável durante a declaração.
- PROCEDURE: Indica a “PROCEDURE DIVISION” e é seguido por parágrafos contendo as instruções executáveis.
- PERFORM: Utilizado para chamar ou executar um parágrafo ou seção específica.
- IF, ELSE, END-IF: Usados para controlar as estruturas condicionais em COBOL.
- MOVE: Utilizado para atribuir valores a variáveis.
- DISPLAY: Usado para exibir mensagens ou valores na saída do programa.
Essas palavras reservadas têm papéis específicos na estrutura e na lógica do código COBOL, e seu uso correto é essencial para garantir a execução adequada do programa.
| LISTA DE PALAVRAS RESERVADAS | ||||
| ACCEPT | CURRENCY | FOR | OPEN | SHARING |
| ACCESS | CURSOR | FORMAT | OPTIONAL | SHIFT-IN |
| ACTIVE-CLASS | DATA | FREE | OPTIONS | SHIFT-OUT |
| ADD | DATA-POINTER | FROM | OR | SIGN |
| ADDRESS | DATE | FUNCTION | ORDER | SIZE |
| ADVANCING | DATE-COMPILED | FUNCTION-ID | ORGANIZATION | SKIP1 |
| AFTER | DATE-WRITTEN | FUNCTION-POINTER | OTHER | SKIP2 |
| ALIGNED | DAY | GENERATE | OUTPUT | SKIP3 |
| ALL | DAY-OF-WEEK | GET | OVERFLOW | SORT |
| ALLOCATE | DBCS | GIVING | OVERRIDE | SORT-CONTROL |
| ALPHABET | DE | GLOBAL | PACKED-DECIMAL | SORT-CORE-SIZE |
| ALPHABETIC | DEBUG-CONTENTS | GO | PADDING | SORT-FILE-SIZE |
| ALPHABETIC-LOWER | DEBUG-ITEM | GOBACK | PAGE | SORT-MERGE |
| ALPHABETIC-UPPER | DEBUG-LINE | GREATER | PAGE-COUNTER | SORT-MESSAGE |
| ALPHANUMERIC | DEBUG-NAME | GROUP | PASSWORD | SORT-MODE-SIZE |
| ALPHANUMERIC-EDITED | DEBUG-SUB-1 | GROUP-USAGE | PERFORM | SORT-RETURN |
| ALSO | DEBUG-SUB-2 | HEADING | PF | SOURCE |
| ALTER | DEBUG-SUB-3 | HIGH-VALUE | PH | SOURCE-COMPUTER |
| ALTERNATE | DEBUGGING | HIGH-VALUES | PIC | SOURCES |
| AND | DECIMAL-POINT | I-O | PICTURE | SPACE |
| ANY | DECLARATIVES | I-O-CONTROL | PLUS | SPACES |
| ANYCASE | DEFAULT | ID | POINTER | SPECIAL-NAMES |
| APPLY | DELETE | IDENTIFICATION | POSITION | SQL |
| ARE | DELIMITED | IF | POSITIVE | SQLIMS |
| AREA | DELIMITER | IN | PRESENT | STANDARD |
| AREAS | DEPENDING | INDEX | PRINTING | STANDARD-1 |
| ASCENDING | DESCENDING | INDEXED | PROCEDURE | STANDARD-2 |
| ASSIGN | DESTINATION | INDICATE | PROCEDURE-POINTER | START |
| AT | DETAIL | INHERITS | PROCEDURES | STATUS |
| AUTHOR | DISABLE | INITIAL | PROCEED | STOP |
| B-AND | DISPLAY | INITIALIZE | PROCESSING | STRING |
| B-NOT | DISPLAY-1 | INITIATE | PROGRAM | SUB-QUEUE-1 |
| B-OR | DIVIDE | INPUT | PROGRAM-ID | SUB-QUEUE-2 |
| B-XOR | DIVISION | INPUT-OUTPUT | PROGRAM-POINTER | SUB-QUEUE-3 |
| BASED | DOWN | INSERT | PROPERTY | SUBTRACT |
| BASIS | DUPLICATES | INSPECT | PROTOTYPE | SUM |
| BEFORE | DYNAMIC | INSTALLATION | PURGE | SUPER |
| BEGINNING | EC | INTERFACE | QUEUE | SUPPRESS |
| BINARY | EGCS | INTERFACE-ID | QUOTE | SYMBOLIC |
| BINARY-CHAR | EGI | INTO | QUOTES | SYNC |
| BINARY-DOUBLE | EJECT | INVALID | RAISE | SYNCHRONIZED |
| BINARY-LONG | ELSE | INVOKE | RAISING | SYSTEM-DEFAULT |
| BINARY-SHORT | EMI | IS | RANDOM | TABLE |
| BIT | ENABLE | JNIENVPTR | RD | TALLY |
| BLANK | END | JUST | READ | TALLYING |
| BLOCK | END-ACCEPT | JUSTIFIED | READY | TAPE |
| BOOLEAN | END-ADD | KANJI | RECEIVE | TERMINAL |
| BOTTOM | END-CALL | KEY | RECORD | TERMINATE |
| BY | END-COMPUTE | LABEL | RECORDING | TEST |
| CALL | END-DELETE | LAST | RECORDS | TEXT |
| CANCEL | END-DISPLAY | LEADING | RECURSIVE | THAN |
| CBL | END-DIVIDE | LEFT | REDEFINES | THEN |
| CD | END-EVALUATE | LENGTH | REEL | THROUGH |
| CF | END-EXEC | LESS | REFERENCE | THRU |
| CH | END-IF | LIMIT | REFERENCES | TIME |
| CHARACTER | END-INVOKE | LIMITS | RELATIVE | TIMES |
| CHARACTERS | END-MULTIPLY | LINAGE | RELEASE | TITLE |
| CLASS | END-OF-PAGE | LINAGE-COUNTER | RELOAD | TO |
| CLASS-ID | END-PERFORM | LINE | REMAINDER | TOP |
| CLOCK-UNITS | END-READ | LINE-COUNTER | REMOVAL | TRACE |
| CLOSE | END-RECEIVE | LINES | RENAMES | TRAILING |
| COBOL | END-RETURN | LINKAGE | REPLACE | TRUE |
| CODE | END-REWRITE | LOCAL-STORAGE | REPLACING | TYPE |
| CODE-SET | END-SEARCH | LOCALE | REPORT | TYPEDEF |
| COL | END-START | LOCK | REPORTING | UNIT |
| COLLATING | END-STRING | LOW-VALUE | REPORTS | UNIVERSAL |
| COLS | END-SUBTRACT | LOW-VALUES | REPOSITORY | UNLOCK |
| COLUMN | END-UNSTRING | MEMORY | RERUN | UNSTRING |
| COLUMNS | END-WRITE | MERGE | RESERVE | UNTIL |
| COM-REG | END-XML | MESSAGE | RESET | UP |
| COMMA | ENDING | METHOD | RESUME | UPON |
| COMMON | ENTER | METHOD-ID | RETRY | USAGE |
| COMMUNICATION | ENTRY | MINUS | RETURN | USE |
| COMP | ENVIRONMENT | MODE | RETURN-CODE | USER-DEFAULT |
| COMP-1 | EO | MODULES | RETURNING | USING |
| COMP-2 | EOP | MORE-LABELS | REVERSED | VAL-STATUS |
| COMP-3 | EQUAL | MOVE | REWIND | VALID |
| COMP-4 | ERROR | MULTIPLE | REWRITE | VALIDATE |
| COMP-5 | ESI | MULTIPLY | RF | VALIDATE-STATUS |
| COMPUTATIONAL | EVALUATE | NATIONAL | RH | VALUE |
| COMPUTATIONAL-1 | EVERY | NATIONAL-EDITED | RIGHT | VALUES |
| COMPUTATIONAL-2 | EXCEPTION | NATIVE | ROUNDED | VARYING |
| COMPUTATIONAL-3 | EXCEPTION-OBJECT | NEGATIVE | RUN | WHEN |
| COMPUTATIONAL-4 | EXEC | NESTED | SAME | WHEN-COMPILED |
| COMPUTATIONAL-5 | EXECUTE | NEXT | SCREEN | WITH |
| COMPUTE | EXIT | NO | SD | WORDS |
| CONDITION | EXTEND | NOT | SEARCH | WORKING-STORAGE |
| CONFIGURATION | EXTERNAL | NULL | SECTION | WRITE |
| CONSTANT | FACTORY | NULLS | SECURITY | WRITE-ONLY |
| CONTAINS | FALSE | NUMBER | SEGMENT | XML |
| CONTENT | FD | NUMERIC | SEGMENT-LIMIT | XML-CODE |
| CONTINUE | FILE | NUMERIC-EDITED | SELECT | XML-EVENT |
| CONTROL | FILE-CONTROL | OBJECT | SELF | XML-INFORMATION |
| CONTROLS | FILLER | OBJECT-COMPUTER | SEND | XML-NAMESPACE |
| CONVERTING | FINAL | OBJECT-REFERENCE | SENTENCE | XML-NAMESPACE-PREFIX |
| COPY | FIRST | OCCURS | SEPARATE | XML-NNAMESPACE |
| CORR | FLOAT-EXTENDED | OF | SEQUENCE | XML-NNAMESPACE-PREFIX |
| CORRESPONDING | FLOAT-LONG | OFF | SEQUENTIAL | XML-NTEXT |
| COUNT | FLOAT-SHORT | OMITTED | SERVICE | XML-SCHEMA |
| CRT | FOOTING | ON | SET | XML-TEXT |
| ZERO | ||||
| ZEROES | ||||
| ZEROS | ||||
Referências:
https://www.ibm.com/docs/pt-br/cobol-zos/6.4?topic=appendixes-reserved-words