Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- let dotransaction(filename:string,accountNumber:int,currentBalance:string) =
- let transactions = loadfile filename
- let balancearr = currentBalance.Split('.')
- let kr = System.Int32.Parse(balancearr.[0])
- let cent = System.Int32.Parse(balancearr.[1])
- let myAcc = new MyAccount(accountNr = accountNumber, accountCent = cent, accountKr = kr)
- for itr in transactions do
- match itr.AccountNr with
- //här är problemet. accountNumber och itr.AccountNumber matchas alltid oavsett vad
- // itr.accountnr eller accountnumber är.
- | accountNumber -> myAcc.ChangeBalance(itr.amountOfKr,itr.amountofCent)
- | _ -> printfn "%s" "Do not match"
- let result = myAcc.accountKr.ToString()+"."+myAcc.accountCent.ToString()
- result
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement