COBOL - PROCEDURE DIVISION - Producing XML output - Handling XML GENERATE exceptions



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

COBOL - PROCEDURE DIVISION - Producing XML output - Handling XML GENERATE exceptions
Enterprise COBOL for z/OS 6.3.0, Language Reference

Quando um erro é detectado durante a geração da saída XML, existe uma condição de exceção.
Você pode escrever um código para verificar o registro especial XML-CODE, que contém um código de exceção numérica que indica o tipo de erro.

Para manipular erros, use uma ou ambas as frases a seguir da instrução XML GENERATE:

  • ON EXCEPTION
  • COUNT IN

Se você codificar a frase ON EXCEPTION na instrução XML GENERATE, o controle será transferido para a instrução imperativa que você especificar.
Você pode codificar uma declaração imperativa, por exemplo, para exibir o valor do XML-CODE.

Quando ocorre um erro, um problema pode ser que o item de dados que recebe a saída XML não seja grande o suficiente.
Nesse caso, a saída XML não está completa e o registro especial XML-CODE contém o código de erro 400®.

Você pode examinar a saída XML gerada executando estas etapas:

  1. Codifique a frase COUNT IN na instrução XML GENERATE.

    O campo de contagem que você especifica mantém uma contagem das unidades de codificação de caracteres XML que são preenchidas durante a geração de XML.
    Se você definir a saída XML como nacional, a contagem estará em unidades de codificação de caracteres UTF-16; para todas as outras codificações (inclusive para UTF-8), a contagem é em bytes.

  2. Use o campo de contagem como um comprimento de modificação de referência para se referir à substring do item de dados de recebimento que contém os caracteres XML que foram gerados até o momento em que ocorreu o erro.

    Por exemplo, se XML-OUTPUT é o item de dados que recebe a saída XML e XML-CHAR-COUNT é o campo count, então XML-OUTPUT (1: XML-CHAR-COUNT) faz referência à saída XML.

Use o conteúdo do XML-CODE para determinar qual ação corretiva a ser executada.
Para obter uma lista das exceções que podem ocorrer durante a geração de XML, consulte a referência relacionada abaixo.



© Copyright IBM Corp.