COBOL - Conditional expressions - Data pointer relation conditions



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

COBOL - Conditional expressions - Data pointer relation conditions
Enterprise COBOL for z/OS, V4.2, Language Reference

Somente EQUAL e NOT EQUAL são permitidos como operadores relacionais ao especificar itens de dados do ponteiro.
Os itens de dados do ponteiro são itens definidos explicitamente como USAGE POINTER ou são ADDRESS OF registradores especiais, que são implicitamente definidos como USAGE POINTER.

Os operandos são iguais se os dois endereços usados na comparação resultarem no mesmo local de armazenamento.

Essa condição de relação é permitida nas instruções IF, PERFORM, EVALUATE e SEARCH formato 1.
Não é permitido nas instruções SEARCH formato 2 (SEARCH ALL) porque não há uma ordem significativa que possa ser aplicada aos itens de dados do ponteiro.

identifier-1, identifier-3
Pode especificar qualquer item de nível definido na LINKAGE SECTION, exceto 66 e 88.

identifier-2, identifier-4
Deve ser descrito como USAGE POINTER.

NULL, NULLS
Só pode ser usado se o outro operando estiver definido como USAGE POINTER.
Ou seja, NULL = NULL não é permitido.

A tabela a seguir resume as comparações permitidas para USAGE POINTER, NULL e ADDRESS OF.

Tabela 1. Comparações permitidas para USAGE POINTER, NULL e ADDRESS OF

Segundo operando do USAGE POINTER Endereço do Segundo Operando Segundo operando NULL ou NULLS

Primeiro operando do USAGE POINTER

Yes Yes Yes

ENDEREÇO DO primeiro operando

Yes Yes Yes

Primeiro operando NULL / NULLS

Yes Yes No
Yes
Comparação permitida apenas para EQUAL, NOT EQUAL
No
Nenhuma comparação permitida


© Copyright IBM Corp.