Incrémentation

Version imprimable

15/05/2006, 16h21
bahhak

Incrémentation

Salut
je travaille sur l'SGBDR Access ' je pose le problème :
comment faire incrémenter de (1) la partie (année) d'un champs de type date .
sachant que ce champs du type date (jj/mm/aaaa) est un champs d'une table (fils) dans une relation de (un à plusieurs), j'ai fait extraire avec une requete selection la partie (année) du champs du type date et je veus obtenir par exemple le tableau suivant :

Année :2005 2006 2007 2008 2009 2010

sachant que l'incrémentation se repète par exemple n fois càd (boucler n fois du coté programmation ).
j'attend une réponse
merci
15/05/2006, 17h02
sunvialley
Tu veux quoi exactement, avoir une requete UPDATE qui t incrémente tes année ?
->
Code:

1 2 UPDATE Table1 SET Table1.[date] = Format(DateAdd("yyyy", 1, [Table1].[date]), "yyyy/dd/mm");
ou un bout de code qui ajoute 1 an à une date sélectionnée pour l afficher (traiter...) dans un formulaire ?
16/05/2006, 15h36
bahhak

salut
je pose le problème que je veux réaliser avec access tel qu'il est en excel
par exemple on a le produit suivant:

produit-X, avec les champs çi-dessous, on veut obtenir comme resultat le tableau en bas celui de (année et annuité)
sachant que l'année affichée au début du tableau est la meme de date d'aquisition, à partir de cette dernière on commence à faire l'incrémentation
sachant qu'on incrémente année (n=durée amort) fois

produit-X
référence :
désignation : produit-X
date d'aquisition : 05/06/2005
valeur d'origine : 12820,51
durée amort : 10

année : 2005 2006 2007 2008 ,........., 2015
annuité : 730,06 1282,05 1282,05,...........,551,99

vous remarquez donc que (année) est un champs qu'on veux seulement afficher tel que à chaque année correspond une valeur calculée (annuité)

donc à mon avis on a pas besoin d'un code quoi que je l'ai déja formulé
voila brièvement ce que je veux réaliser ,si vous avez des idées n'ésitez pas à me les passer

je vous montrerez ultérieurement comment j'ai procéder avec access.
j'attend une réponse

merci
16/05/2006, 16h01
sunvialley
tu écris chaque ligne dans une boucle qui a comme compteur (i) qui compare le nombre d'année d'amortissement (n) ?

si tu ne veux afficher seulement les années : 2006...2007...2008...
pourquoi ne pas faire un truc du genre :
Code:

