Bonsoir les Amis
je suis nouveau en développement Windev
je développe une application dans le domaine du textile
j'aimerai recevoir une aide le but de mon est de faire des enregistrement simultanément concernant la création des balles.
Voici comment se présente mon code. c'est que je dois attribuer des numéros a des balles de pagnes après un impression car une impression peut donner plusieurs balles. après impressions, on crée les balles et ces balles sont numérotées en fonction de la date et du numéro d'ordre c'est-a-dire qu'on fait une concaténation de la date de création et du numéro d'ordre. Elles(balles) sont répertoriées sur une liste qu'on appelle liste de colisage. Mon but est d'attribuer des numéros et enregistrer automatiquement les balles en fonction du nombre de balle créer.
Mais lorsque lance je suis obliger de valider i fois pour que ça enregistre les baller or je veux une seule confirmation. Merci de m'aider
Voici mon code
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 i est un entier = 0 xNbrballe est un numérique = SAI_NbreBalle xNumOrdre est un numérique = SAI_NumeroOrdre //sNumballe est une chaine nAccepter est un entier TANTQUE i <= SAI_NbreBalle Balle.DateCreation = SAI_DateCreation Balle.NumeroOrdre = SAI_NumeroOrdre+i Balle.NumeroBalle = SAI_DateCreation+"-"+Balle.NumeroOrdre Balle.Variante = SAI_Variante Balle.NumImpression = SAI_NumImpression Balle.Grade = SAI_Grade Balle.Unite = SEL_Unite Balle.NbrePiece = SAI_NbrePiece i++ TitreSuivant("Creation de Balle") nAccepter = Confirmer("Voulez-vous créer "+" "+SAI_NbreBalle) SELON nAccepter CAS Oui : HAjoute(Balle) CAS Non : Ferme() CAS Annuler: RepriseSaisie() FIN FIN //exécution de la requête de creation des balles HExécuteRequête(REQ_GestionBalle) TableAffiche(TABLE_REQ_GestionBalle,taRéExecuteRequete)
Partager