[RESOLVIDO] Duvidas em como executar este comando com o FOR EACH

Discussão em 'EMS , HCM e Totvs 11' iniciado por kakaos, Fevereiro 25, 2010.

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

    kakaos Membro Participativo

    Boa noite pessoal preciso colocar este select num for each e o que é pior o resultado gerar um txt.
    alguem pode me dar um HELP meio que urgente?
    muito obrigado galera....

    SELECT it-codigo,cod-depos, COUNT(*) FROM saldo-estoq
    WHERE it-codigo = "item"
    GROUP BY it-codigo,cod-depos
  2. af.dums

    af.dums Membro Ativo

    Uma forma

    Código:
    def var i-cont as integer no-undo.
    output to c:\temp\teste.txt.
    assign i-cont = 1.
    for each saldo-estoq fields (it-codigo, cod-dep) no-lock:
       disp saldo-estoq.it-codigo
              saldo-estoq.cod-dep
              i-cont.
       assign i-cont = i-cont + 1.
    end.
    output close.
  3. kakaos

    kakaos Membro Participativo

    Boa noite Anderson,
    obrigado pela ajuda, porem observei no seu codigo um erro segue abaixo:
    quando modifico a linha (for each saldo-estoq fields (it-codigo, cod-dep) no-lock:) retirando o cod-dep que fica entre parentese junto com o it-codigo ficando assim (for each saldo-estoq fields (it-codigo) no-lock:) ele executa porem com
    =============================================================
    ** Unable to understand after -- "fields (it-codigo". (247)
    ** Right parenthesis missing after expression. (253)
    ** Line 4 --Invalid FOR, DO, REPEAT, or EDITING statement. (194)
    =============================================================

    e i-cont ele, bom pelo que intendi seria um contador onde soma um em cada item... e na verdade eu preciso de algo que me mostre em um txt o item e o saldo dele em estoque, acho que faltou eu esclarecer isto tbem desculpe-me, precisaria de todos os itens e o seu saldo.

    Muito Obrigado pela atencao.
  4. rhemati

    rhemati Membro Participativo

    Tudo indica que depois do campo it-codigo você não fechou os parenteses da cláusula fields.

    att.,
  5. lima

    lima Membro Participativo

    Boa noite,

    segue código:

    output to "c:\tmp\saldo-estoq.txt".
    put fill("-",120) format "x(120)" skip
    "SALDO ITEM EM ESTOQUE" at 50 skip
    fill("-",100) format "x(100)" + " " + string(today,"99/99/9999") + " " + string(time,"HH:MM:SS") skip
    "Item" format "x(20)"
    "Saldo" skip
    fill("-",15) format "x(20)"
    fill("-",20) format "x(20)".
    for each saldo-estoq fields(it-codigo qtidade-atu) no-lock:
    disp saldo-estoq.it-codigo no-label
    saldo-estoq.qtidade-atu no-label.
    end.
    output close.
  6. af.dums

    af.dums Membro Ativo

    Opa...
    Cara, eu digitei aqui, nao testei sintaxe nada, a idéia e a estrutura, e se o que é necessário é o campo com o saldo do item, não pode ser feito pelo i-cont (assim como nao pode ser feito pelo count(*)), usa o campo qtidade-atu da tabela saldo estoque, se o necessário é o saldo atual em estoque do item.

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

Compartilhe esta Página