#Titre
Modele 128

#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( OU( @`VTVAEntrepriseSoumise=0 ; 

        @`VTVAEntrepriseSoumise=2;

        @`VTVAEntrepriseSoumise=4) ; 

 DEFAUT( @`DateFacture ;"") ; "" )


#Débit 1
//Art

SI( @`TotalFacturé > 0 

  ; "..." 

  ; SI( @`VMultimonnaie <> 1 

      ; DEFAUT( @`RefArticles.`CompteCrédit[0] 

              ;  @`VCptDefautArticleCrédit 

              )

      ; DEFAUT( @`RefArticles.`CompteCrédit[ DEFAUT( @`Monnaie ; 0) ]

              ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

                  ; @`VCptDefautArticleCréditME2 

                  ; SI( DEFAUT( @`Monnaie ; 0 ) = 1

                      ; @`VCptDefautArticleCréditME1 

                      ; @`VCptDefautArticleCrédit

                      ) 

                  ) 

             

              )

     )

  )


#Crédit 1
//Art

SI( @`TotalFacturé < 0 

  ; "..." 

  ; SI( @`VMultimonnaie <> 1 

      ; DEFAUT( @`RefArticles.`CompteCrédit[0] 

              ;  @`VCptDefautArticleCrédit 

              )

      ; DEFAUT( @`RefArticles.`CompteCrédit[ DEFAUT( @`Monnaie ; 0) ] 

              ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

                  ; @`VCptDefautArticleCréditME2 

                  ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                      ; @`VCptDefautArticleCréditME1 

                      ; @`VCptDefautArticleCrédit 

                      ) 

                  )

             )

      )

  )


#Pièce 1
//P1

CHAINE(@`Numéro)


#Libellé 1
//CF1

SI( @`VMontreLigneCompta = 1;"CF1 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")

// 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(@`TotalFacturé < 0 ; -1 ; 1) 

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)


#Tva 1
//TVA art.

SI( @`VTVAEntrepriseSoumise <> 2 

  ; "" 

  ; SI( @`Exportation = 1 

      ; @`ACodeTVA + "|0"

      ; @`ACodeTVA + SI( @`ACodeTVA = "" 

                       ; ""

                       ; "|"+CHAINE( @`ATVATaux)

                       )

      )

  )


#Monnaie 1
//MM1

SI( @`VComptabilisationEnMM = 0 

  ; "" 

  ; SI( DEFAUT(@`Monnaie;0)=0

      ; ""

      ; @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 1
//190911   / 128 Si multi-monnaie plus de 3 monnaie, lis le compte article [0] 

//               et pas la ligne liée à la monnaie (qui est vide car ne peut pas être remplie).

//290411   / 126 Si export en vente, on prend code indiqué et taux 0 (EXPORT ou PSETR)

//100211   / 125 juste pour mise à jour pour les dernières versions avec colonnes supplémentaires

//010211   / 124 juste pour mise à jour pour les dernières versions avec colonnes supplémentaires

//290910   / 123 Escompte regroupé, escompte ventilé dans les ventes et les achats

//110810   / 122 Compte par défaut Commandes fournisseurs

//031007   / 121 Avec corrections Multi-monnaies n monnaies (un seul compte article)

//110707   / Avec corrections Multi-monnaies

//300107   / avec analytique et périodes d'imputations

@`FAnalytique


#Période 1
//P1

 DEFAUT(  @`FPériodeAnalytique ; @`DateFacture )


#Référence 1

#Quantité 1

#Groupe 1


#Date 2

#Débit 2
//Frais

SI( @`TotalFacturé > 0 

  ; "..."

  ; SI( @`VMultimonnaie <> 1 

      ; @`VCptFraisVente

      ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

          ; @`VCptFraisVenteME2

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

              ; @`VCptFraisVenteME1 

              ; @`VCptFraisVente

              )

          )

      

      )

  )


#Crédit 2
//Frais v.

SI( @`TotalFacturé < 0 

  ; "..." 

  ; SI( @`VMultimonnaie <> 1 

      ;  @`VCptFraisVente

      ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

          ; @`VCptFraisVenteME2 

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

              ; @`VCptFraisVenteME1 

              ; @`VCptFraisVente

              )

          )

      )  

  )


#Pièce 2
//P2

CHAINE(@`Numéro)


#Libellé 2
//CF2

SI( @`VMontreLigneCompta = 1;"CF2 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 2
//Frais

( @`FraisEmballageHT + @`TVATotalEmballage )  

    * SI(@`TotalFacturé < 0 ; -1 ; 1) 

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)


#Tva 2
//TVA frais

SI( @`VTVAEntrepriseSoumise <> 2 

  ; "" 

  ; SI( @`Exportation = 1 

      ; @`ACodeTVA+ "|0" 

      ; 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;0)=0 

      ; ""

      ; @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 2
//V. 128    

//

@`FAnalytique


#Période 2
//P2

 DEFAUT(  @`FPériodeAnalytique ; @`DateFacture )


#Référence 2

#Quantité 2

#Groupe 2


#Date 3

#Débit 3
//Frais

SI( @`TotalFacturé > 0 

  ; "..."

  ; SI( @`VMultimonnaie <> 1 

      ; @`VCptFraisVente

      ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

          ; @`VCptFraisVenteME2 

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

              ; @`VCptFraisVenteME1 

              ; @`VCptFraisVente

              )

          )

      )  

  )


#Crédit 3
//Frais v.

SI( @`TotalFacturé < 0 

  ; "..." 

  ; SI( @`VMultimonnaie <> 1 

      ; @`VCptFraisVente

      ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

          ; @`VCptFraisVenteME2 

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

              ; @`VCptFraisVenteME1 

              ; @`VCptFraisVente

              )

          )

     )  

  )


#Pièce 3
//P3

CHAINE(@`Numéro)


#Libellé 3
//CF3

SI( @`VMontreLigneCompta = 1; "CF3 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 3
// Solde

CHAINE((@`TotalFacturé - @`TotalFacturé)

        * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1) )+" +/-1"


#Tva 3
//TVA frais

SI( @`VTVAEntrepriseSoumise <> 2 

  ; "" 

  ; SI( @`Exportation = 1 

      ; @`ACodeTVA+ "|0" 

      ; 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;0)=0 

      ; ""

      ; @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 3
// ...

@`FAnalytique


#Période 3
//P3

 DEFAUT(  @`FPériodeAnalytique ; @`DateFacture )


#Référence 3

#Quantité 3

#Groupe 3


#Date 4

#Débit 4
//Client

SI( @`TotalFacturé < 0 

  ; "..." 

  ; DEFAUT( @`RefClient.`CompteDébit  // (118) Compte NON Multimonnaie : [ DEFAUT( @`Monnaie ; 0) ] ;

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

              ; @`VCptDefautDébiteurME2 

              ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                  ; @`VCptDefautDébiteurME1 

                  ; @`VCptDefautDébiteur 

                  )

              )

          )

  )


#Crédit 4
//Client

SI( @`TotalFacturé > 0 

  ; "..." 

  ; DEFAUT( @`RefClient.`CompteDébit      //118 Corr.  Compte NON Multimonnaie :[ DEFAUT( @`Monnaie ; 0) ] ;

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

              ; @`VCptDefautDébiteurME2 

              ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                  ; @`VCptDefautDébiteurME1 

                  ; @`VCptDefautDébiteur

                  )

              )

         )

  )


#Pièce 4
//P4

CHAINE(@`Numéro)


#Libellé 4
//CF4

