WDForge.org - Forums - WD 11 - [Résolu] archiver les enregistrements d'une table

Index des forums WDForge.org

WD 11

[Résolu] archiver les enregistrements d'une table

Bas

Suivant S'enregistrer pour contribuer

	[Résolu] archiver les enregistrements d'une table	#1
Stagiaire WDF Inscrit: 26/06/2007 22:44 De Paris - 18° Post(s): 27	Bonjour, Je voudrais archiver les enregistrements inutilisés d'une table au lieu de les supprimer définitivement. Comment dois-je m'y prendre ? Merci d'avance Contribution le : 04/02/2008 23:35 Edité par drcharly93 sur 7/2/2008 12:06:09
	_________________ michel

	Re: archiver les enregistrements d'une table	#2
Animateur WDF Inscrit: 02/03/2003 04:07 De Noisy le grand(93) Post(s): 2745	Bonjour, Vous pouvez utiliser la fonction HCopieEnreg(<Nom fichier Destination>,<Nom fichier source>[,<Nom des rubriques destination>[,<Nom des rubriques source>]],hCopieIdAuto) le hCopieIdAuto permet de copier dans le fichier destination l'identifiant automatique du fichier origine et ainsi garder les liaisons avec d'autres fichiers. puis ainsi pouvoir supprimer les enregistrements dans le fichier d'origine. Contribution le : 05/02/2008 13:08
	_________________ @A+ Contact (privé)...... email : drcharly@wdforge.org [DrCharly93]

	Re: archiver les enregistrements d'une table	#3
Stagiaire WDF Inscrit: 26/06/2007 22:44 De Paris - 18° Post(s): 27	Bonjour et merci, je suppose qu'il me faut créer un fichier destination avec les mêmes champs que le fichier source ? Puis-je copier le fichier source dans l'analyse en le renommant ou dois-je en créer un nouveau ? Contribution le : 05/02/2008 15:34
	_________________ michel

	Re: archiver les enregistrements d'une table	#4
Animateur WDF Inscrit: 02/03/2003 04:07 De Noisy le grand(93) Post(s): 2745	Bonjour, Oui bien sur vous pouvez copier la description du fichier Contribution le : 05/02/2008 16:56
	_________________ @A+ Contact (privé)...... email : drcharly@wdforge.org [DrCharly93]

Re: archiver les enregistrements d'une table

DSI WDF

Inscrit:
12/09/2004 11:07

De aude

Post(s): 279

Voici une idée que j'utilise dans mes applications :


//déclaration des fichiers d'archivage
sdStage_Archive est une Source de Données

//création des alias
HAlias(STAGE,sdStage_Archive)

//Assignation avec les fichiers physiques
sNomFichier est une chaîne

sNomFichier=HChangeNom(sdStage_Archive,"STAGES_"+COMBO_MOIS_LETTRE..ValeurAffichée+COMBO_ANNEE..ValeurAffichée)

//RAZ des fichiers d'archivages
HCréationSiInexistant(sdStage_Archive)


// extraction des données
// Sélection du fichier de sauvegarde
sNomFic est une chaîne
sChemin est une chaîne
sNomFic=fRepSélecteur(fRepEnCours(),"Sélection du dossier d'archivage","","")

//Extraction des données
//borne mini
sCléMin est une chaîne
sCléMin=Complète(COMBO_ANNEE..ValeurAffichée,4)+NumériqueVersChaîne(COMBO_MOIS_LETTRE,"02d")+hValMin

//Borne de la clé max
sCléMax est une chaîne
sCléMax = Complète(COMBO_ANNEE..ValeurAffichée,4)+NumériqueVersChaîne(COMBO_MOIS_LETTRE,"02d")+hValMax

//1 : &Continuer
//2 : &Ne pas continuer
SELON Dialogue("Vous allez archiver les stages du mois de %1 pour l'année %2. Ces données ne seront plus modifiables. Voulez vous continuer ?",...
	COMBO_MOIS_LETTRE..ValeurAffichée,...
	COMBO_ANNEE..ValeurAffichée)
	
	// &Continuer
	CAS 1
		//Change de lieu
		HChangeRep(sdStage_Archive,sNomFic)
		HCréationSiInexistant(sdStage_Archive)
		
		//Filtrage des enregistrements
		HFiltre(STAGE,date_deb_stage,sCléMin,sCléMax)
		HLitPremier(STAGE,date_deb_stage)
		TANTQUE PAS HEnDehors(STAGE)
			HCopieEnreg(sdStage_Archive,STAGE,hCopieIdAuto)
			HAjoute(sdStage_Archive,hFixeIdAuto)
			HSupprime(STAGE,hNumEnrEnCours)
			HLitSuivant(STAGE,date_deb_stage)
		FIN
		Info("Le fichier a été archvé sous le nom : STAGES_"+COMBO_MOIS_LETTRE..ValeurAffichée+COMBO_ANNEE..ValeurAffichée)		
	// &Ne pas continuer
	CAS 2
		RETOUR
FIN

//Fin de l'archivage
HDésactiveFiltre(STAGE)
HAnnuleAlias(sdStage_Archive)
Ferme(FEN_Archivage)

A adapter pour soi même.
Bon courage!

Attacher un fichier:

IMG53.GIF (5.41 KB)
662_47aa0c4ccd58b.gif 387X231 px

Contribution le : 06/02/2008 20:38

_________________

...

	Re: archiver les enregistrements d'une table [Résolu]	#6
Stagiaire WDF Inscrit: 26/06/2007 22:44 De Paris - 18° Post(s): 27	Bonsoir, Merci Aude, mais j'ai résolu et écrit mon archivage. Je garde toutefois le code Contribution le : 07/02/2008 00:22
	_________________ michel

Haut

S'enregistrer pour contribuer

Vous ne pouvez pas débuter de nouveaux sujets.

Vous pouvez voir les sujets.

Vous ne pouvez pas répondre aux contributions.

Vous ne pouvez pas éditer vos contributions.

Vous ne pouvez pas effacez vos contributions.

Vous ne pouvez pas ajouter de nouveaux sondages.

Vous ne pouvez pas voter en sondage.

Vous ne pouvez pas attacher des fichiers à vos contributions.

Vous ne pouvez pas poster sans approbation.