Discussion :

[samoel24]

j'aimerai utiliser une fonction qui permet d'exécuter une requête SQL sur une ou plusieurs tables d'une base de données. Si la requête exécute une instruction: INSERT, DELETE ou UPDATE, une valeur booléenne sera retournée (0 ou 1).
Dans le cas d'une requête de type SELECT, vous obtiendrez un identifiant de résultat.

[L.nico]

Bonjour,
Vous avez manifestement des lacunes en Windev.
Vous devez au préalable vous former. Les livres d'autoformation livrés avec votre version de Windev sont fait pour cela.

[samoel24]

je demande est ce que vous pouvez m'aidé pour que je puis utilisé une fonction qui permet d’exécuter une requête apart la fonction HExécuteRequêteSQL()

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

id est un entier = HExécuteRequêteSQL(sdReqSup,"SELECT LAST_INSERT_ID() from doc")

car cette fonction retourne seulement booléen mais moi je veux qu'il me retourne le dernier identificateur dans la table de la base de données a l'aide de la fonction

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

LAST_INSERT_ID()

[tatayo]

Bonjour,
Je peux t'aider sans problème: Voici le lien vers l'aide en ligne de hExecuteRequeteSql, qui si tu l'avais lu t'aurai donné la réponse à ton problème .

Je rejoins L.nico, tu devrais vraiement te pencher sur le guide d'autoformation, et au minimum sur l'aide en ligne et ses exemples...

Tatayo.

[luludev]

Vous devez dans tous les cas utiliser HExécuteRequêteSQL() pour exécuter votre requête. Cette procédure renvoi un booléen indiquant si tout c'est bien passé.

Ensuite vous devrez parcourir les résultat à la recherche de ce que vous souhaitez à l'aide de HLitPremier() / HLitDernier() / ...

[kuranes]

Faire deux requêtes en une fois. La première est un update, ou un insert.
La deuxième est SELECT SCOPE_IDENTITY() (j'ai pas la doc sous les yeux mais je pense que ça vous conviendrait).

(ou alors, @@IDENTITY au lieu de SCOPE_IDENTITY)

[samoel24]

j'ai séléctionnée toute la rubrique nSerie de la table doc
après j'ai li le dernier enregistrement
et j'essaye de le lire mé il me envoie seulement 0 et non pas le numero di derniere enregistement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
ReqDoc est une Source de Données
HExécuteRequêteSQL(ReqDoc,"SELECT nSerie FROM doc")
HLitDernier(doc,nSerie)
TANTQUE PAS HEnDehors
	HLitPrécédent(doc,nSerie)
FIN
IdF est un entier = HNumEnr(doc)
Info("le idF : ",IdF)

[Thomad]

Pour tests faire :

TxtReq est une chaine
ReqDoc est une Source de Données

TxtReq =[
SELECT nSerie FROM doc
]

HExécuteRequêteSQL(ReqDoc,TxtReq )
HLitDernier(ReqDoc)
TANTQUE PAS HEnDehors
trace(ReqDoc.nSerie)
HLitPrécédent(ReqDoc)
FIN

[Thomad]

Pour le SELECT LAST_INSERT_ID() faire :

SQLTransaction(sqlDébut,MaConnexion)

TxtReq =[
INSERT INTO taTable ( ..... ) Values (.....)
]
HExécuteRequêteSQL(ReqDoc,MaConnexion,hRequêteSansCorrection,TxtReq)

TxtReq =[
SELECT LAST_INSERT_ID()
]
HExécuteRequêteSQL(ReqDoc,MaConnexion,hRequêteSansCorrection,TxtReq)

HLitPremier(ReqDoc)

info(HRécupèreEnregistrement(ReqDoc))

SQLTransaction(sqlFin,MaConnexion)

!!!! J'ai fait court, penser à faire Si HExécuteRequêteSQL(...) Alors .... !!!

Ta base, c'est bien MySQL ?

[luludev]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
ReqDoc est une Source de Données
HExécuteRequêteSQL(ReqDoc,"SELECT nSerie FROM doc")
HLitDernier(doc,nSerie)
TANTQUE PAS HEnDehors
	HLitPrécédent(doc,nSerie)
FIN
IdF est un entier = HNumEnr(doc)
Info("le idF : ",IdF)

Moi je ferais plutôt un truc du genre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
ReqDoc est une Source de Données
HExécuteRequêteSQL(ReqDoc,"SELECT nSerie FROM doc ORDER BY nSerie DESC")
HLitPremier(ReqDoc)
IdF est un entier = ReqDoc.nSerie
Info("le idF : ",IdF)

et c'est tout ...

[samoel24]

ca marche très bien avec ce dernier code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
ReqDoc est une Source de Données
HExécuteRequêteSQL(ReqDoc,"SELECT nSerie FROM doc")
HLitDernier(ReqDoc)
IdF est un entier = ReqDoc.nSerie
Info("le idF : ",IdF)

merciii "luludev" c'est gentil de votre part

[Thomad]

samoel24,

Si vous changez le titre de votre post nos réponses ne collent plus !

>ca marche très bien avec ce dernier code

oui si vous êtes seul à écrire dans la base, ce qui est rarement le cas.

@+

[luludev]

>ca marche très bien avec ce dernier code

oui si vous êtes seul à écrire dans la base, ce qui est rarement le cas.

Pensez vous qu'avez LAST_INSERT_ID() vous aurez plus de succès ?
S'il y a une insertion après votre dernière ajout vous aurez le même problème qu'avec mon code, non ?

Merci de nous éclaircir sur ce point SVP.

[Thomad]

Pensez vous qu'avez LAST_INSERT_ID() vous aurez plus de succès ?
S'il y a une insertion après votre dernière ajout vous aurez le même problème qu'avec mon code, non ?

Merci de nous éclaircir sur ce point SVP.

Non car c'est dans une transaction mais ça ne fonctionne bien sûr qu'en Insert.

[samoel24]

samoel24,

Si vous changez le titre de votre post nos réponses ne collent plus !

>ca marche très bien avec ce dernier code

oui si vous êtes seul à écrire dans la base, ce qui est rarement le cas.

@+

si j'ai changer le titre c'est seulement pour bien éclaircie le but de mon sujet et pour aider les autres a profiter de ce dernier
et merci pour votre aide

[samoel24]

Pensez vous qu'avez LAST_INSERT_ID() vous aurez plus de succès ?
S'il y a une insertion après votre dernière ajout vous aurez le même problème qu'avec mon code, non ?

Merci de nous éclaircir sur ce point SVP.

votre code marche très bien, et c'est le même que le tien
non j'ai évité

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

LAST_INSERT_ID()

je pense que cette dernière donne le même résultat