Totalizar Valores entre Datas
Enviado: 27 Jun 2010 09:20
Estou com dificuldade para totalizar valores entre DUAS datas exemplo:
:%
Código: Selecionar todos
SET DATE BRITISH
DATAINI :=CTOD(" / / ")
DATAFIN :=CTOD(" / / ")
XCOD :=0
TOTAL :=0
@ 06,10 SAY "PERIODO INICIAL:" GET DATAINI
@ 06,45 SAY "PERIODO FINAL..:" GET DATAFIN
@ 08,45 SAY "HISTORICO......:" GET XCOD PICTURE "999"
READ
SUM VALOR TO TOTAL FOR CODIGO=XCODI .AND. DATLANC>=DATAINI .AND. DATLANC<=DATAFIN
@ 12,50 SAY TOTAL