actually it is not 100% fine, you have defined it as:

varchar ps_store[100][4];

now a varchar is really a struct with a length and a array of data, like this:

struct { unsigned short len; unsigned char arr[4]; } ps_store[100];

(although pro*c might padd out the arr element to more then 4) so, technically your code:

strcpy((char *)ps_store[ll_ctr].arr,"0030");

is copying 5 bytes into a 4 byte variable (don't forget the NULL terminator). Varchar's are NOT null terminated. The piece of the code you are TRULY forgetting is:

ps_store[ll_ctr].len = strlen( ps_store[ll_ctr].arr );

you've never set the length field and it's my guess they are init'ed to zero -- hence the length as far as pro*c is concerned is 0 bytes (they are NULL).

Additionally, I cannot tell (since I don't have all of the code) if you are filling in all 100 array elements or not, I only see 4 of them -- that can be a problem as well.

The code more properly would be:


static void process( void )
{
int i;

varchar ps_store[100][5];
int nelems;
/* use arraylen so we can constrain the size of the array dynamically
at run time. If I fill in N array elements, that's all that will
be sent, otherwise pro*c will ALWAYS send 100 elements */
exec sql arraylen ps_store(nelems);

varchar msg[4000];
short msg_i;

for( i = 0; i < 10; i++ )
{
sprintf( ps_store[i].arr, "%04d", i );
ps_store[i].len = strlen( ps_store[i].arr );
/* make sure to set that LENGTH attribute!!!
}
nelems = 10;

/* note that for VARCHARS that come OUT of a plsql block,
we must set the max length. using a null indicator here
as well */
msg.len = 4000;
msg_i = -1; /* null */

exec sql whenever sqlerror do sqlerror_hard();

/* now lets test it... */
exec sql execute
declare
type array is table of varchar2(4) index by binary_integer;
l_data array;
l_msg varchar2(4000);
begin
l_data := :ps_store;
for i in 1 .. l_data.count
loop
l_msg := l_msg || chr(10) ||
'l_data(' || i || ') = ' || l_data(i);
end loop;
:msg:msg_i := l_msg;
end;
end-exec;

if ( !msg_i )
printf( "%.*s\n", msg.len, msg.arr );
else printf( "message was NULL\n" );
}


The output from this is:


l_data(1) = 0000
l_data(2) = 0001
l_data(3) = 0002
l_data(4) = 0003
l_data(5) = 0004
l_data(6) = 0005
l_data(7) = 0006
l_data(8) = 0007
l_data(9) = 0008
l_data(10) = 0009

showing that it works.