begin process at 2010 03 19 16:56:44
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Divers

 > DELPHI - CREATION D'UNE COLLECTION D'ENREGISTREMENTS SAGE (TCOLLECTION)

DELPHI - CREATION D'UNE COLLECTION D'ENREGISTREMENTS SAGE (TCOLLECTION)


 Information sur la source

Note :
Aucune note
Catégorie :Divers Classé sous :SAGE, Paie, ETL, TCollectionItem, TCollection Niveau :Initié Date de création :21/11/2008 Date de mise à jour :25/11/2008 11:05:28 Vu / téléchargé :3 234 / 303

Auteur : FENETRES

Ecrire un message privé
Commentaire sur cette source (5)
Ajouter un commentaire et/ou une note

 Description

Cliquez pour voir la capture en taille normale
Au gré des fusions et acquisitions, différents logiciels de paie et de comptabilité peuvent coexister temporairement. Il faut alors développer des outils de type ETL. En l'occurrence, il s'agissait de convertir des fichiers plats Arcole pour créer un pont paie Sage. Pour des raisons évidentes de confidentialité, il ne m'est pas possible de fournir le projet en démo. Néamoins, hormis la connaissance du dessin d'enregistrement Sage, l'unité fournie est un exemple simple et concret de création d'une collection et peut être utile.

Source

  • ...
  • implementation
  • {$R *.dfm}
  • uses
  • SageUnit;
  • procedure ConvertToSage;
  • begin
  • ...
  • //Création de la collection d'enregistrements Sage
  • with TSageRecords.Create(TSageRecord) do
  • try
  • // Ajout d'un enregistrement (item #0)
  • Add;
  • // Type de données
  • Items[0].DataType:=COMPTA_GEN;
  • // Nom de la société
  • Items[0].Company:='DUMMY';
  • // Date de la pièce
  • Items[0].Col_02:=Copy(sLineText, 7, 2) + Copy(sLineText, 5, 2) + Copy(sLineText, 1, 2);
  • ...
  • finally
  • Free;
  • end;
  • end;
  • ...
  • end.
...

implementation

{$R *.dfm}

uses
  SageUnit;

procedure ConvertToSage;
begin

  ...

  //Création de la collection d'enregistrements Sage
  with TSageRecords.Create(TSageRecord) do
    try
      // Ajout d'un enregistrement (item #0)
      Add;
      // Type de données
      Items[0].DataType:=COMPTA_GEN;
      // Nom de la société
      Items[0].Company:='DUMMY';        
      // Date de la pièce
      Items[0].Col_02:=Copy(sLineText, 7, 2) + Copy(sLineText, 5, 2) + Copy(sLineText, 1, 2);
      ...

    finally
      Free;
    end;
end;

...

end.

 Conclusion

Seul le fichier joint est utilisable. L'extrait de style elliptique publié dans la source est simplifé à l'extrême et ne doit servir que de modèle.

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Historique

21 novembre 2008 14:29:38 :
Niveau de la source
21 novembre 2008 14:34:01 :
Mots clés
21 novembre 2008 15:18:16 :
Conclusion
21 novembre 2008 15:51:01 :
Mots clés
21 novembre 2008 16:49:26 :
Description
22 novembre 2008 10:11:28 :
Description
22 novembre 2008 12:42:11 :
Commentaire
25 novembre 2008 10:24:22 :
Mise en page
25 novembre 2008 10:33:48 :
Source (type de données)
25 novembre 2008 10:43:17 :
Erreur de frappe
25 novembre 2008 11:05:28 :
source

 Sources du même auteur

Source avec Zip Source avec une capture DELPHI : SHA-1 EN MODE CHIFFREMENT (SHACAL)
Source avec Zip Source avec une capture DELPHI - AJOUT DE POLICES (APP. CONSOLE)
Source avec Zip Source avec une capture DELPHI - CHEMIN D'ACCÈS DE STYLE ELLIPTIQUE (GET PATH ELLIPS...
Source avec Zip Source avec une capture DELPHI : PROCEDURE SPLIT SIMILAIRE A LA FONCTION EPONYME EN ...
Source avec Zip Source avec une capture DELPHI - CRÉATION D'UNE FEUILLE DE CALCUL EXCEL (CONTRÔLE TO...

 Sources de la même categorie

Source avec Zip Source avec une capture LOGICIEL DE DIAGNOSTIC AUTOMOBILE KWP2000 par Oniria
Source avec Zip Source avec une capture RÉGLE TRANSPARENTE POUR MESURER UN OBJET ECRAN par dubois77
Source avec Zip Source avec une capture LE BOOK DU PAUVRE par dubois77
Source avec Zip Source avec une capture CAHIER 90 PAGES par dubois77
Source avec Zip Source avec une capture TABLEAU DE BOUTONS DYNAMIQUES (AGENDA) par dubois77

 Sources en rapport avec celle ci

