Segunda, Abril 06, 2020

EXIT PROGRAM, STOP RUN, GOBACK e CANCEL

 

As declarações a seguir afetam o estado de um arquivo de forma diferente:

  • Uma instrução EXIT PROGRAM não altera o status de nenhum dos arquivos em uma unidade de execução, a menos que:
    • O programa de emissão do programa de saída tem o atributo inicial. Se ele tiver o atributo INITIAL, todos os arquivos internos definidos nesse programa serão fechados.
    • Uma instrução EXIT PROGRAM com a frase AND CONTINUE RUN UNIT é emitida no programa principal de um grupo de ativação * NEW. Nesse caso, o controle retorna do programa principal para o chamador, o que, por sua vez, faz com que o grupo de ativação * NEW termine, fechando todos os arquivos com escopo para o grupo de ativação.
  • Uma instrução STOP RUN retorna o controle para o chamador do programa no limite de controle mais próximo. Se este for um limite de controle rígido, o grupo de ativação (unidade de execução) terminará e todos os arquivos com escopo para o grupo de ativação serão fechados.
  • Uma instrução GOBACK emitida a partir de um programa principal (que está sempre em um limite de controle rígido) se comporta da mesma forma que a instrução STOP RUN. Uma instrução GOBACK emitida a partir de um subprograma se comporta da mesma forma que a instrução EXIT PROGRAM. Isso não muda o status de qualquer um dos arquivos em uma unidade de execução a menos que o ILE COBOL programa de emissão do GOBACK tem o atributo inicial. Se ele tiver o atributo INITIAL, todos os arquivos internos definidos nesse programa serão fechados.
  • Uma instrução CANCEL reinicia o armazenamento que contém informações sobre o arquivo interno. Se o programa tiver arquivos internos que estão abertos quando a instrução CANCEL é processada, esses arquivos internos são fechados quando esse programa é cancelado. O programa não pode mais usar os arquivos a menos que os reabra. Se o programa cancelado é chamado novamente, o programa considera o arquivo fechado. Se o programa abre o arquivo, uma nova vinculação ao arquivo é estabelecida.
  • Uma instrução TERMINATE é uma característica escritor COBOL Report. Termina o processamento nos nomes de relatório fornecidos.