#Titre
  8) OK Assujettissement TVA forfaitaire, selon la facturation

#Factures
#Cumul
1

#Date
@DateFacture
#Débit
SI(@Total<0;
DEFAUT(@RefArticles.CompteCrédit[DEFAUT(@Monnaie;0)];
SI(DEFAUT(@Monnaie;0)=0 ;
        @VCptDefautArticleCrédit ;
        SI (@Monnaie = 1 ; 
            @VCptDefautArticleCréditME1;
            @VCptDefautArticleCréditME2)));
"")
#Crédit
SI(@Total<0;"...";"")
#Pièce
CHAINE(@Numéro)
#Libellé
"Crédit  "+CHAINE(@Numéro)+"/"+CHAINE(@RefClient)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+
", articles"
#Somme
-(@ATotauxLignesNetHT+@ATotauxLignesTVA)
#Tva

#Monnaie
SI (DEFAUT(@Monnaie;0)=0 ;
    "";
    @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5)
    )
    
#Analytique


#Date

#Débit
SI(@Total<0;"";"...")
#Crédit
SI(@Total<0;"";
DEFAUT(@RefArticles.CompteCrédit[DEFAUT(@Monnaie;0)];
SI(DEFAUT(@Monnaie;0)=0 ;
        @VCptDefautArticleCrédit ;
        SI (@Monnaie = 1 ; 
            @VCptDefautArticleCréditME1;
            @VCptDefautArticleCréditME2))
))
#Pièce
CHAINE(@Numéro)
#Libellé
"Facture "+CHAINE(@Numéro)+"/"+CHAINE(@RefClient)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+
", articles"
#Somme
@ATotauxLignesNetHT+@ATotauxLignesTVA
#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 ;
        @VCptFraisVente ;
        SI (@Monnaie = 1 ; 
            @VCptFraisVenteME1;
            @VCptFraisVenteME2))

;"...")
#Crédit
SI(@Total<0;"...";
SI(DEFAUT(@Monnaie;0)=0 ;
        @VCptFraisVente ;
        SI (@Monnaie = 1 ; 
            @VCptFraisVenteME1;
            @VCptFraisVenteME2)
            ))
#Pièce
CHAINE(@Numéro)
#Libellé
SI(@Total<0;"Crédit  ";"Facture ")+
   CHAINE(@Numéro)+"/"+CHAINE(@RefClient) +" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+
", frais"
#Somme
CHAINE(SI(@Total<0;  -(@FraisEmballageHT+@TVATotalEmballage);    @FraisEmballageHT+@TVATotalEmballage))+" +/-0.05"
#Tva

#Monnaie
SI (DEFAUT(@Monnaie;0)=0 ;
    "";
    @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5)
    )
    
#Analytique


#Date

#Débit
SI(@Total<0;"...";DEFAUT(@RefClient.CompteDébit;@VCptDefautDébiteur))
#Crédit
SI(@Total<0;DEFAUT(@RefClient.CompteDébit;@VCptDefautDébiteur);"...")
#Pièce
CHAINE(@Numéro)
#Libellé
SI(@Total<0;"Crédit  ";"Facture ")+
   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; 
DEFAUT(@RefClient.CompteDébit;@VCptDefautDébiteur);  
  CASE (@PTypePaiement[@SComptabilisationMen] ;
  @VCptPaiement00;
  @VCptPaiement01;
  @VCptPaiement02;
  @VCptPaiement03;
  @VCptPaiement04;
  @VCptPaiement05;
  @VCptPaiement06;
  @VCptPaiement07;
  @VCptPaiement08;
  @VCptPaiement09;
  @VCptPaiement10;
  @VCptPaiement11;
  @VCptPaiement12;
  @VCptPaiement13;
  @VCptPaiement14;
  @VCptPaiement10)
  )
#Crédit
SI(@Total>0; 
DEFAUT(@RefClient.CompteDébit;@VCptDefautDébiteur);  
  CASE (@PTypePaiement[@SComptabilisationMen] ;
  @VCptPaiement00;
  @VCptPaiement01;
  @VCptPaiement02;
  @VCptPaiement03;
  @VCptPaiement04;
  @VCptPaiement05;
  @VCptPaiement06;
  @VCptPaiement07;
  @VCptPaiement08;
  @VCptPaiement09;
  @VCptPaiement10;
  @VCptPaiement11;
  @VCptPaiement12;
  @VCptPaiement13;
  @VCptPaiement14;
  @VCptPaiement10)
 )
#Pièce
CHAINE(@Numéro)+"-V"
#Libellé
SI(@Total<0;"Crédit  ";"Facture ")+
   CHAINE(@Numéro)+"/"+CHAINE(@RefClient)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+
