[PB 6.5] Problème cursor avec DB Oracle 10
Bonjour
j'ai un gros soucis, j'ai une application qui tourne sous PowerBuilder 6.5, avec une base de données en ORACLE 10. j'utilise les drivers 8.0 pour accéder à cette base de données.
J'ai un problème :evilred: dans mon code avec des "cursor", ceux ci ne ramene plus rien alors qu'ils fontionnaient tres bien. j'ai d'autre requetes SQL qui fonctionne tres bien
voici mon code
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37
|
Select nvl(count(*),0) Into :NbrOI
From ULISEE.PAESI PA
Where Length(PA.PAESI_CODEXT)=7;
p = round(NbrOI / 50, 0)
DECLARE curseur_OI CURSOR FOR
SELECT LPAD(PA.PAESI_CODEXT,7,'0') "PAESI_COD", InitCap(PA.PAESI_LIB) "PAESI_LIB"
FROM ULISEE.PAESI PA
WHERE LENGTH(PAESI_CODEXT)=7;
OPEN curseur_OI;
FETCH curseur_OI INTO :NmOI, :nomOI;
c = 1
i = 1
DO WHILE SQLCA.sqlcode = 0
if numOI = 3191401 then
MessageBox("Greeting", "Hello User")
end if
//LineNumber=(fill("",7 - len(string(NmOI,"0000000"))) + string(NmOI,"0000000")+" "+String(nomOI))
LineNumber=String(NmOI)+" "+String(nomOI)
ListGrpe[c] = LineNumber
FETCH curseur_OI INTO :NmOI, :nomOI;
c ++
If mod(c, p) = 0 Then
i ++
W_message.st.text = string(i) + "%"
End If
LOOP
MaxGrpe = c - 1;
CLOSE curseur_OI; |
donc dans ce code mon premier 'Select' fonctionne tres bien par contre le cursor est dans les choux.
si quelqu'un a une solution a m'apporter ?
en vous remerciant par avance.
TIGROUJ