#Titre
Model

#Factures
#Cumul
1

#Date 1
//.                                         
//  Notez le numéro de cette fiche et corrigez-la.
//  Il doit y manquer la date de facture.
//  Le calcul ne peut pas s'effectuer
//
//  Nehmen Sie die Nummer dieser Karte zur Kenntnis und verbessern.
//  Er muss dort das Rechnungsdatum versäumen.
//  Die Berechnung kann nicht durchgeführt werden.
//                                         
//                                       
 SI( @`SProblèmeCompta = 0
     ; SI( OU( @`VTVAEntrepriseSoumise=0  //Selon Convenu
             ; @`VTVAEntrepriseSoumise=2
             ; @`VTVAEntrepriseSoumise=4
             ) 
         ; CASE( @`SImpressionFacture ; "" ; @`DateFacture )
         ; //SI( ET( DEFAUT(@`RefFactureAcompte ; 0 ) = @`Numéro  // Selon reçu ET acompte //Il y a une référence pas sur elle même (Facture de base)
           //      ; NOMBRE(MOT(LIGNE(@`VAcomptes;1);2;";"))      // Réglage AVEC acomptes
           //      )
           //  ; CASE( @`SImpressionFacture ; "" ; @`DateFacture )
            // ;
            ""
            // )
         )
     ; "" 
     )

#Débit 1
//Art
"..."

#Crédit 1
//Art
SI( @`VR_062_Multimonnaie = 0 
  ; DEFAUT( @`RefArticles.`CompteCrédit[0] 
          ;  MOT( LIGNE( @`VMonnaieData ; 1 ) ; 9 ; "|" ; 1 )  // Cpt Articles Vente  Crédit
          )
  ; DEFAUT( @`RefArticles.`CompteCrédit[TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF"))-1] 
          ;  MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 9 ; "|" ; 1)  // Cpt Articles Vente  Crédit
          )
  )

#Pièce 1
//P1
CHAINE(@`Numéro)

#Libellé 1
//CF1
SI( @`VMontreLigneCompta = 1 ; "CF1 : " ; "")+
GAUCHE (  CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )
        + DEFAUT(@`NomRéférence;"")+", "+DEFAUT(@`Notes;"")
        + SI( @`VComptabiliseLibellésAvecDétail
            ; ", " + @`ADésignation
            ; ""
            )
       ; 115
       )
// 5 décimales : 
// Avec indication du total à 5 décimales : enlever les 2 /
// Mit Hinweis der Gesamtzahl an 5 décimales:  Wegnehmen die 2 /
// + " " + CHAINE( (@`ATotauxLignesNetHT + @`ATotauxLignesTVA);5)

#Somme 1
//Prestations
  ( @`ATotauxLignesNetHT + @`ATotauxLignesTVA )
    * SI( @`VComptabilisationEnMM = 0 
        ; DEFAUT(@`TauxChange ; 1) 
        ; 1
        )

#Tva 1
//TVA art.
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; SI( @`Exportation ; @`VCodeTVAExportation
  ; SI( @`Exonéré ; @`VCodeTVAExonéré
      ; SI( OU( @`VTVAEntrepriseSoumise = 4
              ; @`VTVAEntrepriseSoumise = 5 
              )
          ; SI ( DEFAUT(@`RefArticles.`CodeTVADFN ; "") <> "" // TDFN -> code l'article si <> <Hors décompte>, code par défaut si vide
               ; SI ( NON ( CONTIENT(@`RefArticles.`CodeTVADFN ; "<*>"))
                    ; @`RefArticles.`CodeTVADFN
                    ; ""
                    )
               ; SI ( NON (CONTIENT(@`VCodeTVADFN1 ; "<*>"))
                    ; @`VCodeTVADFN1
                    ; ""
                    )
               )
          ; @`ACodeTVA 
            + SI( @`ACodeTVA = "" 
                ; ""
                ; "|"+CHAINE( @`ATVATaux)
                )
          )
      )
  )
  )

#Monnaie 1
//MM1
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie;"CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie;"CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 1
//V.182
//Analytique art
SI( @`VR_046_Analytique ; 
    SI ( DEFAUT (@`ACodeAnalytique;"") <> "" ;
         @`ACodeAnalytique ;
         @`FCodeAnalytique
       ) ; 
    ""
  )

#Période 1
//P1
SI( @`VR_046_Analytique ; 
        DEFAUT(  @`FPériodeAnalytique ; @`DateFacture ) ; 
    ""
    )

#Référence 1
//Ref1
CASE( NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" ))      
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 1

#Groupe 1
//G1
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
        ; "" 
//        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 2

#Débit 2
//Frais
"..."

#Crédit 2
//Frais port et emballage
SI( @`VR_062_Multimonnaie = 0 
  ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 16 ; "|" ;1 ) // Cpt Frais port et emballage
  ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 16 ; "|" ;1 )
  )

#Pièce 2
//P2
CHAINE(@`Numéro)

#Libellé 2
//CF2
SI( @`VMontreLigneCompta = 1;"CF2 : ";"")+
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )
+ @`NomRéférence+", "+DEFAUT(@`Notes;"")

#Somme 2
//Frais
( @`FraisEmballage )  
* SI( @`VComptabilisationEnMM = 0 
    ; DEFAUT(@`TauxChange ; 1) 
    ; 1
    )

#Tva 2
//TVA frais
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; SI( @`Exportation = 1 ; @`VCodeTVAExportation
  ; SI( @`Exonéré ; @`VCodeTVAExonéré
      ; SI( OU( @`VTVAEntrepriseSoumise = 4 
              ; @`VTVAEntrepriseSoumise = 5 
              ) 
          ; SI ( NON (CONTIENT(@`VCodeTVADFN1 ; "<*>"))
                ; @`VCodeTVADFN1
                ; ""
                )
          ; SI( MAX(@`ATVATaux ) = @`TVATauxNormal 
              ; @`VCodeTVAVenteNormal + "|"+CHAINE(@`TVATauxNormal ) 
              ; SI( MAX(@`ATVATaux ) = @`TVATauxRéduit 
                  ; @`VCodeTVAVenteRéduit + "|"+CHAINE(@`TVATauxRéduit ) 
                  ; "" 
                  )
              )
          )
      )
  )
  )

#Monnaie 2
//MM2
SI( @`VComptabilisationEnMM = 0
  ; "" 
  ; SI( DEFAUT(@`Monnaie;"CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie;"CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 2
//Date
//Analytique frais
SI( @`VR_046_Analytique ; 
    @`FCodeAnalytique; 
    ""
  )

#Période 2
//P2
SI( @`VR_046_Analytique ; 
        DEFAUT(  @`FPériodeAnalytique ; @`DateFacture ); 
    ""
    )

#Référence 2
//Ref2
CASE( NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" )) 
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 2

#Groupe 2
//G2
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) )   
        ; "" 
//        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 3

#Débit 3
//Frais
  "..."

#Crédit 3
//Arrondi
SI( @`VR_062_Multimonnaie = 0 
  ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 21 ; "|" ;1 ) // Cpt Arrondi
  ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 21 ; "|" ;1 ) 
  )

#Pièce 3
//P3
CHAINE(@`Numéro)

#Libellé 3
//CF3
SI( @`VMontreLigneCompta = 1; "CF3 : ";"")+
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )
+ @`NomRéférence+", "+DEFAUT(@`Notes;"")

#Somme 3
// Arrondi
CHAINE((@`TotalFacturé - @`TotalFacturé)
        * SI( @`VComptabilisationEnMM = 0
            ; DEFAUT(@`TauxChange ; 1) 
            ; 1
            )
        )
+" +/-1"

#Tva 3
//TVA frais
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; SI( @`Exportation = 1 ; @`VCodeTVAExportation
  ; SI( @`Exonéré ; @`VCodeTVAExonéré
      ; SI( OU( @`VTVAEntrepriseSoumise = 4 
              ; @`VTVAEntrepriseSoumise = 5 
              ) 
          ; SI ( NON (CONTIENT(@`VCodeTVADFN1 ; "<*>"))
                ; @`VCodeTVADFN1
                ; ""
                )
          ; SI( MAX(@`ATVATaux ) = @`TVATauxNormal 
              ; @`VCodeTVAVenteNormal + "|"+CHAINE(@`TVATauxNormal ) 
              ; SI( MAX(@`ATVATaux ) = @`TVATauxRéduit 
                  ; @`VCodeTVAVenteRéduit + "|"+CHAINE(@`TVATauxRéduit ) 
                  ; "" 
                  )
              )
          )
      )
  )
  )

#Monnaie 3
//MM3
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie;"CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie;"CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 3
//28.07.15
//Analytique arrondi
SI( @`VR_046_Analytique ; 
    @`FCodeAnalytique; 
    ""
  )

#Période 3
//P3
SI( @`VR_046_Analytique ; 
        DEFAUT(  @`FPériodeAnalytique ; @`DateFacture ); 
    ""
    )

#Référence 3
//Ref3
CASE( NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" )) 
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 3

#Groupe 3
//G3
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) )  
        ; "" 
//        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 4

#Débit 4
//Client
SI( @`VR_062_Multimonnaie = 0
  ; DEFAUT( @`RefClient.`CompteDébiteur[ 0 ]  ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 7 ; "|"  ; 1)  ) // Cpt Débiteur 
  ; DEFAUT( @`RefClient.`CompteDébiteur[ TROUVELIGNE( @`VMonnaiesListe ; @`Monnaie ) -1 ] ; MOT( LIGNE( @`VMonnaieData ;  TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 7 ; "|" )  )
  )

#Crédit 4
//Client
"..."

#Pièce 4
//P4
CHAINE(@`Numéro)

#Libellé 4
//CF4
SI( @`VMontreLigneCompta = 1;"CF4 : ";"")+
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )
+ @`NomRéférence+", "+DEFAUT(@`Notes;"")

#Somme 4
//Total
      @`TotalFacturé
      //)
        * SI( @`VComptabilisationEnMM = 0 
            ; DEFAUT(@`TauxChange ; 1) 
            ; 1
            )

#Tva 4

#Monnaie 4
//MM4
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie;"CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie;"CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 4
// YRDBLSL
//Correction compte port et emballage Vente
//DB: 10.10 13 Corrigé Groupe et Ref, Fact. reçues, 
//CA: 12.03.13 ?
//CA: 12.02.13 ?
//CA: 06.02.13 ?
//YR: 25.01.13 Mise en forme et commentaires visibles dans toutes les colonnes
//CA: 12.05.13 Mis la condition analytique partout
//TT: 17.01.14 Enlevé Analytique dans c/p
//DB: 11.02.14 (v164) Modifié analytique pour utiliser ACodeAnalytique pour la ventilation des produits.
//DB: 18.02.14 (v165) réglage pour inclure le détail des prestations dans le libellé de la comptabilisation
//DB: 03.03.14 (v166) Corrigé CE8 qui ne tenait pas ocmpte des frais d'emballage dans le total de la contre-partie.
//YR: 09.04.14 (v167) Redistribution, calculs de compta commande patché
//YR: 25.06.14 (v168) S8 dans Factures, facture finale, frais de rappel ne tenait pas compte de soumis ou non à la TVA
//DB: 04.07.14 (v169) Fact émise / Final / Somme5 et Somme 8 : ajouté DEFAUT(...;0) pour FraisEmball et TVAEmball
//YR: 29.09.14 (v170) S8 dans Factures, facture finale, frais de rappel ne tenait pas compte de soumis ou non à la TVA accpete une différence avec balance de 1.-
//YR: 30.09.14 (v171) dans Factures, facture finale, ajouté des defaut() partout... dans S
//DB: 24.10.14 (v172) Facture-finale : il ne peut pas y avoir 2 écritures de balance CHAINE(...) : ajouté 1 écriture bidon pour séparer l'écriture d'escompte du reste
//DB: 24.10.14 (v173) TDFN : ajouté test sur <Hors décompte TVA>
//DB: 06.11.14 (v174) Facture-finale : mis des vrais comptes à l'écriture bidon qui sert à séparer la multiple.
//DB: 24.11.14 (v175) Ajouté des Defaut(EPSITEC;0) partout, empêchait la compbabilisation dans certains cas ou Epsitec n'était pas remplit.
//YR: 10.12.14 (v176) Comptabilisation des acomptes
//DB: 10.12.14 (v177) des defauts() encore
//YR: 07.01.15 (v178) quelle idée de payer plus et donc d'avoir des escomptes obtenus négatifs... Inversion pour le compte (FE3)
//DB: 09.03.15 (v179) Plus d'analytique par défaut pour factures reçues, Analytique sur frais et arrondi supprimés
//TOUS: 19.05.15 (v180) Compte par défaut multimonnaie
//TOUS: 28.07.2015 (v181) Corrections pour acomptes
//YR: 31.07.2015 (v182) Comptabilisation des acomptes, limites techniques... 
SI (1 ; "" ; "")

#Période 4

#Référence 4
//Ref4
CASE( NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" )) 
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 4

#Groupe 4
//G4
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
        ; "" 
//        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 5
//.
SI( ET( @`SProblèmeCompta = 0
      ;  OU( @`VTVAEntrepriseSoumise=1 
          ; @`VTVAEntrepriseSoumise=3
          ; @`VTVAEntrepriseSoumise=5
          ) 
      ; NON( ET( DEFAUT(@`RefFactureAcompte ; 0 ) = @`Numéro // Il y a une référence pas sur elle même (Facture de base)
                ; NOMBRE(MOT(LIGNE(@`VAcomptes;1);2;";"))      // Réglage AVEC acomptes
                )
            )
      )
    ;  CASE( @`SImpressionFacture ; "" ; @`DateFacture )
    ; "" 
  )

#Débit 5
// bal.
LISTESPECIALE("COMPTE";  1) // Compte par défaut pour passer la ligne, importe peu mais doit exister

#Crédit 5
//bal.
LISTESPECIALE("COMPTE";  2) // Compte par défaut pour passer la ligne, importe peu mais doit exister

#Pièce 5
//P5
CHAINE(@`Numéro)

#Libellé 5
//CF5
SI( @`VMontreLigneCompta = 1;"CF5 : ";"")+
"Pour statut, ne sera pas passé en compta"

#Somme 5
//Balance
 "0 +/- 0.01"

#Tva 5

#Monnaie 5

#Analytique 5

#Période 5

#Référence 5

#Quantité 5

#Groupe 5


#Date 6
//acompte
SI( ET( DEFAUT(@`RefFactureAcompte ; 0 ) = @`Numéro  // Il y a une référence pas sur elle même (Facture de base)
    //; DEFAUT(@`RefFactureAcompte ; 0) > 0          // Il y a une référence à la facture de base
      ; NOMBRE(MOT(LIGNE(@`VAcomptes;1);2;";"))     // Réglage AVEC acomptes
      )
    ; SI( OU( @`VTVAEntrepriseSoumise=0 // Convenu
            ; @`VTVAEntrepriseSoumise=2
            ; @`VTVAEntrepriseSoumise=4
            )
        ; DEFAUT(@`DateFacture ; AUJOURDHUI() ) // Si on est en convenu, date de l'émission de la facture
        ;  "" //MIN(@`PDates)                   // Si on est en reçu, date du premier encaissement
        )
    ; ""
    )

#Débit 6
// 6
MOT( LIGNE(@`VAcomptes;5) ;2 ; ";" )

#Crédit 6
//C6

SI( @`VR_062_Multimonnaie = 0
  ; DEFAUT( @`RefClient.`CompteDébiteur[ 0 ] ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 7 ; "|"  ; 1)  ) // Cpt Débiteur 
  ; DEFAUT( @`RefClient.`CompteDébiteur[ TROUVELIGNE( @`VMonnaiesListe ; @`Monnaie ) -1 ]
          ; MOT( LIGNE( @`VMonnaieData ;  TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 7 ; "|" )  )
  )

#Pièce 6
//p 6
CHAINE(@`Numéro)

#Libellé 6
//CF6
SI( @`VMontreLigneCompta = 1; "CF6 : ";"") +
    DEFAUT(LIGNE(@`VAcomptes; 8) ; "{F:Extourne d'acompte}{D:XXXXXXXXXXX}")

#Somme 6
//S 6 acompte
@`AcompteMontantFac

#Tva 6
//TVA 
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; @`AcompteCodeTVA
   + SI( @`AcompteCodeTVA = ""
        ; ""
        ; "|"+CHAINE(TVACASE(@`AcompteCodeTVA ; @`TVATauxNormal ; @`TVATauxRéduit ; @`TVATauxHeb))
        )
 )

#Monnaie 6
//MM 6
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 6

#Période 6
//p 6
SI( @`VR_046_Analytique ; 
SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 
      ; OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ) 
  ; DEFAUT( @`PDateImputationPayé 
          ; DEFAUT( SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation )) 
                  ; MAX( @`PDates ) 
                  )
          ) 
  ;"" 
  ); 
    "")

#Référence 6
//Ref 6
CASE(  NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" ))   
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 6

#Groupe 6
//G 6
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Versements
#Cumul
1

#Date 1
//.                                        
//  Notez le numéro de cette fiche et corrigez-la.
//  Il doit y manquer la date de paiement.
//  Le calcul ne peut pas s'effectuer
//                                       
//  Nehmen Sie die Nummer dieser Karte zur Kenntnis und verbessern.
//  Er muss dort das Inkassodatum versäumen.
//  Die Berechnung kann nicht durchgeführt werden.
//                                       
//                                       
SI( @`SProblèmeCompta = 1 
  ; "" 
  ; SI( OU( @`VTVAEntrepriseSoumise=1
          ; @`VTVAEntrepriseSoumise=3
          ; @`VTVAEntrepriseSoumise=5
          ) 
      ; @`PDates[@`SComptabilisationMe] 
      ; "" 
      )
  )

#Débit 1
//Art.
 "..."

#Crédit 1
//C1
SI( @`VR_062_Multimonnaie = 0 
      ;  DEFAUT( @`RefArticles.`CompteCrédit[0] 
              ;  MOT( LIGNE( @`VMonnaieData ; 1 ) ; 9 ; "|" ; 1)  // Cpt Articles Vente  Crédit
              )
      ; DEFAUT( @`RefArticles.`CompteCrédit[TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF"))-1] 
              ;  MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF"))  ) ; 9 ; "|" ; 1 )  // Cpt Articles Vente  Crédit
              )
)

#Pièce 1
//p1
CHAINE(@`Numéro)

#Libellé 1
//L1
SI( @`VMontreLigneCompta = 1;"CP1 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+DEFAUT(@`Notes;"")

#Somme 1
//Prorata
(@`ATotauxLignesNetHT + @`ATotauxLignesTVA)
    * DEFAUT( @`PMontants[@`SComptabilisationMe] ; 0 ) 
    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)
    / ( @`TotalFacturé )

#Tva 1
//TVA art
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; SI( @`Exportation = 1
      ; @`VCodeTVAExportation
      ; SI( @`Exonéré ; @`VCodeTVAExonéré
          ; SI( OU( @`VTVAEntrepriseSoumise = 4
                  ; @`VTVAEntrepriseSoumise = 5
                  ) 
              ; SI ( DEFAUT(@`RefArticles.`CodeTVADFN ; "") <> "" // TDFN -> code l'article si <> <Hors décompte>, code par défaut si vide
                   ; SI ( NON ( CONTIENT(@`RefArticles.`CodeTVADFN ; "<*>"))
                        ; @`RefArticles.`CodeTVADFN
                        ; ""
                        )
                   ; SI ( NON (CONTIENT(@`VCodeTVADFN1 ; "<*>"))
                        ; @`VCodeTVADFN1
                        ; ""
                        )
                   )
              ; @`ACodeTVA 
                +SI( @`ACodeTVA = "" 
                   ; ""
                   ; "|"+CHAINE( @`ATVATaux) 
                   )
              )
          )
      )
  )

#Monnaie 1
//MM1
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie;"CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie;"CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 1
//A1
SI( @`VR_046_Analytique ; 
    SI (DEFAUT(@`ACodeAnalytique ; "") <> "" ;
        @`ACodeAnalytique ;
        @`FCodeAnalytique
       ); 
    ""
  )