1 2 3 4 5 6 anneeN = year(monRecordSet![date d'aquisition]) For i = 1 To n monEtiquette.caption = anneeN + i '... le reste du calcul... Next K
16/05/2006, 16h57
bahhak

moi je préfere ne pas utiliser du code puisque on a le choix,et puisque je veux seulement affiché les années , ainsi que je me base pour le moment sur les requetes plus que le code donc je vais opter pour la requete dont vous m'avez indiqué précédement (up date ), et si je trouve un problème je vous donnerai signe

merci
17/05/2006, 12h13
bahhak

salut
veuillez m'indiquez svp ou exactement je doit écrire ce code , celui de la requete UPDATE dans de modules, macro,.....
merci
17/05/2006, 13h06
sunvialley

"annuité", c'est un champs d'une table ? ou est ce c'est vraiment une valeur calculée ?
si c'est une valeur calculée, où est ce ? (car il faut mettre le code au meme endroit)

si c'est une valeur calculée par un générateur d'expressions, il doit être tout à fait possible de faire pareil avec la date (normalement c'est meme plus simple)
27/05/2006, 16h57
bahhak

1 pièce(s) jointe(s)

Salut,

je vous pose le problème sous excel.

merci d'avance d'avoir répondu.
04/06/2006, 12h17
bahhak

1 pièce(s) jointe(s)

modification post incrémentation sous excel

salut

je vous repose le problème sous excel en changeant de post, peut etre ça donne resultat ,( je vous ai envoyé tout le fichier)
merci

Bonjour,

Pour ma part j'ai trouvé ça, il doit y avoir plus simple :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
 
SELECT matos.Code, matos.Nature, matos.ValeurOrig, matos.DateAcquis, matos.TA, Year([dateacquis]) AS [Première Année], 
[valeurorig]*((30*(12-Month([dateacquis])))+(30-Day([dateacquis])))/(360*[ta]) AS A0, 
IIf([Première Année]+1<=[Première Année]+[ta],[valeurorig]/[ta],Null) AS [A+1], 
IIf([Première Année]+2<=[Première Année]+[ta],[valeurorig]/[ta],Null) AS [A+2], 
IIf([Première Année]+3<=[Première Année]+[ta],[valeurorig]/[ta],Null) AS [A+3], 
IIf([Première Année]+4<=[Première Année]+[ta],[valeurorig]/[ta],Null) AS [A+4], 
IIf([Première Année]+5<=[Première Année]+[ta],[valeurorig]/[ta],Null) AS [A+5], 
IIf([Première Année]+6<=[Première Année]+[ta],[valeurorig]/[ta],Null) AS [A+6], 
IIf([Première Année]+7<=[Première Année]+[ta],[valeurorig]/[ta],Null) AS [A+7], 
IIf([Première Année]+8<=[Première Année]+[ta],[valeurorig]/[ta],Null) AS [A+8], 
IIf([Première Année]+9<=[Première Année]+[ta],[valeurorig]/[ta],Null) AS [A+9], 
IIf([Première Année]+10<=[Première Année]+[ta],[valeurorig]/[ta],Null) AS [A+10], 
IIf([Première Année]+11<=[Première Année]+[ta],[valeurorig]/[ta],Null) AS [A+11]
FROM matos
GROUP BY matos.Code, matos.Nature, matos.ValeurOrig, matos.DateAcquis, matos.TA, Year([dateacquis])
ORDER BY matos.Code;

Philippe

05/06/2006, 09h39
bahhak

1 pièce(s) jointe(s)

Bonjour à tous

Ah d'accord c'est maintenant que je vois le problème alors je vous le poste en extension pdf ds le forum et si ça marche pas encore je vous l'envoie à un autre email privé à vous si vous permettez bien sur .

à bientot
05/06/2006, 13h38
philben

Bonjour,

ci-joint un exemple de ce que l'on peut faire sous Access.

la requête initale est légèrement modifiée.

Il doit surement exister une requete plus simple...

Philippe
06/06/2006, 09h45
sunvialley

re (j'ai pas pu repondre plus tôt)

la base de données contient quoi comme données :
1- la valeur ini et le nb d'année
ou
2- la valeur ini , le nb d'année ET la valeur des amortissement pour chaque année

Pour moi, il devrait y avoir que les valeurs initiales, puisque les annuités sont des valeurs calculées...

En gros, dans le cas 1, il faut passer par du code (que tu place au chargement de ton etat, mais je sais pas du tout comment, je suis pas un pro des etats)
Dans le cas 2, tu places tes controls et tout roule tout seul.
12/06/2006, 11h46
bahhak

Remerciement

Bonjour

je vous remercie tous ,je vais appliquer vos propositions et s'il y a quoi que ce soit je vous contacte .
salutations
12/06/2006, 12h03
random

on procéde ainsi

soit une table des créances

numcreance montant taux durée restante

je crée une seconde table avec
numper date
0 31/05/2006
1 30/06/2006
...........................
360 31//06/2036

si je fais une requête où je prends numper
et vc de (taux,numper,-vpm(taux,durée restante,-montant)) et princper
et les lignes de la table des échances ou numper<=durée restante j'obtiens
un échéancier de mes crédits
il me reste à demander le regroupement pa numper
13/06/2006, 16h21
bahhak

Bonjour

pouvez vous svp me simplifier ce procédé ?

merci

pour comprendre crée deux tables

une table immo avec trois champs
immo =ref immo type long
montant=montant immo
et an =année achat type entier

et une table ech avec un seul champ an de type entier

dans ta table immo entre 4 ou 5 lignes

dans ta table ech rentre en an les années comprises entre la plus petite de
immo et la plus grande d'immo +5

ici pour simplifier on a choisit du linéaire 5 ans sans prorata temporis

lance alors la requête suivante et observe
Code:

1 2 3 4 5 6 7 8 TRANSFORM Sum((5-([ech].[an]-[immo].[an]+1))*0.2*[mt]) AS Expr1 SELECT immo.immo FROM immo, ech WHERE (((ech.an)>=[immo].[an] And (ech.an)<[immo].[an]+5)) GROUP BY immo.immo PIVOT ech.an;

25/06/2006, 17h20
bahhak

1 pièce(s) jointe(s)

Bonjour à tous
l'exemple sous excel est comme suit(année 2005) :
merci
25/06/2006, 21h49
philben

Bonjour,

Voici la requête d'analyse croisée pour l'amortissement par produit et année :

Citation:

TRANSFORM Sum(DLookUp("[A+" & ([Année]-[Première Année]) & "]","ReqAmortissement","[Code]='" & [Code] & "'")) AS Valeur
SELECT ReqAmortissement.Code
FROM ReqAmortissement, Années
WHERE (((ReqAmortissement.[Première Année])<=[Année]) AND ((ReqAmortissement.[Dernière Année])>=[Année]))
GROUP BY ReqAmortissement.Code
PIVOT Années.Année In (1999,2000,2001,2002,2003,2004,2005,2006,2007,2008,2009,2010,2011,2012,2013,2014,2015,2016,2017,2018,2019,2020,2021,2022,2023,2024,2025,2026,2027,2028,2029,2030);

jusqu'en 2030 soit valable jusqu'en 2020 si votre durée d'amortissement ne dépasse pas 10 ans.

Contactez-moi en décembre 2020, pour la mise à jour...;)

Ci-joint la base finale, j'ai fait ça vite fait, vous fignolerez.

Philippe
23/07/2006, 21h01
philben

Bonjour,

suite à votre demande, ajout d'un formulaire des amortissements pour une année.

Une appli. presque complète pour pas chère...:lol:

Philippe