Discussion :

[VINCENTINO]

Bonjour, svp j'aimerais generer un fichier pdf et l'enrgistrer dans une base C/S,l'enregistrement se fait bien a l'emplacement indiquer sous format pdf,mais quand je renseigne ce lien pour l'enregistrement dans la base rien ne se passe,jai choisi le type binaire pour la colonne contenu qui devrait recevoir le fichier dans la base,voici mon code, et merci pour vos approches.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
NomFichier est une chaîne = ComplèteRep(fRepDonnées()) + ...
	"\"+"REXU"+"\" +gsLibRec+"\"+sNumRex + ".PDF"
	iDestination(iPDFGénérique, NomFichier)
	Soc est un Filigrane
	Soc..Texte=gsCdNOmSociete
	iParamètreFiligrane(iFiligraneImpression,Soc)
	iInitRequêteEtat(ETAT_REXU_1)
	// Imprime l'état
	iImprimeEtat(ETAT_REXU_1,cdAbn,SAI_Date_de_paiement,SAI_Montant_reçu,sNumRex)
	reglementEnGros.contenuRexu=NomFichier//mais rien ne se passe ici pourtant le fichier est bien generer a l'emplacement
	HAjoute(reglementEnGros)

[Yusep]

Bonjour.
La solutíon :
https://doc.pcsoft.fr/?3044173&name=...ememo_fonction

[VINCENTINO]

Merci,voila ce que jai essayer, mais rien ne se passe dans cette colonne,la nouvelle ligne est bien ajoutee,mais cette colonne qui devrait recevoir la facture en pdf est vide

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
 
// Impression au format PDF
	iFenêtreAbandon(Faux)
	NomFichier est une chaîne = ComplèteRep(fRepDonnées()) + ...
	"\"+"FACTURES"+"\" +gsLibRec+"\"+sCdFact + ".PDF"
	iDestination(iPDFGénérique, NomFichier)
	Soc est un Filigrane
	Soc..Texte=gsCdNOmSociete
	iParamètreFiligrane(iFiligraneImpression,Soc)
	iInitRequêteEtat(ETAT_Factures_1,y,gsCdRecouv)
	// Imprime l'état
	iImprimeEtat(ETAT_Factures_1,y,sCdFact,aPayerAvantle)
	bufFichier est un Buffer = fChargeBuffer(NomFichier)
 
	factureEnregistrer.contenuFacts2=bufFichier
	HAjoute(factureEnregistrer)

[fouedusa]

Bonjour;
Si tu as un fichier "mmo" avec une taille significative, tout est bon.
Clique deux fois sur la colonne "contenuFacts2"
exemple :

tu vas avoir une fenêtre comme ce qui suit :

pour s'assurer que tout est bon tu peux exporter ton fichier par le bouton Exporter...

Bon Dev

[philouZ]

Bonjour,

Perso j'aurai utilisé HAttacheMemo(), ça va plus vite que de charger le buffer

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
// Impression au format PDF
	iFenêtreAbandon(Faux)
	NomFichier est une chaîne = ComplèteRep(fRepDonnées()) + "\"+"FACTURES"+"\" +gsLibRec+"\"+sCdFact + ".PDF"
	iDestination(iPDFGénérique, NomFichier)
	Soc est un Filigrane
	Soc..Texte=gsCdNOmSociete
	iParamètreFiligrane(iFiligraneImpression,Soc)
	iInitRequêteEtat(ETAT_Factures_1,y,gsCdRecouv)
	// Imprime l'état
	iImprimeEtat(ETAT_Factures_1,y,sCdFact,aPayerAvantle)
	HAttacheMémo(factureEnregistrer,contenuFacts2,ComplèteRep(fRepDonnées()) + "\"+"FACTURES"+"\" +gsLibRec+"\"+sCdFact + ".PDF")
	HAjoute(factureEnregistrer)