anchor.diff:  
   let saveFloresActivity( app : FloresActivityDTO, upload : bool ) = 
       let db = db()
  -    let possibleApp = if upload then FloresActivityByInternalId( db, app.InternalId ) else FloresActivityByExternalId( db, app.ExternalId )
  +    let possibleApp = if upload then FloresActivityByInternalId( app.InternalId ) else FloresActivityByExternalId( app.ExternalId )
       if ( box possibleApp = null ) then
           let newApp = new SqlConnection.ServiceTypes.FloresActivities()
           copyToFloresActivity(newApp, app)
  
positive.code: 
  /////////////////////////////////////////////////////////////// FLORES
  
  let private FloresActivityByInternalId( db : SqlConnection.ServiceTypes.SimpleDataContextTypes.SyncToday2015_New, internalId : Guid ) = 
      query {
          for r in db.FloresActivities do
          where ( r.InternalId = internalId )
          select r
      } |> Seq.tryHead
  
  let private FloresActivityByExternalId( db : SqlConnection.ServiceTypes.SimpleDataContextTypes.SyncToday2015_New, externalId : string ) = 
      query {
          for r in db.FloresActivities do
          where ( r.ExternalId = externalId )
          select r
      } |> Seq.tryHead
  
negative.code:     } |> Seq.tryHead
  *)
  
  let private ExchangeAppointmentsByExternalId( externalId : string ) = 
      query {
          for r in db().ExchangeAppointments do
          where ( r.ExternalId = externalId )
          select r
      } |> Seq.tryHead
  
  let private ExchangeAppointmentsByInternalId( internalId : Guid ) = 
      query {
          for r in db().ExchangeAppointments do
          where ( r.InternalId = internalId )
          select r
      } |> Seq.tryHead
  