U bevindt zich nu op een technische pagina over de software Mercator. Deze pagina bevat specifieke informatie die bestemd is voor professionals van de software Mercator. Wenst u naar algemenere informatie over Mercator door te gaan?


   Deze vraag niet meer stellen

Importeren van analytische kosten voor brandstoffacturen Total

0000002970     -      02-09-2020

Sinds 1 januari 2020 moeten de brandstofkosten worden uitgesplitst per voertuig, met het oog op de VU-berekening rekening houdend met verschillende voertuig gerelateerde parameters. Hier geven we een code die van toepassing is op facturen van leverancier Total. Het is gebaseerd op een Excel-bestand dat is verkregen van het Total-portaal, via "Mijn dagelijkse monitoring / dagelijkse transacties". Het selectiescherm moet als volgt worden ingevuld, waarbij de datums worden aangepast aan de factureringsperiode.

Nadat u op de knop "Zoeken" hebt geklikt, moet u op de knop klikken  om het juiste Excel-bestand te maken.

De onderstaande code moet in een knop van het invoerscherm van aankopen in de boekhouding worden geplaatst. Het veronderstelt dat het tankkaartnummer is opgeslagen in sleutel 3 van de analytische rekeningen. Het principe is als volgt :

  • De gebruiker start een inkoopinvoer en voert de leverancier in (Total)
  • Hij controleert het Regime aan de hand van de factuur die hij codeert
    • Is het een nationale factuur? -> Normaal
    • Is het een buitenlandse factuur? -> Vrijgesteld
  • Hij vult het bedrag van de factuur in. Als vanaf dat moment de standaard grootboekrekening correct wordt vermeld in het leveranciersbestand en als er op deze grootboekrekening een standaard btw-code aanwezig is, wordt de boeking naar het grootboek automatisch uitgevoerd.
  • De gebruiker klikt op de betreffende knop en deze voegt de bewegingen in de analytische boekhouding toe. Als het bestand het verbruik in verschillende landen bevat, kunt u in een dialoogvenster het land selecteren dat overeenkomt met de factuur die wordt gecodeerd.

De code van de knop is als volgt :

Zoom
using System;
using System.Collections.Generic;
using System.Text;
using System.Data;
using System.Linq;
using MercatorApi;
using MercatorController;
using System.Windows.Forms;
using MercatorExtensions;
using MercatorDatabase;


// <CompileWithRoslyn />

namespace MercatorUi.MovableControls.ButtonsCodes
{
    public static class Script
    {
        private const int plan = 1;