#Période 1
//Pér.1
SI( @`VR_046_Analytique ; 
    
SI( @`SProblèmeCompta = 1 
  ; "" 
  ; SI( OU( @`VTVAEntrepriseSoumise=1 
          ; @`VTVAEntrepriseSoumise=3
          ; @`VTVAEntrepriseSoumise=5
          ) 
      ; DEFAUT(@`PDateImputation[@`SComptabilisationMe] ; @`PDates[@`SComptabilisationMe] ) 
      ; "" 
      )
  ) ; 
    "")

#Référence 1
//Ref1
CASE( NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" ))      
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 1

#Groupe 1
//G1
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 2

#Débit 2
//F. Port
"..."

#Crédit 2
//C2
SI( @`VR_062_Multimonnaie = 0 
      ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 16 ; "|" ; 1) // Cpt Port Vente
      ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 16 ; "|" ; 1 )
  )

#Pièce 2
//p2
CHAINE(@`Numéro)

#Libellé 2
//L2
SI( @`VMontreLigneCompta = 1;"CP2 : ";"") +
GAUCHE( CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )
      + @`NomRéférence+", "+DEFAUT(@`Notes;"")
      + SI( @`VComptabiliseLibellésAvecDétail
          ; ", " + @`ADésignation
          ; ""
          )
      ; 115
      )

#Somme 2
//Frais
DEFAUT( @`FraisEmballage ;0 )
    * DEFAUT( @`PMontants[@`SComptabilisationMe] ; 0 ) 
    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)
    / SI( @`Total <> @`TotalFacturé ; @`Total ; @`TotalFacturé )

#Tva 2
//TVA 
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; SI( @`Exportation = 1 ; @`VCodeTVAExportation
  ; SI( @`Exonéré ; @`VCodeTVAExonéré
      ; SI( OU( @`VTVAEntrepriseSoumise = 4 ; @`VTVAEntrepriseSoumise = 5 ) 
           ; SI ( NON (CONTIENT(@`VCodeTVADFN1 ; "<*>"))
                ; @`VCodeTVADFN1
                ; ""
                )  
           ; SI( MAX(@`ATVATaux ) = @`TVATauxNormal 
               ; @`VCodeTVAVenteNormal + "|"+CHAINE(@`TVATauxNormal )
               ; SI( MAX(@`ATVATaux ) = @`TVATauxRéduit 
                   ; @`VCodeTVAVenteRéduit + "|"+CHAINE(@`TVATauxRéduit ) 
                   ; "" 
                   )
               )
           )
      )
  )
  )

#Monnaie 2
//MM2
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie;"CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie;"CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 2
//A2
SI( @`VR_046_Analytique ; 
    @`FCodeAnalytique; 
    ""
  )

#Période 2
//Pér.2
SI( @`VR_046_Analytique ;    
SI( @`SProblèmeCompta = 1 
  ; "" 
  ; SI( OU( @`VTVAEntrepriseSoumise=1 
          ; @`VTVAEntrepriseSoumise=3
          ; @`VTVAEntrepriseSoumise=5
          ) 
      ; DEFAUT(@`PDateImputation[@`SComptabilisationMe] ; @`PDates[@`SComptabilisationMe] ) 
      ; "" 
      )
  ); 
    "")

#Référence 2
//Ref2
CASE( NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" )) 
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 2

#Groupe 2
//G2
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) )   
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 3

#Débit 3
//F. Vente
 "..."

#Crédit 3
//C3
 SI( @`VR_062_Multimonnaie = 0 
      ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 15 ; "|"  ; 1 ) // Cpt Frais Vente
      ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 15 ; "|" ; 1) 
  )

#Pièce 3
//p3
CHAINE(@`Numéro)

#Libellé 3
//L3
SI( @`VMontreLigneCompta = 1;"CP3 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+DEFAUT(@`Notes;"")

#Somme 3
//Solde
CHAINE( 
        (@`TotalFacturé - @`TotalFacturé) 
        * SI( @`VComptabilisationEnMM = 0 
            ; DEFAUT(@`TauxChange ; 1) 
            ; 1
            ) 
      )
    + "+/-1 "