SI( @`VMontreLigneCompta = 1;"CF4 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 4
//Total

@`TotalFacturé 

    * SI(@`TotalFacturé<0;-1;1) 

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)


#Tva 4

#Monnaie 4
//MM4

SI( @`VComptabilisationEnMM = 0 

  ; "" 

  ; SI( DEFAUT(@`Monnaie;0)=0 

      ; ""

      ; @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 4

#Période 4

#Référence 4

#Quantité 4

#Groupe 4


#Date 5
//                                               

//  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( OU( @`VTVAEntrepriseSoumise=1 ; 

        @`VTVAEntrepriseSoumise=3;

        @`VTVAEntrepriseSoumise=5) ; 

        DEFAUT( @`DateFacture ; AUJOURDHUI()) ; "" )


#Débit 5
//Pour info

@`VCptDefautDébiteur


#Crédit 5
// pour info

@`VCptDefautArticleCrédit


#Pièce 5
//P5

CHAINE(@`Numéro)


#Libellé 5
//CF5

SI( @`VMontreLigneCompta = 1;"CF5 : ";"")+

SI( LANGUE() = 0 ; "Pour statut, ne sera pas passé en compta" ; 

                   "Für Info: Nei Erhalt der Beträge")


#Somme 5
//Info

"0 +/- 0.01"


#Tva 5

#Monnaie 5
//MM5

SI( @`VComptabilisationEnMM = 0

  ; "" 

  ; SI( DEFAUT(@`Monnaie;0)=0

      ; ""

      ; @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 5

#Période 5

#Référence 5

#Quantité 5

#Groupe 5


#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[@`SComptabilisationMen] ;"") 

      ; "" 

      )

  )


#Débit 1
//Art.

SI( @`PMontants[@`SComptabilisationMen] > 0 

  ; "..." 

  ; SI( @`VMultimonnaie <> 1 

      ; DEFAUT( @`RefArticles.`CompteCrédit[0] 

              ;  @`VCptDefautArticleCrédit 

              ) 

      ; DEFAUT( @`RefArticles.`CompteCrédit[ DEFAUT( @`Monnaie ; 0) ] 

              ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

                  ; @`VCptDefautArticleCréditME2 

                  ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                      ; @`VCptDefautArticleCréditME1 

                      ; @`VCptDefautArticleCrédit 

                      ) 

                  )

              )

      )

  )


#Crédit 1
//C1

SI( @`PMontants[@`SComptabilisationMen] < 0 

  ; "..." 

  ; SI( @`VMultimonnaie <> 1 

      ; DEFAUT( @`RefArticles.`CompteCrédit[0]

              ; @`VCptDefautArticleCrédit

              )  

      ; DEFAUT( @`RefArticles.`CompteCrédit[ DEFAUT( @`Monnaie ; 0) ] 

              ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

                  ; @`VCptDefautArticleCréditME2 

                  ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                      ; @`VCptDefautArticleCréditME1

                      ; @`VCptDefautArticleCrédit 

                      ) 

                  )

             )

      )

)


#Pièce 1
//p1

CHAINE(@`Numéro)


#Libellé 1
//L1

SI( @`VMontreLigneCompta = 1;"CP1 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 1
//Prorata

(@`ATotauxLignesNetHT + @`ATotauxLignesTVA)

    * @`PMontants[@`SComptabilisationMen] 

    * SI(@`PMontants[@`SComptabilisationMen] < 0 ; -1 ; 1) 

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)

    / ( @`TotalFacturé )


#Tva 1
//TVA art

SI( @`VTVAEntrepriseSoumise<>3 

  ; "" 

  ;SI( @`Exportation = 1 

     ; @`ACodeTVA + "|0"

     ; @`ACodeTVA +SI( @`ACodeTVA = "" 

                     ; ""

                     ; "|"+CHAINE( @`ATVATaux) 

                     )

     )

 )


#Monnaie 1
//MM1

SI( @`VComptabilisationEnMM = 0 ;

    "" ;

    SI( DEFAUT(@`Monnaie;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 1
//A1

@`FAnalytique


#Période 1
//Pér.1

SI( @`SProblèmeCompta = 1 ; "" ;

SI( OU( @`VTVAEntrepriseSoumise=1 ; 

        @`VTVAEntrepriseSoumise=3;

        @`VTVAEntrepriseSoumise=5) ; 

 DEFAUT(@`PDateImputation[@`SComptabilisationMen] ; @`PDates[@`SComptabilisationMen] ) ; "" ))


#Référence 1

#Quantité 1

#Groupe 1


#Date 2

#Débit 2
//F. Port

SI( @`PMontants[@`SComptabilisationMen] > 0 

  ; "..." 

  ; SI( @`VMultimonnaie <> 1 

      ; @`VCptFraisPortVente

      ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

          ; @`VCptFraisPortVenteME2 

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

              ; @`VCptFraisPortVenteME1 

              ; @`VCptFraisPortVente

              )

          )

      )  

  )


#Crédit 2
//C2

SI( @`PMontants[@`SComptabilisationMen] < 0

  ; "..." 

  ; SI( @`VMultimonnaie <> 1 

      ; @`VCptFraisPortVente

      ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

          ; @`VCptFraisPortVenteME2 

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

              ; @`VCptFraisPortVenteME1

              ; @`VCptFraisPortVente

              )

          )

      )  

  )


#Pièce 2
//p2

