[Résolu] Problème Base de données relationnelles |
Sujet: [Résolu] Problème Base de données relationnelles par fabou3377 sur 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 |