private void addVbcLigneToAbcExistant(IBODocumentVenteLigne3 ligneV, LiaisonCde liaison)
        {
            IBODocumentAchat3 docA = GetInstance().FactoryDocumentAchat.ReadPiece(DocumentType.DocumentTypeAchatCommandeConf, liaison.NumPiece);

            foreach (IBODocumentAchatLigne3 ligneA in docA.FactoryDocumentLigne.List)
            {
                int dlNoIn = int.Parse(ligneA.InfoLibre["DLNo"]);
                if (dlNoIn == liaison.DLNoIn)
                {
                    // Si la quantité demandée est inférieure à la quantité de la ligne
                    if (liaison.Qte < liaison.DlQteBL)
                    {
                        IBODocumentAchatLigne3 liaisonALigne = (IBODocumentAchatLigne3)docA.FactoryDocumentLigne.Create();
                        addArticleFromLigneAToLigneB(ligneA, liaisonALigne, liaison.Qte);

                        // Force le prix d'achat de la ligne d'origine (peut être une cde depot)
                        if (liaisonALigne.Fournisseur.CT_Num != ligneA.Article.FournisseurPrincipal.Fournisseur.CT_Num)
                        {
                            liaisonALigne.DL_PrixUnitaire = ligneA.DL_PrixUnitaire;
                        }

                        double conversion = 1;
                        double convDiv    = 1;
                        foreach (IBOArticleTarifFournisseur3 tarif in ligneA.Article.FactoryArticleTarifFournisseur.List)
                        {
                            if (tarif.Fournisseur == docA.Fournisseur)
                            {
                                conversion = tarif.AF_Conversion;
                                convDiv    = tarif.AF_ConvDiv;
                            }
                        }

                        liaisonALigne.DL_Qte = liaison.Qte;
                        liaisonALigne.EU_Qte = (liaison.Qte / conversion) * convDiv;
                        liaisonALigne.SetDefaultRemise();
                        liaisonALigne.Collaborateur     = ligneV.Collaborateur;
                        liaisonALigne.DO_Ref            = liaison.DlNoOut.ToString();
                        liaisonALigne.DL_Design         = ligneV.DL_Design;
                        liaisonALigne.TxtComplementaire = ligneV.TxtComplementaire;
                        liaisonALigne.Write();
                        liaisonALigne.Refresh();
                        dlNoIn = int.Parse(liaisonALigne.InfoLibre["DLNo"]);

                        // Si la ligne d'origine avait déjà une contremarque
                        if (liaison.CMQteTotal > 0)
                        {
                            ligneA.DL_Qte = liaison.DlQteBL - liaison.Qte;
                            ligneA.EU_Qte = (ligneA.DL_Qte / conversion) * convDiv;
                            ligneA.SetDefaultRemise();
                            ligneA.Write();
                        }
                        else
                        {
                            // Crée une nouvelle ligne avec le delta à partir de la ligne d'origine
                            IBODocumentAchatLigne3 ligneACopy = (IBODocumentAchatLigne3)docA.FactoryDocumentLigne.Create();
                            double delta = liaison.DlQteBL - liaison.Qte;
                            addArticleFromLigneAToLigneB(ligneA, ligneACopy, delta);
                            if (ligneACopy.Fournisseur.CT_Num != ligneA.Article.FournisseurPrincipal.Fournisseur.CT_Num)
                            {
                                ligneACopy.DL_PrixUnitaire = ligneA.DL_PrixUnitaire;
                            }
                            ligneACopy.DL_Qte = delta;
                            ligneACopy.EU_Qte = (delta / conversion) * convDiv;
                            ligneACopy.SetDefaultRemise();
                            ligneACopy.Collaborateur     = ligneA.Collaborateur;
                            ligneACopy.DL_Design         = ligneA.DL_Design;
                            ligneACopy.TxtComplementaire = ligneA.TxtComplementaire;
                            ligneACopy.Write();
                            ligneACopy.Refresh();

                            // Supprime la ligne d'origine
                            ligneA.Remove();
                        }
                    }

                    // Ajout de la CM
                    using (SqlConnection cnx = new SqlConnection(cnxString)) {
                        cnx.Open();

                        using (SqlCommand cmd = cnx.CreateCommand())
                        {
                            cmd.CommandText = @"INSERT INTO F_CMLIEN(DL_NoOut, DL_NoIn, CM_Qte) VALUES(@dlNoOut, @dlNoIn, @cmQte)";
                            cmd.Parameters.AddWithValue("@dlNoOut", ligneV.InfoLibre["DLNo"]);
                            cmd.Parameters.AddWithValue("@dlNoIn", dlNoIn);
                            cmd.Parameters.AddWithValue("@cmQte", liaison.Qte);
                            cmd.ExecuteNonQuery();
                        }
                    }
                }
            }
        }
        /// <summary>
        /// Génère des APC en contremarque
        /// Envoi les APC au magasin cible
        /// </summary>
        /// <param name="CmLignes"></param>
        /// <param name="doPiece"></param>
        /// <param name="disableIntermag"></param>
        public void saveAll(Collection <Contremarque> CmLignes, string doPiece, bool disableIntermag)
        {
            var docV = (IBODocumentVente3)GetDocument(doPiece);

            if (!openBaseCial())
            {
                throw new Exception("Impossible de se connecter à Sage :-(");
            }

            #region Ajout ABC Existant
            // Prétraitement Si Ajout à ABC existant
            foreach (IBODocumentVenteLigne3 ligneV in docV.FactoryDocumentLigne.List)
            {
                int DLNo = int.Parse(ligneV.InfoLibre["DLNo"]);

                if (CmLignes.Count(c => c.DlNo == DLNo) == 0)
                {
                    continue;
                }

                Contremarque cm = CmLignes.Where(c => c.DlNo == DLNo).First();
                if (!cm.RowChecked)
                {
                    continue;
                }

                // Ajout a ABC existant (1 seul possible)
                double liaisonTot = cm.Liaisons.Sum(l => l.Qte);
                if (liaisonTot > 0)
                {
                    IEnumerable <LiaisonCde> liaisons = cm.Liaisons.Where(l => l.Qte > 0);
                    LiaisonCde liaison = liaisons.First();
                    Log($"Réserve {liaison.Qte} x {cm.RefMag} sur {liaison.NumPiece} existant");
                    liaison.DlNoOut = int.Parse(ligneV.InfoLibre["DLNo"]);
                    addVbcLigneToAbcExistant(ligneV, liaison);
                }
            }
            #endregion Ajout ABC Existant

            #region Groupe les lignes par fournisseur
            var dict = new Dictionary <string, Collection <Contremarque> >();
            foreach (Contremarque cm in CmLignes)
            {
                // Ne prend pas en compte les lignes déjà en contremarque ou avec liaison
                if (!cm.RowChecked || cm.NumPiece != "" || cm.Liaisons.Sum(l => l.Qte) > 0)
                {
                    continue;
                }

                string key = cm.SelectedFourn == "Principal" ? cm.FournPrinc : cm.SelectedFourn;
                if (!dict.ContainsKey(key))
                {
                    dict.Add(key, new Collection <Contremarque>());
                }

                dict[key].Add(cm);
            }
            if (dict.Count == 0)
            {
                return;
            }
            #endregion Groupe les lignes par fournisseur

            #region Ajout contremarque

            foreach (KeyValuePair <string, Collection <Contremarque> > entry in dict)
            {
                IPMDocument     procDocA;
                IBOFournisseur3 fourn;

                if (!entry.Value[0].IsInterMag)
                {
                    // Génération d'un APC Fournisseur
                    Log($"Génération d'un APC Fournisseur principal {entry.Value[0].FournPrinc}");
                    procDocA = GetInstance().CreateProcess_Document(DocumentType.DocumentTypeAchatCommande);
                    fourn    = GetInstance().CptaApplication.FactoryFournisseur.ReadNumero(entry.Value[0].FournPrinc);
                }
                else
                {
                    // Génération d'un ABC InterMag
                    Log($"Génération d'un ABC Fournisseur intermag {entry.Key}");
                    procDocA = GetInstance().CreateProcess_Document(DocumentType.DocumentTypeAchatCommandeConf);
                    using (SqlConnection cnx = new SqlConnection(cnxString))
                    {
                        cnx.Open();

                        using (SqlCommand cmd = cnx.CreateCommand())
                        {
                            cmd.CommandText = "SELECT CT_Num FROM F_COMPTET WHERE CT_Classement = @abrege AND CT_Type = 1";
                            cmd.Parameters.AddWithValue("@abrege", entry.Value[0].SelectedFourn);
                            using (SqlDataReader reader = cmd.ExecuteReader(CommandBehavior.SingleRow))
                            {
                                reader.Read();
                                fourn =
                                    GetInstance()
                                    .CptaApplication.FactoryFournisseur.ReadNumero((string)reader["CT_Num"]);
                            }
                        }
                    }
                }

                IBODocumentAchat3 docAEntete = (IBODocumentAchat3)procDocA.Document;
                docAEntete.DO_DateLivr = docV.DO_DateLivr;
                docAEntete.SetDefaultFournisseur(fourn);
                docAEntete.Collaborateur = docV.Collaborateur;

                foreach (Contremarque cm in entry.Value)
                {
                    IBODocumentAchatLigne3 docALigne = null;

                    if (cm.IsCommentaire)
                    {
                        docALigne           = (IBODocumentAchatLigne3)docAEntete.FactoryDocumentLigne.Create();
                        docALigne.DL_Design = cm.Design;
                        docALigne.WriteDefault();
                    }
                    else
                    {
                        // Retrouve la ligne de vente pour ajouter l'article
                        foreach (IBODocumentVenteLigne3 ligneV in docV.FactoryDocumentLigne.List)
                        {
                            int DLNo = int.Parse(ligneV.InfoLibre["DLNo"]);
                            if (DLNo == cm.DlNo)
                            {
                                double qt = cm.QteTotal;
                                docALigne           = (IBODocumentAchatLigne3)addArticleFromLigne(procDocA, ligneV, qt);
                                docALigne.DL_Design = cm.Design;
                                // Applique par defaut le conditionnement de vente
                                docALigne.DL_Qte         = qt;
                                docALigne.EU_Qte         = qt;
                                docALigne.EU_Enumere     = ligneV.Article.Unite.Intitule;
                                docALigne.AF_RefFourniss = cm.RefFourn;

                                // Tente de convertir si fourn princ
                                foreach (IBOArticleTarifFournisseur3 tarif in docALigne.Article.FactoryArticleTarifFournisseur.List)
                                {
                                    if (tarif.Fournisseur == fourn && tarif.AF_ConvDiv != tarif.AF_Conversion)
                                    {
                                        //Debug.Print($"{tarif.Article.AR_Ref}, {tarif.AF_Conversion}, {tarif.AF_ConvDiv}");
                                        double qtColisee = qt * (tarif.AF_ConvDiv / tarif.AF_Conversion);
                                        docALigne.EU_Qte     = qtColisee;
                                        docALigne.EU_Enumere = tarif.Unite.Intitule;
                                    }
                                }

                                docALigne.SetDefaultRemise();
                                docALigne.Collaborateur     = docV.Collaborateur;
                                docALigne.DO_Ref            = cm.DlNo.ToString();
                                docALigne.DO_DateLivr       = ligneV.DO_DateLivr;
                                docALigne.TxtComplementaire = cm.TexteComplementaire;
                                docALigne.Write();
                            }
                        }
                    }
                }

                // Si devis => Demande de prix
                // On applique après lacréation des ligne car sinon le DO_Ref va se copier sur chaque ligne
                if (CmLignes.First().Type == 0)
                {
                    docAEntete.DO_Ref    = "DEMANDE PRIX";
                    docAEntete.DO_Statut = DocumentStatutType.DocumentStatutTypeSaisie;
                }
                else
                {
                    docAEntete.DO_Ref    = "RESERVATION";
                    docAEntete.DO_Statut = DocumentStatutType.DocumentStatutTypeAPrepare;
                }

                // On vire les articles liés en doublons
                // on le sait car le champs DO_Ref est vide
                foreach (IBODocumentAchatLigne3 ligne in procDocA.Document.FactoryDocumentLigne.List)
                {
                    if (ligne.DO_Ref == "")
                    {
                        ligne.Remove();
                    }
                }

                if (procDocA.CanProcess)
                {
                    procDocA.Process();

                    foreach (IBODocumentAchatLigne3 ligne in GetDocument(docAEntete.DO_Piece).FactoryDocumentLigne.List)
                    {
                        if (ligne.Article != null && (ligne.Article.AR_Ref == "DIVERS" || ligne.Article.Famille.FA_CodeFamille == "UNIQUE"))
                        {
                            new DiversRepository().saveLigneAchat(ligne);
                        }
                    }
                }
                else
                {
                    Log(GetProcessError(procDocA));
                    return;
                }

                Log($"Document {docAEntete.DO_Piece} créé.");

                // Création des lignes de contremarque
                // Log("Création des lignes de contremarque");
                using (SqlConnection cnx = new SqlConnection(cnxString))
                {
                    cnx.Open();

                    foreach (Contremarque cm in entry.Value)
                    {
                        if (cm.IsCommentaire || cm.IsRemarqueInterne)
                        {
                            continue;
                        }

                        using (SqlCommand cmd = cnx.CreateCommand())
                        {
                            cmd.CommandText = @"INSERT INTO F_CMLIEN(DL_NoOut, DL_NoIn, CM_Qte) 
                                                    VALUES(@dlNoOut, (SELECT DL_No FROM F_DOCLIGNE WHERE DO_Ref = @dlNoOut AND DO_Piece = @doPiece), @cmQte)";
                            cmd.Parameters.AddWithValue("@dlNoOut", cm.DlNo.ToString());
                            cmd.Parameters.AddWithValue("@doPiece", docAEntete.DO_Piece);
                            cmd.Parameters.AddWithValue("@cmQte", Convert.ToDouble(cm.Qte, CultureInfo.CurrentCulture));
                            cmd.ExecuteNonQuery();
                        }
                    }

                    // Maj les NumPiece du doc achat
                    using (SqlCommand cmd = cnx.CreateCommand())
                    {
                        cmd.CommandText = "UPDATE F_DOCLIGNE SET DO_Ref = NULL, NumPiece = dbo.GET_CM_PIECE(DL_No) WHERE DO_Piece = @doPiece";
                        cmd.Parameters.AddWithValue("@doPiece", docAEntete.DO_Piece);
                        cmd.ExecuteNonQuery();
                    }

                    // Si c'est une commande intermag on envoie en intermag
                    if (entry.Value[0].IsInterMag)
                    {
                        // TODO A surveiller, reload le doc depuis la base car erreur Accès refusé
                        var docAchat = (IBODocumentAchat3)GetDocument(docAEntete.DO_Piece);
                        docAchat.DO_Statut = DocumentStatutType.DocumentStatutTypeSaisie;
                        docAchat.Write();

                        if (disableIntermag)
                        {
                            Log("La commande ne sera pas envoyée par intermag");
                        }
                        else
                        {
                            Log("Envoi de la commande intermag");

                            InterMagRepository imRepos = new InterMagRepository();
                            imRepos.Log += new InterMagRepository.LogEventHandler(Log);
                            imRepos.sendSqlCde(imRepos.getCommande(docAEntete.DO_Piece), entry.Value[0].SelectedFourn);
                        }
                    }
                }
                Log("------");
            } // endforeach dict

            // Maj les numPieces du doc vente
            using (var cnx = new SqlConnection(cnxString))
            {
                cnx.Open();
                using (var cmd = cnx.CreateCommand())
                {
                    cmd.CommandText = "UPDATE F_DOCLIGNE SET DO_Ref = NULL, NumPiece = dbo.GET_CM_PIECE(DL_No) WHERE DO_Piece = @doPiece";
                    cmd.Parameters.AddWithValue("@doPiece", docV.DO_Piece);
                    cmd.ExecuteNonQuery();
                }
            }
            #endregion Ajout contremarque
        }