Page 1 sur 1

Truc de ouf.... valeurs d'un champ invisibles dans une vue !

MessagePublié: 20 Nov 2009 à 16:43
par Ahamay
J'ai une base avec tout un tas de doc issus d'un form "DskMgrNotesInstall" ... dans ce Form se trouve un champ "NOTES_WorkspaceServer" de type Texte - MultiValue (Séparateur "NewLine/NewLine")

Si à partir d'une vue j'affiche les propriétés des documents et que je vais voir ce champ, il contient plein de valeurs.

.... je crée une vue basée sur ce masque, premiere colonne je colle mon champ, et là, KEDAL!

Je creuse, je cherche... et comme je pige pas, je fais quelques test du genre :

@IsNull(NOTES_WorkspaceServer) ........me renvoi ........ 1
@If(NOTES_WorkspaceServer="";"vide";"OK")........me renvoi ...... "vide"
@Length(NOTES_WorkspaceServer)..............me renvoi ...... 0

Comment c'est possible un truc pareil ?

MessagePublié: 20 Nov 2009 à 16:55
par Ahamay
petite précision....

J'ai le meme soucis avec tous les champs d'un même tableau.

ce tableau est imbriqué dans un Tableau (Onglet)
lui meme etait dans un autre tableau (Onglet)

Genre d'interface qu'on a dans les doc serveur par exemple.

Est ce que cela pourrait provenir de là ?????

MessagePublié: 20 Nov 2009 à 17:22
par roubech
vérifie la propriété IsSummary

MessagePublié: 20 Nov 2009 à 17:29
par Ahamay
Mais comment ?
J'peux pas utiliser une propriété LS dans une colonne de vue ?


Bon ceci dit, j'ai une piste.... si je ressors mon tableau de ses péres (donc plus un tableau intégré).... que je ressauve mes docs, ça marche !!

A mon avis c'est Notes qui perds ses petits quand on pousse l'imbrication trop loin. Je continue de creuser.

MessagePublié: 20 Nov 2009 à 17:49
par Michael DELIQUE
salut

ce que veux dire Dominux, c'est qu'un document créé en back a généralement le issummary de ses champs a false. resultat il sont invisible dans une vue.

if suffit a la creation de faire un item.issummary = true et hop le tour est joué

MessagePublié: 20 Nov 2009 à 21:12
par roubech
c'est vrai que j'aurai pu être plus explicite
dans la boite de dialogue de propriétés du doc, 2eme onglet, tu sélectionnes le champ et tu regardes danas la partie droite juste avant la valeur si SUMMARY est présent

@Michael : tu me confond avec Olivier ! ^^

MessagePublié: 21 Nov 2009 à 16:23
par Michael DELIQUE
Oups Sorry

MessagePublié: 23 Nov 2009 à 08:21
par Ahamay
Hello...

Effectivement j'ai pas cette propriété pour les champs en question.
visiblement je devrai avoir "Field Flags: SUMMARY"..... Comment je peux définir ça ? compute with form ? SetField ?


Bonne journée

MessagePublié: 23 Nov 2009 à 08:46
par Ahamay
:) j'crois que j'ai trouvé :

Je créé un item pour les champs que je veux et ensuite, tout simplement : item.IsSummary = True

je teste de suite

MessagePublié: 08 Déc 2009 à 12:01
par d.bugger
Petite précision : si tu crées un item avec New NotesItem, il n'y a pas de Summary, pourtant si tu crées avec ReplaceItemValue, il y aura bien le Summary.

Donc, moi, New NotesItem : jamais.

MessagePublié: 08 Déc 2009 à 12:29
par Michael DELIQUE
uen petite function qui devrait t'aider

Code : Tout sélectionner
Public Sub FieldAllisSummary(wDoc As NotesDocument,wnbIsSum As Integer,wnbSave As Integer)
         'Déclaration Variable
   Dim Item As NotesItem
   Dim vrItem As Variant
   
   On Error Goto ErreurHandle
   
   If wDoc Is Nothing Then
      Error 9999,"wDoc is Nothing"
      Exit Sub
   End If
   
   Select Case wnbIsSum
   Case True,False
            'ok
   Case Else
      Error 9999,"wnbIsSum no ''True'' or ''False'' Value"
      Exit Sub
   End Select
   
   vrItem = wDoc.Items
   Forall ValueItem In vrItem
      Set Item = ValueItem
      If Not Item Is Nothing Then
         Item.IsSummary = wnbIsSum
      End If
      Set Item = Nothing
   End Forall
   vrItem = Null
   If wnbSave = True Then
      Call wDoc.save(True,False)
   End If
   
   Exit Sub
ErreurHandle:
   Msgbox "("+Cstr(Getthreadinfo (1))+" Call by "+Cstr(Getthreadinfo(10))+")"+Chr(10)+"Erreur " + Str(Err) + " : "+Chr(10) + Cstr(Error)+". "+Chr(10)+"Ligne N° "+Cstr(Erl),16," ERREUR !"
   Exit Sub
End Sub

MessagePublié: 08 Déc 2009 à 14:21
par Ahamay
thx....
je teste pour le fun (et pour ma ptite knowledge perso) car j'ai mouliner mes doc problématiques.

8)