× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Shouldn't matter. How are you calling the program? From a CL, RPG, RPGLE,
SQL Stored Procedure?


On Thu, Jan 31, 2013 at 12:23 PM, Nisha Ramesh <n4nisha@xxxxxxxxx> wrote:

I am clearing the field as soon as the control comes into the program. And
i have checked the field value in debug and it appears as blanks too. Does
it makes any difference clearing the field immedialy before fetch and
clearing it when control comes in? As i am not in front of pc now i cannot
try now.
On Jan 31, 2013 6:46 PM, "Michael Schutte" <mschutte369@xxxxxxxxx> wrote:

You need to clear the field you are fetching into before you do the
fetch.
A fetch with an SQLCOD of 100 does not change the contents that
currently
exist in the field(s). Just like the Chain when not found doesn't change
it's field values nor the read when at end of file.

pseudo

Declare cursor using statement
Prepare statement
Open cursor
clear field
fetch cursor into field
close cursor
return field


Sometimes, I will close the cursor before opening... just to make sure
that
it was closed. Otherwise you'll get the previous results.


On Thu, Jan 31, 2013 at 5:05 AM, Nisha Ramesh <n4nisha@xxxxxxxxx> wrote:

Any way to clear the cursor?
On Jan 31, 2013 3:13 PM, "Nisha Ramesh" <n4nisha@xxxxxxxxx> wrote:

Still the same issue....:(
On Jan 31, 2013 2:42 PM, "Birgitta Hauser" <Hauser@xxxxxxxxxxxxxxx>
wrote:

Try to close the cursor first, i.e. immediately before the PREPARE
Statement.

Mit freundlichen Grüßen / Best regards

Birgitta Hauser

"Shoot for the moon, even if you miss, you'll land among the stars."
(Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not
training
them
and keeping them!"

-----Ursprüngliche Nachricht-----
Von: rpg400-l-bounces@xxxxxxxxxxxx [mailto:
rpg400-l-bounces@xxxxxxxxxxxx]
Im
Auftrag von Nisha Ramesh
Gesendet: Thursday, 31.1 2013 10:08
An: rpg400-l@xxxxxxxxxxxx
Betreff: Strange issue in embedded sql

I have a program which accepts the Sql statements user enters and
these
statements are passed onto a sqlrpgle program which declare a scroll
cursor
and prepares the sql from the string which holds input parameter. It
then
issues a fetch first statement into a field which will hold the
query
reasult. I am checking sql code to determine whether the entered
query
is
valid or not. I close the cursors after this. If first time i
entered
a
valid sql i get the result..for second time if some irrelevant data
is
entered still the fetch statement returns previous sql's output and
sqlcod
also is zero as if i entered correct sql. Pls help me to figure out
the
problem here....
--
This is the RPG programming on the IBM i (AS/400 and iSeries)
(RPG400-L)
mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To
subscribe,
unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.


--
This is the RPG programming on the IBM i (AS/400 and iSeries)
(RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.


--
This is the RPG programming on the IBM i (AS/400 and iSeries)
(RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.


--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.


--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.