#Tva 3
//TVA
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; SI( @`Exportation = 1 ; @`VCodeTVAExportation
  ; SI( @`Exonéré ; @`VCodeTVAExonéré
      ; SI( OU( @`VTVAEntrepriseSoumise = 4 ; @`VTVAEntrepriseSoumise = 5 ) 
          ; SI ( NON (CONTIENT(@`VCodeTVADFN1 ; "<*>"))
                ; @`VCodeTVADFN1
                ; ""
                )  
          ; SI( MAX(@`ATVATaux ) = @`TVATauxNormal 
              ; @`VCodeTVAVenteNormal + "|"+CHAINE(@`TVATauxNormal ) 
              ; SI( MAX(@`ATVATaux ) = @`TVATauxRéduit 
                  ; @`VCodeTVAVenteRéduit + "|"+CHAINE(@`TVATauxRéduit ) 
                  ; "" 
                  )
              )
          )
      )
  )
  )

#Monnaie 3
//MM3
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie;"CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie;"CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 3
//A3
SI( @`VR_046_Analytique ; 
    @`FCodeAnalytique; 
    ""
  )

#Période 3
//Pér.3
SI( @`VR_046_Analytique ;   
SI( @`SProblèmeCompta = 1 
  ; "" 
  ; SI( OU( @`VTVAEntrepriseSoumise=1 
          ; @`VTVAEntrepriseSoumise=3
          ; @`VTVAEntrepriseSoumise=5
          ) 
      ; DEFAUT(@`PDateImputation[@`SComptabilisationMe] ; @`PDates[@`SComptabilisationMe] ) 
      ; "" 
      )
  ); 
    "")

#Référence 3
//Ref3
CASE( NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" )) 
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 3

#Groupe 3
//G3
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) )  
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 4

#Débit 4
//payé
 @`PTypes[@`SComptabilisationMe]

#Crédit 4
//C4
"..."

#Pièce 4
//p4
CHAINE(@`Numéro)

#Libellé 4
//L4
SI( @`VMontreLigneCompta = 1;"CP4 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+DEFAUT(@`Notes;"")

#Somme 4
//Encaissé
DEFAUT( @`PMontants[@`SComptabilisationMe] ; 0 )  
    * SI( @`VComptabilisationEnMM = 0 
        ; DEFAUT(@`TauxChange ; 1) 
        ; 1
        )

#Tva 4

#Monnaie 4
//MM4
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie;"CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie;"CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 4

#Période 4

#Référence 4
//Ref4
CASE( NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" )) 
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 4

#Groupe 4
//G4
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 5
//.                                        
//  Notez le numéro de cette fiche et corrigez-la.
//  Il doit y manquer la date de paiement.
//  Le calcul ne peut pas s'effectuer
//                                       
//  Nehmen Sie die Nummer dieser Karte zur Kenntnis und verbessern.
//  Er muss dort das Inkassodatum versäumen.
//  Die Berechnung kann nicht durchgeführt werden.
//                                       
//                                       
SI( @`SProblèmeCompta = 1 
  ; "" 
  ; SI( OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          ) 
     ; DEFAUT( @`PDates[@`SComptabilisationMe] ;"") 
     ; "" )
  )

#Débit 5
//D5  
@`PTypes[@`SComptabilisationMe]

#Crédit 5
//C5
 SI( @`VR_062_Multimonnaie = 0
    ; DEFAUT( @`RefClient.`CompteDébiteur[ 0 ]  ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 7 ; "|"  ; 1)  ) // Cpt Débiteur 
    ; DEFAUT( @`RefClient.`CompteDébiteur[ TROUVELIGNE( @`VMonnaiesListe ; @`Monnaie ) -1 ] ; MOT( LIGNE( @`VMonnaieData ;  TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 7 ; "|" )  )
  )

#Pièce 5
//p5
CHAINE(@`Numéro)

#Libellé 5
//L5
SI( @`VMontreLigneCompta = 1;"CP5 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+DEFAUT(@`Notes;"")

#Somme 5
//Encaissé
DEFAUT( @`PMontants[@`SComptabilisationMe] ; 0 )  
    * SI( @`VComptabilisationEnMM = 0 
        ; DEFAUT(@`TauxChange ; 1) 
        ; 1
        )

#Tva 5

#Monnaie 5
//MM5
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie;"CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie;"CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 5

#Période 5

#Référence 5
//Ref5
CASE(  NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" ))     
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 5

#Groupe 5
//G5
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 6
//D6
SI( ET( @`SProblèmeCompta = 0 
      ; NON( @`VComptabiliseFraisRappels )
      ) 
  ; @`PDates[ @`SComptabilisationMe ] 
  ; ""
  )

#Débit 6
//D6 
"..."

#Crédit 6
//C6
MOT( MOT( LIGNE( @`VMonnaieData ; 1 ) ; 25 ; "|"; 1 )  ; 1 ; " "; 1)

#Pièce 6
//p6
CHAINE(@`Numéro)

#Libellé 6
//L6
SI( @`VMontreLigneCompta = 1; "CP6 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", {F:Frais de rappel}{D:Frais de rappel}"

#Somme 6
//S6
ABS(
  ARRONDI( @`PRappels[@`SComptabilisationMe]
           * SI( @`VTVAEntrepriseSoumise < 2
                 ; 1
                 ; ( RASSEMBLE( @`ATotauxLignesNetHT ; @`ATVATaux = @`TVATauxNormal )
                     + SI( MAX( @`ATVATaux ) = @`TVATauxNormal
                      ; DEFAUT(@`FraisEmballageHT ;0)
                      ; 0
                      )
                    )
                    /(DEFAUT( @`ATotalNonSoumisExcl ;0)
                    + DEFAUT( @`ATotalNonSoumisExpo ;0)
                    + DEFAUT( @`ATotalNonSoumisTVA ;0)
                    + DEFAUT( @`FTotalHTTVAHéb ;0)
                    + DEFAUT( @`FTotalHTTVANormal ;0)
                    + DEFAUT( @`FTotalHTTVARéd ;0)
                    + DEFAUT( @`FraisEmballageHT ;0)
                    )
                    * SI( @`FTotalHTTVANormal = 0
                        ; 0
                        ; 1
                        )
                 )                                                                                                                          
        ; .01 )
   )

#Tva 6
//TVA 
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; SI( @`Exportation = 1 ; @`VCodeTVAExportation
  ; SI( @`Exonéré ; @`VCodeTVAExonéré
      ; SI( OU( @`VTVAEntrepriseSoumise = 4 ; @`VTVAEntrepriseSoumise = 5 ) 
          ; @`VCodeTVARappelsTDFN
          ; @`VCodeTVAVenteNormal+"|"+CHAINE( @`TVATauxNormal )
          )
     )
 )
 )

#Monnaie 6
//MM6
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 6
//A6
SI( @`VR_046_Analytique ; 
    @`FCodeAnalytique; 
    ""
  )

#Période 6
//p6
SI( @`VR_046_Analytique ;   
SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 
      ; OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ) 
  ; DEFAUT( @`PDateImputationPayé 
          ; DEFAUT( SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation )) 
                  ; MAX( @`PDates ) 
                  )
          ) 
  ;"" 
  ); 
    "")

#Référence 6
//Ref6
CASE(  NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" ))     
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 6

#Groupe 6
//G6
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 7

#Débit 7
//D7  
"..."

#Crédit 7
//C7
MOT( MOT( LIGNE( @`VMonnaieData ; 1 ) ; 25 ; "|"; 1 )  ; 1 ; " "; 1)

#Pièce 7
//p7
CHAINE(@`Numéro)

#Libellé 7
//L7
SI( @`VMontreLigneCompta = 1; "CP7 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" ) +
@`NomRéférence+", {F:Frais de rappel}{D:Frais de rappel}"

#Somme 7
//S7
//ABS(
    ARRONDI( @`PRappels[@`SComptabilisationMe]
            * SI( @`VTVAEntrepriseSoumise < 2
                ; 0
                ; ( RASSEMBLE( @`ATotauxLignesNetHT ; @`ATVATaux = @`TVATauxRéduit )
                    +SI( MAX( @`ATVATaux ) = @`TVATauxRéduit
                       ;  DEFAUT(@`FraisEmballageHT ;0)
                       ; 0
                       )
                  )
                  / (DEFAUT( @`ATotalNonSoumisExcl ;0)
                    + DEFAUT( @`ATotalNonSoumisExpo ;0)
                    + DEFAUT( @`ATotalNonSoumisTVA ;0)
                    + DEFAUT( @`FTotalHTTVAHéb ;0)
                    + DEFAUT( @`FTotalHTTVANormal ;0)
                    + DEFAUT( @`FTotalHTTVARéd ;0)
                    + DEFAUT( @`FraisEmballageHT ;0)
                    )
                 * SI( @`FTotalHTTVARéd = 0
                     ; 0
                     ; 1
                     )
                )                                                                                                                                       
        ; .01 )
//    )

#Tva 7
//TVA 
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; SI( @`Exportation = 1 ; @`VCodeTVAExportation
  ; SI( @`Exonéré ; @`VCodeTVAExonéré
      ; SI( OU( @`VTVAEntrepriseSoumise = 4 ; @`VTVAEntrepriseSoumise = 5 ) 
          ; @`VCodeTVARappelsTDFN
          ; @`VCodeTVAVenteRéduit+"|"+CHAINE( @`TVATauxRéduit )
          )
     )
 )
 )

#Monnaie 7
//MM7
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 7
//A7
SI( @`VR_046_Analytique ; 
    @`FCodeAnalytique; 
    ""
  )

#Période 7
//p7
SI( @`VR_046_Analytique ;   
SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 
      ; OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ) 
  ; DEFAUT( @`PDateImputationPayé 
          ; DEFAUT( SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation )) 
                  ; MAX( @`PDates ) 
                  )
          ) 
  ;"" 
  ); 
    "")

#Référence 7
//Ref7
CASE(  NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" ))      
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 7

#Groupe 7
//G7
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 8

#Débit 8
//D8  
"..."

#Crédit 8
//C8
MOT( MOT( LIGNE( @`VMonnaieData ; 1 ) ; 25 ; "|"; 1 )  ; 1 ; " "; 1)

#Pièce 8
//p8
CHAINE(@`Numéro)

#Libellé 8
//L8
SI( @`VMontreLigneCompta = 1; "CP8 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", {F:Frais de rappel}{D:Frais de rappel}"

#Somme 8
//S8
//ABS(
  ARRONDI( @`PRappels[ @`SComptabilisationMe]
           * SI( @`VTVAEntrepriseSoumise < 2
               ; 0
               ; ( RASSEMBLE( @`ATotauxLignesNetHT ; @`ATVATaux = @`TVATauxHeb )
                   + SI( MAX( @`ATVATaux ) = @`TVATauxHeb
                       ; DEFAUT(@`FraisEmballageHT ;0)
                       ; 0
                       )
                 )
                 / (DEFAUT( @`ATotalNonSoumisExcl ;0)
                    + DEFAUT( @`ATotalNonSoumisExpo ;0)
                    + DEFAUT( @`ATotalNonSoumisTVA ;0)
                    + DEFAUT( @`FTotalHTTVAHéb ;0)
                    + DEFAUT( @`FTotalHTTVANormal ;0)
                    + DEFAUT( @`FTotalHTTVARéd ;0)
                    + DEFAUT( @`FraisEmballageHT ;0)
                    )
                 * SI( @`FTotalHTTVAHéb = 0
                     ; 0
                     ; 1
                     )
               )                                                                                                                                     
        ; .01 )
//   )

#Tva 8
//TVA 
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; SI( @`Exportation = 1 ; @`VCodeTVAExportation
  ; SI( @`Exonéré ; @`VCodeTVAExonéré
      ; SI( OU( @`VTVAEntrepriseSoumise = 4 ; @`VTVAEntrepriseSoumise = 5 ) 
          ; @`VCodeTVARappelsTDFN
          ; @`VCodeTVAVenteHeb+"|"+CHAINE( @`TVATauxHeb )
          )
     )
 )
 )

#Monnaie 8
//MM8
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 8
//A8
SI( @`VR_046_Analytique ; 
    @`FCodeAnalytique; 
    ""
  )

#Période 8
//p8
SI( @`VR_046_Analytique ;   
SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 
      ; OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ) 
  ; DEFAUT( @`PDateImputationPayé 
          ; DEFAUT( SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation )) 
                  ; MAX( @`PDates ) 
                  )
          ) 
  ;"" 
  ); 
    "")

#Référence 8
//Ref8
CASE(  NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" ))    
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 8

#Groupe 8
//G8
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Final
#Cumul
1

#Date 1
//Date
SI( ET( OU( DEFAUT( @`PEscompte ;0 ) <> 0 )
      ; @`SProblèmeCompta = 0
      ; OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ) 
  ; DEFAUT( @`PayéLe ; SI( ANNEE( MAX( @`PDates ) )< 0 ; AUJOURDHUI() ; MAX(@`PDates) ) ) 
  ; ""
  )

