COBOL - Input-Output section - RECORD KEY clause



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

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

A cláusula RECORD KEY (formato 2) especifica o item de dados no registro que é a RECORD KEY principal para um arquivo indexado.
Os valores contidos no item de dados principal RECORD KEY devem ser exclusivos entre os registros no arquivo.

data-name-2
O item de dados principal RECORD KEY.

data-name-2 deve ser descrito em uma entrada de descrição de registro associada ao arquivo.
A chave pode ter qualquer uma das seguintes categorias de dados:

  • Alphanumeric
  • Numeric
  • Numeric-edited (com o uso DISPLAY ou NATIONAL)
  • Alphanumeric-edited
  • Alphabetic
  • External floating-point (com o uso DISPLAY ou NATIONAL)
  • Internal floating-point
  • DBCS
  • National
  • National-edited

Independentemente da categoria do item de dados chave, a chave é tratada como um item alfanumérico.
A ordem de intercalação da chave é determinada pela ordem do valor binário do item quando a chave é usada para localizar um registro ou para definir o indicador de posição do arquivo associado ao arquivo.

data-name-2 não pode ser um campo de data em janela (windowed).

data-name-2 não deve fazer referência a um item de grupo que contém um item de dados de ocorrência variável. data-name-2 pode ser qualificado.

Se o arquivo indexado contiver registros de tamanho variável, o nome do dado 2 não precisará estar contido no tamanho mínimo de registro especificado para o arquivo.
Ou seja, data-name-2 pode exceder o tamanho mínimo de registro, mas isso não é recomendado.

A descrição dos dados do data-name-2 e sua localização relativa no registro deve ser a mesma que a usada quando o arquivo foi definido.

Se o arquivo tiver mais de uma entrada de descrição de registro, data-name-2 precisará ser descrito em apenas uma dessas entradas de descrição de registro.
As posições de caracteres idênticas referenciadas por data-name-2 em qualquer entrada de descrição de registro são implicitamente referenciadas como chaves para todas as outras entradas de descrição de registro para esse arquivo.

Para arquivos definidos com a cláusula EXTERNAL, todas as entradas de descrição de arquivo na unidade de execução associadas ao arquivo devem ter entradas de descrição de dados para data-name-2 que especificam o mesmo local relativo no registro e o mesmo comprimento.



© Copyright IBM Corp.