SQL BLOB and embedded RPG

[Darren Strong <darren@xxxxxxxxx>]

I have the following table definition and program snippet. I get an error SQL0311 in my joblog when executing and the following detail text.  I can't seem to guess at the correct combination of definitions to make the fields compatible. The goal is to store a variable sized data structure of screen defaults for various programs, so, it doesn't need to be huge (more than 10K) really.

SQL0311
Message . . . . :   Length in varying-length, LOB, or XML host variable not
   valid.
 Cause . . . . . :   Host variable DFTBLOB was specified.  The value in the
   length portion of the variable length, LOB, or XML host variable is either
   negative or greater than the declared length.  If the host variable is
   graphic the length should be the number of DBCS characters. The host
   variable number is 2.  The specified length is 51373800.  The variable is
   declared to have length 10000.
 Recovery  . . . :   Change the length portion of the varying-length, LOB, or
   XML host variable to a valid positive number or zero. Try the request again


create table APUD
(USRPRF char(10) not null with default,
  APPKEY char(30) not null with default,
  VERLVL int not null with default,
  LSTUSE timestamp not null with default,
  APPDTA BLOB(10000)
)

       dcl-s DFTBLOB SQLTYPE(BLOB:10000);

       DFTBLOB=oUD;
       exec sql insert into APUD
         (USRPRF, APPDTA)
          values(:JobUsr,:DFTBLOB);