Gestion: De Stock Windev Pdf

// Boucle sur les produits LirePremier(Produit) TANT QUE NON(Fin(Produit)) y = PDFGestion.CréePosition(10, yPos) PDFGestion.AjouteTexte(10, y, Produit.Réf) PDFGestion.AjouteTexte(50, y, Produit.Désignation) PDFGestion.AjouteTexte(150, y, Produit.Stock_Actif) LireSuivant(Produit) FIN

sDossier = "C:\Archives_Stock\" SI Non(ExisteRépertoire(sDossier)) ALORS CréeRépertoire(sDossier) SI ErreurLorsDe( iDestinationPDF(...) ) ALORS Erreur(ErreurInfo()) FIN Voici un template que vous pouvez concevoir en 10 minutes dans l’éditeur d’état WinDEV : gestion de stock windev pdf

// 3. Générer le PDF sans dialogue MonEtat.Destination = pdfFichier MonEtat.NomFichierPDF = "C:\Backups\Stock_ " + NuméroSemaine() + ".pdf" MonEtat.Imprime() FIN Si les états ne suffisent pas (ex: tableau croisé, design très libre), utilisez le contrôle PDFControl (à ajouter via l’éditeur de fenêtre). Exemple : Générer un rapport d’inventaire tournant // Initialiser le contrôle PDF (invisible à l'exécution) PDFGestion est un PDFControl PDFGestion.CréeDocument() // Ajouter une police et un titre PDFGestion.AjoutePolice("Arial", 14, gras) PDFGestion.AjouteTexte(10, 10, "INVENTAIRE MENSUEL - MAGASIN CENTRAL") PDFGestion.AjouteLigne(10, 25, 200, 25, 1) // Boucle sur les produits LirePremier(Produit) TANT QUE

iDestinationPDF(Etat_Stock, "Confidentiel.pdf") // Après génération PDFProtège("Confidentiel.pdf", "MotDePasseAdmin", "", "owner") Seul le mot de passe permettra l’impression ou la modification. Toujours tester si le répertoire de destination existe : Toujours tester si le répertoire de destination existe :

// Boucle sur les produits LirePremier(Produit) TANT QUE NON(Fin(Produit)) y = PDFGestion.CréePosition(10, yPos) PDFGestion.AjouteTexte(10, y, Produit.Réf) PDFGestion.AjouteTexte(50, y, Produit.Désignation) PDFGestion.AjouteTexte(150, y, Produit.Stock_Actif) LireSuivant(Produit) FIN

sDossier = "C:\Archives_Stock\" SI Non(ExisteRépertoire(sDossier)) ALORS CréeRépertoire(sDossier) SI ErreurLorsDe( iDestinationPDF(...) ) ALORS Erreur(ErreurInfo()) FIN Voici un template que vous pouvez concevoir en 10 minutes dans l’éditeur d’état WinDEV :

// 3. Générer le PDF sans dialogue MonEtat.Destination = pdfFichier MonEtat.NomFichierPDF = "C:\Backups\Stock_ " + NuméroSemaine() + ".pdf" MonEtat.Imprime() FIN Si les états ne suffisent pas (ex: tableau croisé, design très libre), utilisez le contrôle PDFControl (à ajouter via l’éditeur de fenêtre). Exemple : Générer un rapport d’inventaire tournant // Initialiser le contrôle PDF (invisible à l'exécution) PDFGestion est un PDFControl PDFGestion.CréeDocument() // Ajouter une police et un titre PDFGestion.AjoutePolice("Arial", 14, gras) PDFGestion.AjouteTexte(10, 10, "INVENTAIRE MENSUEL - MAGASIN CENTRAL") PDFGestion.AjouteLigne(10, 25, 200, 25, 1)

iDestinationPDF(Etat_Stock, "Confidentiel.pdf") // Après génération PDFProtège("Confidentiel.pdf", "MotDePasseAdmin", "", "owner") Seul le mot de passe permettra l’impression ou la modification. Toujours tester si le répertoire de destination existe :