date problem

Hi there

I had a alpha vms v7.1-2 and rdb v7.0-64

Pascal languge
type
     $UQUAD  = [QUAD,UNSAFE] RECORD
                           10:  UNSIGNED;
                           11:  UNSIGNED;
                             END;
VAR
time_acscii :packed array [1..23] of char;
time_bin    :$UQUAD;


time_acscii := '17-SEP-2003 10:05:29.09';
$BINTIM(timbuf := time_ascii, timadr = time_bin);

database table component has a p_date field, type is date vms
when I use component.p_date := time_bin;  insert record, 
p_date vaule in database is 17-NOV-1858 00:00:00.00

When I use $BINTIM(timbuf := time_ascii, timadr :=component.p_date),
insert record, p_Date value in database is correct,

I am wondering if somebody can give me a help. Thanks in advance

Lionel