BLOB 데이터 가져와 저장

get_file ( double keyseq ) return blob

int        li_cnt
blob      lb_file

select count(1) into :li_cnt
    from datafile
    where keyseq = :keyseq
    using SQLCA;

if li_cnt = 1 then

    selectblob imgfile into :lb_file
        from datafile
        where keyseq = :keyseq
        using SQLCA;
end if

return lb_file