Source avec Zip COMPOSANT TTHRESCOLLECTION par ThWilliam

Commentaires et avis

Commentaire de FENETRES le 26/11/2008 11:54:51

Même si le sujet est très orienté métier, il n'est pas interdit de poser des questions.

« Ce sont les questions qui font le philosophe. »
Paul Valéry

Commentaire de thierrybo le 21/07/2009 10:51:16

Bonjour,

je ne comprend pas vraiment ce que ça fait. Ça exporte convertit un fichier d'écritures comptable généré par la paie dans un autre format, ou c'est pour importer quelque chose dans la paie ?

Commentaire de FENETRES le 21/07/2009 16:27:40

Bonjour,

   En l'espèce, il s'agissait, comme vous l'avez justement deviné, d'importer les données de la paie Arcole dans la comptabilité Sage. Sachant que ces deux logiciels ont des dessins d'enregistrement différents.

A+,

Commentaire de thierrybo le 22/07/2009 19:10:09

D'accord,

et est-ce qu'il génère un format Sage ligne 100 ou un format paramétrable ?

Commentaire de FENETRES le 23/07/2009 12:01:35

La structure de données ci-dessous est déclarée dans la classe TSageRecord (fichier SageUnit) et répond à votre question.

    FCol_01: TStr3;                { En lecture seule : code journal PAI ou B32 selon le type de données }
    FCol_02: TStr6;                { Date de la pièce (jjmmaa) }
    FCol_03: TStr2;                { En lecture seule : constante OD }
    FCol_04: TStr13;              { Compte général }
    FCol_05: Char;                 { Type de compte X, A ou vide }
    FCol_06: TStr13;              { Matricule du consultant, compte analytique ou vide }
    FCol_07: TStr13;              { Réf. de l'écriture ex. " PAIE 12/2007 " }
    FCol_08: TStr25;              { Libellé de l'écriture OD PAIE, VIREMENT SALAIRES ou autre }
    FCol_09: Char;                 { En lecture seule : mode de paiement }
    FCol_10: TStr6;                { En lecteur seule : date d'échéance (vide) }
    FCol_11: Char;                 { Sens D ou C (débit ou crédit) }
    FCol_12: TStr20;              { Montant écriture (numérique, remplissage à gauche) }
    FCol_13: Char;                 { Valeur par défaut N : type d'écriture N, A ou S (normale, nouveau ou simulation) }
    FCol_14: TStr7;                { En lecture seule : n° de pièce }
    FCol_15: TStr26;              { En lecture seule : zone réservée }
    FCol_16: TStr3;                { En lecture seule : code ISO de la monnaie }
    FCol_17: TStr20;              { Code ISO de la monnaie de tenue de compte }
    FCol_18: TStr3;                { Code ISO de la devise }

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

utilisation d'un Tcollection ou Tcollectionitem [ par creas ] Bonjour, je voudrai savoir qu es ce qu un Tcollection et comment l'utiliser vue que la doc ne m'a pas aider.Merci Tcollection et TcollectionItem ou Gestion des objetc imbriques [ par protheus2003 ] bonjour, Mon probleme : je dois realiser un objet de type    Pays 1              Utilisation Tcollection et TCollectionItem [ par clola ] Bonjour,Je débute dans la programmation Objet. J'ai quelques notions théoriques mais je n'arrives pas à appliquer la notion de collection avec Delphi. gestion_paie [ par oudihatma ] je voudrais filtrer plusieurs tables;exemple changement_grade contient les grades acquis au cours de la carrière d'un employé,changment_echelon contie avis sur application [ par hurrycane ] salut je souhaiterais avoir votre avis sur cette application que j'ai développé pour le compte d'une PME algérienne.y'a pas de pub la dedans vu que ce gestion de paie [ par fadila2007 ] salut, je voudrai réaliser un logiciel de gestion de paie des employées d'une entreprise, j'ai fait la conception et une partie de programmation avec Problème TCollection dans inspecteur d'objets [ par ThWilliam ] Bonjour à tous. Voici mon problème :Je construis un composant qui utilise entre autre un TCollection. Appelons-la "TMyCollection".La Collection doit fiche de paie / mouvements bancaires(gerer les comptes et transferer un montant d'1 compte à un autre) [ par evarice ] Bonjour à tous! J'ai deux nouveaux pbs les gars. [b]D'une part une fiche de calcul de salaire[/b]:il est question de pouvoir à la fin de chaque fin de Le fameux message: "Could not convert variant of type (Null) into type (String)" [ par Lunasoft ] [size=300]Bonsoir! Ma question paraitra peut être étrange. Mais elle est simple. Ça fait plusieurs mois que je n'arrive pas à faire taire ce message:


Nos sponsors


Sondage...

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,217 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales