Problema con ciclo for
Publicado por Marcelo (70 intervenciones) el 04/02/2013 22:29:47
Amigos...tengo otro problemita...se trata de lo siguiente, gracias a todos por su tiempo de
antemano.
Tengo que obtener un informe de datos filtrado por fecha (mes, año), fecha inicial hasta fecha final, solo mes y año.
Mi problema se presenta cuando pido consultar por ejemplo Diciembre 2011 hast Enero 2011, no me trae los datos, pero si pregunto cuando el mes (inicial) es menor al final no presenta el problema, como lo puedo solucionar?...
este es el codigo que tengo
m_mes : mes inicial
m_mes2 : mes final
m_ano : año inicial
m_ano2 : año final
FOR j = m_ano TO m_ano2 STEP 1
FOR mes = 1 TO 12 STEP 1
***********FOR mes = m_mes TO m_mes2 STEP 1
thisform.datos && aqui mando a hacer el select preguntando igualando el año a j y el mes
GO TOP IN selcli
DO WHILE !EOF('selcli')
IF YEAR(selcli.fecha) = j .and. MONTH(selcli.fecha) = mes
m_tar = m_tar + 1
m_aflu = m_aflu + selcli.afluencia
endif
SKIP 1 IN selcli
ENDDO
******************Aqui grabo los datos
Gracias nuevamente.
antemano.
Tengo que obtener un informe de datos filtrado por fecha (mes, año), fecha inicial hasta fecha final, solo mes y año.
Mi problema se presenta cuando pido consultar por ejemplo Diciembre 2011 hast Enero 2011, no me trae los datos, pero si pregunto cuando el mes (inicial) es menor al final no presenta el problema, como lo puedo solucionar?...
este es el codigo que tengo
m_mes : mes inicial
m_mes2 : mes final
m_ano : año inicial
m_ano2 : año final
FOR j = m_ano TO m_ano2 STEP 1
FOR mes = 1 TO 12 STEP 1
***********FOR mes = m_mes TO m_mes2 STEP 1
thisform.datos && aqui mando a hacer el select preguntando igualando el año a j y el mes
GO TOP IN selcli
DO WHILE !EOF('selcli')
IF YEAR(selcli.fecha) = j .and. MONTH(selcli.fecha) = mes
m_tar = m_tar + 1
m_aflu = m_aflu + selcli.afluencia
endif
SKIP 1 IN selcli
ENDDO
******************Aqui grabo los datos
Gracias nuevamente.
Valora esta pregunta


0