Page 1 sur 1

passage d'un champ d'un masque dans un autre masque

MessagePublié: 03 Sep 2010 à 14:11
par guyader
bonjour,

débutant en LS

j'ai stocké le nom du directeur dans un masque de configuration et je voudrais récupéré ce nom dans un autre masque lorsque la personne valide sa demande pour préparer la signature ...
début de code, mais je ne sais pas comment la récupérer la valeur dans
mon document concerné !! MERCI
Dim cfdrh As NotesDocument
Set cfdrh=curdb.Getprofiledocument("CFDRH")
Dim directeur As NotesItem
Dim pre_directeur As NotesItem
Set directeur=cfdrh.Getfirstitem("nom_directeur_drh")

MessagePublié: 03 Sep 2010 à 14:51
par Michael DELIQUE
salut

si tu veux juste récupérer le nom du directeur stocké dans ton document profil
Code : Tout sélectionner
Dim cfdrh As NotesDocument
Set cfdrh=curdb.Getprofiledocument("CFDRH")
Dim directeur As string
Dim pre_directeur As NotesItem
directeur=cfdrh.getitemvalue("nom_directeur_drh")(0)
msgbox directeur

MessagePublié: 03 Sep 2010 à 14:59
par guyader
merci
mais pour passer cette valeur dans un autre doc...
faut-il utiliser la 1ère ligne ci-après ou la seconde !!!
sans doute ni l'une , ni 'l'autre !!

doc.nom_directeur=directeur
ou
Call doc.Replaceitemvalue("nom_directeur", directeur.Values)

MessagePublié: 03 Sep 2010 à 15:07
par Michael DELIQUE
pas besoin de passer par un objet item

Dim cfdrh As NotesDocument
Set cfdrh=curdb.Getprofiledocument("CFDRH")
Dim directeur As string
Dim pre_directeur As NotesItem
directeur=cfdrh.getitemvalue("nom_directeur_drh")(0)


doc.nom_directeur=directeur
ou
Call doc.Replaceitemvalue("nom_directeur", directeur)

les 2 manieres sont bonnes

MessagePublié: 08 Sep 2010 à 10:01
par LSong
tu peu aussi faire comme ca


Dim cfdrh As NotesDocument
Set cfdrh=curdb.Getprofiledocument("CFDRH")
directeur=cfdrh.nom_directeur_drh(0)