Discussion :

[khaled-benloucif]

Bonjour, je suis nouveau dans ce forum.
j'expose mon problème: je travaille sur un logiciel de paie, j'ai un soucis dans la procédure de calcule de la paie d'un employé donné. dans ce code, j'ai réduis les lignes de la procédure pour exposer que le problème existant :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
begin
  /*initialisation des variables*/
  cnt_g_imp= 0;
  cnt_g_n_imp= 0;
  cnt_r_imp= 0;
  cnt_r_n_imp= 0;
 
  base_sal_base= 0;
 
  base_cot= 0.00;
  base_irg= 0.00;
  /**/
  paie_sec= 0;
  /* insertion des données master*/
  insert into t_paies_mas ( paie_a, paie_m, emp_id, paie_sec, paie_date)
  values ( :paie_a, :paie_m, :emp_id, :paie_sec, :paie_date);
  /*calculer les gains*/
  for select rbq_id, rbq_type, rbq_used, rbq_base, rbq_rate, rbq_imp, rbq_cot
      from t_rbqs_paie_det
      where rbq_type= 1 and rbq_used= 255
      order by rbq_call_ord
      into :rbq_id, :rbq_type, :rbq_used, :rbq_base, :rbq_rate, :rbq_imp, :rbq_cot
  do
   begin
    if (rbq_id= '1000') then/*salaire de base*/
     begin
      execute procedure get_emp_wd(emp_id) returning_values :rbq_cnt;
      execute procedure get_emp_scale(emp_id) returning_values :emp_scale;
      execute procedure get_base_hw(paie_a, paie_m, emp_scale) returning_values :rbq_base;
      rbq_amt= rbq_cnt*rbq_base;
      base_sal_base= rbq_amt;
     end
    /*cumuler les gains*/
    if (rbq_imp= 255) then
     cnt_g_imp= cnt_g_imp+ rbq_amt;
    else
     cnt_g_n_imp= cnt_g_n_imp+ rbq_amt;
    /* insertion des données détails*/
    insert into t_paies_det ( paie_a, paie_m, emp_id, paie_sec, rbq_id, rbq_base, rbq_cnt, rbq_amt, rbq_rate)
    values (:paie_a, :paie_m, :emp_id, :paie_sec, :rbq_id, :rbq_base, :rbq_cnt, :rbq_amt, :rbq_rate);
    g_imp= cnt_g_imp;
    g_n_imp= cnt_g_n_imp;
    suspend;
   end
end

si j'exécute la procédure, le paramètre g_imp doit me rendre cnt_g_imp, donc je dois trouver moins la valeur rbq_amt qui représente le salaire de base, le problème est que rbq_amt contient vraiment la valeur mais des que je l'ajoute a l'ancienne valeur de cnt_g_imp j'obtiens un résultat nul. quant à l'insertion dans la table t_paie_det, la variable rbq_amt est inserée correctement.

j'ai désactivé la ligne /*rbq_amt= rbq_cnt*rbq_base;*/ dans le bloque de test sur la rubrique '1000' et j'ai initialisé la variable rbq_amt a la valeur voulue dans la partie initialisation des variables, la quand j'exécute tout marche bien! j'ai pas pu expliquer ce problème

Quelqu'un a une idée ? merci d'avance

[SergioMaster]

Bonjour , je me permets de te souhaiter la Bienvenue sur le forum

Ma question sera simple :
Comment est déclaré rbq_amt ?

Je crains que cela soit quelque chose du genre NUMERIC(x,2) de même que les deux valeurs rbq_cnt et rbq_base .
Or, la multiplication de ces deux valeurs fourniras un NUMERIC(x,4) d'où une possibilité non négligeable de 'Numeric overflow' et/ou d'une perte de précision
il est recommandé de transtyper pour éviter ces problèmes

Code :

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

Valeur:=CAST(CAST(valeur1 AS DOUBLE PRECISION) * CAST(valeur2 AS DOUBLE PRECISION) AS NUMERIC(18,2))

peut être ceci explique le pourquoi de

j'ai désactivé la ligne /*rbq_amt= rbq_cnt*rbq_base;*/ dans le bloque de test sur la rubrique '1000' et j'ai initialisé la variable rbq_amt a la valeur voulue dans la partie initialisation des variables, la quand j'exécute tout marche bien! j'ai pas pu expliquer ce problème

[khaled-benloucif]

bonjour, je vous remercie pour votre réponse. j'ai trouvé hier la réponse à mon problème. les variables contenues dans les bloques begin end changeaient de valeur à cause de la clause

Code :

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

ORDER BY rbq_call_ord

. en réalité j'ai ajouté ce champ pour imposer l'ordre dans le quel je calcul les valeurs finales des rubriques de paie. je sais pas pourquoi ce order by a cet effet ! ! !

pour le type j'utilise float carrément! le résultat de la multiplication est exacte, mais tout de même il est affiché sur 3 positions après la virgule et moi en revanche je veux que deux, plus précisément arrondir les deux derniers chiffres
exemple: 10.256 devient 10.26. je sais pas s'il faut basculer vers le type numeric ou garder le float ! cast(rbq_xxx as numerix(x, 2)) semble fonctonner bien avec float