#Titre
  6) OK Assuj. TVA forfaitaire, selon les encaissements (avec factures)

#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;
  ""  ;
  CASE (@PTypePaiement[@SComptabilisationMen] ;
  @VCptPaiement00;
  @VCptPaiement01;
  @VCptPaiement02;
  @VCptPaiement03;
  @VCptPaiement04;
  @VCptPaiement05;
  @VCptPaiement06;
  @VCptPaiement07;
  @VCptPaiement08;
  @VCptPaiement09;
  @VCptPaiement10;
  @VCptPaiement11;
  @VCptPaiement12;
  @VCptPaiement13;
  @VCptPaiement14;
  @VCptPaiement10)
  )
#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)+"-F";
     SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0;
       CHAINE(@Numéro)+"-FF";
       CHAINE(@Numéro)+"-FA"));
   CHAINE(@Numéro)+"-FA"))
#Libellé
 "Fac. "+CHAINE(@Numéro)+"/"+CHAINE(@RefClient)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)
#Somme
 @PMontants[@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;
  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");"")
#Libellé
  "Cré. "+CHAINE(@Numéro)+"/"+CHAINE(@RefClient)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)
#Somme
 -@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;    ""    ;
  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)+"-F";
     SI(DEFAUT(@PMontants[@SComptabilisationMen+1];0)=0;
       CHAINE(@Numéro)+"-FF";
       CHAINE(@Numéro)+"-FA"));
   CHAINE(@Numéro)+"-FA"))
#Libellé
 "Fac. F "+CHAINE(@Numéro)+"/"+CHAINE(@RefFournisseur)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)
#Somme
  @PMontants[@SComptabilisationMen]
#Tva

#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;
   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");
  "")
#Libellé
 "Cré. F "+CHAINE(@Numéro)+"/"+CHAINE(@RefFournisseur)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)
#Somme
  -@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