procedure stockée et parametre de sortie
8O
Bonjour tout le monde,
Je dois dans ma base, récuperer une liste de nom.
comment avec un ps peut on renvoyer d'un seul coup l'ensemble de la liste?
Je m'explique : je suppose qu'avec une PS, pour obtenir les résultats il faut lire le resultat ligne par ligne du style
EXECUTER PS
TANT QUE PAS FIN PS
FAIRE
LIRE ligne
LIGNE SUIVANTE PS
FIN TANT QUE
En gros, est il possible d'affecter directement le resultat d'une PS à un tableau?
Le but, est d'éviter une boucle directement dans la base.
A+
Plusieurs lignes en retour de la PS
Re bonjour,
je réouvre cette discussion pour donner des infos supplémentaires :
voilà le code de ma PS
Code:
1
2
3
4
5
6
7
8
9
10
11
|
BEGIN
FOR
SELECT TRIM(NOM)||' '||TRIM(PRENOM) FROM AGENT
WHERE AGENT.ID_EQUIPE=:NUM_EQUIPE
INTO :NOM_AGENT
DO
begin
SUSPEND;
end
END |
Code:
1
2
3
4
5
6
7
8
9
|
CETTE PS ME RETOURNE LES VALEURS SUIVANTES sous IB EXPERT
NOM_AGENT
-------------------
BARTHELEMY YVES
IZARD ALAIN
ROUQUET JEAN CLAUDE |
code sous delphi : SP_Liste_Agent_Par_Num_Equipe est le nom de la PS
Code:
1
2
3
4
5
6
7
8
9
10
11
12
|
.....
ParamByName('Num_Equipe').AsInteger:=22;
execproc;
While not (SP_Liste_Agent_Par_Num_Equipe.eof) do
begin
ListeAgentParEquipe[x,0]:=ParamByName('NOM_AGENT').AsString;
next;
end;
Close;
Transaction.commit;
.... |
Mon pb est le suivant : malgré que sous IB expert, j'ai trois lignes, mon code ne rentre pas dans la boucle, en je n'ai qu'un seul enreg : le premier.
Comment lire toutes les lignes depuis DELPHI
Merci d'avance
A+
