救命呀！！我快急疯了！没有事务处理为何提示：事务处理错误？？？急急急！！

Question

REATE PROCEDURE panrk
AS
insert into a (部门编号,药品类别,药品编号,日期) SELECT 30001,药品类别,药品编号,日期 FROM OPENDATASOURCE( 
         'SQLOLEDB',
         'Data Source=pan;User ID=sa;Password='
         
         ).YY.dbo.b 由于b表中没有部门编号字段所以付值30001并没有用到事务处理呀？？？
vb程序调用存储过程时提示错误：〔OLE/DB provider returned message: 不能在指定的事务处理器中获得新事务。〕
怎么回是？？？？？？？？如何真不行，那么如何在存储过程中修改表a字段部门编号默认值为30001？？？？？？

Answer 1

sql语句错误，放到com+中抛错。监控sql语句，在sql中运行一下。