COBOL - DATA DIVISION - DDE - USAGE clause - OBJECT REFERENCE



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

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

Um item de dados definido com a frase OBJECT REFERENCE é uma referência a objeto.
Um item de dados de referência do objeto é um item elementar de 4 bytes.

class-name-1
Um nome de classe opcional.

Você deve declarar a class-name-1 no parágrafo REPOSITORY na CONFIGURATION SECTION da classe que contém ou do programa mais externo.

Se especificado, class-name-1 indica que data-name-1 sempre se refere a uma instância de objeto da classe class-name-1 ou a uma classe derivada de class-name-1.

Importante: O Desenvolvedor deve garantir que o objeto referenciado atenda a esse requisito; violações não são diagnosticadas.

Se class-name-1 não for especificado, a referência do objeto poderá se referir a um objeto de qualquer classe.
Nesse caso, data-name-1 é uma referência universal a objetos.

Você pode especificar data-name-1 em um item de grupo alfanumérico sem afetar a semântica do item de grupo.
Não há conversão de valores ou outro tratamento especial das referências de objeto quando são executadas instruções que operam no grupo.
O grupo continua se comportando como um item de grupo alfanumérico.

Uma referência a objeto pode ser definida em qualquer seção da divisão de dados de uma definição de fábrica, definição de objeto, método ou programa.
Um item de dados de referência a objeto pode ser usado apenas em:

  • Uma instrução SET (apenas no formato 7)
  • Uma condição de relação
  • Uma declaração INVOKE
  • A frase USING ou RETURNING de uma instrução INVOKE
  • A frase USING ou RETURNING de uma instrução CALL
  • Uma divisão de procedimento do programa ou instrução ENTRY, USING ou RETURNING
  • Uma divisão de procedimento do método USING ou RETURNING frase

Itens de dados de Object-reference:

  • São ignorados nas operações CORRESPONDING
  • Não são afetados pelas instruções INITIALIZE
  • Pode ser o assunto ou objeto de uma cláusula REDEFINES
  • Não pode ser uma variável condicional
  • Pode ser gravado em um arquivo (mas após a leitura subsequente do registro, o conteúdo da referência do objeto é indefinido)

Uma cláusula VALUE para um item de dados de referência a objeto pode conter apenas NULL ou NULLS.

Você pode usar a cláusula SYNCHRONIZED com a cláusula USAGE OBJECT REFERENCE para obter um alinhamento eficiente do item de dados de referência ao objeto.

As cláusulas DATA FORMAT, JUSTIFIED, PICTURE e BLANK WHEN ZERO não podem ser usadas para descrever itens de grupo ou elementares definidos com a cláusula USAGE OBJECT REFERENCE.



© Copyright IBM Corp.