CALCUL de Marge

Bonjour à tous,

J'ai un soucis, je dois calculer une marge. Bon ça à l'air simple :

CA - COUTS * 100 / CA et opppsss c'est fini. BEN NON

Si le CA est à zéro, on a une division par 0.

Bon je pourrais gérer le cas avec une clause if, mais auriez vous une equation qui prenne ce cas en compte ?

Merci d'avance
Angelique

bonjour,

pour la question, à part un if ou à la limite un try..exept, je vois pas.
Par contre fais gaffe aux priorités des opérateurs (* et / sont interprétés avant le -).

@++
Dany

Merci,

Mais je suis sure que l'on peut trouver sans ce @^\\``| de if.

Je continue ma recherche

et encore merci pour ta réponse

Salut,

Si tu tiens à ne pas utiliser le if, alors intercepte la division par 0.

Code:

---

1 2 3 4 5 6

try marge := (CA - COUTS) * 100 / CA; except on EZeroDivide do marge := 0; end;

---

@+

ou avec un CASE OF !!!

(mais je ne suis pas sûr que ça réponde à ta question :roll: )

Et merci à tous.

Pour Claudius40 pour le on except la marge n'est dans ce cas pas égal à zéro.

Et je recherche une équation prenant tous les cas en compte... si elle existe.

J'ai un second problème d'ailleurs, si le CA est inférieur à zéro, la marge est fausse.

Il doit bien exister une équation globale, mais mes neuronnes sont fatigués.

Au cas ou

@+ Angelique

Re,

Citation:

---

Envoyé par Angelique_Abac

Pour Claudius40 pour le on except la marge n'est dans ce cas pas égal à zéro.

---

Effectivement, la valeur 0 n'était qu'un exemple !
Et puis ne t'inquiète pas pour tes neurones...:mrgreen:

@+

Citation:

---

Envoyé par Angelique_Abac

Bonjour à tous,

J'ai un soucis, je dois calculer une marge. Bon ça à l'air simple :

CA - COUTS * 100 / CA et opppsss c'est fini. BEN NON

Si le CA est à zéro, on a une division par 0.

Bon je pourrais gérer le cas avec une clause if, mais auriez vous une equation qui prenne ce cas en compte ?
Angelique

---

en quoi l'utilisation du If vous dérange ce n'est qu'une précaution logiquement vous devriez pas avoir des cout a zéro ni de chiffre d'affaire les tests devrons etre fait bien avant,
vous devez passer par un test.

Et en supposant que CA=0, tu voudrais obtenir quoi comme résultat ? Juste -COUTS ?

Si CA = 0s la marge est de -100


En gros, le CA =< 0 alors % Marge = -100

Le problème étant de concecoir une equation globla qui prenne ce cas en compte.

Allez j'en rajoute un, pour le fun... J'ai un fournisseur dont j'attends un avoir (système de commission quelques fois utilisé) j'ai donc

CA = 0
Cout = -50 (et non 50 car j'ettends de sa part un avoir)

Finalement pas si simple de calculer une marge, non ?

Merci pour vos réponses, si je trouve je tiens tiens au jus.

@+ Angelique

;-)

Il reste les yeux pour :cry: !!!

je suis pas financier mes a ma connaissance c'est pas la marge que vous voullez calculer c'est le solde des clients.

Marge ou résultat = CA - Charge
CA = montant facturer = (Montant encaisser+ Créance).

Encore merci à tous.

L'algo qui fonctionne pour gérer tous les cas est celui ci

Select @@Marge = (@@CA)-(@@Cout)

if (@@Marge > 0)
begin
if (@@CA > 0)
Set @@Pourcentage_Marge = 100-((@@Cout/@@CA)*100)
else
Set @@Pourcentage_Marge = 100
end

if (@@Marge < 0)
begin
if (@@CA < 0)
Set @@Pourcentage_Marge = -100
else
Set @@Pourcentage_Marge = -(100*(Abs(@@Marge)/@@Cout))
end

Néanmoins, je suis sure que tous ces cas peuvent être gérés dans une équation unique qui simpliefait la lecture du code et qui éviterait toutes ces conditions.

Au cas ou un matheu passe par là.

Encore merci

@+

salut

Citation:

---

Envoyé par Angelique_Abac

Encore merci à tous.

L'algo qui fonctionne pour gérer tous les cas est celui ci

Select @@Marge = (@@CA)-(@@Cout)
if (@@Marge > 0)
begin
if (@@CA > 0)
Set @@Pourcentage_Marge = 100-((@@Cout/@@CA)*100)
else
Set @@Pourcentage_Marge = 100
end

if (@@Marge < 0)
begin
if (@@CA < 0)
Set @@Pourcentage_Marge = -100
else
Set @@Pourcentage_Marge = -(100*(Abs(@@Marge)/@@Cout))
end

Néanmoins, je suis sure que tous ces cas peuvent être gérés dans une équation unique qui simpliefait la lecture du code et qui éviterait toutes ces conditions.

Au cas ou un matheu passe par là.

Encore merci

@+

---

tu peut simplifier en remplacant

Code:

---

@@CA = @@Marge+ @@Cout

---

ce qui devrait te donnée ca

Code:

---

1 2 3 4 5 6

Select @@Marge = (@@CA)-(@@Cout) if (@@Marge > 0) begin Set @@Pourcentage_Marge = 100-((@@Cout/(@@Marge+@@Cout))*100) end

---

parcontre si je cherche le pourcentage de marge je ferait pluto
la Marge / Ca

@+ Phil

je ne comprend pas cet acharnement à éviter le If...

pourquoi ne pas faire une fonction à part si il s'agit de lisibilité dans le code ???

Peut-être ceci te satisferas :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Marge := CA-Cout;   case (Marge > 0) of true : case (CA > 0) of true : Pourcentage_Marge := 100-((Cout/CA)*100); false : Pourcentage_Marge := 100; end; false : case (CA < 0) of true : Pourcentage_Marge := -100; false : Pourcentage_Marge := -(100*(Abs(Marge)/Cout)); end; end;

---

Ben voyons et pourquoi pas

Code:

---

1 2 3 4 5 6 7

Marge := CA-Cout;   case (Marge > 0) of true : Pourcentage_Marge := (100-((Cout/(CA+Ord(CA < 0)))*100)) * Ord(CA > 0) + (100 * Ord(CA < 0)); false :Pourcentage_Marge := (-(100*(Abs(Marge)/Cout))* Ord(CA > 0)) - (100 * Ord(CA < 0)); end;

---

on doit pouvoir s'amuser à enlever l'autre case et alors on obtient un peu code concis inmaintenable et illisible.
Mais quel pied !
a+

Et voilà

encore faudrait-il vérifier les > et <= pour être sur que le zéro ne passe pas en maille.

Code:

---

1 2 3 4 5

Marge := CA-Cout;   Pourcentage_Marge := (ord(Marge > 0) * (100-((Cout/(CA+Ord(CA < 0)))*100)) * Ord(CA > 0) + (100 * Ord(CA < 0))) + (ord(Marge <= 0) * (-(100*(Abs(Marge)/Cout))* Ord(CA > 0)) - (100 * Ord(CA < 0));)

---

Ben voyons, pourquoi pas !
Plus on est fou, plus on s'amuse ! ...et vice-versa !