        public static void Exec(MercatorUi.MovableControls.MovableButton clickedButton)
        {
            if (!(clickedButton.Form is MercatorUi.Forms.Booking.BookingForm bookingForm))
                return;
            if ((bookingForm.BookingEngine.LIGNES_C.Rows.Count == 0) || string.IsNullOrWhiteSpace(bookingForm.BookingEngine.LignesCRecords[0].COMPTE))
            {
                MercatorUi.Dialogs.Stop("Il faut d'abord saisir le fournisseur et la première ligne d'imputation doit être complétée !");
                return;
            }
            
            string fichier = Dialogs.GetFile("Xls file (*.xls)|*.xls|All files (*.*)|*.*", _Divers.Iif_langue(Globals.Langue, "Which XLS file ?", "Welk XLS bestand ?", "Quel fichier XLS ?"), @"c:\");
            if (fichier == "")
                return;

            var r = MercatorImporter.Importer.Import(MercatorImporter.ImporterFormats.Excel2003, fichier);
            if (r == null)
                return;
            if (r.Result.Rows.Count == 0)
            {
                MercatorUi.Dialogs.Stop(Api.Iif_langue(MercatorUi.Globals.Langue, IifLangueEnum.NoRecordFound));
                return;
            }

            string[] countries = r.Result.Rows.Cast<DataRow>().GroupBy(p => (string)p["code partenaire"]).Select(p => (string)p.First()["code partenaire"]).ToArray();
            string country;
            if (countries.Length == 1)
            {
                country = countries[0];
            }
            else
            {
                var l = new List<MercatorUi._BaseClasses.MercatorComboItem>();
                foreach (string s in countries)
                    l.Add(new MercatorUi._BaseClasses.MercatorComboItem(s, s));
                var askComboRet = MercatorUi.Dialogs.AskCombo("Pour quel pays ?", l);
                if (askComboRet == null)
                    return;
                country = askComboRet.Id;
            }

            string montant_col = bookingForm.BookingEngine.PiedsCRecord.REGIME == RegimesEnum.Normal ? "montant ht" : "montant ttc";
            var data = r.Result.Rows.Cast<DataRow>().Where(c => c["code partenaire"].Equals(country)).GroupBy(p => (string)p["carte"]).Select(p => new KeyValuePair<string, decimal>((string)p.First()["carte"], p.Sum(dr => Convert.ToDecimal(dr[montant_col]))));
            var tot_xls = Convert.ToDouble(data.Sum(kvp => kvp.Value));
            if (tot_xls.CompareTo(bookingForm.BookingEngine.LignesCRecords[0].TOT_DV, 2) != 0)
            {
                string msg = string.Format("Différence entre le total du fichier et le montant dans l'imputation :\r\n"
                                         + "    Imputation = {0:### ##0.00} EUR\r\n"
                                         + "    Fichier = {1:### ##0.00} EUR\r\n"
                                         + "Continuer ?", bookingForm.BookingEngine.LignesCRecords[0].TOT_DV, tot_xls);
                if (!MercatorUi.Dialogs.AnswerYesNo(msg))
                    return;
            }

            bookingForm.BookingEngine.LIGNES_C_ANA.Rows.Clear();

            MercatorUi.Sig.Sig sigAna = MercatorUi.Sig._SigsStatic.SigByModule(Sig._SigEnum.ANA);
            string reqSql = string.Format("select {0} from ANA where (a_plan={1}) and (a_cle3 in ({2}))", sigAna.FieldsListForSelectRtrimOptimBytes, plan, string.Join(",", data.Select(kvp => "'" + kvp.Key + "'")));
            DataSet ds = Api.Zselect(MercatorUi.Globals.RepData, reqSql);
            if (ds == null)
                return;

            foreach(var kvp in data)
            {
                var anaRecord = ds.Tables[0].RowsEnumerable().FirstOrDefault(dr => dr["a_cle3"].Equals(kvp.Key));
                if (anaRecord == null)
                {
                    MercatorUi.Dialogs.Stop($"La carte {kvp.Key} n'est pas associée à un compte analytique !");
                    return;
                }
                int n = bookingForm.BookingEngine.AppendLineAna(plan, bookingForm.BookingEngine.LignesCRecords[0].DL_ID);
                if (!bookingForm.BookingEngine.InsertAnaFull(anaRecord, bookingForm.BookingEngine.LIGNES_C_ANA.Rows[n], plan))
                {
                    MercatorUi.Dialogs.Stop($"Impossible d'insérer le compte analytique \"{anaRecord["a_id"].ToString().TrimEnd()}\" lié à la carte {kvp.Key} !");
                    return;
                }
                bookingForm.BookingEngine.LIGNES_C_ANA.Rows[n]["tot_dv"] = kvp.Value;
            }

            bookingForm.BookingEngine.UpdateAmounts();
            MercatorUi.Dialogs.Stop("L'analytique a été appliquée !");
        }
    }
}

 

Om ervoor te zorgen dat de tankkaartnummers uniek zijn in de tabel met analytische rekeningen, raden we aan deze index te installeren :

CREATE UNIQUE NONCLUSTERED INDEX A_CLE3_UNIQUE_OR_EMPTY_IN_ANA ON dbo.ANA(A_CLE3) where a_cle3<>''