COBOL - DATA DIVISION - data description entry - OCCURS clause



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

COBOL - DATA DIVISION - data description entry - OCCURS clause
Enterprise COBOL for z/OS, V4.2, Language Reference

As cláusulas da DATA DIVISION (divisão de dados) usadas para manipulação de tabela são a cláusula OCCURS e a cláusula USAGE IS INDEX.
Para a descrição USAGE IS INDEX, consulte a USAGE clause.

A cláusula OCCURS especifica tabelas cujos elementos podem ser referidos por indexação ou assinatura. Também elimina a necessidade de entradas separadas para itens de dados repetidos.

Os formatos da cláusula OCCURS incluem tabelas de comprimento fixo e tabelas de comprimento variável.

O assunto de uma cláusula OCCURS é o nome dos dados do item de dados que contém a cláusula OCCURS.
Exceto pela própria cláusula OCCURS, as cláusulas de descrição de dados usadas com o sujeito se aplicam a cada ocorrência do item descrito.

Sempre que o assunto de uma cláusula OCCURS ou qualquer item de dados subordinado a ela for referenciado, ele deverá ser subscrito ou indexado, com as seguintes exceções:

  • Quando o assunto da cláusula OCCURS é usado como assunto de uma instrução SEARCH
  • Quando o assunto ou um item de dados subordinado é o objeto da frase ASCENDING/DESCENDING KEY
  • Quando o item de dados subordinados é o objeto da cláusula REDEFINES

Quando inscrito ou indexado, o assunto se refere a uma ocorrência dentro da tabela.
Quando não está inscrito ou indexado, o assunto faz referência a toda a tabela.

A cláusula OCCURS não pode ser especificada em uma entrada de descrição de dados que:

  • Tem um número de nível 01, 66, 77 ou 88.
  • Descreve um item de dados redefinido.
    (No entanto, um item redefinido pode estar subordinado a um item que contém uma cláusula OCCURS.)
    Consulte a REDEFINES clause.


© Copyright IBM Corp.