IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Delphi Discussion :

Calcule formule du paie


Sujet :

Delphi

  1. #1
    Membre régulier
    Homme Profil pro
    Chef de projet NTIC
    Inscrit en
    Mars 2013
    Messages
    212
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Algérie

    Informations professionnelles :
    Activité : Chef de projet NTIC
    Secteur : Communication - Médias

    Informations forums :
    Inscription : Mars 2013
    Messages : 212
    Points : 81
    Points
    81
    Par défaut Calcule formule du paie
    Salut à Tous ;
    Je suis entrain de développez une petite application de la gestion du paie avec Delphi2010 et SQL Server 2008 , mon problème c'est que je veux une idée comment calculer les éléments(les rubriques) du paie en ajoutant des Formules par exemple (astreint=sbase*0.25) , (Spost=sbase+astrent)...etc comment Delphi prendre en compte ces petite formules et les calculer, je veux seulement l'idée.

  2. #2
    Expert confirmé
    Avatar de anapurna
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mai 2002
    Messages
    3 419
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : Arts - Culture

    Informations forums :
    Inscription : Mai 2002
    Messages : 3 419
    Points : 5 818
    Points
    5 818
    Par défaut
    salut

    pas très claire ta demande

    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
     
    Function astreint(Base,Taux : Currency) : Currency
    begin
      Result := Base*Taux;
    end;
    Function Spost(sbase,astreint :Currency ): Currency
    begin
      Result := sbase+astreint;
    end;
    ..........
    Function TDMDATASPAIE.ChercheVal : Currency;
    var
      LVarCur : Currency;
    begin
      Result :=0;
      CloseQuery(QrVal);
      QrVal.sql.clear;
      QrVal.sql.add('Select BASE,TAUX from MATABLE ' );
      OpenQuery(QrVal);
      If Not(QrVal.IsEmpty) Then  
      begin
          LVarCur := QrVal.FIELDS[0].asCurrency;
         Result := Spost(LVarCur,astreint(LVarCur,QrVal.FIELDS[1].asCurrency));
      end;
      CloseQuery(QrVal);
    end;
    Nous souhaitons la vérité et nous trouvons qu'incertitude. [...]
    Nous sommes incapables de ne pas souhaiter la vérité et le bonheur, et sommes incapables ni de certitude ni de bonheur.
    Blaise Pascal
    PS : n'oubliez pas le tag

  3. #3
    Membre régulier
    Homme Profil pro
    Chef de projet NTIC
    Inscrit en
    Mars 2013
    Messages
    212
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Algérie

    Informations professionnelles :
    Activité : Chef de projet NTIC
    Secteur : Communication - Médias

    Informations forums :
    Inscription : Mars 2013
    Messages : 212
    Points : 81
    Points
    81
    Par défaut
    toute simplement je veux faire dans delphi comme Excel petit exemple:
    Nom : Sans titre.jpg
