[firebase-br] DBSEEK() do clipper. Como faço no firebird??

[Juliano Van Dal]

Ola, 
  Venho da programação top-down (do bom e saudoso clipper), e quero saber como faço uma pesquisa do tipo:
   
        SELE 16 
      SET ORDER TO 01
      DBSEEK( STRZERO( MCODIGO,6 ) )
      IF FOUND()
         DO WHILE ! EOF() .AND. CODIGO = STRZERO( MCODIGO,6 )
            CADASTRADO:="SIM"
              MSOMA:=MSOMA+VALOR
            SKIP
         ENDDO
         ELSEIF
               CADASTRADO:="NAO"
        ENDIF
   
   
  utilizando componentes de ligação ZEUS
   
  Grato, aguardo a compreensão...
   
  Juliano
   

		
---------------------------------
 Yahoo! Search
 Imposto de Renda 2006: o prazo está acabando. Faça já a sua declaração no site da Receita Federal.