Private Sub ImpIDTest()Disclaimer: We provide programming examples for illustration only, without warranty either expressed or implied, including, but not limited to, the implied warranties of merchantability and/or fitness for a particular purpose. This article assumes you are familiar with Microsoft Visual Basic and the tools used to create and debug procedures. Blackbaud Customer Support may help explain the functionality of a particular procedure, but we will not modify, or assist you with modifying, these examples to provide additional functionality.
Dim oGift As CGift
Set oGift = New CGift
.Fields(GIFT_fld_Amount) = 20
.Fields(GIFT_fld_Constit_ID) = 751
.Fields(GIFT_fld_Date) = "9/16/2015"
.Fields(GIFT_fld_Import_Id) = "00001-545-0000002596"
.Fields(GIFT_fld_Fund) = "2015 Annual Fund"
Set oGift = Nothing
Connect and collaborate with fellow Blackbaud users.