Fetch Autonumber from Firebird ?

[ksenthilbabu]

i am developing a project with VB6 and Firebird 2.1.3. When i update the table tblPartyMaster and examines the adoRsParty!PartyID which is a primary key,autoincrement, unique identifier returns 0 (Zero) instead of New PartyID Value which i need for further processing.

With adoRsParty
.AddNew
!CompanyName="Sample Company"
.Update
msgbox !PartyID
End With

I have create a Generator for PartyID and a Before Insert Trigger on table tblpartyMaster as

CREATE TRIGGER TR_AI_TBLPARTYMASTER_PARTYID FOR TBLPARTYMASTER
ACTIVE BEFORE INSERT
POSITION 0
AS
BEGIN
NEW.PARTYID = GEN_ID(GEN_TBLPARTYMASTER_PARTYID, 1);
END

Please Suggest me some ideas for fetching the PrimaryKey (PartyID) Value of newly inserted row. Expecting some advice or ideas or guidance With regards K.Senthil Babu

[Md Marufuzzaman]

You can use a storedprocedure, I think trigger is not convenient. Just use an Output parama in your code. If you face any problem please let me know.

Thanks Md. Marufuzzaman

---

I will not say I have failed 1000 times; I will say that I have discovered 1000 ways that can cause failure – Thomas Edison.

[Henry Minute]

From my Delphi and Interbase days I remember that the methodology the OP is using (before insert trigger and GEN_ID) is the recommended way of doing things. Unfortunately I have never tried to access Interbase/FireBird from VB and therefore am unable to help.

Henry Minute Do not read medical books! You could die of a misprint. - Mark Twain Girl: (staring) "Why do you need an icy cucumber?" “I want to report a fraud. The government is lying to us all.”

[ksenthilbabu]

Thanks Md. Marufuzzaman, I Created a procedure instead of Trigger along with the generator and called the procedure from the front end for autonumber, it works fine. Thanks A Lot.

[Md Marufuzzaman]

You are most welcome.. :)

Thanks Md. Marufuzzaman

---

I will not say I have failed 1000 times; I will say that I have discovered 1000 ways that can cause failure – Thomas Edison.