COBOL - DATA DIVISION - Using tables (arrays) and pointers



Desenvolvido por DORNELLES Carlos Alberto - Analista de Sistemas - Brasília DF. - cad_cobol@hotmail.com

COBOL - DATA DIVISION - Using tables (arrays) and pointers
Enterprise COBOL for z/OS, V4.2, Language Reference

No COBOL, matrizes são chamadas de tabelas.
Uma tabela é um conjunto de itens de dados logicamente consecutivos que você define na DATA DIVISION usando a cláusula OCCURS.

Ponteiros são itens de dados que contêm endereços de armazenamento virtual.
Você os define explicitamente com a cláusula USAGE IS POINTER na DIVISION DATA ou implicitamente como ADDRESS OF registradores especiais.

Você pode executar as seguintes operações com itens de dados do ponteiro:

  • Passe-os entre programas usando o CALL. . . Declaração BY REFERENCE.
  • Mova-os para outros ponteiros usando a instrução SET.
  • Compare-os com outros indicadores de igualdade usando uma condição de relação.
  • Inicialize-os para conter um endereço inválido usando VALUE IS NULL.

Use itens de dados do ponteiro para:

  • Realize um endereçamento de base limitado, especialmente se você deseja passar e receber endereços de uma área de registro definida com OCCURS DEPENDING ON e, portanto, está localizada de forma variável.
  • Manipule uma lista encadeada.


© Copyright IBM Corp.