O exemplo abaixo demonstra como visualizar e imprimir arquivos TXT com a sintaxe do Cobol NetExpress:

       WORKING-STORAGE SECTION.

       01 CMD-EXEC-PRG.
          02  COMANDO-LINE         PIC x(250)         VALUE SPACES.
          02  COMANDO-LINE-LEN     PIC x(4)   COMP-5  VALUE 250.
          02  RUN-UNIT-ID          PIC x(8)   COMP-5  VALUE 01.
          02  STACK-SIZE           PIC x(4)   COMP-5.
          02  FLAGS                PIC x(4)   COMP-5  VALUE 0.
          02  TTY-CMD              PIC x(1)           VALUE SPACES.
          02  TTY-CMD-LEN          PIC x(4)   COMP-5  VALUE 1.
          02  STATUS-CODE          PIC x(2)   COMP-5.

       PROCEDURE DIVISION.

          MOVE "VisRel.exe /R C:\Arquivo.Rel /T NomeDaEmpresa /SV"
               TO COMANDO-LINE.
         
          CALL "CBL_EXEC_RUN_UNIT" USING  COMANDO-LINE
               BY value       COMANDO-LINE-LEN
               BY reference   RUN-UNIT-ID
               BY value       STACK-SIZE  FLAGS
               BY reference   TTY-CMD
               BY value       TTY-CMD-LEN
               RETURNING      STATUS-CODE.

  Visualizar e imprimir relatórios matriciais (padrão Epson) com o VisRel

No computador de seus clientes instale apenas a Run-Time do VisRel (RunTimeVisRel.exe), ou então copie o arquivo C:\Windows\VisRel.exe e o arquivo Msvbvm60.dll para a sua pasta de programas.

Obs.: Ao utilizar o DialogSystem do NetExpress é necessário adicionar na linha de comando o parâmetro /SV, caso contrário a tela do VisRel pode ficar oculta pelo seu programa. E no caso de relatórios no modo gráfico (VisRelEdit), selecione o menu Configurar - Manter o relatório visível. Isso ocorre devido ao comando "REFRESH-OBJECT" que é disparado depois do comando "RETC".

Veja mais detalhes das linhas de comando do VisRel clicando aqui. Também é possível fazer relatórios mais elaborados utilizando o VisRelEdit. Por exemplo numa listagem do cadastro de produtos.