[RESOLVIDO] For Each para um arquivo TXT

Discussão em 'EMS , HCM e Totvs 11' iniciado por ThiagoFabri, Novembro 25, 2009.

Status do Tópico:
Não esta aberto para novas mensagens.
  1. ThiagoFabri

    ThiagoFabri Sem Pontuação

    Boa tarde!!!

    Estou tentando passar as informações do COD. abaixo para um arquivo TXT.

    Código:
    FOR EACH emitente NO-LOCK,  
FIRST repres
WHERE repres.cod-rep EQ emitente.cod-rep NO-LOCK:        

DISP        
    emitente.cod-emitente    
    emitente.nome-abrev        
    emitente.nome-emit        
    repres.cod-rep        

    IF AVAIL(repres)
        THEN string(repres.nome) 
    ELSE "Não Informado"        

    WITH WIDTH 300 STREAM-IO.

end.
    Ja tentei utilizar o comando output to value ("c:\teste.txt"). mas ele apresentou somente a primeira linha da pesquisa, será que falta algo no código? Como eu poderia proceder neste caso?

    Agradeço qualquer ajuda!
    Abraços!
    ThiagoFabri, Novembro 25, 2009
    #1
  2. af.dums

    af.dums Membro Ativo

    Onde tu colocou o output?

    Antas do for each?

    Ou dentro dele?
    af.dums, Novembro 25, 2009
    #2
  3. ThiagoFabri

    ThiagoFabri Sem Pontuação

    Boa tarde Anderson.

    Ja tentei de varias formas. Mas estou colocando ANTES.

    Valeu
    ThiagoFabri, Novembro 25, 2009
    #3
  4. Cobra.cne

    Cobra.cne Equipe de Suporte Moderador

    Tenta assim:
    Código:
    output to  value("c:\teste.txt") no-convert.
FOR EACH emitente NO-LOCK:
    find FIRST repres no-lock
        WHERE repres.cod-rep EQ emitente.cod-rep NO-error.

    DISP        
        emitente.cod-emitente    
        emitente.nome-abrev        
        emitente.nome-emit        
        repres.cod-rep        

        IF AVAIL(repres)
            THEN string(repres.nome) 
        ELSE "Não Informado"        
  
        WITH WIDTH 300 STREAM-IO.

end.
output close.
    Posta o que aconteceu.
    Cobra.cne, Novembro 25, 2009
    #4
  5. ThiagoFabri

    ThiagoFabri Sem Pontuação

    Cleiton,
    é isso ae!!! ;)
    Funcionou legal!!! Meu Output, estava faltando alguns parametros!

    Muito Obrigado!!!

    Abraços
    ThiagoFabri, Novembro 25, 2009
    #5
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página