", versement"
#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))
#Crédit
SI(@Total<0; "" ;
SI(DEFAUT(@Monnaie;0)=0 ;
        @VCptFraisRappel ;
        SI (@Monnaie = 1 ; 
            @VCptFraisRappelME1;
            @VCptFraisRappelME2)))
#Pièce
CHAINE(@Numéro)+"-D"
#Libellé
SI(@Total<0;"Crédit  ";"Facture " )+
  CHAINE(@Numéro)+"/"+CHAINE(@RefClient)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+
", Frais de rappel"
#Somme
  @FraisRappel
#Tva

#Monnaie
SI (DEFAUT(@Monnaie;0)=0 ;
    "";
    @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5)
    )
    
#Analytique


#Date

#Débit
SI(@Total<0;
DEFAUT(@RefClient.CompteDébit;@VCptDefautDébiteur);

SI(DEFAUT(@Monnaie;0)=0 ;
        @VCptEscAccordé ;
        SI (@Monnaie = 1 ; 
            @VCptEscAccordéME1;
            @VCptEscAccordéME2))
            

)
#Crédit
SI(@Total<0;
SI(DEFAUT(@Monnaie;0)=0 ;
        @VCptEscAccordé ;
        SI (@Monnaie = 1 ; 
            @VCptEscAccordéME1;
            @VCptEscAccordéME2))
;DEFAUT(@RefClient.CompteDébit;@VCptDefautDébiteur))
#Pièce
CHAINE(@Numéro)+"-D"
#Libellé
SI(@Total<0;"Crédit  ";"Facture " )+
CHAINE(@Numéro)+"/"+CHAINE(@RefClient)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+
", décompte final"
#Somme
SI(@PEscompteAccordé=0;""; SI(@Total<0;  -(@PEscompteAccordé);    @PEscompteAccordé))
#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;"...";"")
#Crédit
SI(@Total<0;
DEFAUT(@CompteDébit;
SI(DEFAUT(@Monnaie;0)=0 ;
        @VCptDefautArticleDébit ;
        SI (@Monnaie = 1 ; 
            @VCptDefautArticleDébitME1;
            @VCptDefautArticleDébitME2))
            );"")
#Pièce
CHAINE(@Numéro)
#Libellé
"Créd. achat "
+CHAINE(@Numéro)+"/"+CHAINE(@RefFournisseur)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+
", articles "
#Somme
-(DEFAUT(@ATotalNonSoumisTVA;0)+DEFAUT(@ATotalSoumisTVARéd;0)+DEFAUT(@ATotalSoumisTVANor;0)+  DEFAUT(@TVATotalTauxRéduit;0)+DEFAUT(@TVATotalTauxNormal;0))
#Tva

#Monnaie
SI (DEFAUT(@Monnaie;0)=0 ;
    "";
    @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5)
    )
    
#Analytique


#Date

#Débit
SI(@Total<0;"";
DEFAUT(@CompteDébit;
SI(DEFAUT(@Monnaie;0)=0 ;
        @VCptDefautArticleDébit ;
        SI (@Monnaie = 1 ; 
            @VCptDefautArticleDébitME1;
            @VCptDefautArticleDébitME2))
))
#Crédit
SI(@Total<0;"";"...")
#Pièce
CHAINE(@Numéro)
#Libellé
"Fact. achat "+
CHAINE(@Numéro)+"/"+CHAINE(@RefFournisseur)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+
", articles "
#Somme
DEFAUT(@ATotalNonSoumisTVA;0)+DEFAUT(@ATotalHTSoumisTVARéd;0)+DEFAUT(@ATotalHTSoumisTVANor;0)+  DEFAUT(@TVATotalTauxRéduit;0)+DEFAUT(@TVATotalTauxNormal;0)
#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 ;
        @VCptFraisAchat ;
        SI (@Monnaie = 1 ; 
            @VCptFraisAchatME1;
            @VCptFraisAchatME2))
            
            )
#Crédit
SI(@Total<0;

SI(DEFAUT(@Monnaie;0)=0 ;
        @VCptFraisAchat ;
        SI (@Monnaie = 1 ; 
            @VCptFraisAchatME1;
            @VCptFraisAchatME2))

;"...")
#Pièce
CHAINE(@Numéro)
#Libellé
SI(@Total<0;"Créd. achat ";"Fact. achat ")+
  CHAINE(@Numéro)+"/"+CHAINE(@RefFournisseur)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+