CHAINE(@`Numéro)


#Libellé 2
//L2

SI( @`VMontreLigneCompta = 1;"CP2 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 2
//Frais

DEFAUT( @`FraisEmballage ;0 )

    * @`PMontants[@`SComptabilisationMen] 

    * SI(@`PMontants[@`SComptabilisationMen] < 0 ; -1 ; 1) 

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)

    / SI( @`Total <> @`TotalFacturé ; @`Total ; @`TotalFacturé )


#Tva 2
//TVA 

SI( @`VTVAEntrepriseSoumise<>3 

  ; "" 

  ; SI( @`Exportation = 1 

      ; @`ACodeTVA + "|0"

      ; 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;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 2
//A2

@`FAnalytique


#Période 2
//Pér.2

SI( @`SProblèmeCompta = 1 ; "" ;

SI( OU( @`VTVAEntrepriseSoumise=1 ; 

        @`VTVAEntrepriseSoumise=3;

        @`VTVAEntrepriseSoumise=5) ; 

 DEFAUT(@`PDateImputation[@`SComptabilisationMen] ; @`PDates[@`SComptabilisationMen] ) ; "" ))


#Référence 2

#Quantité 2

#Groupe 2


#Date 3

#Débit 3
//F. Vente

SI( @`PMontants[@`SComptabilisationMen] > 0 

  ; "..." 

  ; SI( @`VMultimonnaie <> 1 

      ; @`VCptFraisVente 

      ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

          ; @`VCptFraisVenteME2 

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

              ; @`VCptFraisVenteME1 

              ; @`VCptFraisVente 

              )

          )

      )  

  )


#Crédit 3
//C3

SI( @`PMontants[@`SComptabilisationMen] < 0 

  ; "..." 

  ; SI( @`VMultimonnaie <> 1

      ; @`VCptFraisVente 

      ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

          ; @`VCptFraisVenteME2

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

              ; @`VCptFraisVenteME1

              ; @`VCptFraisVente

              )

          )

      )  

  )


#Pièce 3
//p3

CHAINE(@`Numéro)


#Libellé 3
//L3

SI( @`VMontreLigneCompta = 1;"CP3 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 3
//Solde

CHAINE( 

    (@`TotalFacturé - @`TotalFacturé) 

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) 

    ; 1) )

+"+/-1 "


#Tva 3
//TVA

SI( @`VTVAEntrepriseSoumise<>3

  ; "" 

  ; SI( @`Exportation = 1 

      ; @`ACodeTVA + "|0"

      ; 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;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 3
//A3

@`FAnalytique


#Période 3
//Pér.3

SI( @`SProblèmeCompta = 1 ; "" ;

SI( OU( @`VTVAEntrepriseSoumise=1 ; 

        @`VTVAEntrepriseSoumise=3;

        @`VTVAEntrepriseSoumise=5) ; 

 DEFAUT(@`PDateImputation[@`SComptabilisationMen] ; @`PDates[@`SComptabilisationMen] ) ; "" ))


#Référence 3

#Quantité 3

#Groupe 3


#Date 4

#Débit 4
// payé

SI( @`PMontants[@`SComptabilisationMen] < 0 

  ; "..." 

  ; @`PTypes[@`SComptabilisationMen]  

  )


#Crédit 4
//C4

SI( @`PMontants[@`SComptabilisationMen] >= 0 

   ; "..."

   ; @`PTypes[@`SComptabilisationMen]

   )


#Pièce 4
//p4

CHAINE(@`Numéro)


#Libellé 4
//L4

SI( @`VMontreLigneCompta = 1;"CP4 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 4
//Encaissé

@`PMontants[@`SComptabilisationMen] 

    * SI(@`PMontants[@`SComptabilisationMen] < 0 ; -1 ; 1) 

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)


#Tva 4

#Monnaie 4
//MM4

SI( @`VComptabilisationEnMM = 0 ;

    "" ;

    SI( DEFAUT(@`Monnaie;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 4

#Période 4

#Référence 4

#Quantité 4

#Groupe 4


#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[@`SComptabilisationMen] ;"") 

     ; "" )

  )


#Débit 5
// 

SI( @`PMontants[@`SComptabilisationMen] > 0 

  ;  MOT(@`PTypes[@`SComptabilisationMen] ; 1 ; " ") 

  ;  DEFAUT( MOT( @`RefClient.`CompteDébit  ;1 ; " " )          // (118) Compte NON Multimonnaie :[ DEFAUT( @`Monnaie ; 0) ] ; 

           ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

               ; @`VCptDefautDébiteurME2 

               ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                   ; @`VCptDefautDébiteurME1

                   ; @`VCptDefautDébiteur   

                   )

               )

          ) 

  )


#Crédit 5
//C5

SI( @`PMontants[@`SComptabilisationMen] < 0 

  ; MOT( @`PTypes[@`SComptabilisationMen] ; 1 ; " " ) 

  ; DEFAUT( MOT( @`RefClient.`CompteDébit ; 1 ; " " )             // Corr 118 Compte NON Multimonnaie : [ DEFAUT( @`Monnaie ; 0) ] ; 

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

              ; @`VCptDefautDébiteurME2 

              ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                  ; @`VCptDefautDébiteurME1 

                  ; @`VCptDefautDébiteur 

                  )

              )

         ) 

  )


#Pièce 5
//p5

CHAINE(@`Numéro)


#Libellé 5
//L5

SI( @`VMontreLigneCompta = 1;"CP5 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 5
//Encaissé

@`PMontants[@`SComptabilisationMen] 

    * SI(@`PMontants[@`SComptabilisationMen] < 0 ; -1 ; 1)

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)


#Tva 5

#Monnaie 5
//MM5

SI( @`VComptabilisationEnMM = 0 ;

    "" ;

    SI( DEFAUT(@`Monnaie;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 5

#Période 5

#Référence 5

#Quantité 5

#Groupe 5


#Final
#Cumul
1

#Date 1
//Date

SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 ; 

    OU( @`VTVAEntrepriseSoumise=0 ; 

        @`VTVAEntrepriseSoumise=2;

        @`VTVAEntrepriseSoumise=4)) ; 

 DEFAUT( @`PayéLe ; SI( ANNEE( MAX( @`PDates ) )< 0 ; AUJOURDHUI() ; MAX(@`PDates) ) ) ; "" )


#Débit 1
//Escompte

SI( @`PEscompte < 0 

  ; "..." 

  ; SI( @`VEscompteVentiléVente = 1 

      //Ventilé

      ; SI( @`VMultimonnaie <> 1 

          ; @`VCptEscAccordé

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

              ; @`VCptEscAccordéME2 

              ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                  ; @`VCptEscAccordéME1 

                  ; @`VCptEscAccordé 

                  ) 

              )  

          

          )

      //Regroupé

       ; SI( @`VMultimonnaie <> 1

           ; DEFAUT( @`RefArticles.`CompteCrédit[0] ;@`VCptDefautArticleCrédit  ) 

           ; DEFAUT( @`RefArticles.`CompteCrédit[ DEFAUT( @`Monnaie ; 0) ] 

                   ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

                       ; @`VCptDefautArticleCréditME2 

                       ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                           ; @`VCptDefautArticleCréditME1

                           ; @`VCptDefautArticleCrédit 

                           ) 

                       )

                   )

           )

       )

 )


#Crédit 1
//Escompte

SI( @`PEscompte > 0 

  ; "..." 

  ; SI( @`VEscompteVentiléVente = 1 

      //ventilé

      ; SI( @`VMultimonnaie = 1 

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

              ; @`VCptEscAccordéME2 

              ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                  ; @`VCptEscAccordéME1 

                  ; @`VCptEscAccordé 

                  ) 

              )  

          ; @`VCptEscAccordé

          )

      //Regroupé

      ; DEFAUT( @`RefArticles.`CompteCrédit[ DEFAUT( @`Monnaie ; 0) ] ;

                SI( DEFAUT( @`Monnaie ; 0 ) = 2 

                  ; @`VCptDefautArticleCréditME2 

                  ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                      ; @`VCptDefautArticleCréditME1

                      ; @`VCptDefautArticleCrédit 

                      ) 

                  )

              )

      )

 )


#Pièce 1
//p1

CHAINE(@`Numéro)


#Libellé 1
//l1

SI( @`VMontreLigneCompta = 1;"CE1 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 1
//Ligne

(@`ATotauxLignesNetHT + @`ATotauxLignesTVA)

    * DEFAUT(@`PEscompte;0)

    * SI(@`PEscompte < 0 ; -1 ; 1) 

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)

    / ( @`TotalFacturé )


#Tva 1
//TVA art.

SI( @`VTVAEntrepriseSoumise<>2 

  ; "" 

  ; SI( @`Exportation = 1 

      ; @`ACodeTVA + "|0"

      ; @`ACodeTVA + SI( @`ACodeTVA = ""

                       ; ""

                       ; "|"+CHAINE( @`ATVATaux)

                       )

      )

  )


#Monnaie 1
//MM1

SI( @`VComptabilisationEnMM = 0

  ; "" 

  ; SI( DEFAUT(@`Monnaie;0)=0 

      ; ""

      ; @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 1
//A1

@`FAnalytique


#Période 1
//p1

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

#Quantité 1

#Groupe 1


#Date 2

#Débit 2
//F Vente

SI( @`PEscompte < 0 

  ; "..." 

  ; SI( @`VMultimonnaie <> 1 

      ;  @`VCptFraisPortVente

      ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

          ; @`VCptFraisPortVenteME2 

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

              ; @`VCptFraisPortVenteME1 

              ; @`VCptFraisPortVente

              ) 

          ) 

      )

  )


#Crédit 2
//F Vente

SI( @`PEscompte > 0 ; "..." ; 

    SI( DEFAUT( @`Monnaie ; 0 ) = 2 ; @`VCptFraisPortVenteME2 ;

        SI( DEFAUT( @`Monnaie ; 0 ) = 1 ; @`VCptFraisPortVenteME1 ; 

         @`VCptFraisPortVente) ) )


#Pièce 2
//p2

CHAINE(@`Numéro)


#Libellé 2
//l2

SI( @`VMontreLigneCompta = 1;"CE2 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 2
//Emball

DEFAUT( @`FraisEmballage ;0 )

    * @`PEscompte 

    * SI(@`PEscompte < 0 ; -1 ; 1) 

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)

    / SI( @`Total <> @`TotalFacturé ; @`Total ; @`TotalFacturé )

    

//SI( @`VTVAEntrepriseSoumise<>2 ; "" ; 

//SI( @`Exportation = 1 ; @`VCodeTVAExportation ;

//SI( MAX(@`ATVATaux ) = @`TVATauxNormal ; @`VCodeTVAVenteNormal + "|"+CHAINE(@`TVATauxNormal ) ;

//SI( MAX(@`ATVATaux ) = @`TVATauxRéduit ; @`VCodeTVAVenteRéduit + "|"+CHAINE(@`TVATauxRéduit ) ; "" ))))


#Tva 2
//TVA

SI( @`VTVAEntrepriseSoumise<>2 

  ; "" 

  ;SI( @`Exportation = 1 

     ; @`ACodeTVA + "|0"

     ;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;0)=0 

      ; ""

      ; @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 2
//A2

@`FAnalytique


#Période 2
//p2

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

#Quantité 2

#Groupe 2


#Date 3

#Débit 3
//F vente

SI( @`PEscompte < 0 

  ; "..." 

  ; SI( @`VMultimonnaie <> 1 

      ; @`VCptFraisVente 

      ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

          ; @`VCptFraisVenteME2 

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

              ; @`VCptFraisVenteME1

              ; @`VCptFraisVente

              )

          )

     )

  )


#Crédit 3
//F Vente

SI( @`PEscompte > 0 ; "..." ; 

    SI( DEFAUT( @`Monnaie ; 0 ) = 2 ; @`VCptFraisVenteME2 ;

        SI( DEFAUT( @`Monnaie ; 0 ) = 1 ; @`VCptFraisVenteME1 ; 

         @`VCptFraisVente) ) )


#Pièce 3
//p3

CHAINE(@`Numéro)


#Libellé 3
//l3

SI( @`VMontreLigneCompta = 1;"CE3 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 3
//Arrondi

CHAINE( (@`TotalFacturé - @`TotalFacturé) 

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) 

    ; 1))

    +"+/-1"


#Tva 3
//TVA 

SI( @`VTVAEntrepriseSoumise<>2 

  ; "" 

  ;SI( @`Exportation = 1 

     ; @`ACodeTVA + "|0"

     ; 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;0)=0 

      ; ""

      ; @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 3
@`FAnalytique

//A3


#Période 3
//p3

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

#Quantité 3

#Groupe 3


#Date 4

#Débit 4
//Esc.

SI( @`PEscompte > 0 

  ; "..." 

  ; DEFAUT( @`RefClient.`CompteDébit  // Cor 118:  Compte NON Multimonnaie :[ DEFAUT( @`Monnaie ; 0) ] ;

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

              ; @`VCptDefautDébiteurME2 

              ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                  ; @`VCptDefautDébiteurME1 

                  ; @`VCptDefautDébiteur 

                  )

              ) 

           )

  )


#Crédit 4
//Escompte

SI( @`PEscompte < 0 ; 

    "..." ; 

    DEFAUT( @`RefClient.`CompteDébit; //Cor 118 : Compte NON Multimonnaie :[ DEFAUT( @`Monnaie ; 0) ] ;

    SI( DEFAUT( @`Monnaie ; 0 ) = 2 ; @`VCptDefautDébiteurME2 ;

        SI( DEFAUT( @`Monnaie ; 0 ) = 1 ; @`VCptDefautDébiteurME1 ; 

         @`VCptDefautDébiteur ) )  )  )


#Pièce 4
//p4

CHAINE(@`Numéro)


#Libellé 4
//l4

SI( @`VMontreLigneCompta = 1; "CE4 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 4
//Escompte

@`PEscompte  

    * SI(@`PEscompte <0;-1;1) 

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)


#Tva 4

#Monnaie 4
//MM4

SI( @`VComptabilisationEnMM = 0 

  ; "" 

  ; SI( DEFAUT(@`Monnaie;0)=0 

      ; ""

      ; @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 4

#Période 4

#Référence 4

#Quantité 4

#Groupe 4


#Date 5
//Date

SI( ET( DEFAUT( @`PEscompte ;0 ) <> 0 ; 

    OU( @`VTVAEntrepriseSoumise=1 ; 

        @`VTVAEntrepriseSoumise=3;

        @`VTVAEntrepriseSoumise=5)) ; 

 DEFAUT( @`PayéLe ; SI( ANNEE( MAX( @`PDates ) )< 0 ; AUJOURDHUI() ; MAX(@`PDates) ) ) ; "" )


#Débit 5
// Art.

@`VCptDefautArticleCrédit


#Crédit 5
//Débiteur

@`VCptDefautDébiteur


#Pièce 5
//p5

CHAINE(@`Numéro)


#Libellé 5
//l5

SI( @`VMontreLigneCompta = 1;"CE5 : ";"")+

SI( LANGUE() = 0 ; "Pour statut, ne sera pas passé en compta" ; 

                   "Für Info: Nei Erhalt der Beträge")


#Somme 5
//Balance

CHAINE(0) +"+/-0.01"


#Tva 5

#Monnaie 5
//MM5

SI( @`VComptabilisationEnMM = 0

  ; ""

  ;SI( DEFAUT(@`Monnaie;0)=0 

     ; ""

     ; @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

     )

  )


#Analytique 5

#Période 5

#Référence 5

#Quantité 5

#Groupe 5


#Payé
@`Payé=1

#Accompte
@`PMontants

#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( OU( @`VTVAEntrepriseSoumise=0 ; 

        @`VTVAEntrepriseSoumise=2;

        @`VTVAEntrepriseSoumise=4) ; 

        @`DateFacture ; "" ))


#Débit 1
//Art

SI( @`TotalFacturé < 0

  ; "..." 

  ; SI( @`VMultimonnaie <> 1 

      ; DEFAUT( @`RefArticles.`CompteDébit[ 0 ] ;@`VCptDefautArticleDébit )

      ; DEFAUT( @`RefArticles.`CompteDébit[ DEFAUT( @`Monnaie ; 0) ] 

              ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

                  ; @`VCptDefautArticleDébitME2 

                  ; SI( DEFAUT( @`Monnaie ; 0 ) = 1

                      ; @`VCptDefautArticleDébitME1 

                      ; @`VCptDefautArticleDébit 

                      )

                   )

               )

      )

  )


#Crédit 1
//Art.

SI( @`TotalFacturé > 0

  ; "..." 

  ; SI( @`VMultimonnaie <> 1

      ; DEFAUT( @`RefArticles.`CompteDébit[ 0 ] ;@`VCptDefautArticleDébit )

      ; DEFAUT( @`RefArticles.`CompteDébit[ DEFAUT( @`Monnaie ; 0) ] 

              ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

                  ; @`VCptDefautArticleDébitME2 

                  ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                      ; @`VCptDefautArticleDébitME1 

                      ; @`VCptDefautArticleDébit 

                      )

                   )

               )

      )

  )


#Pièce 1
//p1

CHAINE(@`Numéro)


#Libellé 1
//l1

SI( @`VMontreLigneCompta = 1;"FF1 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 1
//ART.

SI( COMPTE(@`ADésignation) = 0 ; 

    0 

  ;

    DEFAUT(@`ATotalLigneTTC;0)

    * @`TotalFacturé 

    * 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;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 1
//A1

@`FCodeAnalytique


#Période 1
//P1

DEFAUT(@`FDateAnalytique ; @`DateFacture )


#Référence 1

#Quantité 1

#Groupe 1


#Date 2

#Débit 2
//Crédit

SI( @`TotalFacturé < 0 

  ; "..." 

  ; @`FComptesDébit 

  )


#Crédit 2
//Débit

SI( @`TotalFacturé > 0 

  ; "..." 

  ; @`FComptesDébit 

)


#Pièce 2
//p2

CHAINE(@`Numéro)


#Libellé 2
//l2

SI( @`VMontreLigneCompta = 1;"FF2 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 2
//Somme

DEFAUT(@`FMontants;0) 

    * SI(@`TotalFacturé<0;-1;1)

    * 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;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 2
//A2

@`FCodeAnalytiques


#Période 2
//P2

DEFAUT(@`FDatesAnalytique ; @`DateFacture )


#Référence 2

#Quantité 2

#Groupe 2


#Date 3

#Débit 3
SI( @`TotalFacturé < 0 

  ; "..." 

  ; @`FCompteDébit 

  )


#Crédit 3
//Débit

SI( @`TotalFacturé > 0

  ; "..." 

  ; @`FCompteDébit

  )


#Pièce 3
//p3

CHAINE(@`Numéro)


#Libellé 3
//l3

SI( @`VMontreLigneCompta = 1;"FF3 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 3
//Somme

DEFAUT(@`FTotalTTCNormal ;0) 

    * SI(@`TotalFacturé<0;-1;1)

    * 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;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 3
//A3

@`FCodeAnalytique


#Période 3
//P3

DEFAUT(@`FDateAnalytique ; @`DateFacture )


#Référence 3

#Quantité 3

#Groupe 3


#Date 4

#Débit 4
//Crédit

SI( @`TotalFacturé < 0 

  ; "..." 

  ; SI( @`VMultimonnaie <> 1 

      ; @`VCptFraisAchat 

      ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

          ; @`VCptFraisAchatME2 

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

              ; @`VCptFraisAchatME1 

              ; @`VCptFraisAchat 

              ) 

          )

      )

  )


#Crédit 4
//Frais A.

SI( @`TotalFacturé > 0 

  ; "..." 

  ; SI( @`VMultimonnaie <> 1

      ; @`VCptFraisAchat

      ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

          ; @`VCptFraisAchatME2 

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

              ; @`VCptFraisAchatME1 

              ; @`VCptFraisAchat

              ) 

          )

      )

  )


#Pièce 4
//p4

CHAINE(@`Numéro)


#Libellé 4
//l4

SI( @`VMontreLigneCompta = 1;"FF4 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 4
//Frais

SI( @`ADésignation[0] = "" ; 

    0

  ; 

    DEFAUT( @`FraisEmballage ;0 )

    * @`TotalFacturé 

    * SI(@`TotalFacturé<0;-1;1)

    / @`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;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 4
//A4

@`FCodeAnalytique


#Période 4
//P4

DEFAUT(@`FDateAnalytique ; @`DateFacture )


#Référence 4

#Quantité 4

#Groupe 4


#Date 5

#Débit 5
//Frais

SI( @`TotalFacturé < 0 

  ; "..." 

  ; SI( @`VMultimonnaie <> 1 

      ; @`VCptFraisAchat

      ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

          ; @`VCptFraisAchatME2

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

              ; @`VCptFraisAchatME1

              ; @`VCptFraisAchat

              ) 

          )

      )

  )


#Crédit 5
//Frais A.

SI( @`TotalFacturé > 0 

  ; "..." 

  ; SI( @`VMultimonnaie <> 1

      ; @`VCptFraisAchat

      ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

          ; @`VCptFraisAchatME2

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

              ; @`VCptFraisAchatME1

              ; @`VCptFraisAchat

              )

          )

      )

  )


