Hai all,

I have problem with my BLOB field(text) that only
return '(BLOB)' in TMemo(MemoRosak) when I execute
related stored procedure.I'm succes to save record
including memo to BLOB but failed to read back. Can
anyone there help me ? I've already read this BLOB
manual but not much help.Below I list all my related
code;

create table kadkerja(
SIRIKERJA integer not null,
PENDAFTARAN varchar(15) not null,
JENISBAS varchar(15) not null,
TARIKHMASUK date not null,
TARIKHKELUAR date,
KEROSAKAN blob sub_type 1 segment size 100);

create procedure cari_kad_sp (P_SIRIKERJA integer)
returns (P_PENDAFTARAN varchar(15),
P_JENISBAS varchar(15),
P_TARIKHMASUK date,
P_TARIKHKELUAR date, P_KEROSAKAN blob)
as
begin
select PENDAFTARAN, JENISBAS, TARIKHMASUK,
TARIKHKELUAR, KEROSAKAN from KADKERJA
where SIRIKERJA = :P_SIRIKERJA
into
:P_PENDAFTARAN,:P_JENISBAS,:P_TARIKHMASUK,:P_TARIKHKELUAR,:P_KEROSAKAN
suspend;
end

Here is my code in Delphi 5.
SP_SPartWork is a TIBStoredProc that uses procedure
cari_kad_sp above;

With DataModul do
begin
SP_SPartWork.Params[5].AsInteger := StrToInt
(NoKadEdit.Text);
SP_SPartWork.ExecProc;
MemoRosak.Text :=
SP_SPartWork.Params[4].AsBlob;
end

Thanks in advance
-M.Hanis-

__________________________________________________
Do You Yahoo!?
HotJobs - Search Thousands of New Jobs
http://www.hotjobs.com