#Débit 1
//D1 Escompte
SI( @`VEscompteVentiléVente = 0 // 0 : ventilé dans les comptes / 1 : regroupé dans le cpt escompte
  //Ventilé
  ; SI( @`VR_062_Multimonnaie = 0
      ; DEFAUT( @`RefArticles.`CompteCrédit[0]
               ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 9 ; "|" ; 1 )  // Cpt Articles Vente  Crédit
               ) 
      ; DEFAUT( @`RefArticles.`CompteCrédit[TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) - 1] 
              ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 9 ; "|" ; 1)  // Cpt Articles Vente  Crédit
              )
      )
    //Regroupé
  ; 
    SI( DEFAUT( @`PEscompteCompte ; "" ) <> ""
      ; @`PEscompteCompte
      ; SI( @`VR_062_Multimonnaie = 0 
          ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 11 ; "|" ) // Cpt Escompte accordé
          ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 11 ; "|" )
          )
      )
  )

#Crédit 1
//C1 Escompte
"..."

#Pièce 1
//p1
CHAINE(@`Numéro)

#Libellé 1
//CE1
SI( @`VMontreLigneCompta = 1;"CE1 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+DEFAUT(@`Notes;"")

#Somme 1
//S1 Ligne
(@`ATotauxLignesNetHT + @`ATotauxLignesTVA)
    * DEFAUT(@`PEscompte;0)
    * SI( @`VComptabilisationEnMM = 0 
        ; DEFAUT(@`TauxChange ; 1 ) 
        ; 1)
    / ( @`TotalFacturé )

#Tva 1
//TVA art.
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; SI( @`Exportation = 1 ; @`VCodeTVAExportation
  ; SI( @`Exonéré ; @`VCodeTVAExonéré
      ; SI( OU( @`VTVAEntrepriseSoumise = 4 
              ; @`VTVAEntrepriseSoumise = 5
              ) 
          ; SI ( DEFAUT(@`RefArticles.`CodeTVADFN ; "") <> "" // TDFN -> code l'article si <> <Hors décompte>, code par défaut si vide
               ; SI ( NON ( CONTIENT(@`RefArticles.`CodeTVADFN ; "<*>"))
                    ; @`RefArticles.`CodeTVADFN
                    ; ""
                    )
               ; SI ( NON (CONTIENT(@`VCodeTVADFN1 ; "<*>"))
                    ; @`VCodeTVADFN1
                    ; ""
                    )
               )
          ; @`ACodeTVA 
            + SI( @`ACodeTVA = ""
                ; ""
                ; "|"+CHAINE( @`ATVATaux)
                )
          )
      )
  )
  )

#Monnaie 1
//MM1
SI( @`VComptabilisationEnMM = 0
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 1
//A1
SI( @`VR_046_Analytique ;
    SI( @`VEscompteVentiléVente = 0 // 0 : ventilé dans les comptes / 1 : regroupé dans le cpt escompte
        ; SI ( DEFAUT(@`ACodeAnalytique;"") <> "" ;
              @`ACodeAnalytique ;
              @`FCodeAnalytique
             )
        ; @`FCodeAnalytique
      ) ; 
    ""
  )

#Période 1
//p1
SI( @`VR_046_Analytique ; 
SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 
      ; OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ) 
  ; DEFAUT( @`PDateImputationPayé 
          ; DEFAUT( SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation )) 
                  ; MAX( @`PDates ) 
                  )
          ) 
  ;"" 
  ); 
    "")

#Référence 1
//Ref1
CASE( NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" ))      
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 1

#Groupe 1
//G1
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 2

#Débit 2
//D2 F Vente
SI( DEFAUT( @`PEscompteCompte ; "" ) <> "" ; @`PEscompteCompte ;
SI( @`VR_062_Multimonnaie = 0 
  ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 16 ; "|" ; 1 ) // Cpt Port Vente
  ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 16 ; "|"  ; 1 ) 
  )
  )

#Crédit 2
//C2 F Vente
"..."

#Pièce 2
//p2
CHAINE(@`Numéro)

#Libellé 2
//CE2
SI( @`VMontreLigneCompta = 1;"CE2 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+DEFAUT(@`Notes;"")

#Somme 2
//S2 Emball
DEFAUT( @`FraisEmballage ;0 )
    * @`PEscompte 
    * SI( @`VComptabilisationEnMM = 0 
        ; DEFAUT(@`TauxChange ; 1) 
        ; 1
        )
    / SI( @`Total <> @`TotalFacturé 
        ; @`Total 
        ; @`TotalFacturé 
        )

#Tva 2
//TVA
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; SI( @`Exportation = 1 ; @`VCodeTVAExportation
  ; SI( @`Exonéré ; @`VCodeTVAExonéré
      ; SI( OU( @`VTVAEntrepriseSoumise = 4 
              ; @`VTVAEntrepriseSoumise = 5 
              ) 
           ; SI ( NON (CONTIENT(@`VCodeTVADFN1 ; "<*>"))
                ; @`VCodeTVADFN1
                ; ""
                )  
           ; SI( MAX(@`ATVATaux ) = @`TVATauxNormal 
               ; @`VCodeTVAVenteNormal + "|"+CHAINE(@`TVATauxNormal ) 
               ; SI( MAX(@`ATVATaux ) = @`TVATauxRéduit 
                   ; @`VCodeTVAVenteRéduit + "|"+CHAINE(@`TVATauxRéduit ) 
                   ; "" 
                   )
               )
           )
     )
  )
  )

#Monnaie 2
//MM2
SI( @`VComptabilisationEnMM = 0
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 2
//A2
SI( @`VR_046_Analytique ;   
    @`FCodeAnalytique; 
    ""
  )

#Période 2
//p2
SI( @`VR_046_Analytique ; 
SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 
      ; OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ) 
  ; DEFAUT( @`PDateImputationPayé 
          ; DEFAUT( SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation )) 
                  ; MAX( @`PDates ) 
                  )
          ) 
  ;"" 
  ); 
    "")

#Référence 2
//Ref2
CASE( NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" )) 
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 2

#Groupe 2
//G2
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) )   
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 3

#Débit 3
//D3 F vente
SI( DEFAUT( @`PEscompteCompte ; "" ) <> "" ; @`PEscompteCompte ;
SI( @`VR_062_Multimonnaie = 0
  ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 15 ; "|"  ; 1 ) // Cpt Frais Vente
  ; MOT( LIGNE( @`VMonnaieData ;  TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 15 ; "|"  ; 1 ) // Cpt Frais Vente
  )
  )

#Crédit 3
//C3 F Vente
"..."

#Pièce 3
//p3
CHAINE(@`Numéro)

#Libellé 3
//CE3
SI( @`VMontreLigneCompta = 1;"CE3 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+DEFAUT(@`Notes;"")

#Somme 3
//S3 Arrondi
CHAINE( ( @`TotalFacturé - @`TotalFacturé) 
        * SI( @`VComptabilisationEnMM = 0 
            ; DEFAUT(@`TauxChange ; 1) 
            ; 1
            )
      )
    + "+/-1"

#Tva 3
//TVA 
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; SI( @`Exportation = 1 ; @`VCodeTVAExportation
  ; SI( @`Exonéré ; @`VCodeTVAExonéré
      ; SI( OU( @`VTVAEntrepriseSoumise = 4 
              ; @`VTVAEntrepriseSoumise = 5 
              )
           ; SI ( NON (CONTIENT(@`VCodeTVADFN1 ; "<*>"))
                ; @`VCodeTVADFN1
                ; ""
                )  
          ; SI( MAX(@`ATVATaux ) = @`TVATauxNormal 
              ; @`VCodeTVAVenteNormal + "|"+CHAINE(@`TVATauxNormal ) 
              ; SI( MAX(@`ATVATaux ) = @`TVATauxRéduit 
                  ; @`VCodeTVAVenteRéduit + "|"+CHAINE(@`TVATauxRéduit ) 
                  ; "" 
                  )
              )
          )
     )
 )
 )

#Monnaie 3
//MM3
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 3
//A3
SI( @`VR_046_Analytique ;   
    @`FCodeAnalytique; 
    ""
  )

#Période 3
//p3
SI( @`VR_046_Analytique ; 
SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 
      ; OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ) 
  ; DEFAUT( @`PDateImputationPayé 
          ; DEFAUT( SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation )) 
                  ; MAX( @`PDates ) 
                  )
          ) 
  ;"" 
  ); 
    "")

#Référence 3
//Ref3
CASE( NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" )) 
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 3

#Groupe 3
//G3
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) )  
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 4

#Débit 4
//D4 Esc.
"..."

#Crédit 4
//C4 Escompte
SI( @`VR_062_Multimonnaie = 0
        ; DEFAUT( @`RefClient.`CompteDébiteur[ 0 ]  ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 7 ; "|"  ; 1)  ) // Cpt Débiteur 
        ; DEFAUT( @`RefClient.`CompteDébiteur[ TROUVELIGNE( @`VMonnaiesListe ; @`Monnaie ) -1 ] ; MOT( LIGNE( @`VMonnaieData ;  TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 7 ; "|" )  )
  )

#Pièce 4
//p4
CHAINE(@`Numéro)

#Libellé 4
//CE4
SI( @`VMontreLigneCompta = 1; "CE4 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+DEFAUT(@`Notes;"")

#Somme 4
//S4 Escompte
@`PEscompte  
* SI( @`VComptabilisationEnMM = 0
    ; DEFAUT(@`TauxChange ; 1) 
    ; 1
    )

#Tva 4

#Monnaie 4
//MM4
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 4

#Période 4
//p4
SI( @`VR_046_Analytique ; 
    SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 
          ; OU( @`VTVAEntrepriseSoumise=0 
              ; @`VTVAEntrepriseSoumise=2
              ; @`VTVAEntrepriseSoumise=4
              )
          ) 
  ; DEFAUT( @`PDateImputationPayé 
          ; DEFAUT( SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation )) 
                  ; MAX( @`PDates ) 
                  )
          ) 
  ;"" 
  ); 
    "")

#Référence 4
//Ref4
CASE( NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" )) 
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 4

#Groupe 4
//G4
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 5
// D5
SI( ET( @`SProblèmeCompta = 0 
      ; OU( ET( @`VComptabiliseFraisRappels = 1 // à l'acquittement
              ; SOMME( @`PMontants ) > @`TotalFacturé 
              ; @`TotalFacturé > 0 
              ; SOMME( @`FraisDeRappel ) > 0
              ) 
          ; ET( @`VComptabiliseFraisRappels 
              ; SOMME( @`PMontants ) < @`TotalFacturé 
              ; @`TotalFacturé < 0 
              ; SOMME( @`FraisDeRappel ) > 0
              )
          )
      ) 
   ; @`PayéLe 
   ; ""
)

#Débit 5
//D5 bidon, ne passe pas en compta (écr à 0.-)
DEFAUT( @`RefClient.`CompteDébiteur[ 0 ]  ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 7 ; "|"  ; 1)  ) // Cpt Débiteur

#Crédit 5
//C5 bidon, ne passe pas en compta, écr à 0.-
MOT( LIGNE( @`VMonnaieData ; 1 ) ; 9 ; "|" )  // Cpt Articles Crédit

#Pièce 5
//p5
CHAINE(@`Numéro)

#Libellé 5
//l
"{F:N'est pas comptabilisé}{D:Nicht verbucht}"

#Somme 5
//S5 bidon
//Ajouté pour séparer les 2 écritures multiples, sinon il y  2 écritures de balance
CHAINE(0) + " +/-0"

#Tva 5

#Monnaie 5

#Analytique 5

#Période 5

#Référence 5

#Quantité 5

#Groupe 5


#Date 6
// D6
SI( ET( @`SProblèmeCompta = 0 
      ; OU( ET( @`VComptabiliseFraisRappels = 1 // à l'acquittement
              ; SOMME( @`PMontants ) > @`TotalFacturé 
              ; @`TotalFacturé > 0 
              ; SOMME( @`FraisDeRappel ) > 0
              ) 
          ; ET( @`VComptabiliseFraisRappels 
              ; SOMME( @`PMontants ) < @`TotalFacturé 
              ; @`TotalFacturé < 0 
              ; SOMME( @`FraisDeRappel ) > 0
              )
          )
      ) 
   ; @`PayéLe 
   ; ""
)

#Débit 6
//D6
MOT( MOT( LIGNE( @`VMonnaieData ; 1 ) ; 25 ; "|"; 1 )  ; 1 ; " "; 1)

#Crédit 6
//C6
"..."

#Pièce 6
//p6
CHAINE(@`Numéro)

#Libellé 6
//CE5
SI( @`VMontreLigneCompta = 1; "CE5 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", {F:Frais de rappel}{D:Frais de rappel}"

#Somme 6
//S6
//ABS( 
  ARRONDI( ( @`TotalFacturé - @`PTotal - DEFAUT( @`PEscompte ; 0 ) ) 
           * SI( @`VTVAEntrepriseSoumise < 2 
               ; 1 
               ; ( RASSEMBLE( @`ATotauxLignesNetHT ; @`ATVATaux = @`TVATauxNormal ) 
                   + SI( MAX( @`ATVATaux ) = @`TVATauxNormal 
                            ; DEFAUT(@`FraisEmballageHT ;0)
                            ; 0 
                            )
                 ) 
                 /(  DEFAUT(@`ATotalNonSoumisExcl;0 )
                   + DEFAUT(@`ATotalNonSoumisExpo;0 )
                   + DEFAUT(@`ATotalNonSoumisTVA;0 )
                   + DEFAUT(@`FTotalHTTVAHéb;0 )
                   + DEFAUT(@`FTotalHTTVANormal;0 )
                   + DEFAUT(@`FTotalHTTVARéd;0 )
                   + DEFAUT(@`FraisEmballageHT ;0)
                  ) 
               * SI( @`FTotalHTTVANormal = 0 
                   ; 0
                   ; 1 
                   )
               )
        ; .01) 
//   )

#Tva 6
//TVA 
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; SI( @`Exportation = 1 ; @`VCodeTVAExportation
  ; SI( @`Exonéré ; @`VCodeTVAExonéré
      ; SI( OU( @`VTVAEntrepriseSoumise = 4 
              ; @`VTVAEntrepriseSoumise = 5 
              ) 
          ; @`VCodeTVARappelsTDFN
          ; @`VCodeTVAVenteNormal+"|"+CHAINE( @`TVATauxNormal )
          )
      )
 )
 )

#Monnaie 6
//MM6
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 6
//A6
SI( @`VR_046_Analytique ;   
    @`FCodeAnalytique; 
    ""
  )

#Période 6
//p6
SI( @`VR_046_Analytique ; 
 DEFAUT( @`PDateImputationPayé 
          ; DEFAUT( SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation )) 
                  ; MAX( @`PDates ) 
                  )
          ) 
  ;"" 
  )

#Référence 6
//Ref6
CASE(  NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" ))     
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 6

#Groupe 6
//G6
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 7

#Débit 7
//D7
MOT( MOT( LIGNE( @`VMonnaieData ; 1 ) ; 25 ; "|"; 1 )  ; 1 ; " "; 1)

#Crédit 7
//C7
"..."

#Pièce 7
//p7
CHAINE(@`Numéro)

#Libellé 7
//CE6
SI( @`VMontreLigneCompta = 1; "CE6 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", {F:Frais de rappel}{D:Frais de rappel}"

#Somme 7
//S7
//ABS(
  ARRONDI( ( @`TotalFacturé - @`PTotal - DEFAUT( @`PEscompte ; 0 ) ) 
           * ( RASSEMBLE( @`ATotauxLignesNetHT ; @`ATVATaux = @`TVATauxRéduit ) 
               + SI( MAX( @`ATVATaux ) = @`TVATauxRéduit 
                   ; DEFAUT(@`FraisEmballageHT ;0 )
                   ; 0 
                   ) 
             ) 
           / ( DEFAUT(@`ATotalNonSoumisExcl;0 )
              +DEFAUT(@`ATotalNonSoumisExpo;0 )
              +DEFAUT(@`ATotalNonSoumisTVA;0 )
              +DEFAUT(@`FTotalHTTVAHéb;0 )
              +DEFAUT(@`FTotalHTTVANormal;0 )
              +DEFAUT(@`FTotalHTTVARéd;0 )
              +DEFAUT(@`FraisEmballageHT ;0 )
             )
          * SI( @`FTotalHTTVARéd = 0 ; 0 ; 1 )
        ; .01 
        )
//  )

#Tva 7
//TVA 
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; SI( @`Exportation = 1 ; @`VCodeTVAExportation
  ; SI( @`Exonéré ; @`VCodeTVAExonéré
      ; SI( OU( @`VTVAEntrepriseSoumise = 4 
              ; @`VTVAEntrepriseSoumise = 5 
              ) 
          ; @`VCodeTVARappelsTDFN
          ; @`VCodeTVAVenteRéduit+"|"+CHAINE( @`TVATauxRéduit )
          )
     )
 )
 )

#Monnaie 7
//MM7
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 7
//A7
SI( @`VR_046_Analytique ;   
    @`FCodeAnalytique; 
    ""
  )

#Période 7
//p7
SI( @`VR_046_Analytique ; 
SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 
      ; OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ) 
  ; DEFAUT( @`PDateImputationPayé 
          ; DEFAUT( SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation )) 
                  ; MAX( @`PDates ) 
                  )
          ) 
  ;"" 
  ); 
    "")

#Référence 7
//Ref7
CASE(  NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" ))     
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 7

#Groupe 7
//G7
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 8

#Débit 8
//D8
MOT( MOT( LIGNE( @`VMonnaieData ; 1 ) ; 25 ; "|"; 1 )  ; 1 ; " "; 1)

#Crédit 8
//C8
"..."

#Pièce 8
//p8
CHAINE(@`Numéro)

#Libellé 8
//CE7
SI( @`VMontreLigneCompta = 1; "CE7 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", {F:Frais de rappel}{D:Frais de rappel}"

#Somme 8
//S8
//ABS( 
  ARRONDI( ( @`TotalFacturé - @`PTotal - DEFAUT( @`PEscompte ; 0 ) ) 
           * ( RASSEMBLE( @`ATotauxLignesNetHT ; @`ATVATaux = @`TVATauxHeb ) 
               + SI( MAX( @`ATVATaux ) = @`TVATauxHeb 
                   ; DEFAUT(@`FraisEmballageHT ;0)
                   ; 0 ) 
             ) 
           / ( DEFAUT(@`ATotalNonSoumisExcl;0 )
              +DEFAUT(@`ATotalNonSoumisExpo;0 )
              +DEFAUT(@`ATotalNonSoumisTVA;0 )
              +DEFAUT(@`FTotalHTTVAHéb;0 )
              +DEFAUT(@`FTotalHTTVANormal;0 )
              +DEFAUT(@`FTotalHTTVARéd;0 )
              +DEFAUT(@`FraisEmballageHT;0 )
             ) 
         ; .01 
         )
  * SI( @`FTotalHTTVAHéb = 0 ; 0 ; 1 )
//  )

#Tva 8
//TVA 
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; SI( @`Exportation = 1 ; @`VCodeTVAExportation
  ; SI( @`Exonéré ; @`VCodeTVAExonéré
      ; SI( OU( @`VTVAEntrepriseSoumise = 4 
              ; @`VTVAEntrepriseSoumise = 5 
              ) 
          ; @`VCodeTVARappelsTDFN
          ; @`VCodeTVAVenteHeb+"|"+CHAINE( @`TVATotalTauxHeb )
          )
      )
 )
 )

#Monnaie 8
//MM8
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 8
//A8
SI( @`VR_046_Analytique ;   
    @`FCodeAnalytique; 
    ""
  )

#Période 8
//p8
SI( @`VR_046_Analytique ; 
SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 
      ; OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ) 
  ; DEFAUT( @`PDateImputationPayé 
          ; DEFAUT( SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation )) 
                  ; MAX( @`PDates ) 
                  )
          ) 
  ;"" 
  ); 
    "")

#Référence 8
//Ref8
CASE(  NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" ))      
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 8

#Groupe 8
//G8
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 9

#Débit 9
//D9
"..."

#Crédit 9
//C9
SI( OU( @`VTVAEntrepriseSoumise=1 // Au reçu
      ; @`VTVAEntrepriseSoumise=3
      ; @`VTVAEntrepriseSoumise=5
      ) // La contre-partie des frais doit passer sur les comptes de prodiut, pas le cpte débiteur
  ; DEFAUT( @`RefArticles.`CompteCrédit[TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) - 1] 
          ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 9 ; "|" ; 1)  // Cpt Articles Vente  Crédit
          )
  ; SI( @`VR_062_Multimonnaie = 0
      ; DEFAUT( @`RefClient.`CompteDébiteur[ 0 ]  ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 7 ; "|"  ; 1)  ) // Cpt Débiteur 
      ; DEFAUT( @`RefClient.`CompteDébiteur[ TROUVELIGNE( @`VMonnaiesListe ; @`Monnaie ) -1 ] ; MOT( LIGNE( @`VMonnaieData ;  TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 7 ; "|" )  )
      )
  )

#Pièce 9
//p9
CHAINE(@`Numéro)

#Libellé 9
//CE8
SI( @`VMontreLigneCompta = 1; "CE8 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", {F:Frais de rappel}{D:Mahnung Kosten}"

#Somme 9
//S9
// Corrigé au 25 juin 2014 Testé si entreprise soumis ou non et déplacé le "/ Total facturé" dans le test "soumis"
// Contre-partie frais de rappel
CHAINE( ( @`TotalFacturé - @`PTotal - DEFAUT( @`PEscompte ; 0 ) )
          *  SI( @`VTVAEntrepriseSoumise < 2 
               ; 1
               ; DEFAUT( SOMME (@`ATotauxLignesNetHT + @`ATotauxLignesTVA) + DEFAUT(@`FraisEmballageHT;0) + DEFAUT(@`TVATotalEmballage;0) ; 0 )
                 / @`TotalFacturé
               )
        )
+" +/-1"
//    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)

#Tva 9

#Monnaie 9
//MM9
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 9
//A9
SI( @`VR_046_Analytique
  ;
    SI( OU( @`VTVAEntrepriseSoumise=1 // Au reçu
          ; @`VTVAEntrepriseSoumise=3
          ; @`VTVAEntrepriseSoumise=5
          ) // La contre-partie des frais doit passer sur les comptes de prodiut, pas le cpte débiteur
      ; SI (DEFAUT(@`ACodeAnalytique;"") <> "" ;
            @`ACodeAnalytique ;
            @`FCodeAnalytique
           )
      ; ""
      )
  ; ""
 )

#Période 9
//p9
SI( @`VR_046_Analytique ; 
SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 
      ; OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ) 
  ; DEFAUT( @`PDateImputationPayé 
          ; DEFAUT( SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation )) 
                  ; MAX( @`PDates ) 
                  )
          ) 
  ;"" 
  ); 
    "")

#Référence 9
//Ref9
CASE(  NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" ))    
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 9

#Groupe 9
//G9
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 10
//D10
SI( ET( OU( @`VTVAEntrepriseSoumise = 0 
          ; @`VTVAEntrepriseSoumise = 2 
          ; @`VTVAEntrepriseSoumise = 4
          )
      ; @`SProblèmeCompta = 0 
      ; @`VComptabiliseFraisRappels = 0 // Comptabilise FRap à l'émission
     // ; @`PTotal >= @`TotalFacturé 
      ; @`PTotal < @`TotalFacturé + SOMME( @`PRappels ) 
      ; @`TotalFacturé > 0 
      ; SOMME( @`PRappels ) <> 0 
     // ; DEFAUT( @`PEscompte ; 0 ) = 0
      ) 
   ; @`PayéLe 
   ; ""
   )

#Débit 10
//D10
MOT( MOT( LIGNE( @`VMonnaieData ; 1 ) ; 25 ; "|"; 1 )  ; 1 ; " "; 1)