", frais "
#Somme
SI(DEFAUT(@FraisEmballageHT;0)+DEFAUT(@MontantCorrectif;0)=0;"";CHAINE(SI(@Total<0;-(DEFAUT(@FraisEmballageHT;0)+DEFAUT(@MontantCorrectif;0))+DEFAUT(@TVATotalEmballage;0);  DEFAUT(@FraisEmballageHT;0)+DEFAUT(@MontantCorrectif;0))+DEFAUT(@TVATotalEmballage;0))+"+/-0.05")
#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 ;
        @VCptFraisPortVente ;
        SI (@Monnaie = 1 ; 
            @VCptFraisPortVenteME1;
            @VCptFraisPortVenteME2))
)
#Crédit
SI(@Total<0;
SI(DEFAUT(@Monnaie;0)=0 ;
        @VCptFraisPortVente ;
        SI (@Monnaie = 1 ; 
            @VCptFraisPortVenteME1;
            @VCptFraisPortVenteME2))
            ;"...")
#Pièce
CHAINE(@Numéro)
#Libellé
SI(@Total<0;"Créd. achat ";"Fact. achat ")+
  CHAINE(@Numéro)+"/"+CHAINE(@RefFournisseur)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+
", frais port"
#Somme
SI(@Total<0;-(DEFAUT(@FraisPort;0)); DEFAUT(@FraisPort;0))
#Tva

#Monnaie
SI (DEFAUT(@Monnaie;0)=0 ;
    "";
    @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5)
    )
    
#Analytique


#Date

#Débit
SI(@Total<0; 
DEFAUT(@RefFournisseur.CompteCrédit ; @VCptDefautCréancier)
;"...")
#Crédit
SI(@Total<0; 
"...";
DEFAUT(@RefFournisseur.CompteCrédit ; @VCptDefautCréancier))
#Pièce
CHAINE(@Numéro)
#Libellé
SI(@Total<0; "Créd. achat " ; "Fact. achat ")+
   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;
  CASE (@PTypePaiement[@SComptabilisationMen] ;
  @VCptPaiement00;
  @VCptPaiement01;
  @VCptPaiement02;
  @VCptPaiement03;
  @VCptPaiement04;
  @VCptPaiement05;
  @VCptPaiement06;
  @VCptPaiement07;
  @VCptPaiement08;
  @VCptPaiement09;
  @VCptPaiement10;
  @VCptPaiement11;
  @VCptPaiement12;
  @VCptPaiement13;
  @VCptPaiement14;
  @VCptPaiement10)
 ; DEFAUT(@RefFournisseur.CompteCrédit;@VCptDefautCréancier) )
#Crédit
SI(@Total<0;
      DEFAUT(@RefFournisseur.CompteCrédit;@VCptDefautCréancier)    ;  
  CASE (@PTypePaiement[@SComptabilisationMen] ;
  @VCptPaiement00;
  @VCptPaiement01;
  @VCptPaiement02;
  @VCptPaiement03;
  @VCptPaiement04;
  @VCptPaiement05;
  @VCptPaiement06;
  @VCptPaiement07;
  @VCptPaiement08;
  @VCptPaiement09;
  @VCptPaiement10;
  @VCptPaiement11;
  @VCptPaiement12;
  @VCptPaiement13;
  @VCptPaiement14;
  @VCptPaiement10)
      )
#Pièce
CHAINE(@Numéro)+"-V"
#Libellé
SI(@Total<0;"Créd. achat ";"Fact. achat ")+
  CHAINE(@Numéro)+"/"+CHAINE(@RefFournisseur)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+
", versement   "
#Somme
SI (CONTIENT ( @DTAEtat[@SComptabilisationMen]; "*P*" );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[@SComptabilisationMen]
#Débit
SI(@Total<0; 
 
SI(DEFAUT(@Monnaie;0)=0 ;
        @VCptEscObtenu ;
        SI (@Monnaie = 1 ; 
            @VCptEscObtenuME1;
            @VCptEscObtenuME2))
 ;  DEFAUT(@RefFournisseur.CompteCrédit ; @VCptDefautCréancier))
#Crédit
SI(@Total<0;
 DEFAUT(@RefFournisseur.CompteCrédit ; @VCptDefautCréancier); 
SI(DEFAUT(@Monnaie;0)=0 ;
        @VCptEscObtenu ;
        SI (@Monnaie = 1 ; 
            @VCptEscObtenuME1;
            @VCptEscObtenuME2))
            )
#Pièce
CHAINE(@Numéro)+"-D"
#Libellé
SI(@Total<0;"Créd. achat ";"Fact. achat " )+
CHAINE(@Numéro)+"/"+CHAINE(@RefFournisseur)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+
", décompte final "
#Somme
SI(@PSoldeDû=0;""; SI(@Total<0; -(@PEscompteObtenu );   @PEscompteObtenu ))
#Tva

#Monnaie
SI (DEFAUT(@Monnaie;0)=0 ;
    "";
    @Monnaie + "|"+CHAINE(DEFAUT(@TauxChange;1);5)
    )
    
#Analytique


#Payé
@Payé=1

#Accompte
@PMontants