#Pièce 5
//p5

CHAINE(@`Numéro)


#Libellé 5
//l5

SI( @`VMontreLigneCompta = 1;"FF5 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#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;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 5
//A5

@`FCodeAnalytique


#Période 5
//P5

DEFAUT(@`FDateAnalytique ; @`DateFacture )


#Référence 5

#Quantité 5

#Groupe 5


#Date 6

#Débit 6
//Créancier

SI( @`TotalFacturé > 0 

  ; "..." 

  ; DEFAUT(@`FCompteCrédit

          ; DEFAUT( @`RefFournisseur.`CompteCrédit         //Cor 118 : Compte NON Multimonnaie :[ DEFAUT( @`Monnaie ; 0) ] ;

                  ; SI( DEFAUT( @`Monnaie ; 0 ) = 2

                      ; @`VCptDefautCréancierME2 

                      ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                          ; @`VCptDefautCréancierME1

                          ; @`VCptDefautCréancier 

                          ) 

                      ) 

                 ) 

         )

  )


#Crédit 6
//Four.

SI( @`TotalFacturé < 0

  ; "..." 

  ; DEFAUT(@`FCompteCrédit

          ; DEFAUT( @`RefFournisseur.`CompteCrédit  //Cor 118 : Compte NON Multimonnaie :[ DEFAUT( @`Monnaie ; 0) ] ;

                  ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

                      ; @`VCptDefautCréancierME2 

                      ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                          ; @`VCptDefautCréancierME1 

                          ; @`VCptDefautCréancier 

                          ) 

                      )  

                  )

          )

  )


#Pièce 6
//p6

CHAINE(@`Numéro)


#Libellé 6
//l6

SI( @`VMontreLigneCompta = 1;"FF6 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 6
//Total

@`TotalFacturé * SI(@`TotalFacturé < 1 ; -1 ; 1)

* SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)


#Tva 6

#Monnaie 6
//M6

SI( @`VComptabilisationEnMM = 0 ;

    "" ;

    SI( DEFAUT(@`Monnaie;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 6

#Période 6

#Référence 6

#Quantité 6

#Groupe 6


#Date 7
//                                       

//  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( OU( @`VTVAEntrepriseSoumise=1 ; 

        @`VTVAEntrepriseSoumise=3;

        @`VTVAEntrepriseSoumise=5) ; 

        DEFAUT( @`DateFacture ; AUJOURDHUI()) ; "" )


#Débit 7
//Créanciers

@`VCptDefautArticleDébit


#Crédit 7
//créancier

@`VCptDefautCréancier


#Pièce 7
//p7

CHAINE(@`Numéro)


#Libellé 7
//l7

SI( @`VMontreLigneCompta = 1;"FF7 : ";"")+

SI( LANGUE() = 0 ; "Pour statut, ne sera pas passé en compta" ; 

                   "Für Info: Nei Erhalt der Beträge")


#Somme 7
//Info

"0 +/-0.01"


#Tva 7

#Monnaie 7
//M7

SI( @`VComptabilisationEnMM = 0 ;

    "" ;

    SI( DEFAUT(@`Monnaie;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 7

#Période 7

#Référence 7

#Quantité 7

#Groupe 7


#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[@`SComptabilisationMen];"") ; 

        "" 

       )

  )


#Débit 1
//ART:

SI( SOMME(@`ATotalLigneTTC) = 0 

  ; "" 

  ; SI( @`PMontants[@`SComptabilisationMen] < 0 

      ; "..."  

      ; SI( @`VMultimonnaie <> 1 

          ; DEFAUT(@`RefArticles.`CompteDébit[0] ; @`VCptDefautArticleDébit) 

          ; DEFAUT(@`RefArticles.`CompteDébit[ DEFAUT( @`Monnaie ; 0) ] 

                  ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

                      ; @`VCptDefautArticleDébitME2 

                      ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                          ; @`VCptDefautArticleDébitME1 

                          ; @`VCptDefautArticleDébit

                          ) 

                      )

                  )

          )

      )

     

  )


#Crédit 1
//Art.

SI( SOMME(@`ATotalLigneTTC) = 0 

  ; "" 

  ; SI( @`PMontants[@`SComptabilisationMen] > 0 

      ; "..." 

      ; SI( @`VMultimonnaie <> 1

          ; DEFAUT( @`RefArticles.`CompteDébit[0] ; @`VCptDefautArticleDébit)

          ; DEFAUT( @`RefArticles.`CompteDébit[ DEFAUT( @`Monnaie ; 0) ] 

                  ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

                      ; @`VCptDefautArticleDébitME2 

                      ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                          ; @`VCptDefautArticleDébitME1 

                          ; @`VCptDefautArticleDébit

                          )

                      )

                  )

           )

      )

     

  )


#Pièce 1
//p1

CHAINE(@`Numéro)


#Libellé 1
//l1

SI( @`VMontreLigneCompta = 1;"FP1 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 1
//Par ligne

@`ATotalLigneTTC 

    * @`PMontants[@`SComptabilisationMen] 

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1 ) 

    * SI(@`PMontants[@`SComptabilisationMen] < 0 ; -1 ; 1)

   / @`TotalFacturé


#Tva 1
//TVA art.

SI( @`VTVAEntrepriseSoumise<>3 

  ; "" 

  ; @`ATVACode + SI(@`ATVACode = "" ; "" ; "|"+CHAINE(@`ATVATauxArticle))

  )


#Monnaie 1
//mm1

SI( @`VComptabilisationEnMM = 0 ;

    "" ;

    SI( DEFAUT(@`Monnaie;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 1
//A1

@`FCodeAnalytique


#Période 1
//p1

SI( OU( @`VTVAEntrepriseSoumise = 1 ; @`VTVAEntrepriseSoumise = 3 ; @`VTVAEntrepriseSoumise = 5) ;

        DEFAUT(@`PDateImputation[@`SComptabilisationMen]; @`PDates[@`SComptabilisationMen]) ; 

        "" 

       )


#Référence 1

#Quantité 1

#Groupe 1


#Date 2

#Débit 2
//Somme

SI( SOMME(@`ATotalLigneTTC) <> 0 

  ; "" 

  ; SI( @`PMontants[@`SComptabilisationMen] < 0 

      ; "..." 

      ; @`FComptesDébit

      )

  )


#Crédit 2
//Somme

SI( SOMME(@`ATotalLigneTTC) <> 0 

  ; "" 

  ; SI( @`PMontants[@`SComptabilisationMen] > 0 

      ; "..." 

      ; @`FComptesDébit 

      )

  )


#Pièce 2
//p2

CHAINE(@`Numéro)


#Libellé 2
//l2

SI( @`VMontreLigneCompta = 1;"FP2 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 2
//Global

@`FMontants 

    * @`PMontants[@`SComptabilisationMen] 

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1 ) 

    * SI(@`PMontants[@`SComptabilisationMen] < 0 ; -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;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 2
//A2

@`FCodeAnalytiques


#Période 2
//p2

SI( OU( @`VTVAEntrepriseSoumise = 1 ; @`VTVAEntrepriseSoumise = 3 ; @`VTVAEntrepriseSoumise = 5) ;

        DEFAUT(@`PDateImputation[@`SComptabilisationMen]; @`PDates[@`SComptabilisationMen]) ; 

        "" 

       )


#Référence 2

#Quantité 2

#Groupe 2


#Date 3

#Débit 3
//Somme

SI( SOMME(@`ATotalLigneTTC) <> 0 

  ; "" 

  ;SI( @`PMontants[@`SComptabilisationMen] < 0 

     ; "..." 

     ; @`FCompteDébit

     )

  )


#Crédit 3
//Somme

SI( SOMME(@`ATotalLigneTTC) <> 0 

  ; "" 

  ; SI( @`PMontants[@`SComptabilisationMen] > 0 

      ; "..." 

      ; @`FCompteDébit 

      )

  )


#Pièce 3
//p3

CHAINE(@`Numéro)


#Libellé 3
//l3

SI( @`VMontreLigneCompta = 1;"FP3 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 3
//total

@`FTotalTTCNormal 

    * @`PMontants[@`SComptabilisationMen] 

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1 ) 

    * SI(@`PMontants[@`SComptabilisationMen] < 0 ; -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;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 3
//A3

@`FCodeAnalytique


#Période 3
//p3

SI( OU( @`VTVAEntrepriseSoumise = 1 ; @`VTVAEntrepriseSoumise = 3 ; @`VTVAEntrepriseSoumise = 5) ;

        DEFAUT(@`PDateImputation[@`SComptabilisationMen]; @`PDates[@`SComptabilisationMen]) ; 

        "" 

       )


#Référence 3

#Quantité 3

#Groupe 3


#Date 4

#Débit 4
//Port

SI( SOMME(@`ATotalLigneTTC) = 0 

  ; "" 

  ; SI( @`PMontants[@`SComptabilisationMen] < 0 

      ; "..." 

      ; SI( @`VMultimonnaie <> 1 

          ;  @`VCptFraisPortAchat

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

              ; @`VCptFraisPortAchatME2 

              ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                  ; @`VCptFraisPortAchatME1 

                  ; @`VCptFraisPortAchat

                  )

              )

          )

      )

 )


