Advertisement
Guest User

Untitled

a guest
Dec 11th, 2013
87
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
F# 1.09 KB | None | 0 0
  1. let dotransaction(filename:string,accountNumber:int,currentBalance:string) =    
  2.                   let transactions = loadfile filename                                                                                
  3.                   let balancearr = currentBalance.Split('.')
  4.                           let kr = System.Int32.Parse(balancearr.[0])
  5.                               let cent = System.Int32.Parse(balancearr.[1])
  6.                               let myAcc = new MyAccount(accountNr = accountNumber, accountCent = cent, accountKr = kr)
  7.                               for itr in transactions do
  8.                                   match itr.AccountNr with
  9.                       //här är problemet. accountNumber och itr.AccountNumber matchas alltid oavsett vad
  10.                   // itr.accountnr eller accountnumber är.
  11.                                   | accountNumber -> myAcc.ChangeBalance(itr.amountOfKr,itr.amountofCent)
  12.                                   | _ -> printfn "%s" "Do not match"
  13.                               let result = myAcc.accountKr.ToString()+"."+myAcc.accountCent.ToString()
  14.                               result
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement