PC Toledo

Galera é o seguinte , estou tentando fazer um relatório de data em tela mais estou com probleminha ... quando mando listar de data inicial até data final só lista a data inicial .. olhem como eu estou fazendo e se possivel me corrijam


dData=datcad
if dData1=dData .and. dData1<=dData2
@row() +01,01 say cod //codigo
@row() ,13 say forn // fornecedor
@row() ,50 say end // endereço
skip
else
skip
endif

ta confuso, cara...
posta o codigo completo pra gente analisar melhor....
valeu

Vc deve comparar assim:

dData=datcad
if ddata >= dData1 .and. ddata <= dData2
@row() +01,01 say cod //codigo
@row() ,13 say forn // fornecedor
@row() ,50 say end // endereço
endif
skip

boa sorte.

Fala ae GVC , vc acertou denovo , muito abrigado mais uma vez cara !

Aproveitando o tópico , tenho um relatório de notas fiscais e gostaria de saber como poderia somar todos os valores totais e mostrar no final do relatório

ex :

mostrei o numero da nota , fornecedor total da nota
mostrei o numero da nota , fornecedor total da nota
mostrei o numero da nota , fornecedor total da nota
mostrei o numero da nota , fornecedor total da nota

.....................................................valor total das nostas R$


sera que deu pra ter uma idéia de que quero...
pesso dscupas por ficar fazendo diverssas perguntas que talvez pra vcs sejam insignificantes , mas estou comessando a programar e preciso de ajuda da comunidade que até agora me foi muito ultil ! VLW

Vc não esta fazendo perguntas insignificantes.Na minha opnião aqui no forum todos estão aqui para ajudar e ser ajudado...

Obs: Sempre que possivel faça uma busca no forum ou até mesmo faça vc mesmo uns teste e post seu codigo fonte para que todos vejam e possam lhe ajudar a resolver suas duvidas...

Segue Abaixo dois exemplos:

1° Ex:
FUNC SOMANOTAS

USE DBFNOTAS ALIAS DBFNOTAS SHARED
SET INDEX TO DBFNOTAS //(CAMPO INDEXADO PELO LIQUIDO)
xCODFOR=0
@ 01,01 GET xCODFOR
READ
SELE DBFNOTAS

SUM ALL TO LIQUIDO TOTAL FOR CODFOR=XCODFOR //

@ 01,01 SAY TOTAL PICT "@E 999,999.99"
RETURN

2°Ex:
FUNC SOMANOTAS

USE DBFNOTAS ALIAS DBFNOTAS SHARED
SET INDEX TO DBFNOTAS //(CAMPO INDEXADO PELO LIQUIDO)
xCODFOR=0
@ 01,01 GET xCODFOR
READ
SELE DBFNOTAS
xTOTALLIQ=0

do while !eof()
xliq=0
xliq=LIQUIDO
@ 01,01 SAY xliq

xTOTALLIQ=xTOTALLIQ+xliq // LIQUIDO INDIVUAL

SELE DBFNOTAS
SKIP
enddo
@ 01,01 SAY xTOTALLIQ // TOTAL DO LIQUIDO
RETURN

Tche, qualquer duvida post ai e vamos resolvendo um a um....mas lembre-se sempre de tenta fazer algo antes de postar...ou ainda de procurar no forum suas duvidas.

Clip-Abraço

Desculpe, mas tente isto:

xliq := 0
while !eof()
@ 01,01 SAY liquido
xliq += liquido // LIQUIDO INDIVUAL
dbskip()
end
@ 01,01 SAY xliq // TOTAL DO LIQUIDO
RETURN

irei tentar as auternativas e posto em seguida o resultado , vlw!

ederxc escreveu:Galera é o seguinte , estou tentando fazer um relatório de data em tela mais estou com probleminha ... quando mando listar de data inicial até data final só lista a data inicial .. olhem como eu estou fazendo e se possivel me corrijam


dData=datcad
if dData1=dData .and. dData1<=dData2
@row() +01,01 say cod //codigo
@row() ,13 say forn // fornecedor
@row() ,50 say end // endereço
skip
else
skip
endif

Boa Tarde !!!

Tente isto:
.......
bBloco := {|| datcad >= dData .AND. dData1 <= dData2 }
IF Eval(bBloco)
@row() +01,01 say cod //codigo
@row() ,13 say forn // fornecedor
@row() ,50 say end // endereço
ENDIF
SKIP
LOOP :)Pos

cara valeu pela ajuda ! Mas eu ja havia feito do jeito em que o gvc falou ... mesmo assim agradeço o esforço da galera em ajudar .. sempre são boas as sugestões !