#Crédit 4
//Port

SI( SOMME(@`ATotalLigneTTC) = 0 

  ; "" 

  ; SI( @`PMontants[@`SComptabilisationMen] > 0 

      ; "..." 

      ; SI( @`VMultimonnaie <> 1

          ; @`VCptFraisPortAchat

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

              ; @`VCptFraisPortAchatME2 

              ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                  ; @`VCptFraisPortAchatME1 

                  ; @`VCptFraisPortAchat

                  )

              )

          )

      )

  )


#Pièce 4
//p4

CHAINE(@`Numéro)


#Libellé 4
//l4

SI( @`VMontreLigneCompta = 1;"FP4 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 4
//Frais

@`FraisEmballage 

    * @`PMontants[@`SComptabilisationMen] 

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1 ) 

    * SI(@`PMontants[@`SComptabilisationMen] < 0 ; -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;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 4
//A4

@`FCodeAnalytique


#Période 4
//p4

SI( OU( @`VTVAEntrepriseSoumise = 1 ; @`VTVAEntrepriseSoumise = 3 ; @`VTVAEntrepriseSoumise = 5) ;

        DEFAUT(@`PDateImputation[@`SComptabilisationMen]; @`PDates[@`SComptabilisationMen]) ; 

        "" 

       )


#Référence 4

#Quantité 4

#Groupe 4


#Date 5

#Débit 5
//Frais

SI( SOMME(@`ATotalLigneTTC) = 0 

  ; "" 

  ; SI( @`PMontants[@`SComptabilisationMen] < 0 

      ; "..." 

      ; SI( @`VMultimonnaie <> 1 

          ; @`VCptFraisPortAchat

          ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

              ; @`VCptFraisAchatME2

              ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                  ; @`VCptFraisAchatME1

                  ; @`VCptFraisAchat

                  )

              )

          )

      )

 )


#Crédit 5
//Achat

SI( SOMME(@`ATotalLigneTTC) = 0 

  ; "" 

  ;SI( @`PMontants[@`SComptabilisationMen] > 0 

     ; "..." 

     ; SI( @`VMultimonnaie <> 1

         ; @`VCptFraisAchat

         ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

             ; @`VCptFraisAchatME2

             ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                 ; @`VCptFraisAchatME1

                 ; @`VCptFraisAchat

                 )

             )

         )

     )

  )


#Pièce 5
//p5

CHAINE(@`Numéro)


#Libellé 5
//l5

SI( @`VMontreLigneCompta = 1;"FP5 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#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;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 5

#Période 5

#Référence 5

#Quantité 5

#Groupe 5


#Date 6

#Débit 6
//Payé

SI( @`PMontants[@`SComptabilisationMen] > 0 

  ; "..." 

  ; @`PTypes[@`SComptabilisationMen] 

  )


#Crédit 6
//Payé

SI( @`PMontants[@`SComptabilisationMen] < 0 

  ; "..." 

  ; @`PTypes[@`SComptabilisationMen] 

  )


#Pièce 6
//p6

CHAINE(@`Numéro)


#Libellé 6
//l6

SI( @`VMontreLigneCompta = 1;"FP6 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 6
//Versé

@`PMontants[@`SComptabilisationMen] 

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1 )

    * SI(@`PMontants[@`SComptabilisationMen] < 0 ; -1 ; 1)


#Tva 6

#Monnaie 6
//mm6

SI( @`VComptabilisationEnMM = 0 ;

    "" ;

    SI( DEFAUT(@`Monnaie;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 6

#Période 6

#Référence 6

#Quantité 6

#Groupe 6


#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[@`SComptabilisationMen];"") ; 

        "" 

      )

  )


#Débit 7
//Créancier

SI( @`PMontants[@`SComptabilisationMen] > 0 

  ; DEFAUT( @`FCompteCrédit 

          ; DEFAUT( @`RefFournisseur.`CompteCrédit 

                   ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

                       ; @`VCptDefautCréancierME2 

                       ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                           ; @`VCptDefautCréancierME1 

                           ; @`VCptDefautCréancier 

                           ) 

                       )

                   )

           )

  ; @`PTypes[@`SComptabilisationMen]

  )


#Crédit 7
//Créancier

SI( @`PMontants[@`SComptabilisationMen] < 0

  ; DEFAUT( @`FCompteCrédit 

          ; DEFAUT( @`RefFournisseur.`CompteCrédit 

                  ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

                      ; @`VCptDefautCréancierME2 

                      ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                          ; @`VCptDefautCréancierME1

                          ; @`VCptDefautCréancier 

                          )

                     )

                  )

         )

    ; @`PTypes[@`SComptabilisationMen]

    )


#Pièce 7
//p7

CHAINE(@`Numéro)


#Libellé 7
//l7

SI( @`VMontreLigneCompta = 1;"FP7 : ";"")+

@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 7
//Versé

@`PMontants[@`SComptabilisationMen] 

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1 )

    * SI( @`PMontants[@`SComptabilisationMen] < 0 ; -1 ; 1)


