COBOL - Input-Output section - ORGANIZATION clause



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

COBOL - Input-Output section - ORGANIZATION clause
Enterprise COBOL for z/OS, V4.2, Language Reference

A cláusula ORGANIZATION identifica a estrutura lógica do arquivo.

A estrutura lógica é estabelecida no momento em que o arquivo é criado e não pode ser alterado posteriormente.

Você pode encontrar uma discussão sobre as diferentes maneiras pelas quais os dados podem ser organizados e os diferentes métodos de acesso que você pode usar para recuperar os dados em File organization and access modes - Organização de arquivos e modos de acesso.

ORGANIZATION IS SEQUENTIAL - A ORGANIZAÇÃO É SEQUENCIAL (format 1)
Um relacionamento predecessor-sucessor entre os registros no arquivo é estabelecido pela ordem em que os registros são colocados no arquivo quando ele é criado ou estendido.

ORGANIZATION IS INDEXED - A ORGANIZAÇÃO É INDEXADA (format 2)
A posição de cada registro lógico no arquivo é determinada pelos índices criados com o arquivo e mantidos pelo sistema.
Os índices são baseados em chaves incorporadas nos registros do arquivo.

ORGANIZATION IS RELATIVE - A ORGANIZAÇÃO É RELATIVA (format 3)
A posição de cada registro lógico no arquivo é determinada pelo seu número de registro relativo.

ORGANIZATION IS LINE SEQUENTIAL - A ORGANIZAÇÃO É SEQUENCIAL DE LINHA (format 4)
Um relacionamento predecessor-sucessor entre os registros no arquivo é estabelecido pela ordem em que os registros são colocados no arquivo quando ele é criado ou estendido.
Um registro em um arquivo LINE SEQUENTIAL pode consistir apenas em caracteres imprimíveis.

Se você omitir a cláusula ORGANIZATION, o compilador assumirá que ORGANIZATION IS SEQUENTIAL.

Se o conector de arquivo referenciado por file-name-1 na cláusula SELECT for um conector de arquivo externo, a mesma organização deverá ser especificada para todas as entradas de controle de arquivo na unidade de execução que referenciam esse conector de arquivo.



© Copyright IBM Corp.