Problemas com PUT

Discussão em 'Progress 4GL' iniciado por antenor, Novembro 3, 2010.

  1. antenor

    antenor Membro Participativo

    Estou gerando um TXT com o seguinte código:

    OUTPUT TO VALUE("c:\teste_numera.mac").

    DEF VAR numero AS INT.

    ASSIGN numero = 0.

    FOR EACH pedido. /*(supondo que tenho 2 pedidos)*/

    ASSIGN numero = numero + 1.


    PUT "<nextscreen name=""Tela"STRING(numero)""" />" .


    END.

    Minha saída sai assim:

    <nextscreen name="Tela1 " /><nextscreen name="Tela2 " />

    Só que eu esperava que saísse assim:

    <nextscreen name="Tela1 " />
    <nextscreen name="Tela2 " />

    Se alguém souber o que estou errando por favor me ajude.

    Obrigado
  2. Paulo_m

    Paulo_m Sem Pontuação

    Coloque um SKIP no final da linha do comando PUT.

    Paulo.
  3. antenor

    antenor Membro Participativo

    Valeu, muito obrigado, mas tenho uma dúvida ainda.

    Eu gostaria de saber como sumir com os espaços depois de Tela1. Veja como saiu:

    <nextscreen name="Tela1 " />
    <nextscreen name="Tela2 " />
  4. LeandroSantos

    LeandroSantos Membro Participativo

    Coloque unformatted logo depois do PUT.
  5. antenor

    antenor Membro Participativo

    Muito obtrigado Leandro, vc me ajudou muito. Espero poder ajudar se vc precisar.
  6. Agnaldo

    Agnaldo Membro Ativo

    Antenor, voce parece que esta gerando um saida XML.
    Tente usar os comandos para XML mesmo, ficara mais simples.

Compartilhe esta Página