title: VBA for Raiser's Edge CRM Database
body: <p>I am trying to strip the last character off of a field in Raiser's Edge.</p>
  
  <p>The code I currently have is: </p>
  
  <pre><code>Option Explicit
  
  
  
      Sub Test()
  Dim oRec As CRecord
  Set oRec = New CRecord
  oRec.Init REApplication.SessionContext
   oRec.Load (2)
  
   oRec.Fields(RECORDS_fld_LAST_NAME) = Left(oRec, Len(oRec.Fields.RECORDS_fld_LAST_NAME) - 1)
  oRec.Save
  Set oRec = Nothing
  oRec.Closedown
  End Sub
  </code></pre>
  
  <p>I'm trying to turn "Mary1" into "Mary" and load the new string - Mary - back into the last name field. This is giving the general syntax error.</p>