[Résolu] Problème Base de données relationnelles
Posté par fabou3377 le 25/6/2006 15:07:08
Bonjour,
problème avec tables relationnelles.
Mon analyse:
1/ Table Commande
(IDCommande,NumCommande,NumCLient,TotalCommande)
2/Table CommandeLigne (Détail de la commande)
(IDCommandeLigne,NumCommande,NumArticle,NumClient,QteArticle,DesignArticle,PrixVenteArticle,TotalLigne)
3/Table Ecritures
(IDEcritures,NumClient,TotalEcriture,NumCommande,NumAccompte)
Mes Liaisons:
Table Commande(1,n)--NumCommande-->(1,1)CommandeLigne
Table Commande(1,1)--NumCommande-->(0,1)Ecritures
J'ai une procédure ValiderCommande qui me permet d'enregister ma commande, cependant j'ai à chaque fois des erreurs de cardinalités voici ma procédure:
PROCEDURE Valider_commande()
nbreligne est un entier
i est un entier
SI COMBO_Clients = "" ALORS
Info("Veuillez choisir un client valide")
RETOUR
FIN
SELON Dialogue("Etes-vous sûr de valider cette commande?")
// Oui
CAS 1
//On ajoute la commande dans la table commande
Commande.NumClient=COMBO_Clients..Valeur
Commande.NumCommande=SAI_NumCommande..Valeur
Commande.TotalCommande=SAI_TotalTTC
HAjoute(Commande)
//On ajoute l'écriture
Ecritures.NumClient=COMBO_Clients..Valeur
//Ecritures.NumCommande = SAI_NumCommande..Valeur
Ecritures.TotalEcriture=SAI_TotalTTC..Valeur
HAjoute(Ecritures)
//On ajoute les informations de la commande dans la table commande ligne
nbreligne = TableOccurrence(TABLE_Articles)
POUR i=1 A nbreligne
CommandeLigne.NumCommande = Commande.NumCommande
CommandeLigne.NumClient= COMBO_Clients.COL_NumClients
CommandeLigne.TotalLigne = SAI_TotalTTC..Valeur
TableSelectPlus(TABLE_Articles,i)
CommandeLigne.QteArticle=TABLE_Articles.COL_Quantité
CommandeLigne.NumArticle=TABLE_Articles.COL_NumArticle
CommandeLigne.DesignArticle=TABLE_Articles.COL_Designation
CommandeLigne.PrixVenteArticle=TABLE_Articles.COL_PrixVente
CommandeLigne.TotalLigne=TABLE_Articles.COL_Prix_Total
HAjoute(CommandeLigne)
FIN
Info("Votre commande a été enregistrée")
MDIOuvre(FEN_Menu_Commandes)
Ferme(FEN_commandes)
// Non
CAS 2
RETOUR
FIN
Merci pour votre aide
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=17&topic_id=4271&post_id=17592