#Crédit 10
//C10
"..."

#Pièce 10
//p10
CHAINE(@`Numéro)

#Libellé 10
//CE9
SI( @`VMontreLigneCompta = 1; "CE9 : ";"") +
CASE( @`Epsitec
    ; ""
    ; "{F:EXEMPLE }{D:BEISPIEL }"
    )
    + @`NomRéférence+", {F:Extourne frais de rappel}{D:XXXX}"

#Somme 10
//S10
//ABS(
    ARRONDI( ( @`TotalFacturé - @`PTotal + SOMME( @`PRappels ) - DEFAUT( @`PEscompte ; 0 ) ) *
        SI( @`VTVAEntrepriseSoumise < 2 ; 1 ;
            ( RASSEMBLE( @`ATotauxLignesNetHT ; @`ATVATaux = @`TVATauxNormal ) 
            + SI( MAX( @`ATVATaux ) = @`TVATauxNormal ; @`FraisEmballageHT ; 0 ) ) 
            / ( DEFAUT(@`ATotalNonSoumisExcl;0 )
               +DEFAUT(@`ATotalNonSoumisExpo;0 )
               +DEFAUT(@`ATotalNonSoumisTVA;0 )
               +DEFAUT(@`FTotalHTTVAHéb;0 )
               +DEFAUT(@`FTotalHTTVANormal;0 )
               +DEFAUT(@`FTotalHTTVARéd;0 )
               +DEFAUT(@`FraisEmballageHT;0 ) ) *
            SI( @`FTotalHTTVANormal = 0 ; 0 ; 1 ))                                                                                                                                      
        ; .01 ) 
//    )

#Tva 10
//TVA 
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; SI( @`Exportation = 1 ; @`VCodeTVAExportation
  ; SI( @`Exonéré ; @`VCodeTVAExonéré
      ; SI( OU( @`VTVAEntrepriseSoumise = 4 
              ; @`VTVAEntrepriseSoumise = 5 
              ) 
           ; @`VCodeTVARappelsTDFN
           ; @`VCodeTVAVenteNormal+"|"+CHAINE( @`TVATauxNormal )
           )
     )
 )
 )

#Monnaie 10
//MM10
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 10
//A10
SI( @`VR_046_Analytique ;   
    @`FCodeAnalytique; 
    ""
  )

#Période 10
//p10
SI( @`VR_046_Analytique ; 
SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 
      ; OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ) 
  ; DEFAUT( @`PDateImputationPayé 
          ; DEFAUT( SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation )) 
                  ; MAX( @`PDates ) 
                  )
          ) 
  ;"" 
  ); 
    "")

#Référence 10
//Ref10
CASE(  NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" ))    
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 10

#Groupe 10
//G10
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 11

#Débit 11
//D11
MOT( MOT( LIGNE( @`VMonnaieData ; 1 ) ; 25 ; "|"; 1 )  ; 1 ; " "; 1)

#Crédit 11
//C11
"..."

#Pièce 11
//p11
CHAINE(@`Numéro)

#Libellé 11
//CE10
SI( @`VMontreLigneCompta = 1; "CE10 : ";"") +
CASE( @`Epsitec
    ; ""
    ; "{F:EXEMPLE }{D:BEISPIEL }"
    )
    + @`NomRéférence+", {F:Extourne frais de rappel}{D:CCCC}"

#Somme 11
//S11
//ABS( 
  ARRONDI( ( @`TotalFacturé - @`PTotal + SOMME( @`PRappels ) - DEFAUT( @`PEscompte ; 0 ) ) 
           * SI( @`VTVAEntrepriseSoumise < 2 
               ; 0 //1 
               ; ( RASSEMBLE( @`ATotauxLignesNetHT ; @`ATVATaux = @`TVATauxRéduit ) 
                   + SI( MAX( @`ATVATaux ) = @`TVATauxRéduit 
                       ; DEFAUT(@`FraisEmballageHT ;0)
                       ;0)
                 ) 
                / ( DEFAUT(@`ATotalNonSoumisExcl;0 )
                   +DEFAUT(@`ATotalNonSoumisExpo;0 )
                   +DEFAUT(@`ATotalNonSoumisTVA;0 )
                   +DEFAUT(@`FTotalHTTVAHéb;0 )
                   +DEFAUT(@`FTotalHTTVANormal;0 )
                   +DEFAUT(@`FTotalHTTVARéd;0 )
                   +DEFAUT(@`FraisEmballageHT ;0 )
                  )
                * SI( @`FTotalHTTVARéd = 0 ; 0 ; 1 ))                                                                                                                                        
        ; .01 ) 
//    )

#Tva 11
//TVA 
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; SI( @`Exportation = 1 ; @`VCodeTVAExportation
  ; SI( @`Exonéré ; @`VCodeTVAExonéré
      ; SI( OU( @`VTVAEntrepriseSoumise = 4 
              ; @`VTVAEntrepriseSoumise = 5 
              ) 
           ; @`VCodeTVARappelsTDFN
           ; @`VCodeTVAVenteRéduit+"|"+CHAINE( @`TVATauxRéduit )
           )
     )
 )
 )

#Monnaie 11
//MM11
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 11
//A11
SI( @`VR_046_Analytique ;   
    @`FCodeAnalytique; 
    ""
  )

#Période 11
//p11
SI( @`VR_046_Analytique ; 
SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 
      ; OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ) 
  ; DEFAUT( @`PDateImputationPayé 
          ; DEFAUT( SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation )) 
                  ; MAX( @`PDates ) 
                  )
          ) 
  ;"" 
  ); 
    "")

#Référence 11
//Ref11
CASE(  NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" ))      
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 11

#Groupe 11
//G11
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 12

#Débit 12
//D12
MOT( MOT( LIGNE( @`VMonnaieData ; 1 ) ; 25 ; "|"; 1 )  ; 1 ; " "; 1)

#Crédit 12
//C12
"..."

#Pièce 12
//p12
CHAINE(@`Numéro)

#Libellé 12
//CE11
SI( @`VMontreLigneCompta = 1; "CE11 : ";"") +
CASE( @`Epsitec
    ; ""
    ; "{F:EXEMPLE }{D:BEISPIEL }"
    )
    + @`NomRéférence+", {F:Extourne frais de rappel}{D:XXXX}"

#Somme 12
//S12
//ABS(
  ARRONDI( ( @`TotalFacturé - @`PTotal + SOMME( @`PRappels )- DEFAUT( @`PEscompte ; 0 ) ) 
           * SI( @`VTVAEntrepriseSoumise < 2 
               ; 0 //1 
               ; ( RASSEMBLE( @`ATotauxLignesNetHT ; @`ATVATaux = @`TVATauxHeb ) 
                   + SI( MAX( @`ATVATaux ) = @`TVATauxHeb 
                       ; DEFAUT(@`FraisEmballageHT   ; 0 ) 
                       ;0)
                 ) 
                / ( DEFAUT(@`ATotalNonSoumisExcl;0 )
                   +DEFAUT(@`ATotalNonSoumisExpo;0 )
                   +DEFAUT(@`ATotalNonSoumisTVA;0 )
                   +DEFAUT(@`FTotalHTTVAHéb;0 )
                   +DEFAUT(@`FTotalHTTVANormal;0 )
                   +DEFAUT(@`FTotalHTTVARéd;0 )
                   +DEFAUT(@`FraisEmballageHT ;0 )
                  )
               * SI( @`FTotalHTTVAHéb = 0 ; 0 ; 1 ))                                                                                                                                   
        ; .01 ) 
//    )

#Tva 12
//TVA 
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; SI( @`Exportation = 1 ; @`VCodeTVAExportation
  ; SI( @`Exonéré ; @`VCodeTVAExonéré
      ; SI( OU( @`VTVAEntrepriseSoumise = 4 
              ; @`VTVAEntrepriseSoumise = 5 
              ) 
          ; @`VCodeTVARappelsTDFN
          ; @`VCodeTVAVenteHeb+"|"+CHAINE( @`TVATauxHeb )
          )
      )
 )
 )

#Monnaie 12
//MM12
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 12
//A12
SI( @`VR_046_Analytique ;   
    @`FCodeAnalytique; 
    ""
  )

#Période 12
//p12
SI( @`VR_046_Analytique ; 
SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 
      ; OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ) 
  ; DEFAUT( @`PDateImputationPayé 
          ; DEFAUT( SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation )) 
                  ; MAX( @`PDates ) 
                  )
          ) 
  ;"" 
  ); 
    "")

#Référence 12
//Ref12
CASE(  NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" ))       
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 12

#Groupe 12
//G12
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 13

#Débit 13
//D13
"..."

#Crédit 13
//C13
SI( @`VR_062_Multimonnaie = 0
        ; DEFAUT( @`RefClient.`CompteDébiteur[ 0 ]  ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 7 ; "|"  ; 1)  ) // Cpt Débiteur 
        ; DEFAUT( @`RefClient.`CompteDébiteur[ TROUVELIGNE( @`VMonnaiesListe ; @`Monnaie ) -1 ] ; MOT( LIGNE( @`VMonnaieData ;  TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 7 ; "|" )  )
  )

#Pièce 13
//p13
CHAINE(@`Numéro)

#Libellé 13
//CE12
SI( @`VMontreLigneCompta = 1; "CE12 : ";"") +
CASE( @`Epsitec
    ; ""
    ; "{F:EXEMPLE }{D:BEISPIEL }"
    )
    + @`NomRéférence+", {F:Extourne frais de rappel}{D:XXXX}"

#Somme 13
//S13
@`TotalFacturé - @`PTotal + SOMME( @`PRappels ) - DEFAUT( @`PEscompte ; 0 )

#Tva 13

#Monnaie 13
//MM13
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 13
//A13
SI( @`VR_046_Analytique ;   
    @`FCodeAnalytique; 
    ""
  )

#Période 13
//p13
SI( @`VR_046_Analytique ; 
SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 
      ; OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ) 
  ; DEFAUT( @`PDateImputationPayé 
          ; DEFAUT( SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation )) 
                  ; MAX( @`PDates ) 
                  )
          ) 
  ;"" 
  ); 
    "")

#Référence 13
//Ref13
CASE(  NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" ))   
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 13

#Groupe 13
//G13
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 14
// D14
SI( ET( @`SProblèmeCompta = 0 
      ; OU( ET( @`VComptabiliseFraisRappels = 1 // à l'acquittement
              ; SOMME( @`PMontants ) > @`TotalFacturé 
              ; @`TotalFacturé > 0 
              ; SOMME( @`FraisDeRappel ) > 0
              ) 
          ; ET( @`VComptabiliseFraisRappels 
              ; SOMME( @`PMontants ) < @`TotalFacturé 
              ; @`TotalFacturé < 0 
              ; SOMME( @`FraisDeRappel ) > 0
              )
          )
      ) 
   ; @`PayéLe 
   ; ""
)

#Débit 14
//D14 bidon, ne passe pas en compta (écr à 0.-
DEFAUT( @`RefClient.`CompteDébiteur[ 0 ]  ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 7 ; "|"  ; 1)  ) // Cpt Débiteur

#Crédit 14
//C14 bidon, ne passe pas en compta, écr à 0.-
MOT( LIGNE( @`VMonnaieData ; 1 ) ; 9 ; "|" )  // Cpt Articles Crédit

#Pièce 14
//p14
CHAINE(@`Numéro)

#Libellé 14
//l
"{F:N'est pas comptabilisé}{D:Nicht verbucht}"

#Somme 14
//S14 bidon
//Ajouté pour séparer les 2 écritures multiples, sinon il y  2 écritures de balance
CHAINE(0) + " +/-0"

#Tva 14

#Monnaie 14
//MM14
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 14
//A14
SI( @`VR_046_Analytique ;   
    @`FCodeAnalytique; 
    ""
  )

#Période 14
//p14
SI( @`VR_046_Analytique ; 
SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 
      ; OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ) 
  ; DEFAUT( @`PDateImputationPayé 
          ; DEFAUT( SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation )) 
                  ; MAX( @`PDates ) 
                  )
          ) 
  ;"" 
  ); 
    "")

#Référence 14
//Ref14
CASE(  NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" ))   
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 14

#Groupe 14
//G14
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 15
//Acompte
SI( ET( DEFAUT(@`RefFactureAcompte ; 0 ) = @`Numéro // Il y a une référence pas sur elle même (Facture de base)
     ; NOMBRE(MOT(LIGNE(@`VAcomptes;1);2;";"))      // Réglage AVEC acomptes
     ;  OU( @`VTVAEntrepriseSoumise =1  // en mode reçu
         ; @`VTVAEntrepriseSoumise=3
         ; @`VTVAEntrepriseSoumise=5
         )
     )
   ; @`PayéLe
   ; ""
   )

#Débit 15
//D15 Compte reprise acomptes
MOT( LIGNE(@`VAcomptes;5) ;2 ; ";" )

#Crédit 15
// C15 articles
MOT( LIGNE(@`VAcomptes;6) ;2 ; ";" )
// Pas possible de détailler les articles ici
//DEFAUT( @`RefArticles.`CompteCrédit[TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) - 1] 
       //; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 9 ; "|" ; 1)  // Cpt Articles Vente  Crédit
      //)

#Pièce 15
//p15
CHAINE(@`Numéro)

#Libellé 15
//CE15
SI( @`VMontreLigneCompta = 1; "CE15 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+DEFAUT(@`Notes;"") + ", ristourne d'acompte"

#Somme 15
// Répartition sur les lignes d'article pas possible ici
//(@`ATotauxLignesNetHT + @`ATotauxLignesTVA)
//    * DEFAUT(@`PEscompte;0)
//    * SI( @`VComptabilisationEnMM = 0 
//        ; DEFAUT(@`TauxChange ; 1 ) 
//        ; 1)
//    / (
    @`AcompteMontantFac
    //)

#Tva 15
//TVA
SI( @`VTVAEntrepriseSoumise < 2
  ; "" 
  ; @`AcompteCodeTVA
   + SI( @`AcompteCodeTVA = ""
        ; ""
        ; "|"+CHAINE(TVACASE(@`AcompteCodeTVA ; @`TVATauxNormal ; @`TVATauxRéduit ; @`TVATauxHeb))
        )
 )

