Delimitador /t

Discussão em 'Progress 4GL' iniciado por jaozi_nho, Outubro 29, 2012.

  1. jaozi_nho

    jaozi_nho Membro Participativo

    Olá, estou fazendo uma leitura de 1 arquivo aonde os dados estão separados por Tabs, estou usando o codigo assim para testar se esta pegando as strings corretamente

    Código:
    INPUT FROM 'C:\Programas\Plastilit\correiro.txt'.
    REPEAT:
    	IMPORT UNFORMATTED c-linha.
        MESSAGE ENTRY(1, c-linha, "/t") VIEW-AS ALERT-BOX BUTTONS OK.
    END.
    INPUT CLOSE.
    
    Não sei como separar as palavras pelo tab, pois o /t não esta funcionando, alguem sabe como dizer o TAB(/t) e o Fim de linha(/n) em uma string progress?
  2. LeandroSantos

    LeandroSantos Membro Participativo

    Tente assim:
    Código:
    MESSAGE ENTRY(1, c-linha,chr(10)) VIEW-AS ALERT-BOX BUTTONS OK.
    
  3. jaozi_nho

    jaozi_nho Membro Participativo


    Não funcionou Leandro, mas obrigado.
  4. LeandroSantos

    LeandroSantos Membro Participativo

    Faz um teste para descobrir qual é o codigo da tecla TAB.

    Código:
    def var c-linha   as char.
    def var i-cont    as int.
    
    input from 'C:\Programas\Plastilit\correiro.txt'.
       repeat:
          import unformatted c-linha.
          do i-cont = 1 to length(c-linha).
             disp
                substring(c-linha,i-cont,1)
                asc(substring(c-linha,i-cont,1))
                with frame a down.
             down with frame a.
          end.
          leave.
       end.
    input close.
    
  5. emr

    emr Membro Participativo

    O TAB é o chr(9).

Compartilhe esta Página