variavel = "JOSE"
DO WHILE OrdWildSeek("*variavel*",.T.) <-- duvida nessa linha
AADD(aNomes,ALLTRIM(LLCDBF10->NCLIENTE) + " " + STR(NCUPOM) )
ENDDO
obrigado.
Moderador: Moderadores
variavel = "JOSE"
DO WHILE OrdWildSeek("*variavel*",.T.) <-- duvida nessa linha
AADD(aNomes,ALLTRIM(LLCDBF10->NCLIENTE) + " " + STR(NCUPOM) )
ENDDO
variavel = "JOSE"
cBusca:="*"+variavel+"*"
nPas_:=1
DO WHILE OrdWildSeek(cBusca,iif(nPas_=1,.F.,.T.))
AADD(aNomes,ALLTRIM(LLCDBF10->NCLIENTE) + " " + STR(NCUPOM) )
nPas_+=1
ENDDO
cBusca:="*SILVA*"
DO WHILE OrdWildSeek(cBusca,iif(nPas_=1,.F.,.t.))
brw:REFRESHALL()
DO WHILE !brw:stabilize() .AND. NEXTKEY()=0
ENDDO
inkey(0) <-- é aqui que devo parar o processo ?
ENDDO
cLetra := alltrim(cLetra)
@ 10,05 say cLetra
Set Order to nOrder
Index on &(IndexKey()) TAG _TEMP_ TO tHarbour CUSTOM ADDITIVE MEMORY
SET Order to nOrder
GO TOP
while OrdWildSeed( '*' + cLetra + '?', TRUE)
OrdKeyAdd(_TEMP_)
END
OrdSetFocus('_TEMP')
FERNANDO CASTRO
FERNANDO DUARTE LIMA
FERNANDO ELIAS SOARES
ADONIS FERNANDO
ALEXANDRE AMADEU FERNANDES
BRUNO FERNANDO DE SOUZA
CAMILA FERNANDES DE SOUZA
FERNANDO AGUILHERA
FERNANDO ALENCAR DE MATOS
FERNANDO COSTA SILVA
ADONIS FERNANDO
BRUNO FERNANDO DE SOUZA
FERNANDO AGUILHERA
FERNANDO ALENCAR DE MATOS
FERNANDO COSTA SILVA
FERNANDO AGUILHERA
FERNANDO ALENCAR DE MATOS
FERNANDO COSTA SILVA
ADONIS FERNANDO
ALEXANDRE AMADEU FERNANDES
BRUNO FERNANDO DE SOUZA
CAMILA FERNANDES DE SOUZA
while OrdWildSeed( '*' + cLetra + '?', TRUE)
OrdKeyAdd(_TEMP_)
END
OrdSetFocus('_TEMP')
GOTO TOP
INDEX ON ... TO ... WHILE ...
GOTO TOP
INDEX ON iif( Left( nome, 3 ) == Left( Chave, 3 ), "1", "2" ) + nome TO ... WHILE ...
GOTO TOP
INDEX ON Chave( nome, cChave ) TO ... WHILE ...
FUNCTION Chave( cNome, cChave )
LOCAL cKey
IF Left( cnome, 3 ) == Left( cChave, 3 )
cKey := "1"
ELSE
cKey := "2"
ENDIF
RETURN cKey + cNome
Usuários vendo este fórum: Google [Bot] e 11 visitantes