CALCUL de Marge

**Angelique_Abac** · 04/08/2006, 10h05

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

**skywaukers** · 04/08/2006, 10h24

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

**Angelique_Abac** · 04/08/2006, 10h27

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

**Cl@udius** · 04/08/2006, 10h37

Salut,

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
try
  marge := (CA - COUTS) * 100 / CA;
except
  on EZeroDivide do marge := 0;
end;

@+

**ryko** · 04/08/2006, 10h40

ou avec un CASE OF !!!

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

)

**Angelique_Abac** · 04/08/2006, 10h47

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

**Cl@udius** · 04/08/2006, 10h50

Re,

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...

@+

**Angelique_Abac** · 04/08/2006, 11h31

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

@+

**anapurna** · 04/08/2006, 13h04

salut

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

@@CA = @@Marge+ @@Cout

ce qui devrait te donnée ca

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

**Commodore** · 04/08/2006, 15h24

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 ???

**aityahia** · 04/08/2006, 10h50

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.

**ryko** · 04/08/2006, 11h03

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

**Angelique_Abac** · 04/08/2006, 11h13

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

;-)

**ryko** · 04/08/2006, 11h21

Il reste les yeux pour

!!!

**aityahia** · 04/08/2006, 11h30

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).

CALCUL de Marge

Delphi

Vue hybride

Discussions similaires

Partager

Partager