BorlandTalk.com

Brad Prendergast · Guest

Keith G Hicks <krh (AT) comcast (DOT) net> wrote in message
<43bd68d3$1 (AT) newsgroups (DOT) borland.com>:

Keith G Hicks · Guest

I'm creating a TADOSToredProc in code and using it to run an MS SQL 2k
stored procedure. The backend procedure creates some new rows in several
tables. Then the procedure returns a select statement (not a return
parameter). The select statement has 1 record and 2 fields in it. How can I
access them from my delphi code?

The last line of the backend procedure is like this:

SELECT CustID, CustState From tblCusts Where CustName = @sNewCustName

Here's my front end code:

stprAddCusts := TADODataSet.Create(nil);

with stprAddCusts do
try

ProcedureName := 'spAddCusts';
Connection := globalCnn;
Prepared := False;
with Parameters do
begin
Refresh;
ParamByName('@sNewCustName).Value := sNewCustName;
end;
Prepared := true;
Active := true;
ExecProc;

// >>>>>> HERE'S WHERE I WANT TO ACCESS THE 2 FIELDS (CustID &
CustState) RETURNED BY THE PROCEDURES SELECT STATMENT

Prepared := false;
finally
Free;
end;

If I have to use a TAdoDataset instead, I tried that and couldn't figure out
the right way so if that's the solution I need some details.

Thanks,

Keith

Keith G Hicks · Guest

Well I figured out the TAdoDataset way to do this so I dont' need help on
that but I'd still like to know if it's possible to so it using
TAdoStoredProc

Thanks,

Keith

Brian Hollister · Guest

Keith,

Try using it like so;

adosp.FieldByName('YourFieldName'). Value
AsString
Any other
AsXXX you want

hth,

brian
--
Got a big event coming up? Let us
help coordinate your event. For more
visit www.kissemgoodbye.com

"Keith G Hicks" <krh (AT) comcast (DOT) net> wrote

Perry Way · Guest

Hi Keith,

If you use the call Open() instead of ExecProc() it will execute the
procedure as well as keep any returned datasets opened, whereas ExecProc()
only executes the procedure. You can then access the dataset the same way
as you would a query, perhaps you wish to use FieldByName() since you know
the field names you want. If your procedure returns more than one dataset,
then you can call NextDataset(), but I think from your post this is more
than you require here...

PW

Keith G Hicks · Guest

Thanks everyone for your help. I ended up figuring out how to handle what I
needed to do using TAdoDataset. The backend procedure runs and does what
it's supposed to do and I have access to the fields in the dataset that it's
sending back. I should be ok. I will however hang on to the information you
all posted as it should be useful to me at some point.

-keith