#Tva 7

#Monnaie 7
//mm7

SI( @`VComptabilisationEnMM = 0 ;

    "" ;

    SI( DEFAUT(@`Monnaie;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 7

#Période 7

#Référence 7

#Quantité 7

#Groupe 7


#Final
#Cumul
1

#Date 1
//Date

SI( DEFAUT(@`PEscompte;0) = 0 

  ; "" 

  ; SI( 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 

  ; ""

  ; SI( @`PEscompte > 0 

      ;  "..." 

      ;  SI( @`VEscompteVentiléAchat = 1 // Ventilé

           ; SI( @`VMultimonnaie <> 1 

               ; DEFAUT( @`RefArticles.`CompteDébit[0] ; @`VCptDefautArticleDébit )

               ; DEFAUT( @`RefArticles.`CompteDébit[ DEFAUT( @`Monnaie ; 0) ] 

                       ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

                           ; @`VCptDefautArticleDébitME2 

                           ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                               ; @`VCptDefautArticleDébitME1

                               ; @`VCptDefautArticleDébit 

                               ) 

                           )

                       )

               )

           ; // regroupé 

             SI( @`VMultimonnaie <> 1

               ; @`VCptEscObtenu

               ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 

                   ; @`VCptEscObtenuME2

                   ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                       ; @`VCptEscObtenuME1 

                       ; @`VCptEscObtenu

                       )

                   )   

               )

           )

           

      )

  )


#Crédit 1
//Escompte

SI( COMPTE(@`ADésignation) = 0 

  ; ""

  ; SI( @`PEscompte < 0 

      ;  "..." 

      ;  SI( @`VEscompteVentiléAchat = 1 

           ;// Ventilé

             DEFAUT( @`RefArticles.`CompteDébit[ DEFAUT( @`Monnaie ; 0) ] ;

                SI( DEFAUT( @`Monnaie ; 0 ) = 2 

                  ; @`VCptDefautArticleDébitME2 

                  ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                      ; @`VCptDefautArticleDébitME1

                      ; @`VCptDefautArticleDébit 

                      ) 

                  )

              )

           ; // regroupé 

             SI( DEFAUT( @`Monnaie ; 0 ) = 2 

               ; @`VCptEscObtenuME2

               ; SI( DEFAUT( @`Monnaie ; 0 ) = 1 

                   ; @`VCptEscObtenuME1 

                   ; @`VCptEscObtenu

                   )   

               )

           )

      )

  )


#Pièce 1
//p1

CHAINE(@`Numéro)


#Libellé 1
//l1

SI( @`VMontreLigneCompta = 1;"FE1 : ";"")+@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 1
//ventil

SI( COMPTE(@`ADésignation) =  0 

  ;

    0 

  ;

    DEFAUT(@`ATotalLigneTTC;0) 

    * @`PEscompte 

    * SI(@`PEscompte < 0 ; -1 ; 1)

    * 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;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 1
//A1

@`FCodeAnalytique


#Période 1
//p1

SI( DEFAUT(@`PEscompte;0) = 0 ; "" ;

SI( OU( @`VTVAEntrepriseSoumise=0 ; 

        @`VTVAEntrepriseSoumise=2;

        @`VTVAEntrepriseSoumise=4) ; 

    

DEFAUT(  SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation ) ) ; MAX( @`PDates  ) ) ; "" ))


#Référence 1

#Quantité 1

#Groupe 1


#Date 2

#Débit 2
//Escompte

SI( @`PEscompte > 0 

   ; "..." 

   ; @`FComptesDébit

   )


#Crédit 2
//Escompte

SI( @`PEscompte < 0 ; "..." ;

    @`FComptesDébit )


#Pièce 2
//p2

CHAINE(@`Numéro)


#Libellé 2
//l2

SI( @`VMontreLigneCompta = 1;"FE2 : ";"")+@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 2
//Tot

DEFAUT(@`FMontants;0) 

    * @`PEscompte  

    * SI(@`PEscompte  <0;-1;1)

    * 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;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 2
//A2

@`FCodeAnalytiques


#Période 2
//p2

SI( DEFAUT(@`PEscompte;0) = 0 ; "" ;

SI( OU( @`VTVAEntrepriseSoumise=0 ; 

        @`VTVAEntrepriseSoumise=2;

        @`VTVAEntrepriseSoumise=4) ; 

    

DEFAUT(  SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation ) ) ; MAX( @`PDates  ) ) ; "" ))


#Référence 2

#Quantité 2

#Groupe 2


#Date 3

#Débit 3
//Escompte

SI( @`PEscompte > 0 

  ; "..." 

  ; @`FCompteDébit

  )


#Crédit 3
//Escompte

SI( @`PEscompte < 0 ; "..." ;

    @`FCompteDébit )


#Pièce 3
//p3

CHAINE(@`Numéro)


#Libellé 3
//l3

SI( @`VMontreLigneCompta = 1;"FE3 : ";"")+@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 3
//Tot

DEFAUT(@`FTotalTTCNormal ;0) 

    * @`PEscompte 

    * SI(@`PEscompte < 0 ; -1 ; 1)

    * SI(@`TotalFacturé<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;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 3
//A3

@`FCodeAnalytique


#Période 3
//p3

SI( DEFAUT(@`PEscompte;0) = 0 ; "" ;

SI( OU( @`VTVAEntrepriseSoumise=0 ; 

        @`VTVAEntrepriseSoumise=2;

        @`VTVAEntrepriseSoumise=4) ; 

    

DEFAUT(  SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation ) ) ; MAX( @`PDates  ) ) ; "" ))


