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

Forum destiné aux questions sur le développement : Formules, LotusScript, Java ...

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

Messagepar Ahamay » 20 Nov 2009 à 16:43

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 ?
Dernière édition par Ahamay le 08 Déc 2009 à 15:13, édité 1 fois.
Si haut que l'on soit placé, on n'est jamais assis que sur son cul (Montaigne) 8)
Avatar de l’utilisateur
Ahamay
Posteur expérimenté
Posteur expérimenté
 
Message(s) : 368
Inscrit(e) le : 27 Nov 2007 à 09:30
Localisation : Completement à l'ouest

Messagepar Ahamay » 20 Nov 2009 à 16:55

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à ?????
Si haut que l'on soit placé, on n'est jamais assis que sur son cul (Montaigne) 8)
Avatar de l’utilisateur
Ahamay
Posteur expérimenté
Posteur expérimenté
 
Message(s) : 368
Inscrit(e) le : 27 Nov 2007 à 09:30
Localisation : Completement à l'ouest

Messagepar roubech » 20 Nov 2009 à 17:22

vérifie la propriété IsSummary
Avatar de l’utilisateur
roubech
Modérateur
Modérateur
 
Message(s) : 4976
Inscrit(e) le : 01 Fév 2007 à 20:22
Localisation : Lille

Messagepar Ahamay » 20 Nov 2009 à 17:29

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.
Si haut que l'on soit placé, on n'est jamais assis que sur son cul (Montaigne) 8)
Avatar de l’utilisateur
Ahamay
Posteur expérimenté
Posteur expérimenté
 
Message(s) : 368
Inscrit(e) le : 27 Nov 2007 à 09:30
Localisation : Completement à l'ouest

Messagepar Michael DELIQUE » 20 Nov 2009 à 17:49

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é
Cordialement

Michael (SMS-Phobique)
----------------------------
"La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi."
Albert EINSTEIN
Avatar de l’utilisateur
Michael DELIQUE
Administrateur
Administrateur
 
Message(s) : 12183
Inscrit(e) le : 16 Déc 2004 à 10:36
Localisation : Paris/Cergy

Messagepar roubech » 20 Nov 2009 à 21:12

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 ! ^^
Avatar de l’utilisateur
roubech
Modérateur
Modérateur
 
Message(s) : 4976
Inscrit(e) le : 01 Fév 2007 à 20:22
Localisation : Lille

Messagepar Michael DELIQUE » 21 Nov 2009 à 16:23

Oups Sorry
Cordialement

Michael (SMS-Phobique)
----------------------------
"La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi."
Albert EINSTEIN
Avatar de l’utilisateur
Michael DELIQUE
Administrateur
Administrateur
 
Message(s) : 12183
Inscrit(e) le : 16 Déc 2004 à 10:36
Localisation : Paris/Cergy

Messagepar Ahamay » 23 Nov 2009 à 08:21

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
Si haut que l'on soit placé, on n'est jamais assis que sur son cul (Montaigne) 8)
Avatar de l’utilisateur
Ahamay
Posteur expérimenté
Posteur expérimenté
 
Message(s) : 368
Inscrit(e) le : 27 Nov 2007 à 09:30
Localisation : Completement à l'ouest

Messagepar Ahamay » 23 Nov 2009 à 08:46

:) 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
Si haut que l'on soit placé, on n'est jamais assis que sur son cul (Montaigne) 8)
Avatar de l’utilisateur
Ahamay
Posteur expérimenté
Posteur expérimenté
 
Message(s) : 368
Inscrit(e) le : 27 Nov 2007 à 09:30
Localisation : Completement à l'ouest

Messagepar d.bugger » 08 Déc 2009 à 12:01

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.
Avatar de l’utilisateur
d.bugger
Modérateur
Modérateur
 
Message(s) : 849
Inscrit(e) le : 15 Juin 2006 à 09:19
Localisation : Drôme, France

Messagepar Michael DELIQUE » 08 Déc 2009 à 12:29

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
Cordialement

Michael (SMS-Phobique)
----------------------------
"La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi."
Albert EINSTEIN
Avatar de l’utilisateur
Michael DELIQUE
Administrateur
Administrateur
 
Message(s) : 12183
Inscrit(e) le : 16 Déc 2004 à 10:36
Localisation : Paris/Cergy

Messagepar Ahamay » 08 Déc 2009 à 14:21

thx....
je teste pour le fun (et pour ma ptite knowledge perso) car j'ai mouliner mes doc problématiques.

8)
Si haut que l'on soit placé, on n'est jamais assis que sur son cul (Montaigne) 8)
Avatar de l’utilisateur
Ahamay
Posteur expérimenté
Posteur expérimenté
 
Message(s) : 368
Inscrit(e) le : 27 Nov 2007 à 09:30
Localisation : Completement à l'ouest


Retour vers Développement

cron