Affichages : 567
Taille : 21,6 Ko
    Chaque rubrique contient une formule qui sera calculé .
    je veux seulement une idée.

  4. #4
    Expert éminent sénior
    Avatar de ShaiLeTroll
    Homme Profil pro
    Développeur C++\Delphi
    Inscrit en
    Juillet 2006
    Messages
    13 452
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Développeur C++\Delphi
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Juillet 2006
    Messages : 13 452
    Points : 24 863
    Points
    24 863
    Par défaut
    Tu veux faire un langage de script dans ton module ?
    Peut-être faire une sorte de SQL simplifié qui fonctionne sur des vues
    Aide via F1 - FAQ - Guide du développeur Delphi devant un problème - Pensez-y !
    Attention Troll Méchant !
    "Quand un homme a faim, mieux vaut lui apprendre à pêcher que de lui donner un poisson" Confucius
    Mieux vaut se taire et paraître idiot, Que l'ouvrir et de le confirmer !
    L'ignorance n'excuse pas la médiocrité !

    L'expérience, c'est le nom que chacun donne à ses erreurs. (Oscar Wilde)
    Il faut avoir le courage de se tromper et d'apprendre de ses erreurs

  5. #5
    Membre régulier
    Homme Profil pro
    Chef de projet NTIC
    Inscrit en
    Mars 2013
    Messages
    212
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Algérie

    Informations professionnelles :
    Activité : Chef de projet NTIC
    Secteur : Communication - Médias

    Informations forums :
    Inscription : Mars 2013
    Messages : 212
    Points : 81
    Points
    81
    Par défaut
    Citation Envoyé par ShaiLeTroll Voir le message
    Tu veux faire un langage de script dans ton module ?
    Peut-être faire une sorte de SQL simplifié qui fonctionne sur des vues
    TU ME RECOMMANDE D'UTILISER DES REQUETTES SQL ,,? QUI FONCTIONNE SELON DES CONDITIONS ?

  6. #6
    Expert éminent sénior
    Avatar de ShaiLeTroll
    Homme Profil pro
    Développeur C++\Delphi
    Inscrit en
    Juillet 2006
    Messages
    13 452
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Développeur C++\Delphi
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Juillet 2006
    Messages : 13 452
    Points : 24 863
    Points
    24 863
    Par défaut
    Je posais une question si tu voulais faire un langage de script comme dans Excel pour que l'utilisateur puisse lui-même définir ses formules de calcul de la paie.
    Et je ne vois qu'en premier lieu de faire des SQL soit
    - en package, sous ta responsabilité
    - en génération dynamique par un mini-builder type QBE, sous la responsabilité d'un intégrateur/utilisateur
    Aide via F1 - FAQ - Guide du développeur Delphi devant un problème - Pensez-y !
    Attention Troll Méchant !
    "Quand un homme a faim, mieux vaut lui apprendre à pêcher que de lui donner un poisson" Confucius
    Mieux vaut se taire et paraître idiot, Que l'ouvrir et de le confirmer !
    L'ignorance n'excuse pas la médiocrité !

    L'expérience, c'est le nom que chacun donne à ses erreurs. (Oscar Wilde)
    Il faut avoir le courage de se tromper et d'apprendre de ses erreurs

  7. #7
    Membre régulier
    Homme Profil pro
    Chef de projet NTIC
    Inscrit en
    Mars 2013
    Messages
    212
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Algérie

    Informations professionnelles :
    Activité : Chef de projet NTIC
    Secteur : Communication - Médias

    Informations forums :
    Inscription : Mars 2013
    Messages : 212
    Points : 81
    Points
    81
    Par défaut
    Citation Envoyé par ShaiLeTroll Voir le message
    Je posais une question si tu voulais faire un langage de script comme dans Excel pour que l'utilisateur puisse lui-même définir ses formules de calcul de la paie.
    Et je ne vois qu'en premier lieu de faire des SQL soit
    - en package, sous ta responsabilité
    - en génération dynamique par un mini-builder type QBE, sous la responsabilité d'un intégrateur/utilisateur
    Oui biensure je voulais faire un langage de script comme dans Excel.

  8. #8
    Expert éminent sénior
    Avatar de ShaiLeTroll
    Homme Profil pro
    Développeur C++\Delphi
    Inscrit en
    Juillet 2006
    Messages
    13 452
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Développeur C++\Delphi
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Juillet 2006
    Messages : 13 452
    Points : 24 863
    Points
    24 863
    Par défaut
    Voir si tu peux utiliser TMSScript par exemple
    Ou inventer ton propre mini-langage qui par un simple jeu de "remplacer" génère le SQL

    Code ton script : Sélectionner tout - Visualiser dans une fenêtre à part
    [Spost]:=[sbase]+[astrent]
    devient
    Code sql : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    UPDATE table1.Spost = (SELECT table2.sbase + table3.astrent FROM table2 INNER JOIN table3 ON table2.ID_communAvec3 = table3.ID_communAvec2)
    WHERE table1.ID = :ValeurEnCoursGererParFormule

    tu as une table qui connait le nom du champ et le nom de la table
    Soit par MetaData du SGBD soit par une table, tu as les jointures à générer entre les tables

    La seule limite est ton imagination
    Aide via F1 - FAQ - Guide du développeur Delphi devant un problème - Pensez-y !
    Attention Troll Méchant !
    "Quand un homme a faim, mieux vaut lui apprendre à pêcher que de lui donner un poisson" Confucius
    Mieux vaut se taire et paraître idiot, Que l'ouvrir et de le confirmer !
    L'ignorance n'excuse pas la médiocrité !

    L'expérience, c'est le nom que chacun donne à ses erreurs. (Oscar Wilde)
    Il faut avoir le courage de se tromper et d'apprendre de ses erreurs

  9. #9
    Expert confirmé
    Avatar de anapurna
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mai 2002
    Messages
    3 419
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : Arts - Culture

    Informations forums :
    Inscription : Mai 2002
    Messages : 3 419
    Points : 5 818
    Points
    5 818
    Par défaut
    salut
    ok j'avais pas bien compris
    comme le dis ShaiLeTroll si tu n'as pas beaucoup d'instruction est que celle-ci ne sont pas complexe
    pourquoi ne pas créer ton propre Script

    @T pour Table
    @C pour champs de table
    @F pour fonction
    @V pour variable


    voila un petit exemple de ce que pourrait être un script
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
     
    [@V:Params1] := UneValeur
    [@V:VTaux]    :=@F:EXECQUERY[[@T:TABLE2[@C:Base]]]
    [@V:Vbase]    :=@F:EXECQUERY[[@T:TABLEX[[@C:Taux][@V:Params1]]]]
    [@V:Spost]    := @F:CALC[[@V:Vbase]+[@F:astrent[@V:VTaux,@V:Vbase]]]
    Nous souhaitons la vérité et nous trouvons qu'incertitude. [...]
    Nous sommes incapables de ne pas souhaiter la vérité et le bonheur, et sommes incapables ni de certitude ni de bonheur.
    Blaise Pascal
    PS : n'oubliez pas le tag

  10. #10
    Membre régulier
    Homme Profil pro
    Chef de projet NTIC
    Inscrit en
    Mars 2013
    Messages
    212
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Algérie

    Informations professionnelles :
    Activité : Chef de projet NTIC
    Secteur : Communication - Médias

    Informations forums :
    Inscription : Mars 2013
    Messages : 212
    Points : 81
    Points
    81
    Par défaut
    Citation Envoyé par anapurna Voir le message
    salut
    ok j'avais pas bien compris
    comme le dis ShaiLeTroll si tu n'as pas beaucoup d'instruction est que celle-ci ne sont pas complexe
    pourquoi ne pas créer ton propre Script

    @T pour Table
    @C pour champs de table
    @F pour fonction
    @V pour variable


    voila un petit exemple de ce que pourrait être un script
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
     
    [@V:Params1] := UneValeur
    [@V:VTaux]    :=@F:EXECQUERY[[@T:TABLE2[@C:Base]]]
    [@V:Vbase]    :=@F:EXECQUERY[[@T:TABLEX[[@C:Taux][@V:Params1]]]]
    [@V:Spost]    := @F:CALC[[@V:Vbase]+[@F:astrent[@V:VTaux,@V:Vbase]]]
    C'est une idée magique , je vous remercie mais explique un peu plus ou je dois ecrire ce code ???

Discussions similaires

  1. [XL-2003] Calcul Fiche de paie
    Par FCL31 dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 25/01/2019, 21h29
  2. calcul formule dans une cellule
    Par Kanetsugu dans le forum Macros et VBA Excel
    Réponses: 8
    Dernier message: 14/12/2011, 19h43
  3. calcul fiche de paie
    Par tiha1 dans le forum Paie
    Réponses: 12
    Dernier message: 27/07/2011, 21h32
  4. Composant Métier (calcule de la paie et gestion du personnel)
    Par geforce dans le forum Plateformes (Java EE, Jakarta EE, Spring) et Serveurs
    Réponses: 2
    Dernier message: 11/10/2010, 14h00

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo