COBOL - DATA DIVISION - DDE - USAGE clause - INDEX



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

COBOL - DATA DIVISION - DDE - USAGE clause - INDEX
Enterprise COBOL for z/OS, V4.2, Language Reference

Um item de dados definido com a frase INDEX é um item de dados de índice.

Um item de dados de índice é um item elementar de 4 bytes que pode ser usado para salvar valores de nome de índice para referência futura.
Um item de dados de índice não está necessariamente conectado a nenhuma tabela específica.
Através de uma instrução SET, um item de dados de índice pode ser atribuído a um valor de nome de índice.
Esse valor corresponde ao número da ocorrência em uma tabela.

Referências diretas a um item de dados de índice podem ser feitas apenas em uma instrução SEARCH, uma instrução SET, uma condição de relação, a frase USING do procedure division header ou a frase USING da instrução CALL ou ENTRY.

Um item de dados de índice pode fazer parte de um item de grupo alfanumérico referenciado em uma instrução MOVE ou em uma instrução de entrada/saída.

Um item de dados de índice salva valores que representam ocorrências da tabela, mas não é necessariamente definido como parte de qualquer tabela.
Não há conversão de valores quando um item de dados de índice é referenciado nas seguintes circunstâncias:

  • diretamente em uma instrução SEARCH ou SET
  • indiretamente em uma declaração MOVE
  • indiretamente em uma instrução de entrada ou saída

Um item de dados de índice não pode ser uma variável condicional.

As cláusulas DATA FORMAT, JUSTIFIED, PICTURE, BLANK WHEN ZERO ou VALUE não podem ser usadas para descrever um item de grupo ou itens elementares descritos na cláusula USAGE IS INDEX.

SYNCHRONIZED pode ser usado com USAGE IS INDEX para obter um uso eficiente do item de dados do índice.



© Copyright IBM Corp.