[afxe]

Voy a suponer que trabajas con Interbase/Firebird:

En el trigger BEFORE INSERT haz algo parecido a esto:

  
AS
   DECLARE VARIABLE MaxItem INTEGER;
BEGIN
   SELECT MAX(ITEM) FROM SUBPRODUCTOS
	  WHERE CODIGO = NEW.CODIGO
	  INTO :MaxItem; 
   NEW.ITEM = MaxItem + 1;

END

Espero haberte ayudado y que el mensaje salga bien... soy nuevo en esto.