COBOL - Conditional expressions - Procedure-pointer and function-pointer relation conditions



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

COBOL - Conditional expressions - Procedure-pointer and function-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 de ponteiro de procedimento ou ponteiro de função em uma condição de relação.

Os itens de dados do Procedure-pointer são definidos explicitamente como USAGE PROCEDURE-POINTER.
Os itens de dados do ponteiro de função são definidos explicitamente como USAGE FUNCTION-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 de procedimento.

identifier-1, identifier-2
Deve ser descrito como USAGE PROCEDURE-POINTER ou USAGE FUNCTION-POINTER.
O identifier-1 e o identifier-2 não precisam ser descritos da mesma forma.

NULL, NULLS
Pode ser usado apenas se o outro operando estiver definido como USAGE FUNCTION-POINTER ou USAGE PROCEDURE-POINTER.
Ou seja, NULL = NULL não é permitido.


© Copyright IBM Corp.