PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEV, WEBDEV e WINDEV Mobile

Inicio | Mensagens recentes | Conecte-se... |  | Português FR
Inicio → WINDEV 2024 → Gantt column end date?
Gantt column end date?
Iniciado por marin, abr., 12 2021 10:02 AM - 3 respostas
#1
Membro registado
27 mensagems
Publicado em abril, 12 2021 - 10:02 AM
Hi,

Gantt column only show chart for 2011 - 2013, even there are dates up to 2021. What could it be?

Here is code for display data in table.

citaj is Record of QRY_PrikazPodataka
IF HExecuteQuery(QRY_PrikazPodataka,hQueryDefault) = True THEN
FOR EACH QRY_PrikazPodataka
HReadNext(QRY_PrikazPodataka)
IF NOT HOut() THEN
citaj = QRY_PrikazPodataka
gsNStrojevi = citaj.PmNr
datum is Date = citaj.StartTerm
gdPocetak = StringToDate(datum,"YYYYMMDDHHmmSS")
gnTrajanje = citaj.Zeit
postotak is int = 0
gnPostotak = postotak
// info(gsNStrojevi)
// info(gdPocetak)
// info(gnTrajanje)
AddTask()
END
END
END

I could not find any option of limiting end date showed in chart.
#2
Membro registado
54 mensagems
Popularité : +2 (2 votes)
Publicado em abril, 12 2021 - 11:05 AM
Hello Marin,
I dont know if this resolve your problem, but if you cicle with FOR EACH QRY why you HReadNext(QRY)?
It seems to me you dont read all records in your query...
FOR EACH record you jump to the next record

It should be

citaj is Record of QRY_PrikazPodataka
IF HExecuteQuery(QRY_PrikazPodataka,hQueryDefault) = True THEN
     FOR EACH QRY_PrikazPodataka
         citaj = QRY_PrikazPodataka
         gsNStrojevi = citaj.PmNr
         datum is Date = citaj.StartTerm
         gdPocetak = StringToDate(datum,"YYYYMMDDHHmmSS")
         gnTrajanje = citaj.Zeit
         postotak is int = 0
         gnPostotak = postotak
         // info(gsNStrojevi)
         // info(gdPocetak)
         // info(gnTrajanje)
         AddTask()
     END
END

or

citaj is Record of QRY_PrikazPodataka
IF HExecuteQuery(QRY_PrikazPodataka,hQueryDefault) = True THEN
     WHILE HFound(QRY_PrikazPodataka)
         citaj = QRY_PrikazPodataka
         gsNStrojevi = citaj.PmNr
         datum is Date = citaj.StartTerm
         gdPocetak = StringToDate(datum,"YYYYMMDDHHmmSS")
         gnTrajanje = citaj.Zeit
         postotak is int = 0
         gnPostotak = postotak
         // info(gsNStrojevi)
         // info(gdPocetak)
         // info(gnTrajanje)
         AddTask()
         HReadNext(QRY_PrikazPodataka)
     END
END


I'm wrong?

Andrea
#3
Membro registado
27 mensagems
Publicado em abril, 12 2021 - 12:51 PM
Thank you, you are right, without HreadNext line it reads a lot more data.
#4
Membro registado
27 mensagems
Publicado em abril, 12 2021 - 1:24 PM
If somebody is wondering, I solved the problem by ignoring data from older years (from 2011) and made query for the last few years which is more important, and it works. It is showing gantt column up to date.
→ Voltar para WINDEV 2024