Règles métiers et abstraction

gistfile1.txt

Etant donnée la structure de données T suivante :

(id, type, montant) où type est soit AE (A emporter) ou SP (sur place).

Etant données les régles métiers suivantes pour un calcul de TVA :
RM1 : pout toute donnée T de type AE, la TVA est de 5%
RM2: pour tout donéne T de type SP la TVA est de 10%


1 - Comment implémentez-vous l'application de ces règles métiers sur
une liste de données T issue d'une base de données
2- Idem mais en entrée et en sortie on a du json

-module (tva).
-export ([calcul/1]).

calcul (List) ->
    [ tva (I,T,M) || {I,T,M} <- List ].

tva (_, Type, Montant) ->
    taux_tva (Type) * Montant.

taux_tva (ae) ->
    0.05;
taux_tva (sp) ->
    0.10.