anchor.diff:                      null, 0L
           if outputAddress <> null then
               payAddress From transactionHash outputAddress outputValue transTime
  -        { Hash =  inputHash
  -          Index = input.InputTransactionIndex
  -          Address = outputAddress
  -          Value = outputValue }
  -        |> saveNeoInput transactionHash
  +        let input = 
  +            { Hash =  inputHash
  +              Index = input.InputTransactionIndex
  +              Address = outputAddress
  +              Value = outputValue }
  +        saveNeoInput transactionHash input
  +        input
   
       let saveNeoTrans neoTrans =
           client.Cypher
               .Create("(t:Transaction {param})")
               .WithParam("param", neoTrans)
  -            .Return<NeoTransaction>("t")
  -            .Results
  -            .Single()
  +            .ExecuteWithoutResults()
   
       let tansactionRelations trans blockHash =
           client.Cypher
  
positive.code:                 payAddress To transactionHash address output.Value transTime
                  address 
              | _ -> null
          { Value = output.Value
            Address = address
            Index = i }
          |> saveNeoOutput transactionHash
  
      let lookupTransaction transHash i =
          client.Cypher
  
negative.code:             .Match("(t:Transaction)")
              .Where(fun t -> t.TransactionHash = transactionHash)
              .CreateUnique("t-[:input]->i")
              .ExecuteWithoutResults()
  
      let neoInputOfInput transactionHash transTime (input: Input) =
          let inputHash = Conversion.littleEndianBytesToHexString input.InputHash
  