anchor.diff:              with
               | exn -> @"C:\Program Files\Navision700\70\Service"
   
  -    let navRTCPath = navPath @@ "RoleTailored Client"
  -    let rtcExe = navRTCPath @@ "Microsoft.Dynamics.NAV.Client.exe"
  -
       let clientExe = 
           match serverMode with
           | NavisionServerType.SqlServer -> "finsql.exe"
           | NavisionServerType.NativeServer -> "fin.exe"
   
  -    let finExe = navClassicPath @@ clientExe
  +    let finExe = getNAVPath navClientVersion @@ clientExe
   
       { ToolPath =  finExe
  -      RTC =  rtcExe
         WorkingDir = null
         ServerName = serverName
         Database = targetDatabase
  
positive.code:                   
      traceEndTask "CompileAll" details
  
  
  /// Opens a page with the RTC client
  let OpenPage server port serviceTierName company pageNo =
      let details = sprintf "%d" pageNo
      traceStartTask "OpenPage" details
      let protocol = sprintf @"dynamicsnav://%s:%s/%s/%s/runpage?page=%d" server port serviceTierName company pageNo
  
      let p = new Process()
      p.StartInfo <- new ProcessStartInfo(protocol)
  
negative.code: 
  type DynamicsNavParams =
      { ToolPath: string
        ServerName: string
        Database: string
        WorkingDir: string
        TempLogFile: string
        TimeOut: TimeSpan}
  
  let getNAVPath navClientVersion =
      let navClassicPath =
          let subKey = 
              match navClientVersion with
  