O registro especial XML-CODE é usado para comunicar o status entre o analisador XML e o procedimento de processamento identificado em uma instrução XML PARSE e para indicar que uma instrução XML GENERATE foi executada com êxito ou que ocorreu uma exceção durante a geração XML.

O registro especial XML-CODE possui a definição implícita:

       01  XML-CODE PICTURE S9(9) USAGE BINARY VALUE 0.

Quando usado em programas aninhados, esse registro especial é definido implicitamente com o atributo global no programa mais externo.

Quando o analisador XML encontra um evento XML, ele define XML-CODE e passa o controle para o procedimento de processamento.
Para todos os eventos, exceto um evento EXCEPTION, XML-CODE contém zero quando o procedimento de processamento recebe controle.

Para um evento EXCEPTION, o analisador define XML-CODE como um código de exceção que indica a natureza da exceção.
Os códigos de exceção XML PARSE são discutidos em Handling XML PARSE exceptions no Enterprise COBOL Programming Guide.

Para alguns eventos XML, você pode definir o XML-CODE antes de retornar ao analisador para controlar o processamento subsequente do documento.
Para obter detalhes, consulte XML-CODE no Enterprise COBOL Programming Guide.

Quando o analisador retorna o controle para a instrução XML PARSE, o XML-CODE contém o valor mais recente definido pelo procedimento de processamento ou pelo analisador.
Em alguns casos, o analisador substitui o valor definido pelo procedimento de processamento.

No encerramento de uma instrução XML GENERATE, o XML-CODE contém zero, indicando a conclusão bem-sucedida da geração XML ou um código de erro diferente de zero, indicando que ocorreu uma exceção durante a geração XML.

Os códigos de exceção XML GENERATE são detalhados em exceções XML GENERATE no Enterprise COBOL Programming Guide.