怎样自动赋值？(50分)

Y

y812121

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-22

• #1

有一表，其字段为productid,itemno,name,productid的类型为LONGINT，itemno的类型
为SHORT，当我给表加一条记录时如果所加的记录productid的值同前一记录的
productid的值相同，itemno的值就会在前一条的itemno的值加1，如果productid的值
在前面的记录中找不到,所加的记录的itemno的值赋1,该怎样实现？

 

S

slicker

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-23

• #2

如果数据库支持Trigger,使用Trigger处理;
如果数据库不支持Trigger,只有在Delphi中通过数据库控件的BeforeInsert或其它事件处理

 

Z

Zhengfei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-23

• #3

/* Triggers only will work for SQL triggers */

CREATE TRIGGER "CREATE_PNO" FOR "PREMIUM"
ACTIVE BEFORE INSERT POSITION 0
AS BEGIN
NEW.PNO = GEN_ID(GPNO, 1);
END

interbase的例子

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-18

• #4

多人接受答案了。