Discussion :

[mimi1255]

Bonjour,

J'imprime un état lié à un fichier de données que je souhaite envoyer par mail en pièce jointe.
Pour cela j'utilise donc le code ci-dessous. J'utilise ce code à deux endroits différents. Je fais appelle exactement au même code mais dans le deuxième cas cela ne fonctionne pas. Avez-vous une idée sur l'origine du problème ?
Merci d'avance.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
maDE est un EmailAttache
sDemandeur est une chaîne
bufBuddemandeur est un Buffer
bufBuddemandeur = HConstruitValClé(SUIVI_DE,Num_DEIndice_Suivi_DE,numDemande,indice)
HLitRecherchePremier(SUIVI_DE,Num_DEIndice_Suivi_DE,bufBuddemandeur)
SI HTrouve(SUIVI_DE) ALORS
	sDemandeur = SUIVI_DE.Emetteur
FIN
 
MySession..AdresseServeur = ADRESSE_SERVEUR_MAIL
MonMessage..Expediteur = ADRESSE_EXPEDITEUR_SCE_COMMERCIAL
MonMessage..Destinataire[1] = sResp_N2
MonMessage..Cc[1] = "j.greslon@tricoflex.com"
MonMessage..Sujet = "DEMANDE D'ETUDE N° " + numDemande + " INDICE "+indice + " CREEE PAR " + sDemandeur + " DOIT ETRE APPROUVEE."
MonMessage..Message =  "Merci de vous rendre dans l'application afin de valider ou refuser cette DE."+CR+"Commentaire du responsable N+1 : "+CR+ commentaire + CR +CR + "http://www.marketing.tricoflex.com/de"
 
NomFichier est une chaîne = ComplèteRep(fRepDonnées()) +"DE_"+gnNumDE_Modif+ "_" + gnNumDEIndice_Modif+ ".PDF"
iDestination(iPDFGénérique, NomFichier)
 
iImprimeEtat(ETAT_DE)
 
// Construction de la variable EmailAttache
maDE..Nom = fExtraitChemin(NomFichier, fFichier + fExtension)
maDE..Contenu = fChargeTexte(NomFichier)
maDE..ContentType = "application/pdf"
maDE..ContentDescription = "DE"
 
Ajoute(MonMessage..Attache, maDE)
EmailOuvreSession(MySession)
EmailEnvoieMessage(MySession, MonMessage)
fSupprime(NomFichier)
 
EmailFermeSession(MySession)

[frenchsting]

Peux-tu préciser le "cela ne fonctionne pas".

Le pdf n'est pas généré ?
Le mail n'est pas envoyé ?
Il y a un message d'erreur ?
En mode pas à pas, le code est exécuté ?

[mimi1255]

J'ai trouvé d'où venait le problème, je faisais appelle à un état lié à un fichier de données mais mon état faisait appelle à plusieurs fichiers de données.
J'ai donc modifié l'état pour qu'il fasse appelle à une requête en placant deux paramètres.
Depuis que j'ai fait cela mon état et le pdf sont bien générés et envoyés dans le mail.

Cependant j'ai encore un problème avec mon état. la requête prend en compte deux paramètres, que je précise avant de faire le iimprimeetat() mais à l'impression c'est comme si j'avais tous les enregistrements de mes fichiers de données et pas uniquement l'enregistrement sélectionné par la requête.
Pourtant si j'exécute manuellement ma requête et que je saisie les deux paramètres, j'ai bien qu'une seule ligne...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
MySession..AdresseServeur = ADRESSE_SERVEUR_MAIL
MonMessage..Expediteur = ADRESSE_EXPEDITEUR_SCE_COMMERCIAL
MonMessage..Destinataire[1] = sResp_N2
MonMessage..Cc[1] = "j.greslon@tricoflex.com"
MonMessage..Sujet = "DEMANDE D'ETUDE N° " + numDemande + " INDICE "+indice + " CREEE PAR " + sDemandeur + " DOIT ETRE APPROUVEE."
MonMessage..Message =  "Merci de vous rendre dans l'application afin de valider ou refuser cette DE."+CR+"Commentaire du responsable N+1 : "+CR+ commentaire + CR +CR + "http://www.marketing.tricoflex.com/de"
 
NomFichier est une chaîne = ComplèteRep(fRepDonnées()) +"DE_"+gnNumDE_Modif+ "_" + gnNumDEIndice_Modif+ ".PDF"
iDestination(iPDFGénérique, NomFichier)
iInitRequêteEtat(ETAT_DE_approbation,gnNumDE_Modif,gnNumDEIndice_Modif)
iImprimeEtat(ETAT_DE_approbation)
 
// Construction de la variable EmailAttache
maDE..Nom = fExtraitChemin(NomFichier, fFichier + fExtension)
maDE..Contenu = fChargeTexte(NomFichier)
maDE..ContentType = "application/pdf"
maDE..ContentDescription = "DE"
 
Ajoute(MonMessage..Attache, maDE)
EmailOuvreSession(MySession)
EmailEnvoieMessage(MySession, MonMessage)
BLOCAGE_FERMETURE_APPLI = Faux
fSupprime(NomFichier)
 
EmailFermeSession(MySession)

[dsr57]

Bonjour

En regardant la documentation sur la fonction iInitRequêteEtat (Fonction) je suis tombé sur ce paragraphe :

Exécution d'une requête et état basé sur cette requête
Lors de l'impression d'un état basé sur une requête, si la requête a déjà été exécutée, elle n'est pas ré-exécutée. Pour forcer la ré-exécution de la requête (ajout d'enregistrements par exemple), il suffit d'utiliser les fonctions HExécuteRequête ou iInitRequêteEtat.

Peut être que cela peut t'aider.

Bon dev

[frenchsting]

Peut être faut-il que ton état soit borné ?