COBOL VSAM - File Status 04 - www.cadcobol.com.br


Volta a página anterior

Volta ao Menu Principal


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

File Status 04 - Conclusão foi bem-sucedida

Uma instrução de leitura foi executada com êxito, mas o número de caracteres que foram lidos foi menor do que o tamanho mínimo ou foi maior do que o tamanho máximo especificado nas descrições do registro associadas com o FD do arquivo.

No Enterprise COBOL V5.1.1 e V5.2, o File Status pode ser alterado por meio de uma nova opção do compilador, VLR (COMPAT | STANDARD).
Ela foi introduzida para controlar se o File Status vai ser compatível, com os padrões originais do COBOL V5.1 sem service pack aplicada e com os padrões dos compiladores COBOL anteriores (File Status 04).
Essa opção facilita a migração de versões anteriores ao Enterprise COBOL V5 dos programas que têm comandos Read e que resultam em um conflito no comprimento de registro.

Após a execução de uma instrução de leitura (Read):

  • Se o número de posições de caracteres no registro lido é menor que o tamanho mínimo especificado na descrição do registro para o arquivo, o conteúdo da área do registro que está à direita do último caractere válido lido é indefinido.
  • Se o número de posições de caracteres no registro que foi lido é maior do que o tamanho máximo especificado na descrição do registro para o arquivo, o registro é truncado à direita para o tamanho máximo definido.
  • Em ambos os casos, a instrução de leitura é bem-sucedida, e o File Status do arquivo é definido como:
    • 00 (escondendo a condição de conflito no comprimento do registro) VLR(COMPAT)
    • 04 (indicando que um conflito no comprimento do registro ocorreu) VLR(STANDARD)

Operação Descrição


READ Registro mal definido