#Monnaie 15
//MM15
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 15
//A15
SI( @`VR_046_Analytique ;   
    @`FCodeAnalytique; 
    ""
  )

#Période 15
//p15
SI( @`VR_046_Analytique ; 
SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 
      ; OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ) 
  ; DEFAUT( @`PDateImputationPayé 
          ; DEFAUT( SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation )) 
                  ; MAX( @`PDates ) 
                  )
          ) 
  ;"" 
  ); 
    "")

#Référence 15
//Ref15
CASE(  NOMBRE( MOT( @`VConfigPointage ; 4 ; ";" ))   
//        ; "" 
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 15

#Groupe 15
//G15
CASE( NOMBRE( MOT( @`VConfigPointage ; 3 ; ";" ) ) 
//        ; "" 
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Payé
@`Payé=1

#Accompte
@`PDates

#RefaitAcc
@`SComptabiliser

#Commandes
#Cumul
1

#Date 1
//.                                       
//  Notez le numéro de cette fiche et corrigez-la,
//  Il doit y manquer la date de facture
//  Le calcul ne peut pas s'effectuer
//                                         
//  Nehmen Sie die Nummer diser Karte zur Kenntniss und verbessern
//  Es muss dort das Rechnungsdatum versäumen
//  Die Berechnung kann nicht durchgführt werden
//                                       
//                                       
SI( DEFAUT(@`TotalFacturé;0) = 0 
  ; "" 
  ; SI( ET( @`SProblèmeCompta = 0 ; 
            OU( @`VTVAEntrepriseSoumise=0 
              ; @`VTVAEntrepriseSoumise=2
              ; @`VTVAEntrepriseSoumise=4
              )
          )
      ; @`DateFacture 
      ; "" 
      )
  )

#Débit 1
//Art
SI( @`VR_062_Multimonnaie = 0 
  ; DEFAUT( @`RefArticles.`CompteDébit[0] 
           ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 10 ; "|"  ; 1 ) // Cpt Articles Achat  Débit
           )
  ; DEFAUT( @`RefArticles.`CompteDébit[TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) - 1 ] 
          ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 10 ; "|"  ; 1 )
          )
  )

#Crédit 1
//Art.
 "..."

#Pièce 1
//p1
CHAINE(@`Numéro)

#Libellé 1
//l1
SI( @`VMontreLigneCompta = 1;"FF1 : ";"") +
GAUCHE( CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
        @`NomRéférence+", "
        + SI( OU( DEFAUT( @`NuméroFournisseur ; "" ) <> "" ;
                  LIGNE(@`VBaseFournisseur ; 25 ) = "0"
                )
            ; ""
            ; "("+@`NuméroFournisseur+") "
            )
        + DEFAUT(@`CommentaireCompta;"")
        + SI( @`VComptabiliseLibellésAvecDétail
            ; ", " + @`ADésignation
            ; ""
            )
       ; 115
       )

#Somme 1
//ART.
SI( COMPTE(@`ADésignation) = 0 
  ; 0 
  ; DEFAUT(@`ATotalLigneTTC;0)
    * @`TotalFacturé 
    / @`Total 
  ) 
  * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)

#Tva 1
//TVA Art
SI( @`VTVAEntrepriseSoumise<>2 
  ; "" 
  ; @`ATVACode +SI( @`ATVACode = "" ; ""; "|"+CHAINE( @`ATVATauxArticle) )
  )

#Monnaie 1
//M1
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie;"CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie;"CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 1
//A1
SI( @`VR_046_Analytique ; 
    SI( COMPTE(@`ADésignation) = 0
      ; "" 
      ; SI ( DEFAUT(@`ACodeAnalytique;"") <> ""
           ; @`ACodeAnalytique
           ; "" // @`FCodeAnalytique 9.3.15
           )
      ) ; 
    ""
  )

#Période 1
//P1
SI( @`VR_046_Analytique ; 
    DEFAUT(@`FDateAnalytique ; @`DateFacture ); 
    ""
  )

#Référence 1
//Ref1
CASE(  NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 1

#Groupe 1
//G1
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 2

#Débit 2
//Crédit
@`FComptesDébit

#Crédit 2
//Débit
"..."

#Pièce 2
//p2
CHAINE(@`Numéro)

#Libellé 2
//l2
SI( @`VMontreLigneCompta = 1;"FF2 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+SI( OU( DEFAUT( @`NuméroFournisseur ; "" ) <> "" ; LIGNE(@`VBaseFournisseur ; 25 ) = "0" ) ; "" ; "("+@`NuméroFournisseur+") " )+DEFAUT(@`CommentaireCompta;"")

#Somme 2
//Somme
DEFAUT(@`FMontants;0) 
* SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)

#Tva 2
//TVA
SI( @`VTVAEntrepriseSoumise<>2 
  ; "" 
  ; @`FTVACodes +SI( @`FTVACodes = "" ; ""; "|"+CHAINE( @`FTVATaux ) )
  )

#Monnaie 2
//M2
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie;"CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie;"CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 2
//A2
SI( @`VR_046_Analytique ; 
    SI ( DEFAUT(@`FCodesAnalytiques;"") <> ""
       ; @`FCodesAnalytiques
       ; "" // @`FCodeAnalytique 9.3.15
       ) ;
    ""
  )

#Période 2
//P2
SI( @`VR_046_Analytique ; 
    DEFAUT(@`FDatesAnalytiques ; DEFAUT(@`FDateAnalytique ; @`DateFacture )); 
    ""
  )

#Référence 2
//Ref2
CASE(  NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 2

#Groupe 2
//G2
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 3

#Débit 3
@`FCompteDébit

#Crédit 3
//Débit
"..."

#Pièce 3
//p3
CHAINE(@`Numéro)

#Libellé 3
//l3
SI( @`VMontreLigneCompta = 1;"FF3 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+SI( OU( DEFAUT( @`NuméroFournisseur ; "" ) <> "" ; LIGNE(@`VBaseFournisseur ; 25 ) = "0" ) ; "" ; "("+@`NuméroFournisseur+") " )+DEFAUT(@`CommentaireCompta;"")

#Somme 3
//Somme
DEFAUT(@`FTotalTTCNormal ;0) 
* SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)

#Tva 3
//TVA
SI( @`VTVAEntrepriseSoumise<>2 
  ; "" 
  ; @`FTVACodeNormal +SI( @`FTVACodeNormal = "" ; ""; "|"+CHAINE( @`FTVATauxNormal ) )
  )

#Monnaie 3
//M3
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI(DEFAUT(@`Monnaie;"CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie;"CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 3
//A3
SI( @`VR_046_Analytique
  ; @`FCodeAnalytique
  ; ""
  )

#Période 3
//P3
SI( @`VR_046_Analytique ; 
    DEFAUT(@`FDateAnalytique ; @`DateFacture ); 
    ""
  )

#Référence 3
//Ref3
CASE( NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 3

#Groupe 3
//G3
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 4

#Débit 4
//Crédit
SI( @`VR_062_Multimonnaie = 0 
  ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 13 ; "|"  ; 1 ) // Cpt Frais Achat
  ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 13 ; "|"  ; 1 ) 
  )

#Crédit 4
//Frais A.
"..."

#Pièce 4
//p4
CHAINE(@`Numéro)

#Libellé 4
//l4
SI( @`VMontreLigneCompta = 1;"FF4 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+SI( OU( DEFAUT( @`NuméroFournisseur ; "" ) <> "" ; LIGNE(@`VBaseFournisseur ; 25 ) = "0" ) ; "" ; "("+@`NuméroFournisseur+") " )+DEFAUT(@`CommentaireCompta;"")

#Somme 4
//Frais
SI( @`ADésignation[0] = "" 
  ; 0
  ; DEFAUT( @`FraisEmballage ;0 )
    * @`TotalFacturé 
    / @`Total
  )
  * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)

#Tva 4
//TVA
SI( @`VTVAEntrepriseSoumise<>2 
  ; "" 
  ; SI( MAX(@`ATVATauxArticle ) = @`TVATauxNormal 
      ; DEFAUT(@`FTVACodeFrais ; @`VCodeTVAAchatNormal ) + "|"+CHAINE(@`TVATauxNormal ) 
      ; SI( MAX(@`ATVATauxArticle ) = @`TVATauxRéduit 
          ; DEFAUT(@`FTVACodeFrais ; @`VCodeTVAAchatRéduit ) + "|"+CHAINE(@`TVATauxRéduit ) 
          ; ""
          )
      )
  )

#Monnaie 4
//M4
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie;"CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie;"CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 4
//A4
SI( @`VR_046_Analytique
  ; "" // @`FCodeAnalytique pas de code sur les frais de port
  ; ""
  )

#Période 4
//P4
SI( @`VR_046_Analytique ; 
    DEFAUT(@`FDateAnalytique ; @`DateFacture ); 
    ""
  )

#Référence 4
//Ref4
CASE( NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 4

#Groupe 4
//G4
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 5

#Débit 5
//Frais
SI( @`VR_062_Multimonnaie = 0
  ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 13 ; "|"  ; 1 ) // Cpt Frais Achat
  ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 13 ; "|"  ; 1  ) 
  )

#Crédit 5
//Frais A.
"..."

#Pièce 5
//p5
CHAINE(@`Numéro)

#Libellé 5
//l5
SI( @`VMontreLigneCompta = 1;"FF5 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+SI(OU( DEFAUT( @`NuméroFournisseur ; "" ) <> "" ; LIGNE(@`VBaseFournisseur ; 25 ) = "0" ) ; "" ; "("+@`NuméroFournisseur+") " )+DEFAUT(@`CommentaireCompta;"")

#Somme 5
//Solde
CHAINE( ( @`TotalFacturé - @`TotalFacturé ) 
        * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1) 
      )
      + " +/-1"

#Tva 5
//TVA
SI( @`VTVAEntrepriseSoumise<>2 
  ; "" 
  ; SI( MAX(@`ATVATauxArticle ) = @`TVATauxNormal 
      ; @`VCodeTVAAchatNormal + "|"+CHAINE(@`TVATauxNormal ) 
      ; SI( MAX(@`ATVATauxArticle ) = @`TVATauxRéduit 
          ; @`VCodeTVAAchatRéduit + "|"+CHAINE(@`TVATauxRéduit ) 
          ; "" 
          )
      )
  )

#Monnaie 5
//M5
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie;"CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie;"CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 5
//A5
SI( @`VR_046_Analytique
  ; "" // @`FCodeAnalytique pas de code sur les frais de balance
  ; ""
  )

#Période 5
//P5
SI( @`VR_046_Analytique ; 
    DEFAUT(@`FDateAnalytique ; @`DateFacture ); 
    ""
  )

#Référence 5
//Ref5
CASE( NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 5

#Groupe 5
//G5
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 6

#Débit 6
//Créancier
 "..."

#Crédit 6
//Four.
DEFAUT(@`FCompteCrédit
       ; DEFAUT( @`RefFournisseur.`CompteCrédit  
               ; SI( @`VR_062_Multimonnaie = 0
                   ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 8 ; "|" ; 1  ) 
		   ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 8 ; "|" ; 1  ) 
                   ) 
               )
       )

#Pièce 6
//p6
CHAINE(@`Numéro)

#Libellé 6
//l6
SI( @`VMontreLigneCompta = 1;"FF6 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+SI( OU( DEFAUT( @`NuméroFournisseur ; "" ) <> "" ; LIGNE(@`VBaseFournisseur ; 25 ) = "0" ) ; "" ; "("+@`NuméroFournisseur+") " )+DEFAUT(@`CommentaireCompta;"")

#Somme 6
//Total
@`TotalFacturé 
* SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)

#Tva 6

#Monnaie 6
//M6
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie;"CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie;"CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 6

#Période 6
//P6
SI( @`VR_046_Analytique ; 
    DEFAUT(@`FDateAnalytique ; @`DateFacture ); 
    ""
  )

#Référence 6
//Ref6
CASE( NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 6

#Groupe 6
//G6
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Versements
#Cumul
1

#Date 1
//.                                       
//  Notez le numéro de cette fiche et corrigez-la.
//  Il doit y manquer la date de paiement.
//  Le calcul ne peut pas s'effectuer
//                                       
//  Nehmen Sie die Nummer dieser Karte zur Kenntnis und verbessern.
//  Er muss dort das Inkassodatum versäumen.
//  Die Berechnung kann nicht durchgeführt werden.
//                                       
//                                       
SI( @`SProblèmeCompta = 1 
  ; "" 
  ; SI( OU( @`VTVAEntrepriseSoumise = 1 
          ; @`VTVAEntrepriseSoumise = 3 
          ; @`VTVAEntrepriseSoumise = 5
          )
      ; DEFAUT( @`PDates[@`SComptabilisationMe];"") 
      ; "" 
      )
  )

#Débit 1
//ART:
SI( SOMME(@`ATotalLigneTTC) = 0 
  ; "" 
  ; SI( @`VR_062_Multimonnaie = 0 
      ; DEFAUT( @`RefArticles.`CompteDébit[0] 
              ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 10 ; "|"  ; 1 ) // Cpt Articles Achat  Débit
              ) 
      ; DEFAUT( @`RefArticles.`CompteDébit[TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) -1] 
              ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 10 ; "|" ; 1  ) // Cpt Articles Achat  Débit
              )
      )
  )

#Crédit 1
//Art.
SI( SOMME(@`ATotalLigneTTC) = 0 
  ; "" 
  ;  "..."      
  )

#Pièce 1
//p1
CHAINE(@`Numéro)

#Libellé 1
//l1
SI( @`VMontreLigneCompta = 1;"FP1 : ";"") +
GAUCHE( CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
        @`NomRéférence + ", " +
        SI( OU( DEFAUT( @`NuméroFournisseur ; "" ) <> ""
              ; LIGNE(@`VBaseFournisseur ; 25 ) = "0"
              )
          ; ""
          ; "("+@`NuméroFournisseur+") "
          )
        + DEFAUT(@`CommentaireCompta;"")
        + SI( @`VComptabiliseLibellésAvecDétail
            ; ", " + @`ADésignation
            ; ""
            )
      ; 115
      )

#Somme 1
//Vérifier le total de la facture
@`ATotalLigneTTC 
   * @`PMontants[@`SComptabilisationMe] 
   * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1 ) 
   / @`TotalFacturé

#Tva 1
//TVA art.
SI( @`VTVAEntrepriseSoumise<>3 
  ; "" 
  ; @`ATVACode + SI(@`ATVACode = "" ; "" ; "|"+CHAINE(@`ATVATauxArticle))
  )

#Monnaie 1
//mm1
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 1
//A1
SI( @`VR_046_Analytique ; 
    SI ( DEFAUT(@`ACodeAnalytique;"") <> ""
           ; @`ACodeAnalytique
           ; "" // @`FCodeAnalytique 9.3.15
           ) ; 
    ""
  )

#Période 1
//p1
SI( @`VR_046_Analytique ; 
SI( OU( @`VTVAEntrepriseSoumise = 1 
      ; @`VTVAEntrepriseSoumise = 3 
      ; @`VTVAEntrepriseSoumise = 5
      )
  ; DEFAUT(@`PDateImputation[@`SComptabilisationMe]; @`PDates[@`SComptabilisationMe]) 
  ; "" 
  ); 
    "")

#Référence 1
//Ref1
CASE(  NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 1

#Groupe 1
//G1
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 2

#Débit 2
//Somme
SI( SOMME(@`ATotalLigneTTC) <> 0 
  ; "" 
  ; @`FComptesDébit
  )

#Crédit 2
//Somme
SI( SOMME(@`ATotalLigneTTC) <> 0 
  ; "" 
  ;"..." 
  )

#Pièce 2
//p2
CHAINE(@`Numéro)

#Libellé 2
//l2
SI( @`VMontreLigneCompta = 1;"FP2 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+SI( OU( DEFAUT( @`NuméroFournisseur ; "" ) <> "" ; LIGNE(@`VBaseFournisseur ; 25 ) = "0" ) ; "" ; "("+@`NuméroFournisseur+") " )+DEFAUT(@`CommentaireCompta;"")

#Somme 2
//Global
@`FMontants 
   * @`PMontants[@`SComptabilisationMe] 
   * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1 ) 
   / DEFAUT( @`TotalFacturé ; @`Total )

#Tva 2
//TVA
SI( @`VTVAEntrepriseSoumise<>3 
  ; "" 
  ; @`FTVACodes+SI(@`FTVACodes = "" ; "" ; "|"+ CHAINE( @`FTVATaux ) )
  )

#Monnaie 2
//mm2
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF" 
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 2
//A2
SI( @`VR_046_Analytique ; 
    SI ( DEFAUT(@`FCodesAnalytiques;"") <> ""
       ; @`FCodesAnalytiques
       ; "" //  @`FCodeAnalytique 9.3.15
       ) ; 
    ""
  )

#Période 2
//p2
SI( @`VR_046_Analytique ; 
SI( OU( @`VTVAEntrepriseSoumise = 1 
      ; @`VTVAEntrepriseSoumise = 3 
      ; @`VTVAEntrepriseSoumise = 5
      )
  ; DEFAUT(@`PDateImputation[@`SComptabilisationMe]; @`PDates[@`SComptabilisationMe]) 
  ; "" 
  ); 
    "")

