Cursor is not open
- Issue
- Juan Carlos Rojas
- PowerBuilder
- Wednesday, 3 July 2019 02:08 PM UTC
Hello. I have a problem. Appears this message my application "cursor is not open". This message appears just in some machines. Others that have the same application does not have the error. Can you help me? please.
The machines are Windows 10, the DB is Oracle 11g. The software is developed with Appeon Power Builder 2017 R3.
The code is:
Declare lcur_indicador cursor for
SELECT "WEB_INDICA"."CD_INDICA_WEB",
"WEB_INDICA"."NM_INDICA_WEB"
FROM "WEB_INDICA" ORDER BY "WEB_INDICA"."CD_INDICA_WEB" ASC
Using SQLCA;
Open lcur_indicador;
If (SQLCA.sqlcode
MessageBox ("Base de Datos", "ERROR-0 : " + &
SQLCA.sqlerrtext, StopSign!)
return
end if
do while (SQLCA.sqlcode = 0)
fetch lcur_indicador into :li_cod_indicador, :ls_nom_indicador;
if (SQLCA.sqlcode = 0) then
ls_total = String(li_cod_indicador) + ' ' + RightTrim(ls_nom_indicador)
ddlb_indicador.AddItem (ls_total)
elseif (SQLCA.sqlcode
MessageBox ("Base de Datos", "Error en fetch de lcur_indicador : " + &
SQLCA.sqlerrtext, exclamation!)
return
else
exit
end if
loop
ddlb_indicador.SetRedraw(true)
Close lcur_indicador;
Thanks
Find Questions by Tag
Helpful?
If a reply or comment is helpful for you, please don’t hesitate to click the Helpful button. This action is further confirmation of their invaluable contribution to the Appeon Community.