Afin de limiter le risque de fraude fiscale, la loi interdit d’effectuer en espèces le paiement d’une dette supérieure à  1 000 € (C. mon. fin. art. L 112-6, I-al. 1 et D 112-3). Il convient de s’assurer régulièrement qu’aucun encaissement n’est réalisé en contravention avec la loi.

Le contrôle du respect de cette règle de droit s’inscrit totalement dans le cadre de la mise en œuvre d’un programme de supervision comptable à l’image du projet PADoCC. 

'Création table CAISSE_ENCAISSTSUP1K
NomReq = "ECRITUREStemp"
NomTable = "E255_CAISSE_ENCAISSTSUP1K"
TexteReq = ""
If TableExiste(DB_Groupe_SUPERVISION, NomTable) Then TexteReq = TexteReq & "INSERT INTO " & NomTable & " IN '" & dossier_Bases & NomBaseDestinationEnCours & "' "
TexteReq = TexteReq & "SELECT CodeEntité, EcritureNum, JournalCode, JournalLib, EcritureDateComptable, CompteNumHarmonisé, CompteNum, CompteLib, CompteAuxNum, CompteAuxLib, PièceRéf, PièceDate, EcritureLib, Débit, Crédit, Solde, ValidDate,"
TexteReq = TexteReq & " AAAAMM, TypeJournal, TypeEcriture, EcritureCompteNumTiers, EcritureCompteAuxNum, EcritureCompteAuxLib"
If Not (TableExiste(DB_Groupe_SUPERVISION, NomTable)) Then TexteReq = TexteReq & " INTO " & NomTable & " IN '" & dossier_Bases & NomBaseDestinationEnCours & "'"
TexteReq = TexteReq & " FROM [_ECRITURES]" & " IN '" & dossier_Bases & BDD_Final & "'"
TexteReq = TexteReq & " WHERE (([_ECRITURES].Solde<=-1000) AND ([_ECRITURES].Cpte1=""4"" Or [_ECRITURES].Cpte1=""7"") AND ([_ECRITURES].TypeJournal=""CAISSE""));"
ExéReq

Une simple requête SELECT… FROM… WHERE… suffit à répondre à ce besoin. La requête exposée ci-avant liste les champs (SELECT) de la table contenant les lignes d’écritures (FROM) pour lesquelles le montant créditeur est inférieur à mille euros (<=-1000) pour un compte de tiers (“4”) ou de produit (“7”) dans un journal de caisse ([_ECRITURES].TypeJournal=””CAISSE””).

Approfondir le sujet : Maîtriser ACCESS / Maîtriser le langage de requête SQL / Analyse de données

The following two tabs change content below.

• Bio
• Derniers articles

Benoît RIVIERE

Après seize années passées en cabinet d’expertise-comptable et de commissariat aux comptes (où j’ai exercé comme expert-comptable et chef de mission audit), j’ai pris le poste de directeur comptable d’un groupe de distribution automobile en novembre 2014. Au cours de ma carrière, j’ai acquis une expérience significative en audit et en exploitation des systèmes d’information (analyse de données, automatisation des tâches, programmation informatique) au service de la production des comptes annuels et consolidés. C’est cette expérience personnelle et ma passion pour l’informatique que je partage sur ce blog. Mon CV / Réalisations personnelles et projets informatiques / Ma collection / Me contacter

Derniers articles parBenoît RIVIERE (voir tous)

• Automatiser la réconciliation des transactions intercompagnies - dimanche 17 octobre 2021
• Le projet de guide pratique anticorruption à destination des PME et des petites ETI mis en consultation par l’AFA - samedi 16 octobre 2021
• Tiers autorisés : la CNIL publie un guide pratique et un recueil de procédures - jeudi 23 septembre 2021
• SQL : opérateur de comparaison LIKE - mardi 6 juillet 2021
• Comprendre et anticiper les attaques DDoS - samedi 8 mai 2021