#Titre 4) OK Assuj. TVA, dette fiscale selon les encaissements (avec factures), (code TVA) #Factures #Cumul 1 #Date @DateFacture #Débit SI(@Total<0; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleCrédit ; SI (@Monnaie = 1 ; @VCptDefautArticleCréditME1; @VCptDefautArticleCréditME2)) ; DEFAUT(@RefClient.CompteDébit;@VCptDefautDébiteur) ) #Crédit SI(@Total<0; DEFAUT(@RefClient.CompteDébit;@VCptDefautDébiteur) ; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleCrédit ; SI (@Monnaie = 1 ; @VCptDefautArticleCréditME1; @VCptDefautArticleCréditME2)) ) #Pièce CHAINE(@Numéro) #Libellé SI(@Total<0;"Crédit émis ";"Facture émise ")+ CHAINE(@Numéro)+"/"+CHAINE(@RefClient)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+ ", brut " #Somme SI(@Total<0; -(@Total) ; @Total ) #Tva #Monnaie SI (DEFAUT(@Monnaie;0)=0 ; ""; @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5) ) #Analytique #Versements #Cumul 1 #Date @PDates[@SComptabilisationMen] #Débit SI(@Total<0; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleCrédit ; SI (@Monnaie = 1 ; @VCptDefautArticleCréditME1; @VCptDefautArticleCréditME2)) ; "..." ) #Crédit SI(@Total<0; "..." ; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleCrédit ; SI (@Monnaie = 1 ; @VCptDefautArticleCréditME1; @VCptDefautArticleCréditME2)) ) #Pièce SI(@Total<0; SI(@Payé=1; SI(COMPTE(@PMontants)=1; CHAINE(@Numéro)+"-C"; SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0; CHAINE(@Numéro)+"-CF"; CHAINE(@Numéro)+"-CA")); CHAINE(@Numéro)+"-CA"); SI(@Payé=1; SI(COMPTE(@PMontants)=1; CHAINE(@Numéro)+"-F"; SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0; CHAINE(@Numéro)+"-FF"; CHAINE(@Numéro)+"-F")); CHAINE(@Numéro)+"-V")) #Libellé SI(@Total<0;"Cré. ";"Fac. ")+ CHAINE(@Numéro)+"/"+CHAINE(@RefClient)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+ ", Articles" #Somme SI(@Total<0; -@PHTNonSoumis[@SComptabilisationMen]; @PHTNonSoumis[@SComptabilisationMen] ) #Tva #Monnaie SI (DEFAUT(@Monnaie;0)=0 ; ""; @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5) ) #Analytique #Date #Débit SI(@Total<0; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleCrédit ; SI (@Monnaie = 1 ; @VCptDefautArticleCréditME1; @VCptDefautArticleCréditME2)) ; "..." ) #Crédit SI(@Total<0; "..." ; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleCrédit ; SI (@Monnaie = 1 ; @VCptDefautArticleCréditME1; @VCptDefautArticleCréditME2)) ) #Pièce SI(@Total<0; SI(@Payé=1; SI(COMPTE(@PMontants)=1; CHAINE(@Numéro)+"-C"; SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0; CHAINE(@Numéro)+"-CF"; CHAINE(@Numéro)+"-CA")); CHAINE(@Numéro)+"-CA"); SI(@Payé=1; SI(COMPTE(@PMontants)=1; CHAINE(@Numéro)+"-F"; SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0; CHAINE(@Numéro)+"-FF"; CHAINE(@Numéro)+"-F")); CHAINE(@Numéro)+"-V")) #Libellé SI(@Total<0;"Cré. ";"Fac. ")+ CHAINE(@Numéro)+"/"+CHAINE(@RefClient)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+ ", Articles" #Somme SI(@Total<0; -(@PHTSoumisTVARéduit[@SComptabilisationMen]+@PTVATauxRéduit[@SComptabilisationMen]); @PHTSoumisTVARéduit[@SComptabilisationMen]+@PTVATauxRéduit[@SComptabilisationMen] ) #Tva @VCodeTVAVenteRéduit+"|"+CHAINE(@TVATauxRéduit) #Monnaie SI (DEFAUT(@Monnaie;0)=0 ; ""; @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5) ) #Analytique #Date #Débit SI(@Total<0; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleCrédit ; SI (@Monnaie = 1 ; @VCptDefautArticleCréditME1; @VCptDefautArticleCréditME2)) ; "...") #Crédit SI(@Total<0; "..." ; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleCrédit ; SI (@Monnaie = 1 ; @VCptDefautArticleCréditME1; @VCptDefautArticleCréditME2))) #Pièce SI(@Total<0; SI(@Payé=1; SI(COMPTE(@PMontants)=1; CHAINE(@Numéro)+"-C"; SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0; CHAINE(@Numéro)+"-CF"; CHAINE(@Numéro)+"-CA")); CHAINE(@Numéro)+"-CA"); SI(@Payé=1; SI(COMPTE(@PMontants)=1; CHAINE(@Numéro)+"-F"; SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0; CHAINE(@Numéro)+"-FF"; CHAINE(@Numéro)+"-F")); CHAINE(@Numéro)+"-V")) #Libellé SI(@Total<0;"Cré. ";"Fac. ") +CHAINE(@Numéro)+"/"+CHAINE(@RefClient)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+ ", Articles" #Somme SI(@Total<0; -(@PHTSoumisTVAHeb[@SComptabilisationMen]+@PTVATauxHeb[@SComptabilisationMen]); @PHTSoumisTVAHeb[@SComptabilisationMen]+@PTVATauxHeb[@SComptabilisationMen] ) #Tva @VCodeTVAVenteHeb+"|"+CHAINE(@TVATauxHeb) #Monnaie SI (DEFAUT(@Monnaie;0)=0 ; ""; @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5) ) #Analytique #Date #Débit SI(@Total<0; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleCrédit ; SI (@Monnaie = 1 ; @VCptDefautArticleCréditME1; @VCptDefautArticleCréditME2)) ; "...") #Crédit SI(@Total<0; "..." ; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleCrédit ; SI (@Monnaie = 1 ; @VCptDefautArticleCréditME1; @VCptDefautArticleCréditME2))) #Pièce SI(@Total<0; SI(@Payé=1; SI(COMPTE(@PMontants)=1; CHAINE(@Numéro)+"-C"; SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0; CHAINE(@Numéro)+"-CF"; CHAINE(@Numéro)+"-CA")); CHAINE(@Numéro)+"-CA"); SI(@Payé=1; SI(COMPTE(@PMontants)=1; CHAINE(@Numéro)+"-F"; SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0; CHAINE(@Numéro)+"-FF"; CHAINE(@Numéro)+"-F")); CHAINE(@Numéro)+"-V")) #Libellé SI(@Total<0; "Cré. ";"Fac. ") +CHAINE(@Numéro)+"/"+CHAINE(@RefClient)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+ ", Articles" #Somme SI(@Total<0; -(@PHTSoumisTVANormal[@SComptabilisationMen]+@PTVATauxNormal[@SComptabilisationMen]); @PHTSoumisTVANormal[@SComptabilisationMen]+@PTVATauxNormal[@SComptabilisationMen]) #Tva @VCodeTVAVenteNormal+"|"+CHAINE(@TVATauxNormal) #Monnaie SI (DEFAUT(@Monnaie;0)=0 ; ""; @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5) ) #Analytique #Date #Débit SI(@Total<0; "..."; CASE (@PTypePaiement[@SComptabilisationMen] ; @VCptPaiement00; @VCptPaiement01; @VCptPaiement02; @VCptPaiement03; @VCptPaiement04; @VCptPaiement05; @VCptPaiement06; @VCptPaiement07; @VCptPaiement08; @VCptPaiement09; @VCptPaiement10; @VCptPaiement11; @VCptPaiement12; @VCptPaiement13; @VCptPaiement14; @VCptPaiement10) ) #Crédit SI(@Total<0; CASE (@PTypePaiement[@SComptabilisationMen] ; @VCptPaiement00; @VCptPaiement01; @VCptPaiement02; @VCptPaiement03; @VCptPaiement04; @VCptPaiement05; @VCptPaiement06; @VCptPaiement07; @VCptPaiement08; @VCptPaiement09; @VCptPaiement10; @VCptPaiement11; @VCptPaiement12; @VCptPaiement13; @VCptPaiement14; @VCptPaiement10) ; "..." ) #Pièce SI(@Total<0; SI(@Payé=1; SI(COMPTE(@PMontants)=1; CHAINE(@Numéro)+"-C"; SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0; CHAINE(@Numéro)+"-CF"; CHAINE(@Numéro)+"-CA")); CHAINE(@Numéro)+"-CA"); SI(@Payé=1; SI(COMPTE(@PMontants)=1; CHAINE(@Numéro)+"-F"; SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0; CHAINE(@Numéro)+"-FF"; CHAINE(@Numéro)+"-FA")); CHAINE(@Numéro)+"-FA")) #Libellé SI(@Total<0;"Cré. ";"Fac. ") + CHAINE(@Numéro)+"/"+CHAINE(@RefClient)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+ ", brut" #Somme SI(@Total<0; -@PMontants[@SComptabilisationMen] ; @PMontants[@SComptabilisationMen] ) #Tva #Monnaie SI (DEFAUT(@Monnaie;0)=0 ; ""; @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5) ) #Analytique #Final #Cumul 1 #Date @PDates[COMPTE(@PDates)-1] #Débit SI(@Total<0; DEFAUT(@RefClient.CompteDébit;@VCptDefautDébiteur) ; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleCrédit ; SI (@Monnaie = 1 ; @VCptDefautArticleCréditME1; @VCptDefautArticleCréditME2)) ) #Crédit SI(@Total<0; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleCrédit ; SI (@Monnaie = 1 ; @VCptDefautArticleCréditME1; @VCptDefautArticleCréditME2)) ; DEFAUT(@RefClient.CompteDébit;@VCptDefautDébiteur) ) #Pièce CHAINE(@Numéro) #Libellé SI(@Total<0;"Crédit réglé ";"Facture réglée")+ CHAINE(@Numéro)+"/"+CHAINE(@RefClient)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+ ", brut " #Somme SI(@Total<0; -(@Total) ; @Total ) #Tva #Monnaie SI (DEFAUT(@Monnaie;0)=0 ; ""; @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5) ) #Analytique #Payé @Payé=1 #Accompte @PMontants #Commandes #Cumul 1 #Date @DateFacture #Débit SI(@Total<0; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleDébit ; SI (@Monnaie = 1 ; @VCptDefautArticleDébitME1; @VCptDefautArticleDébitME2)) ; DEFAUT(@RefFournisseur.CompteCrédit ; @VCptDefautCréancier) ) #Crédit SI(@Total<0; DEFAUT(@RefFournisseur.CompteCrédit ; @VCptDefautCréancier) ; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleDébit ; SI (@Monnaie = 1 ; @VCptDefautArticleDébitME1; @VCptDefautArticleDébitME2)) ) #Pièce CHAINE(@Numéro) #Libellé SI(@Total<0;"Crédit émis ";"Facture émise ") +CHAINE(@Numéro)+"/"+CHAINE(@RefFournisseur)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+ ", brut " #Somme SI(@Total<0; -(@Total) ; @Total ) #Tva #Monnaie SI (DEFAUT(@Monnaie;0)=0 ; ""; @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5) ) #Analytique #Versements #Cumul 1 #Date SI (CONTIENT ( @DTAEtat[@SComptabilisationMen]; "*P*" );@PDates[@SComptabilisationMen];"") #Débit SI(@Total<0; "..." ; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleDébit ; SI (@Monnaie = 1 ; @VCptDefautArticleDébitME1; @VCptDefautArticleDébitME2)) ) #Crédit SI(@Total<0; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleDébit ; SI (@Monnaie = 1 ; @VCptDefautArticleDébitME1; @VCptDefautArticleDébitME2)) ; "..." ) #Pièce SI(@Total<0; SI(@Payé=1; SI(COMPTE(@PMontants)=1; CHAINE(@Numéro)+"-C"; SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0; CHAINE(@Numéro)+"-CF"; CHAINE(@Numéro)+"-CA")); CHAINE(@Numéro)+"-CA"); SI(@Payé=1; SI(COMPTE(@PMontants)=1; CHAINE(@Numéro)+"-F"; SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0; CHAINE(@Numéro)+"-FF"; CHAINE(@Numéro)+"-F")); CHAINE(@Numéro)+"-V")) #Libellé SI(@Total<0;"Cré. F ";"Fac. F ")+ CHAINE(@Numéro)+"/"+CHAINE(@RefFournisseur)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+ ", articles" // SI( CONTIENT(NOMCOMPTE(@CompteDébit); "*TVA*" ); ", TVA seule (douane)";) #Somme SI(@Total<0; -@PHTNonSoumis[@SComptabilisationMen]; @PHTNonSoumis[@SComptabilisationMen] ) #Tva #Monnaie SI (DEFAUT(@Monnaie;0)=0 ; ""; @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5) ) #Analytique #Date #Débit SI(@Total<0; "..."; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleDébit ; SI (@Monnaie = 1 ; @VCptDefautArticleDébitME1; @VCptDefautArticleDébitME2)) ) #Crédit SI(@Total<0; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleDébit ; SI (@Monnaie = 1 ; @VCptDefautArticleDébitME1; @VCptDefautArticleDébitME2)) ;"...") #Pièce SI(@Total<0; SI(@Payé=1; SI(COMPTE(@PMontants)=1; CHAINE(@Numéro)+"-C"; SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0; CHAINE(@Numéro)+"-CF"; CHAINE(@Numéro)+"-CA")); CHAINE(@Numéro)+"-CA"); SI(@Payé=1; SI(COMPTE(@PMontants)=1; CHAINE(@Numéro)+"-F"; SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0; CHAINE(@Numéro)+"-FF"; CHAINE(@Numéro)+"-F")); CHAINE(@Numéro)+"-V")) #Libellé SI(@Total<0;"Cré. F ";"Fac. F ") +CHAINE(@Numéro)+"/"+CHAINE(@RefFournisseur)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+ ", Articles" #Somme SI(@Total<0; -(@PHTSoumisTVARéduit[@SComptabilisationMen]+@PTVATauxRéduit[@SComptabilisationMen]); @PHTSoumisTVARéduit[@SComptabilisationMen]+@PTVATauxRéduit[@SComptabilisationMen] ) #Tva @VCodeTVAAchatRéduit+"|"+CHAINE(@TVATauxRéduit) #Monnaie SI (DEFAUT(@Monnaie;0)=0 ; ""; @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5) ) #Analytique #Date #Débit SI(@Total<0; "..." ; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleDébit ; SI (@Monnaie = 1 ; @VCptDefautArticleDébitME1; @VCptDefautArticleDébitME2)) ) #Crédit SI(@Total<0; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleDébit ; SI (@Monnaie = 1 ; @VCptDefautArticleDébitME1; @VCptDefautArticleDébitME2)) ; "...") #Pièce SI(@Total<0; SI(@Payé=1; SI(COMPTE(@PMontants)=1; CHAINE(@Numéro)+"-C"; SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0; CHAINE(@Numéro)+"-CF"; CHAINE(@Numéro)+"-CA")); CHAINE(@Numéro)+"-CA"); SI(@Payé=1; SI(COMPTE(@PMontants)=1; CHAINE(@Numéro)+"-F"; SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0; CHAINE(@Numéro)+"-FF"; CHAINE(@Numéro)+"-F")); CHAINE(@Numéro)+"-V")) #Libellé SI(@Total<0; "Cré. F ";"Fac. F ") +CHAINE(@Numéro)+"/"+CHAINE(@RefFournisseur)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+ ", Articles" #Somme SI(@Total<0; -(@PHTSoumisTVANormal[@SComptabilisationMen]+@PTVATauxNormal[@SComptabilisationMen]); @PHTSoumisTVANormal[@SComptabilisationMen]+@PTVATauxNormal[@SComptabilisationMen] ) #Tva @VCodeTVAAchatNormal+"|"+CHAINE(@TVATauxNormal) #Monnaie SI (DEFAUT(@Monnaie;0)=0 ; ""; @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5) ) #Analytique #Date #Débit SI(@Total<0; CASE (@PTypePaiement[@SComptabilisationMen] ; @VCptPaiement00; @VCptPaiement01; @VCptPaiement02; @VCptPaiement03; @VCptPaiement04; @VCptPaiement05; @VCptPaiement06; @VCptPaiement07; @VCptPaiement08; @VCptPaiement09; @VCptPaiement10; @VCptPaiement11; @VCptPaiement12; @VCptPaiement13; @VCptPaiement14; @VCptPaiement10) ; "..." ) #Crédit SI(@Total<0; "..." ; CASE (@PTypePaiement[@SComptabilisationMen] ; @VCptPaiement00; @VCptPaiement01; @VCptPaiement02; @VCptPaiement03; @VCptPaiement04; @VCptPaiement05; @VCptPaiement06; @VCptPaiement07; @VCptPaiement08; @VCptPaiement09; @VCptPaiement10; @VCptPaiement11; @VCptPaiement12; @VCptPaiement13; @VCptPaiement14; @VCptPaiement10) ) #Pièce SI(@Total<0; SI(@Payé=1; SI(COMPTE(@PMontants)=1; CHAINE(@Numéro)+"-C"; SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0; CHAINE(@Numéro)+"-CF"; CHAINE(@Numéro)+"-CA")); CHAINE(@Numéro)+"-CA"); SI(@Payé=1; SI(COMPTE(@PMontants)=1; CHAINE(@Numéro)+"-F"; SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0; CHAINE(@Numéro)+"-FF"; CHAINE(@Numéro)+"-FA")); CHAINE(@Numéro)+"-FA")) #Libellé SI(@Total<0;"Cré. F ";"Fac. F ") + CHAINE(@Numéro)+"/"+CHAINE(@RefFournisseur)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+ ", brut" #Somme SI(@Total<0; -@PMontants[@SComptabilisationMen] ; @PMontants[@SComptabilisationMen] ) #Tva #Monnaie SI (DEFAUT(@Monnaie;0)=0 ; ""; @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5) ) #Analytique #Final #Cumul 1 #Date @PDates[COMPTE(@PDates)-1] #Débit SI(@Total<0; DEFAUT(@RefFournisseur.CompteCrédit ; @VCptDefautCréancier); SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleDébit ; SI (@Monnaie = 1 ; @VCptDefautArticleDébitME1; @VCptDefautArticleDébitME2)) ) #Crédit SI(@Total<0; SI(DEFAUT(@Monnaie;0)=0 ; @VCptDefautArticleDébit ; SI (@Monnaie = 1 ; @VCptDefautArticleDébitME1; @VCptDefautArticleDébitME2)) ; DEFAUT(@RefFournisseur.CompteCrédit ; @VCptDefautCréancier)) #Pièce CHAINE(@Numéro) #Libellé SI(@Total<0;"Crédit réglé ";"Facture réglée")+ CHAINE(@Numéro)+"/"+CHAINE(@RefFournisseur)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+ ", brut " #Somme SI(@Total<0; -(@Total) ; @Total ) #Tva #Monnaie SI (DEFAUT(@Monnaie;0)=0 ; ""; @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5) ) #Analytique #Payé @Payé=1 #Accompte @PMontants