#Référence 2
//Ref2
CASE(  NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 2

#Groupe 2
//G2
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 3

#Débit 3
//Somme
SI( SOMME(@`ATotalLigneTTC) <> 0 
  ; "" 
  ; @`FCompteDébit
  )

#Crédit 3
//Somme
SI( SOMME(@`ATotalLigneTTC) <> 0 
  ; "" 
  ; "..." 
  )

#Pièce 3
//p3
CHAINE(@`Numéro)

#Libellé 3
//l3
SI( @`VMontreLigneCompta = 1;"FP3 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+SI( OU( DEFAUT( @`NuméroFournisseur ; "" ) <> "" ; LIGNE(@`VBaseFournisseur ; 25 ) = "0" ) ; "" ; "("+@`NuméroFournisseur+") " )+DEFAUT(@`CommentaireCompta;"")

#Somme 3
//total
@`FTotalTTCNormal 
   * @`PMontants[@`SComptabilisationMe] 
   * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1 ) 
   / DEFAUT( @`TotalFacturé ; @`Total )

#Tva 3
//TVA 
SI( @`VTVAEntrepriseSoumise<>3
  ; "" 
  ; @`FTVACodeNormal+SI(@`FTVACodeNormal = "" ; "" ; "|"+ CHAINE( @`FTVATauxNormal ) ))

#Monnaie 3
//mm3
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 3
//A3
SI( @`VR_046_Analytique
  ; @`FCodeAnalytique
  ; ""
  )

#Période 3
//p3
SI( @`VR_046_Analytique ; 
SI( OU( @`VTVAEntrepriseSoumise = 1 
      ; @`VTVAEntrepriseSoumise = 3 
      ; @`VTVAEntrepriseSoumise = 5
      )
  ; DEFAUT(@`PDateImputation[@`SComptabilisationMe]; @`PDates[@`SComptabilisationMe]) 
  ; "" 
  ); 
    "")

#Référence 3
//Ref3
CASE( NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 3

#Groupe 3
//G3
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 4

#Débit 4
//Port
SI( SOMME(@`ATotalLigneTTC) = 0 
  ; "" 
  ;  SI( @`VR_062_Multimonnaie = 0 
          ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 14 ; "|"  ; 1 ) // Cpt Port Achat
          ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 14 ; "|"  ; 1 ) // Cpt Port Achat
          )
 )

#Crédit 4
//Port
SI( SOMME(@`ATotalLigneTTC) = 0 
  ; "" 
  ; "..."
  )

#Pièce 4
//p4
CHAINE(@`Numéro)

#Libellé 4
//l4
SI( @`VMontreLigneCompta = 1;"FP4 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+SI( OU( DEFAUT( @`NuméroFournisseur ; "" ) <> "" ; LIGNE(@`VBaseFournisseur ; 25 ) = "0" ) ; "" ; "("+@`NuméroFournisseur+") " )+DEFAUT(@`CommentaireCompta;"")

#Somme 4
//Frais
@`FraisEmballage 
   * @`PMontants[@`SComptabilisationMe] 
   * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1 ) 
   / DEFAUT( @`TotalFacturé ; @`Total )

#Tva 4
//TVA
SI( @`VTVAEntrepriseSoumise<>3
  ; "" 
  ; SI( @`TVATauxEmballage = @`TVATauxRéduit 
      ;  DEFAUT(@`FTVACodeFrais ; @`VCodeTVAAchatRéduit ) 
      ;  DEFAUT(@`FTVACodeFrais ; @`VCodeTVAAchatNormal )
      )
    +"|"+CHAINE( @`TVATauxEmballage)
  )

#Monnaie 4
//mm4
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 4
//A4
SI( @`VR_046_Analytique
   ; "" //  @`FCodeAnalytique pas sur les frais 
   ; ""
  )

#Période 4
//p4
SI( @`VR_046_Analytique ; 
SI( OU( @`VTVAEntrepriseSoumise = 1 
      ; @`VTVAEntrepriseSoumise = 3 
      ; @`VTVAEntrepriseSoumise = 5
      )
  ; DEFAUT(@`PDateImputation[@`SComptabilisationMe]; @`PDates[@`SComptabilisationMe]) 
  ; "" 
  ); 
    "")

#Référence 4
//Ref4
CASE( NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 4

#Groupe 4
//G4
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 5

#Débit 5
//Frais
SI( SOMME(@`ATotalLigneTTC) = 0 
   //Reçu
  ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 13 ; "|" ; 1  )      
  //Convenu
  ; SI( @`VR_062_Multimonnaie = 0  
       ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 13 ; "|"  ; 1 ) // Cpt Frais Achat
       ; MOT( LIGNE( @`VMonnaieData ;  TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF"))  ) ; 13 ; "|" ; 1  )
       )
   )

#Crédit 5
//Achat
SI( SOMME(@`ATotalLigneTTC) = 0 
  //Reçu
  ; "..." 
  // Convenu
  ; "..."
  )

#Pièce 5
//p5
CHAINE(@`Numéro)

#Libellé 5
//l5
SI( @`VMontreLigneCompta = 1;"FP5 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+SI( OU( DEFAUT( @`NuméroFournisseur ; "" ) <> "" ; LIGNE(@`VBaseFournisseur ; 25 ) = "0" ) ; "" ; "("+@`NuméroFournisseur+") " )+DEFAUT(@`CommentaireCompta;"")

#Somme 5
//Arrondi
CHAINE( (@`Total - @`Total) 
        * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)
       )
       + "+/-1"

#Tva 5

#Monnaie 5
//mm5
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 5
//A5
SI( @`VR_046_Analytique
  ; "" //   @`FCodeAnalytique  pas sur l'arrondi 
  ;  ""
  )

#Période 5
//p5
SI( @`VR_046_Analytique ; 
SI( OU( @`VTVAEntrepriseSoumise = 1 
      ; @`VTVAEntrepriseSoumise = 3 
      ; @`VTVAEntrepriseSoumise = 5
      )
  ; DEFAUT(@`PDateImputation[@`SComptabilisationMe]; @`PDates[@`SComptabilisationMe]) 
  ; "" 
  ); 
    "")

#Référence 5
//Ref5
CASE( NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 5

#Groupe 5
//G5
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 6

#Débit 6
//Payé
"..."

#Crédit 6
//Payé
@`PTypes[@`SComptabilisationMe]

#Pièce 6
//p6
CHAINE(@`Numéro)

#Libellé 6
//l6
SI( @`VMontreLigneCompta = 1;"FP6 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+SI( OU( DEFAUT( @`NuméroFournisseur ; "" ) <> "" ; LIGNE(@`VBaseFournisseur ; 25 ) = "0" ) ; "" ; "("+@`NuméroFournisseur+") " )+DEFAUT(@`CommentaireCompta;"")

#Somme 6
//Versé
@`PMontants[@`SComptabilisationMe] 
  * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1 )

#Tva 6

#Monnaie 6
//mm6
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF")+ "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 6

#Période 6
//p6
SI( @`VR_046_Analytique ; 
SI( OU( @`VTVAEntrepriseSoumise = 1 
      ; @`VTVAEntrepriseSoumise = 3 
      ; @`VTVAEntrepriseSoumise = 5
      )
  ; DEFAUT(@`PDateImputation[@`SComptabilisationMe]; @`PDates[@`SComptabilisationMe]) 
  ; "" 
  ); 
    "")

#Référence 6
//Ref6
CASE( NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 6

#Groupe 6
//G6
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 7
//.                                       
//  Notez le numéro de cette fiche et corrigez-la.
//  Il doit y manquer la date de paiement.
//  Le calcul ne peut pas s'effectuer
//                                       
//  Nehmen Sie die Nummer dieser Karte zur Kenntnis und verbessern.
//  Er muss dort das Inkassodatum versäumen.
//  Die Berechnung kann nicht durchgeführt werden.
//                                       
//                                       
SI( @`SProblèmeCompta = 1 
  ; "" 
  ; SI( OU( @`VTVAEntrepriseSoumise = 0 
          ; @`VTVAEntrepriseSoumise = 2 
          ; @`VTVAEntrepriseSoumise = 4
          ) 
      ; DEFAUT( @`PDates[@`SComptabilisationMe];"") 
      ; "" 
      )
  )

#Débit 7
//Créancier
DEFAUT( @`FCompteCrédit 
       ; DEFAUT( @`RefFournisseur.`CompteCrédit 
                ; SI( @`VR_062_Multimonnaie = 0
                    ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 8 ; "|"  ; 1 )
                    ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 8 ; "|"  ; 1 )
                    )
                )
       )

#Crédit 7
//Créancier
@`PTypes[@`SComptabilisationMe]

#Pièce 7
//p7
CHAINE(@`Numéro)

#Libellé 7
//l7
SI( @`VMontreLigneCompta = 1;"FP7 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+SI( LIGNE(@`VBaseFournisseur ; 25 ) = "0" ; "" ; "("+@`NuméroFournisseur+") " )+DEFAUT(@`CommentaireCompta;"")

#Somme 7
//Versé
@`PMontants[@`SComptabilisationMe] 
  * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1 )

#Tva 7

#Monnaie 7
//mm7
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 7

#Période 7
//p7
SI( @`VR_046_Analytique ; 
SI( OU( @`VTVAEntrepriseSoumise = 1 
      ; @`VTVAEntrepriseSoumise = 3 
      ; @`VTVAEntrepriseSoumise = 5
      )
  ; DEFAUT(@`PDateImputation[@`SComptabilisationMe]; @`PDates[@`SComptabilisationMe]) 
  ; "" 
  ); 
    "")

#Référence 7
//Ref7
CASE( NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 7

#Groupe 7
//G7
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Final
#Cumul
1

#Date 1
//Date
SI( DEFAUT(@`PEscompteMt;0) = 0 
  ; "" 
  ; SI( ET( @`SProblèmeCompta = 0 ; 
            OU( @`VTVAEntrepriseSoumise=0 
              ; @`VTVAEntrepriseSoumise=2
              ; @`VTVAEntrepriseSoumise=4
              )
          )
      ; DEFAUT( @`PayéLe 
              ; SI( ANNEE( MAX( @`PDates ) ) < 0 
                  ; AUJOURDHUI() 
                  ; MAX(@`PDates) 
                  )
              ) 
      ; "" 
      )
  )

#Débit 1
//Esc.
SI( COMPTE(@`ADésignation) = 0 
  ; ""
  ; "..."
  )

#Crédit 1
//Escompte
SI( COMPTE(@`ADésignation) = 0 
  ; ""
  ; SI( @`VEscompteVentiléAchat = 0
      // Ventilé
      ; SI( @`VR_062_Multimonnaie = 0 
          ; DEFAUT( @`RefArticles.`CompteDébit[0] 
                  ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 10 ; "|"  ; 1 ) // Cpt Articles Achat  Débit
                  )
          ; DEFAUT( @`RefArticles.`CompteDébit[TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) - 1 ] 
                  ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 10 ; "|"  ; 1 ) 
                  )
          )
      // regroupé 
     ; DEFAUT( @`PEscompteCompte
             ; SI( @`VR_062_Multimonnaie = 0
                 ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 12 ; "|"  ; 1 ) // Cpt Escompte Obtenu
                 ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 12 ; "|"  ; 1 ) 
                 )
             )
     )
  )

#Pièce 1
//p1
CHAINE(@`Numéro)

#Libellé 1
//l1
SI( @`VMontreLigneCompta = 1;"FE1 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+SI( OU( DEFAUT( @`NuméroFournisseur ; "" ) <> "" ; LIGNE(@`VBaseFournisseur ; 25 ) = "0" ) ; "" ; "("+@`NuméroFournisseur+") " )+DEFAUT(@`CommentaireCompta;"")

#Somme 1
//ventil
SI( COMPTE(@`ADésignation) =  0 
  ; 0 
  ; DEFAUT(@`ATotalLigneTTC;0) 
    * @`PEscompteMt 
    * SI(@`TotalFacturé<0;-1;1) 
    /  @`Total
  )
  * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)

#Tva 1
//TVA Art.
SI( @`VTVAEntrepriseSoumise<>2 
  ; "" 
  ; @`ATVACode + SI( @`ATVACode = "" ; ""; "|"+CHAINE( @`ATVATauxArticle) )
  )

#Monnaie 1
//M1
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 1
//A1
SI( @`VR_046_Analytique ; 
    SI( @`VEscompteVentiléAchat = 0  // Ventilé
    ; DEFAUT (@`ACodeAnalytique ; ""  ) //@`FCodeAnalytique)
    ; "" // @`FCodeAnalytique
    ) ;
    ""
  )

