Dúvida While - Iniciante ADVPL

Senhores Bom Dia, Sou novo no ADVPL estou montando um relatório e fiz esse trecho de While onde alimento a variável cTrans com os dados de uma Query, porém preciso limpar a variável após o preenchimento porque ela vai receber vários dados vindos do resultado da query, então preciso que ela receba imprima e limpe.

Como fazer?

OBRIGADO.

DbSelectArea("SB1")
DbSetorder(1)
If DbSeek(xFilial("SB1")+aSldIni[nX,3])
    TMP->( DbGotop() )
    While TMP->(!EOF()) .AND. aSldIni[nX,3] == TMP->D3_COD // Se o código do produto for exatamente igual.
        cTrans := TMP->QUANT
        TMP->(dbskip())
    Enddo    
Endif
compartilhar
  1. Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
  2. Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
  3. Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
  4. Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
  5. Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!

4 respostas

Não é a resposta que estava procurando? Procure outras perguntas com as tags advpl ou faça a sua própria pergunta.