J=92ai un ancien programme que je dois modifier pour une question de format=
de date dans un fichier txt issue d=92une requ=EAte oracle.
Jadis la date =E9tait sous le format ex : 21 =96 SEP - 2012
Maintenant je dois le mettre sous forme : 20120921
le format de date de la nouvelle requete est maintenant sous cette forme 20=
120921
Bout du code ancien :
SI Droite(DateDuJour(),2)=3D15 ALORS
i=3D0
maxim=3D27908
MaDate=3DDateDuJour()
MaDate..Mois-=3D1
MaDate=3DGauche(MaDate,6)+"01"
TANTQUE lignelue<>EOT
SELON Milieu(ExtraitCha=EEne(lignelue,2),4,3)
CAS "SEP" : Base_Historique.Date=3DDroite(ExtraitCha=EEne(lignelue,2),4)+"=
09"+Gauche(ExtraitCha=EEne(lignelue,2),2)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
JeAn-PhI
avait écrit le 13/09/2012 :
Bonjour,
J’ai un ancien programme que je dois modifier pour une question de format de date dans un fichier txt issue d’une requête oracle. Jadis la date était sous le format ex : 21 – SEP - 2012 Maintenant je dois le mettre sous forme : 20120921 le format de date de la nouvelle requete est maintenant sous cette forme 20120921
Bout du code ancien : SI Droite(DateDuJour(),2) ALORS i=0 maxim'908 MaDateÚteDuJour() MaDate..Mois-=1 MaDate=Gauche(MaDate,6)+"01"
TANTQUE lignelue<>EOT SELON Milieu(ExtraitChaîne(lignelue,2),4,3)
CAS "SEP" : Base_Historique.Date=Droite(ExtraitChaîne(lignelue,2),4)+"09"+Gauche(ExtraitChaîne(lignelue,2),2)
merci pour votre aide.
si j'ai bien compris
le code est simplifié maintenant
supprimer le selon ... cas ... fin
et ne mettre que :
Base_Historique.Date=ExtraitChaîne(lignelue,2)
-- Cordialement JeAn-PhI
laurent.sagot@live.fr avait écrit le 13/09/2012 :
Bonjour,
J’ai un ancien programme que je dois modifier pour une question de format de
date dans un fichier txt issue d’une requête oracle. Jadis la date était
sous le format ex : 21 – SEP - 2012 Maintenant je dois le mettre sous forme :
20120921 le format de date de la nouvelle requete est maintenant sous cette
forme 20120921
Bout du code ancien :
SI Droite(DateDuJour(),2) ALORS
i=0
maxim'908
MaDateÚteDuJour()
MaDate..Mois-=1
MaDate=Gauche(MaDate,6)+"01"
TANTQUE lignelue<>EOT
SELON Milieu(ExtraitChaîne(lignelue,2),4,3)
CAS "SEP" :
Base_Historique.Date=Droite(ExtraitChaîne(lignelue,2),4)+"09"+Gauche(ExtraitChaîne(lignelue,2),2)
J’ai un ancien programme que je dois modifier pour une question de format de date dans un fichier txt issue d’une requête oracle. Jadis la date était sous le format ex : 21 – SEP - 2012 Maintenant je dois le mettre sous forme : 20120921 le format de date de la nouvelle requete est maintenant sous cette forme 20120921
Bout du code ancien : SI Droite(DateDuJour(),2) ALORS i=0 maxim'908 MaDateÚteDuJour() MaDate..Mois-=1 MaDate=Gauche(MaDate,6)+"01"
TANTQUE lignelue<>EOT SELON Milieu(ExtraitChaîne(lignelue,2),4,3)
CAS "SEP" : Base_Historique.Date=Droite(ExtraitChaîne(lignelue,2),4)+"09"+Gauche(ExtraitChaîne(lignelue,2),2)