Ik heb een todo tabel gemaakt en ben nu bezig met rapporttrekking hieruit...
ik kan hem al laten filteren op vb 'naam' van de persoon die iets moet doen, of op project... maar nu heb ik in de tabel ToDo ook een einddatum.. dit is de datum waartegen een todo moet gebeuren...
nu wil ik ook hierop zoeken (dus alle datums kleiner dan vb 31/10/2006 en status nog 'nee' moeten worden weergegeven)
DatumGevraagd is dus de datum tegen dat het moet gebeuren en gZoekEindDatum is de datum in te vullen in de lay-out voor het rapport
dit is het huidige script..
Freeze Window
Set Error Capture [ On ]
Go to Layout [ “RapportToDo” (ToDo) ]
Enter Find Mode [ ]
Set Field [ ToDo::MedewerkerActie; Systeemtabel::gZoekMedewerker&"*" ]
Set Field [ ToDo::ProjectIdf; Systeemtabel::gZoekProject&"*" ]
Set Field [ ToDo::Type; Systeemtabel::gZoekType&"*" ]
Set Field [ ToDo::DatumGevraagd; Systeemtabel::gZoekEindDatum&"*" ]
New Record/Request
Set Field [ ToDo::Klaar; "ja" ]
Omit Record
Perform Find [ ]
If [ Get(FoundCount)<>0 ]
Sort Records [ Specified Sort Order: ToDo::DatumHistoriek; ascending ]
[ Restore; No dialog ]
Else
Show Custom Dialog [ Title: "Geen info gevonden"; Message: "Er werden geen gegevevens gevonden met de huidige zoekvoorwaarden"; Buttons: “OK” ]
Question
dave.vanderveke
Ik heb een todo tabel gemaakt en ben nu bezig met rapporttrekking hieruit...
ik kan hem al laten filteren op vb 'naam' van de persoon die iets moet doen, of op project... maar nu heb ik in de tabel ToDo ook een einddatum.. dit is de datum waartegen een todo moet gebeuren...
nu wil ik ook hierop zoeken (dus alle datums kleiner dan vb 31/10/2006 en status nog 'nee' moeten worden weergegeven)
DatumGevraagd is dus de datum tegen dat het moet gebeuren en gZoekEindDatum is de datum in te vullen in de lay-out voor het rapport
dit is het huidige script..
Freeze Window
Set Error Capture [ On ]
Go to Layout [ “RapportToDo” (ToDo) ]
Enter Find Mode [ ]
Set Field [ ToDo::MedewerkerActie; Systeemtabel::gZoekMedewerker&"*" ]
Set Field [ ToDo::ProjectIdf; Systeemtabel::gZoekProject&"*" ]
Set Field [ ToDo::Type; Systeemtabel::gZoekType&"*" ]
Set Field [ ToDo::DatumGevraagd; Systeemtabel::gZoekEindDatum&"*" ]
New Record/Request
Set Field [ ToDo::Klaar; "ja" ]
Omit Record
Perform Find [ ]
If [ Get(FoundCount)<>0 ]
Sort Records [ Specified Sort Order: ToDo::DatumHistoriek; ascending ]
[ Restore; No dialog ]
Else
Show Custom Dialog [ Title: "Geen info gevonden"; Message: "Er werden geen gegevevens gevonden met de huidige zoekvoorwaarden"; Buttons: “OK” ]
Go to Layout [ original layout ]
End If
Refresh Window
Link to comment
7 answers to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.