>One more thing. If I comment out the =SQLPREPARE() line the SQLEXEC() returns a 1
>and the as400 table recieves the record.

Which line?

Store SQLConnect('webprddtx','sde','mypassword') To gnHandle1n
testthissd = "INSERT INTO drawmstrp(dm_drawing_number) Values('855459')"
= SQLSETPROP(gnHandle1n, 'Transactions', 2)
= SQLEXEC(gnHandle1n, testthissd) 
= SQLCOMMIT(gnHandle1n) 

=SQLDISCONNECT(gnHandle1n)