Discussion :

[thierrybatlle]

Bonjour à tous,

J'essaye en vain d'imprimer un état basé sur une requête. Mon état est lié à ma requête.
Voici mon code d'appel :

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
 
LOCAL
	UnFichier est une chaîne 
 
UnFichier = fRepWeb() + "\" + DateSys() + HeureSys() + ".pdf" 
 
Trace(sLstIDStock)
// Paramétrer la destination de l'impression 
iDestination(iPDF, UnFichier) 
// Imprimer l'état ETAT_FacturePDF
iImprimeEtat(ETAT_EtiquettesEntrees,sLstIDStock) 
// Envoyer le fichier dans le navigateur 
FichierAffiche(UnFichier, "application/pdf") 
// Supprimer le fichier 
fSupprime(UnFichier)

Voici mon code d'initialisation de mon état :

Code :

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

1
2
3
 
PROCEDURE ETAT_EtiquettesEntrees(gsLstIDStock est une chaîne)
iInitRequêteEtat(ETAT_EtiquettesEntrees,gsLstIDStock)

Voici ma requête :

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
 
SELECT 
	t_stock.IDStock AS IDStock,	
	t_produit.CodeEAN AS CodeEAN,	
	t_stock.DLUO AS DLUO,	
	t_stock.Quantite AS Quantite
FROM 
	t_produit,	
	t_mouvement,	
	t_stock
WHERE 
	t_stock.IDStock = t_mouvement.IDStock
	AND		t_produit.IDProduit = t_mouvement.IDProduit
	AND
	(
		t_stock.IDStock IN ({ParamIDStock}) 
	)

Je rencontre plusieurs problème :
1 - Je n'arrive pas à afficher une ligne par enregistrement.
2 - Je rencontre l'erreur suivante :

Que s'est-il passé ?
Impossible d'ouvrir le fichier <D:\DSI\Webdev\CogiStock\COGISTOCK_WEB\2016040415090106.pdf>.

Code erreur : 0
Niveau : erreur fatale

Code d'erreur système : 2
Message d'erreur système :
Le fichier spécifié est introuvable.

3 - J'ai mis un code barre EAN13 que je génère avec l'ID d'un enregistrement qui n'est pas sur 13 chiffres, alors dans la rubrique "Lecture des données" de mon état j'ai mis le code suivant qui ne fonctionne pas :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
LOCAL
	nTempCodeEAN est un entier
	sTemp est une chaîne
 
	sTemp = LIB_CB
 
	TANTQUE Taille(sTemp) < 12
		sTemp = "0" + sTemp
	FIN
 
	nTempCodeEAN = Val(sTemp)
	CBA_Palette = sTemp

Je vous remercie pour votre aide

[zamti]

Bonjour thierrybatlle, je voudrais d'abord te demander si le fichier spécifié est dans le répertoire que tu as spécifié. Car dans erreur tu as le message suivant : "Le fichier spécifié est introuvable."