#Référence 3

#Quantité 3

#Groupe 3


#Date 4

#Débit 4
//Frais

SI( @`PEscompte > 0 

  ; "..." 

  ; SI( @`VMultimonnaie <> 1 

      ;  @`VCptFraisAchat 

      ; SI( DEFAUT( @`Monnaie ; 0 ) = 2 ; 

        @`VCptFraisAchatME2 ;

        SI( DEFAUT( @`Monnaie ; 0 ) = 1 ; 

            @`VCptFraisAchatME1 ; 

            @`VCptFraisAchat 

  ) ) ))


#Crédit 4
//Frais

SI( @`PEscompte < 0 ; 

    "..." ; 

    SI( DEFAUT( @`Monnaie ; 0 ) = 2 ; 

        @`VCptFraisAchatME2 ;

        SI( DEFAUT( @`Monnaie ; 0 ) = 1 ; 

            @`VCptFraisAchatME1 ; 

            @`VCptFraisAchat 

  ) ) )


#Pièce 4
//p4

CHAINE(@`Numéro)


#Libellé 4
//l4

SI( @`VMontreLigneCompta = 1;"FE4 : ";"")+@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 4
//Frais

SI( COMPTE(@`ADésignation) = 0 

 ; 

    0 

 ; 

    DEFAUT( @`FraisEmballage ;0 )

    

    * @`PEscompte

    * SI(@`PEscompte < 0 ; -1 ; 1)

    * 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;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 4
//A4

@`FCodeAnalytique


#Période 4
//p4

SI( DEFAUT(@`PEscompte;0) = 0 ; "" ;

SI( OU( @`VTVAEntrepriseSoumise=0 ; 

        @`VTVAEntrepriseSoumise=2;

        @`VTVAEntrepriseSoumise=4) ; 

    

DEFAUT(  SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation ) ) ; MAX( @`PDates  ) ) ; "" ))


#Référence 4

#Quantité 4

#Groupe 4


#Date 5

#Débit 5
//Frais

SI( @`PEscompte > 0 ; 

    "..." 

    ; SI( @`VMultimonnaie <> 1 

      ;  @`VCptFraisAchat 

      ;  SI( DEFAUT( @`Monnaie ; 0 ) = 2 ; 

        @`VCptFraisAchatME2;

        SI( DEFAUT( @`Monnaie ; 0 ) = 1 ; 

            @`VCptFraisAchatME1; 

            @`VCptFraisAchat

   ) ) ))


#Crédit 5
//Frais

SI( @`PEscompte < 0 ; 

    "..." ; 

    SI( DEFAUT( @`Monnaie ; 0 ) = 2 ; 

        @`VCptFraisAchatME2;

        SI( DEFAUT( @`Monnaie ; 0 ) = 1 ; 

            @`VCptFraisAchatME1; 

            @`VCptFraisAchat

   ) ) )


#Pièce 5
//p5

CHAINE(@`Numéro)


#Libellé 5
//l5

SI( @`VMontreLigneCompta = 1;"FE5 : ";"")+@`NomRéférence+", "+DEFAUT(@`Notes;"")


#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;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 5
//A5

@`FCodeAnalytique


#Période 5
//p5

SI( DEFAUT(@`PEscompte;0) = 0 ; "" ;

SI( OU( @`VTVAEntrepriseSoumise=0 ; 

        @`VTVAEntrepriseSoumise=2;

        @`VTVAEntrepriseSoumise=4) ; 

    

DEFAUT(  SI( COMPTE(@`PDates)>0 ; MAX( @`PDateImputation ) ) ; MAX( @`PDates  ) ) ; "" ))


#Référence 5

#Quantité 5

#Groupe 5


#Date 6

#Débit 6
//Escompte

SI( @`PEscompte < 0 ; 

    "..." ; 

    DEFAUT( @`RefFournisseur.`CompteCrédit ; //Cor 118 : Compte NON Multimonnaie :[ DEFAUT( @`Monnaie ; 0) ];

            SI( DEFAUT( @`Monnaie ; 0 ) = 2 ; 

                @`VCptDefautCréancierME2 ;

                SI( DEFAUT( @`Monnaie ; 0 ) = 1 ; 

                    @`VCptDefautCréancierME1 ; 

                    @`VCptDefautCréancier 

   ) )  )  )


#Crédit 6
//Escompte

SI( @`PEscompte > 0 ; 

    "..." ; 

    DEFAUT( @`RefFournisseur.`CompteCrédit; //Cor 118: Compte NON Multimonnaie :[ DEFAUT( @`Monnaie ; 0) ] ;

            SI( DEFAUT( @`Monnaie ; 0 ) = 2 ;

                @`VCptDefautCréancierME2 ;

                SI( DEFAUT( @`Monnaie ; 0 ) = 1 ; 

                    @`VCptDefautCréancierME1 ; 

                    @`VCptDefautCréancier 

  ) )  )  )


#Pièce 6
//p6

CHAINE(@`Numéro)


#Libellé 6
//l6

SI( @`VMontreLigneCompta = 1;"FE6 : ";"")+@`NomRéférence+", "+DEFAUT(@`Notes;"")


#Somme 6
//ESc

@`PEscompte 

    * SI(@`PEscompte < 0 ; -1 ; 1) 

    * SI( @`VComptabilisationEnMM = 0 ; DEFAUT(@`TauxChange ; 1) ; 1)


#Tva 6

#Monnaie 6
//M6

SI( @`VComptabilisationEnMM = 0 ;

    "" ;

    SI( DEFAUT(@`Monnaie;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 6

#Période 6

#Référence 6

#Quantité 6

#Groupe 6


#Date 7
//Date

SI( OU( @`VTVAEntrepriseSoumise=1 ; 

        @`VTVAEntrepriseSoumise=3 ;

        @`VTVAEntrepriseSoumise=5 ) ; 

DEFAUT( @`PayéLe ; SI( ANNEE( MAX( @`PDates ) )< 0 ; AUJOURDHUI() ; MAX(@`PDates) )  ) ; "" )


#Débit 7
//Escompte

@`VCptEscObtenu


#Crédit 7
//Créancier

@`VCptDefautCréancier


#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" ; "Für Info: Nei Erhalt der Beträge")


#Somme 7
//Balance

CHAINE(0) +"+/-0.01"


#Tva 7

#Monnaie 7
//M7

SI( @`VComptabilisationEnMM = 0 ;

    "" ;

    SI( DEFAUT(@`Monnaie;0)=0 ;

        "";

        @`Monnaie + "|"+CHAINE(DEFAUT(@`TauxChange;1);5)

      )

  )


#Analytique 7

#Période 7

#Référence 7

#Quantité 7

#Groupe 7


#Payé
@`Payé=1

#Accompte
@`DTAEtat