Page 1 sur 1

Problème de vues

MessagePublié: 12 Oct 2012 à 09:30
par Eric SIVOA
Bonjour,

Dans mes développements je souhaite afficher une vue appelée vrepasdumois.

Cette vue est catégorisée avec un filtre sur le nom de la personne + l'année + le mois
Il y a ensuite les colonnes nom de la personne et la date du repas

Je souhaite afficher une autre vue, basée sur les mêmes informations, mais avec des filtres différents. J'appelle cette vue vrepasparjour.

Je catégorise en fonction de l'année, puis du mois. puis de la date.
Ensuite j'ai les colonnes nombre de repas par jour et nom de l'agent.

Je fais appel à ces deux vues distinctes dans deux masques différents.
Je voudrais avoir la vue vrepasdumois dans le masque 1, et la vue vrepasparjour dans le masque 2.

Mais concrètement, j'ai la même vue quelque soit le masque.

Première partie du code : le calcul des filtres de date (date complète, année, mois, jour)

Code : Tout sélectionner
filtre_year = Cstr(Year(Cvdate(wDate) + i))
If Month(Cvdate(wDate) + i) <= 9 Then
   filtre_month = "0" + Cstr(Month(Cvdate(wDate) + i))
Else
   filtre_month = Cstr(Month(Cvdate(wDate) + i))
End If
               
If Day(Cvdate(wDate) + i) <= 9 Then
   filtre_day = "0" + Cstr(Day(Cvdate(wDate) + i))
Else
   filtre_day = Cstr(Day(Cvdate(wDate) + i))
End If
               
chaine_filtre =  str_agent + "@" +  filtre_year + "-" + filtre_month
filtre_date = filtre_day + "-" + filtre_month + "-" + filtre_year


L'affectation des champs dans la vue vrepasdumois

Code : Tout sélectionner
'sur vrepasdumois
Set ndoc = New NotesDocument(mBase)
Call ndoc.AppendItemValue("Form", "vrepasdumois")
Call ndoc.AppendItemValue("filtre", chaine_filtre)
Call ndoc.AppendItemValue("selec_date", filtre_date)
Call ndoc.AppendItemValue("selec_year", filtre_year)
Call ndoc.AppendItemValue("selec_month", filtre_month)
Call ndoc.AppendItemValue("nomagentrepas", doc.GetItemValue("NOM_AGENT"))
Call ndoc.AppendItemValue("daterepas", Cvdate(wDate) + i)
Call ndoc.Save(True,False)


Faudrait il que je procède autrement ?
Comme ceci ou il y aurait un autre moyen ?

Code : Tout sélectionner
'sur vrepasdumois
Set ndoc = New NotesDocument(mBase)
Call ndoc.AppendItemValue("Form", "vrepasdumois")
Call ndoc.AppendItemValue("filtre", chaine_filtre)
Call ndoc.AppendItemValue("nomagentrepas", doc.GetItemValue("NOM_AGENT"))
Call ndoc.AppendItemValue("daterepas", Cvdate(wDate) + i)
Call ndoc.Save(True,False)

'sur vrepasjour
[code]
'sur vrepasdumois
Set ndoc = New NotesDocument(mBase)
Call ndoc.AppendItemValue("Form", "vrepasjour")
Call ndoc.AppendItemValue("selec_date", filtre_date)
Call ndoc.AppendItemValue("selec_year", filtre_year)
Call ndoc.AppendItemValue("selec_month", filtre_month)
Call ndoc.AppendItemValue("nomagentrepas", doc.GetItemValue("NOM_AGENT"))
Call ndoc.AppendItemValue("daterepas", Cvdate(wDate) + i)
Call ndoc.Save(True,False)


D'avance, merci !

Question subsidiaire,
J'ai ma vue intégrée avec tous les repas du mois dans le masque.
Est-ce que c'est possible d'avoir une page par jour (c'est à dire après les repas du 5 novembre, avoir les repas du 6 novembre sur la page suivante et non sur la même page)

Re: Problème de vues

MessagePublié: 12 Oct 2012 à 09:32
par Michael DELIQUE
Salut

regarde si tes vues n'ont pas le même pseudo

Re: Problème de vues

MessagePublié: 12 Oct 2012 à 09:55
par Eric SIVOA
Michael DELIQUE a écrit:Salut

regarde si tes vues n'ont pas le même pseudo


C'était ce dont je m'étais douté, et j'ai changé le pseudo de la seconde vue.
Maintenant, je tombe sur les bonnes vues.
Il faut maintenant que j'affine un peu le second masque, ne voir que les repas de novembre par exemple, et voir aussi si je peux échelonner les résultats de la vue intégrée vrepasjour sur plusieurs pages.
Avoir les repas du 5 novembre sur la page 1
Avoir les repas du 6 novembre sur la page 2 du relevé
Avoir les repas du 7 novembre sur la page 3 du relevé
etc...