#Période 1
//p1
SI( @`VR_046_Analytique ; 
SI( DEFAUT(@`PEscompteMt;0) = 0 
  ; "" 
  ; SI( OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          ) 
      ; DEFAUT(  SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation ) ) ; MAX( @`PDates  ) ) 
      ; "" 
      )
  ); 
    "")

#Référence 1
//Ref1
CASE(  NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 1

#Groupe 1
//G1
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 2

#Débit 2
//Escompte
"..."

#Crédit 2
//Escompte
SI( @`VEscompteVentiléAchat = 0
  // Ventilé
  ; @`FComptesDébit 
  ; DEFAUT( @`PEscompteCompte
          ; SI( @`VR_062_Multimonnaie = 0
              ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 12 ; "|"  ; 1 ) // Cpt Escompte Obtenu
              ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 12 ; "|"  ; 1 )
              )
          )
  )

#Pièce 2
//p2
CHAINE(@`Numéro)

#Libellé 2
//l2
SI( @`VMontreLigneCompta = 1;"FE2 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+SI( OU( DEFAUT( @`NuméroFournisseur ; "" ) <> "" ; LIGNE(@`VBaseFournisseur ; 25 ) = "0" ) ; "" ; "("+@`NuméroFournisseur+") " )+DEFAUT(@`CommentaireCompta;"")

#Somme 2
//Tot
DEFAUT(@`FMontants;0) 
    * @`PEscompteMt  
    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)
    / DEFAUT(@`TotalFacturé ; @`Total)

#Tva 2
//TVA
SI( @`VTVAEntrepriseSoumise<>2 
  ; "" 
  ; @`FTVACodes +SI( @`FTVACodes = "" ; ""; "|"+CHAINE( @`FTVATaux ) )
  )

#Monnaie 2
//M2
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF" 
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 2
//A2
SI( @`VR_046_Analytique ; 
    SI ( DEFAUT(@`FCodesAnalytiques;"") <> ""
       ; @`FCodesAnalytiques
       ; ""//@`FCodeAnalytique
       ) ; 
    ""
  )

#Période 2
//p2
SI( @`VR_046_Analytique ; 
SI( DEFAUT(@`PEscompteMt;0) = 0 
  ; "" 
  ; SI( OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ; DEFAUT(  SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation ) ) ; MAX( @`PDates  ) ) 
      ; "" 
      )
  ); 
    "")

#Référence 2
//Ref2
CASE(  NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 2

#Groupe 2
//G2
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 3

#Débit 3
//Escompte
  SI(@`PEscompteMt >= 0
    ; "..."
    ; SI( @`VEscompteVentiléAchat = 0
          // Ventilé
          ; @`FCompteDébit
          ; DEFAUT( @`PEscompteCompte
                  ; SI( @`VR_062_Multimonnaie = 0
                      ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 12 ; "|"  ; 1 ) // Cpt Escompte Obtenu
                      ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 12 ; "|"  ; 1 ) // Cpt Escompte Obtenu
                      )
                  )
          )
    )

#Crédit 3
//Escompte
SI(@`PEscompteMt >= 0
    ; SI( @`VEscompteVentiléAchat = 0
          // Ventilé
          ; @`FCompteDébit
          ; DEFAUT( @`PEscompteCompte
                  ; SI( @`VR_062_Multimonnaie = 0
                      ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 12 ; "|"  ; 1 ) // Cpt Escompte Obtenu
                      ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 12 ; "|"  ; 1 ) // Cpt Escompte Obtenu
                      )
                  )
          )
    ;  "..."
    )

#Pièce 3
//p3
CHAINE(@`Numéro)

#Libellé 3
//l3
SI( @`VMontreLigneCompta = 1;"FE3 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+SI( OU( DEFAUT( @`NuméroFournisseur ; "" ) <> "" ; LIGNE(@`VBaseFournisseur ; 25 ) = "0" ) ; "" ; "("+@`NuméroFournisseur+") " )+DEFAUT(@`CommentaireCompta;"")

#Somme 3
//Tot
DEFAUT(@`FTotalTTCNormal ;0)
    * @`PEscompteMt
    * SI(@`PEscompteMt < 0 ; -1 ; 1)
    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)
    / DEFAUT(@`TotalFacturé ; @`Total)

#Tva 3
//TVA
SI( @`VTVAEntrepriseSoumise<>2
  ; ""
  ; @`FTVACodeNormal +SI( @`FTVACodeNormal = "" ; ""; "|"+CHAINE( @`FTVATauxNormal ) )
  )

#Monnaie 3
//M3
SI( @`VComptabilisationEnMM = 0
  ; ""
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 3
//A3
SI( @`VR_046_Analytique
  ; @`FCodeAnalytique
  ; ""
  )

#Période 3
//p3
SI( @`VR_046_Analytique ;
SI( DEFAUT(@`PEscompteMt;0) = 0
  ; ""
  ; SI( OU( @`VTVAEntrepriseSoumise=0
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ; DEFAUT(  SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation ) ) ; MAX( @`PDates  ) )
      ; ""
      )
  );
    "")

#Référence 3
//Ref3
CASE( NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 3

#Groupe 3
//G3
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 4

#Débit 4
//Frais
"..."

#Crédit 4
//Frais
SI( @`VEscompteVentiléAchat = 0
  // Ventilé
  ; @`FComptesDébit 
  ; DEFAUT( @`PEscompteCompte
          ; SI( @`VR_062_Multimonnaie = 0
              ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 12 ; "|"  ; 1 ) // Cpt Escompte Obtenu
              ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 12 ; "|"  ; 1 ) // Cpt Escompte Obtenu  
              )
          )
  )

#Pièce 4
//p4
CHAINE(@`Numéro)

#Libellé 4
//l4
SI( @`VMontreLigneCompta = 1;"FE4 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+SI( OU( DEFAUT( @`NuméroFournisseur ; "" ) <> "" ; LIGNE(@`VBaseFournisseur ; 25 ) = "0" ) ; "" ; "("+@`NuméroFournisseur+") " )+DEFAUT(@`CommentaireCompta;"")

#Somme 4
//Frais
SI( COMPTE(@`ADésignation) = 0 
  ; 0 
  ; DEFAUT( @`FraisEmballage ;0 )
    * @`PEscompteMt
    * SI(@`TotalFacturé<0;-1;1)
    / DEFAUT( @`TotalFacturé ; @`Total ) 
  )
  * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)

#Tva 4
//TVA
SI( @`VTVAEntrepriseSoumise<>2 
  ; "" 
  ; SI( MAX(@`ATVATauxArticle ) = @`TVATauxNormal
      ; @`VCodeTVAAchatNormal + "|"+CHAINE(@`TVATauxNormal ) 
      ; SI( MAX(@`ATVATauxArticle ) = @`TVATauxRéduit 
          ; @`VCodeTVAAchatRéduit + "|"+CHAINE(@`TVATauxRéduit ) 
          ; "" 
          )
      )
  )

#Monnaie 4
//M4
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 4
//A4
SI( @`VR_046_Analytique ; 
    SI( @`VEscompteVentiléAchat = 0 // Ventilé
      ; SI (DEFAUT(@`FCodesAnalytiques ; "") <> ""
           ; "" //@`FCodesAnalytiques
           ; "" //@`FCodeAnalytique
           )
      ; "" // @`FCodeAnalytique
      ) ; 
    ""
  ) // pas de code sur frais d'emballage

#Période 4
//p4
SI( @`VR_046_Analytique ; 
SI( DEFAUT(@`PEscompteMt;0) = 0 
  ; "" 
  ; SI( OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ; DEFAUT(  SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation ) ) ; MAX( @`PDates  ) )
      ; "" 
      )
  ); 
    "")

#Référence 4
//Ref4
CASE( NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 4

#Groupe 4
//G4
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 5

#Débit 5
//Frais
 "..."

#Crédit 5
//Frais
SI( @`VR_062_Multimonnaie = 0 
  ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 13 ; "|"  ; 1 ) // Cpt Frais Achat
  ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 13 ; "|"  ; 1 ) // Cpt Frais Achat
  )

#Pièce 5
//p5
CHAINE(@`Numéro)

#Libellé 5
//l5
SI( @`VMontreLigneCompta = 1;"FE5 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+SI( OU( DEFAUT( @`NuméroFournisseur ; "" ) <> "" ; LIGNE(@`VBaseFournisseur ; 25 ) = "0" ) ; "" ; "("+@`NuméroFournisseur+") " )+DEFAUT(@`CommentaireCompta;"")

#Somme 5
//Frais
CHAINE( (@`TotalFacturé - @`TotalFacturé) 
        * SI( @`VComptabilisationEnMM = 0 
            ; DEFAUT(@`TauxChange ; 1) 
            ; 1
            ) 
      )
      + "+/-1"

#Tva 5
//TVA
SI( @`VTVAEntrepriseSoumise<>2 
  ; "" 
  ; SI( MAX(@`ATVATauxArticle ) = @`TVATauxNormal 
      ; @`VCodeTVAAchatNormal+ "|"+CHAINE(@`TVATauxNormal ) 
      ; SI( MAX(@`ATVATauxArticle ) = @`TVATauxRéduit 
          ; @`VCodeTVAAchatRéduit + "|"+CHAINE(@`TVATauxRéduit )
          ; "" 
          )
      )
  )

#Monnaie 5
//M5
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 5
//A5
SI( @`VR_046_Analytique
  ; "" //    @`FCodeAnalytique pas sur les arrondis
  ; ""
  )

#Période 5
//p5
SI( @`VR_046_Analytique ; 
SI( DEFAUT(@`PEscompteMt;0) = 0 
  ; "" 
  ; SI( OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ; DEFAUT(  SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation ) ) ; MAX( @`PDates  ) ) 
      ; "" 
      )
  ); 
    "")

#Référence 5
//Ref5
CASE( NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 5

#Groupe 5
//G5
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 6

#Débit 6
//Escompte
DEFAUT( @`RefFournisseur.`CompteCrédit 
       ; SI( @`VR_062_Multimonnaie = 0 
            ;  MOT( LIGNE( @`VMonnaieData ; 1 ) ; 8 ; "|"  ; 1 )  // Cpt Créancier
            ;  MOT( LIGNE( @`VMonnaieData ;  TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 8 ; "|"  ; 1 )  // Cpt Créancier
            )
      )

#Crédit 6
//Escompte
"..."

#Pièce 6
//p6
CHAINE(@`Numéro)

#Libellé 6
//l6
SI( @`VMontreLigneCompta = 1;"FE6 : ";"") +
CASE(DEFAUT( @`Epsitec ;0); "" ; "{F:EXEMPLE }{D:BEISPIEL }" )+
@`NomRéférence+", "+SI( OU( DEFAUT( @`NuméroFournisseur ; "" ) <> "" ; LIGNE(@`VBaseFournisseur ; 25 ) = "0" ) ; "" ; "("+@`NuméroFournisseur+") " )+DEFAUT(@`CommentaireCompta;"")

#Somme 6
//Esc
@`PEscompteMt 
    // * SI(@`PEscompteMt < 0 ; -1 ; 1)  Corr DB 13.11.14
    * SI( @`VComptabilisationEnMM = 0
        ; DEFAUT(@`TauxChange ; 1) 
        ; 1
        )

#Tva 6

#Monnaie 6
//M6
SI( @`VComptabilisationEnMM = 0
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 6

#Période 6
//p6
SI( @`VR_046_Analytique ; 
SI( DEFAUT(@`PEscompteMt;0) = 0 
  ; "" 
  ; SI( OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ; DEFAUT(  SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation ) ) ; MAX( @`PDates  ) ) 
      ; "" 
      )
  ); 
    "")

#Référence 6
//Ref6
CASE( NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 6

#Groupe 6
//G6
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Date 7
//Date
SI( ET( @`SProblèmeCompta = 0 ; 
        OU( @`VTVAEntrepriseSoumise=1 
          ; @`VTVAEntrepriseSoumise=3 
          ; @`VTVAEntrepriseSoumise=5 
          ) 
      )
  ; DEFAUT( @`PayéLe ; SI( ANNEE( MAX( @`PDates ) )< 0 
                         ; AUJOURDHUI() 
                         ; MAX(@`PDates) 
                         ) 
          ) 
  ; "" 
  )

#Débit 7
//Escompte
SI( @`VR_062_Multimonnaie = 0 
  ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 12 ; "|"  ; 1 ) // Cpt Escompte Obtenu
  ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 12 ; "|"  ; 1 ) 
  )

#Crédit 7
//Créancier
DEFAUT( @`PEscompteCompte
      ; SI( @`VR_062_Multimonnaie = 0 
          ; MOT( LIGNE( @`VMonnaieData ; 1 ) ; 8 ; "|" ; 1  )  // Cpt Créancier
          ; MOT( LIGNE( @`VMonnaieData ; TROUVELIGNE( @`VMonnaiesListe ; DEFAUT(@`Monnaie; "CHF")) ) ; 8 ; "|"  ; 1 ) 
          )
      )

#Pièce 7
//p7
CHAINE(@`Numéro)

#Libellé 7
//l7
SI( @`VMontreLigneCompta = 1;"FE7 : ";"") +
SI( LANGUE() = 0
  ; "Pour statut, ne sera pas passé en compta"
  ; "Nur für Status, wird nicht in der Fibu erscheinen"
  )

#Somme 7
//Balance
CHAINE(0) + "+/-0.01"

#Tva 7

#Monnaie 7
//M7
SI( @`VComptabilisationEnMM = 0 
  ; "" 
  ; SI( DEFAUT(@`Monnaie; "CHF") = "CHF"
      ; ""
      ; DEFAUT(@`Monnaie; "CHF") + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)
      )
  )

#Analytique 7
//A7
SI( @`VR_046_Analytique
  ; "" //  @`FCodeAnalytique
  ; ""
  )

#Période 7
//p7
SI( @`VR_046_Analytique ; 
SI( DEFAUT(@`PEscompteMt;0) = 0 
  ; "" 
  ; SI( OU( @`VTVAEntrepriseSoumise=0 
          ; @`VTVAEntrepriseSoumise=2
          ; @`VTVAEntrepriseSoumise=4
          )
      ; DEFAUT(  SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation ) ) ; MAX( @`PDates  ) ) 
      ; "" 
      )
  ); 
    "")

#Référence 7
//Ref7
CASE( NOMBRE( MOT( @`VConfigPointage ; 2 ; ";" ))
        ; ""
        ; @`NomRéférence
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )

#Quantité 7

#Groupe 7
//G7
CASE( NOMBRE( MOT( @`VConfigPointage ; 1 ; ";" ) )
        ; ""
        ; SI( LONGUEUR( "#Prefix#" ) > 0 ; "#Prefix# " + CHAINE( @`Numéro ; 0 ) ; "")
        ; "#Prefix#"
        ; CHAINE( @`Numéro )
        ; @`CodeAffaire
    )


#Payé
@`Payé=1

#Accompte
@`DTAEtat

#RefaitAcc
@`SComptabiliser