关于批次管理出错的问题

在批次管理中用分类，且物料也分给类了，但是在MIGO中收货时没有带出分类这个图。而且在发料是出错，不知道是什么原因。

出错内容

Runtime Errors DBIF_RSQL_SQL_ERROR

Except. CX_SY_OPEN_SQL_DB

Date and Time 2010.09.14 17:24:32

Short text

SQL error in the database when accessing a table.

Missing RAISING Clause in Interface of:

Program Name SAPLCTMS

Include LCTMSF39

Row 6

Module type (FORM)

Module Name BUILD_OBJECTS_INHERITED

Trigger Location of Exception:

Program Name SAPLCTMS

Include LCTMSF39

Row 101

Module type (FORM)

Module Name BUILD_OBJECTS_INHERITED

71 *.. Objekte aus INOB bereitstellen ....................................

72 LOOP AT ICLOBJ.

73

74 *....... Besonderheiten zu 3.0, da nicht sauber modellierbar ...........

75 CASE ICLOBJ-OBTAB.

76 WHEN 'STPO'.

77

78 WHEN 'MCH1'.

79 MARA_OBJEK = COMO-OBJEK. "H11826

80

81 MCH1_OBJEK = COMO-OBJEK.

82 MCH1_OBJEK-FILL1 = '_%'.

83

84 lv_objek = MCH1_OBJEK.

85 replace ALL OCCURRENCES of '_' in lv_objek with '&_'. "1132062

86 replace ALL OCCURRENCES of '&_%' in lv_objek with '_%'."1132062

87

88 REFRESH IINOB.

89 if sy-dbsys cs 'INF' or "begin 1016076

90 sy-dbsys cs 'DB2' or

另外，一模一样的操作，在IDES是没有问题，但在我们的测试机中却有问题。请高手指点。