COBOL - Comando FREE - www.cadcobol.com.br



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

COBOL - Comando FREE
Enterprise COBOL for z/OS, V4.2, Language Reference

A instrução FREE libera o armazenamento dinâmico que foi obtido anteriormente com uma instrução ALLOCATE.

data-name-1

Deve ser definido como USAGE IS POINTER.
Pode ser qualificado ou inscrito.

A instrução FREE é processada da seguinte maneira:

  • Se o ponteiro referido por data-name-1 identificar o início do armazenamento atualmente alocado por uma instrução ALLOCATE, esse armazenamento será liberado e o ponteiro referenciado por data-name-1 será definido como NULL, a duração do armazenamento liberado será o comprimento do armazenamento obtido pela instrução ALLOCATE e o conteúdo de quaisquer itens de dados localizados na área de armazenamento liberada ficam indefinidos.

  • Se o ponteiro referenciado por data-name-1 contiver o endereço predefinido NULL ou o endereço de armazenamento que não é adquirido pela instrução ALLOCATE, nenhum armazenamento será liberado.
    O ponteiro data-name-1 será mantido inalterado e o comportamento é indefinido.

Se mais de um data-name-1 for especificado em uma instrução FREE, o resultado da execução dessa instrução FREE será o mesmo que se uma instrução FREE separada tivesse sido gravada para cada data-name-1 na mesma ordem especificada na declaração FREE.



© Copyright IBM Corp.