#Titre
  7) OK Sans assujettissement TVA

#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
0

#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
DEFAUT(@DateRappel3 ;
 DEFAUT(@DateRappel2 ;
 DEFAUT (@DateRappel1 ;@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 ;
        @VCptFraisPortAchat ;
        SI (@Monnaie = 1 ; 
            @VCptFraisPortAchatME1;
            @VCptFraisPortAchatME2))
)
#Crédit
SI(@Total<0;
   SI(DEFAUT(@Monnaie;0)=0 ;
        @VCptFraisPortAchat ;
        SI (@Monnaie = 1 ; 
            @VCptFraisPortAchatME1;
            @VCptFraisPortAchatME2))
;"...")
#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;"";
  DEFAUT(@RefFournisseur.CompteCrédit;@VCptDefautCréancier))
#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;
     DEFAUT(@RefFournisseur.CompteCrédit;@VCptDefautCréancier);
     "")
#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 ;
        @VCptEscObtenu ;
        SI (@Monnaie = 1 ; 
            @VCptEscObtenuME1;
            @VCptEscObtenuME2))
)
#Crédit
SI(@Total<0;
    SI(DEFAUT(@Monnaie;0)=0 ;
        @VCptEscObtenu ;
        SI (@Monnaie = 1 ; 
            @VCptEscObtenuME1;
            @VCptEscObtenuME2))
;
    DEFAUT(@RefFournisseur.CompteCrédit ; @VCptDefautCréancier)
)
#Pièce
CHAINE(@Numéro)+"-D"
#Libellé
SI(@Total<0;"Crédit  ";"Facture " )+
CHAINE(@Numéro)+"/"+CHAINE(@RefFournisseur)+" "+GAUCHE(@NomRéférence;@VLongueurTxtCompta)+
", décompte final"
#Somme
SI(@PEscompteObtenu=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