1 files changed, 234 insertions, 15 deletions

diff --git a/bank-eiffel/tests/test_account.e b/bank-eiffel/tests/test_account.e
index a460023..0b6ac46 100644
--- a/bank-eiffel/tests/test_account.e
+++ b/bank-eiffel/tests/test_account.e
@@ -1,12 +1,3 @@
-note
-        description: "[
-                Eiffel tests that can be executed by testing tool.
-        ]"
-        author: "EiffelStudio test wizard"
-        date: "$Date$"
-        revision: "$Revision$"
-        testing: "type/manual"
-
 class
         TEST_ACCOUNT
 
@@ -19,15 +10,243 @@ feature -- Test routines
                 local
                         person1: PERSON
                         person2: PERSON
+                        person3: PERSON
+                        account1: ACCOUNT
+                        account2: ACCOUNT
+                do
+                        create person1.make ("PERSON1", "PERSON1")
+                        create person2.make ("PERSON2", "PERSON2")
+                        create person3.make ("PERSON3", "PERSON3")
+
+                        create account1.make (person1, 0.01, 0.02, -50.0, [0.01, 0.022], [0.01, 0.02], [-100.0, -50.0])
+                        assert("CREATE_EDIT_ACCOUNT_MINAMOUNT", account1.transfer_minamount = 2.0)
+
+                        assert("CREATE_EDIT_ACCOUNT_SIGNER_1", account1.get_authorized_signers.count = 1)
+                        account1.add_authorized_signer (person2)
+                        account1.add_authorized_signer (person2)
+                        account1.add_authorized_signer (person3)
+                        account1.remove_authorized_signer (person3)
+                        assert("CREATE_EDIT_ACCOUNT_SIGNER_2", account1.get_authorized_signers.count = 2)
+
+                        assert("CREATE_EDIT_ACCOUNT_BALANCE_1", account1.balance = 0.0)
+                        account1.deposit (50.0, person1)
+                        account1.deposit (50.0, person2)
+                        -- balance = 100.0
+                        account1.advance
+                        -- balance = 100.0 + 1% deposit
+                        account1.withdraw (100.0 + 100.0 * 0.01 + 50.0, person1)
+                        -- balance = -50.0
+                        account1.creditline := -100.0
+                        account1.withdraw (50.0, person1)
+                        -- balance = -100.0
+                        account1.advance
+                        -- balance = -100.0 + 2% debit
+                        assert("CREATE_EDIT_ACCOUNT_BALANCE_2", account1.balance = -102.0)
+
+                        create account2.make(person3, 0.01, 0.02, -50, [0.01, 0.022], [0.01, 0.02], [-100.0, -50.0])
+                        account2.deposit (102.0, person3)
+                        account2.transfer (102.0, person3, account1, person1)
+                        assert("CREATE_EDIT_ACCOUNT_BALANCE_3", account1.balance = 0.0 and account2.balance = 0.0)
+
+                        account1.interest_deposit := 0.01
+                        account1.interest_deposit := 0.022
+                        account1.interest_debit := 0.01
+                        account1.interest_debit := 0.02
+                        account1.creditline := -100.0
+                        account1.creditline := -50.0
+                        account1.transfer_minamount := 10.0
+                end
+
+        ACCOUNT_CHECK_RANGES
+                local
+                        person: PERSON
                         account: ACCOUNT
+                        retry_count: INTEGER
                 do
-                        create person1.make ("SOME_SURNAME_1", "SOME_FIRSTNAME_1")
-                        create person2.make ("SOME_SURNAME_2", "SOME_FIRSTNAME_2")
-                        create account.make (person1)
-                        account.add_authorized_signer (person2)
-                        --assert ("not_implemented", False)
+                        create person.make("PERSON", "PERSON")
+                        create account.make(person, 0.01, 0.02, -50.0, [0.01, 0.022], [0.01, 0.02], [-100.0, -50.0])
+
+                        inspect retry_count
+                        when 0 then
+                                account.interest_deposit := 0.0
+                                assert("ACCOUNT_CHECK_RANGES_INTEREST_DEPOSIT_MIN", False)
+                        when 1 then
+                                account.interest_deposit := 0.023
+                                assert("ACCOUNT_CHECK_RANGES_INTEREST_DEPOSIT_MAX", False)
+                        when 2 then
+                                account.interest_debit := 0.0
+                                assert("ACCOUNT_CHECK_RANGES_INTEREST_DEBIT_MIN", False)
+                        when 3 then
+                                account.interest_debit := 0.03
+                                assert("ACCOUNT_CHECK_RANGES_INTEREST_DEBIT_MAX", False)
+                        when 4 then
+                                account.creditline := -101.0
+                                assert("ACCOUNT_CHECK_RANGES_CREDITLINE_MIN", False)
+                        when 5 then
+                                account.creditline := -49.0
+                                assert("ACCOUNT_CHECK_RANGES_CREDITLINE_MAX", False)
+                        when 6 then
+                                account.transfer_minamount := -1.0
+                                assert("ACCOUNT_CHECK_RANGES_TRANSFER_MINAMOUNT_POSITIVE", False)
+                        else
+                        end
+                rescue
+                        if not (create {EXCEPTIONS}).is_developer_exception then
+                                retry_count := retry_count + 1
+                                retry
+                        end
                 end
 
-end
+        ACCOUNT_CHECK_OPERATIONS
+                local
+                        person1: PERSON
+                        account1: ACCOUNT
+                        person2: PERSON
+                        account2: ACCOUNT
+                        retry_count: INTEGER
+                do
+                        create person1.make("PERSON1", "PERSON1")
+                        create person2.make("PERSON2", "PERSON2")
+                        create account1.make(person1, 0.01, 0.02, -50.0, [0.01, 0.022], [0.01, 0.02], [-100.0, -50.0])
+                        create account2.make(person2, 0.01, 0.02, -50.0, [0.01, 0.022], [0.01, 0.02], [-100.0, -50.0])
+
+                        inspect retry_count
+                        when 0 then
+                                account1.deposit (10.0, person2)
+                                assert("ACCOUNT_CHECK_OPERATIONS_DEPOSIT_OTHER", False)
+                        when 1 then
+                                account1.withdraw (10.0, person2)
+                                assert("ACCOUNT_CHECK_OPERATIONS_WITHDRAW_OTHER", False)
+                        when 2 then
+                                account1.transfer (10.0, person2, account2, person2)
+                                assert("ACCOUNT_CHECK_OPERATIONS_TRANSFER_OTHER_1", False)
+                        when 3 then
+                                account1.transfer (10.0, person1, account2, person1)
+                                assert("ACCOUNT_CHECK_OPERATIONS_TRANSFER_OTHER_2", False)
+                        when 4 then
+                                account1.withdraw (51.0, person1)
+                                assert("ACCOUNT_CHECK_OPERATIONS_WITHDRAW_OVER_CREDIT", False)
+                        when 5 then
+                                account1.deposit (1.0, person1)
+                                assert("ACCOUNT_CHECK_OPERATIONS_DEPOSIT_BELOW_MINAMOUNT", False)
+                        when 6 then
+                                account1.withdraw (1.0, person1)
+                                assert("ACCOUNT_CHECK_OPERATIONS_WITHDRAW_BELOW_MINAMOUNT", False)
+                        when 7 then
+                                account1.transfer (1.0, person1, account2, person2)
+                                assert("ACCOUNT_CHECK_OPERATIONS_TRANSFER_BELOW_MINAMOUNT", False)
+                        when 8 then
+                                account1.remove_authorized_signer (person1)
+                                assert("ACCOUNT_CHECK_OPERATIONS_REMOVE_AUTHORIZED_SIGNER_EMPTY", False)
+                        else
+                        end
+                rescue
+                        if retry_count /= 9 and not (create {EXCEPTIONS}).is_developer_exception then
+                                retry_count := retry_count + 1
+                                retry
+                        end
+                end
 
+        CREATE_STUDENTACCOUNT
+                local
+                        student: STUDENT
+                        account: STUDENTACCOUNT
+                do
+                        create student.make("STUDENT", "STUDENT")
+                        create account.make(student, 0.01, 0.02, -50.0, [0.01, 0.022], [0.01, 0.02], [-100.0, -50.0])
+                        assert("CREATE_STUDENTACCOUNT", attached {ACCOUNT} account)
+                        assert("CREATE_STUDENTACCOUNT_MINAMOUNT", account.transfer_minamount = 1.0)
+                end
+
+        STUDENTACCOUNT_ONLY_STUDENTS
+                local
+                        account: STUDENTACCOUNT
+                        student: STUDENT
+                        person: PERSON
+                        retiree: RETIREE
+                        retry_count: INTEGER
+                do
+                        create student.make("STUDENT", "STUDENT")
+                        create person.make("PERSON", "PERSON")
+                        create retiree.make("RETIREE", "RETIREE")
+
+                        inspect retry_count
+                        when 0 then
+                                create account.make(person, 0.01, 0.02, -50.0, [0.01, 0.022], [0.01, 0.02], [-100.0, -50.0])
+                                assert("STUDENTACCOUNT_ONLY_STUDENTS_1", False)
+                        when 1 then
+                                create account.make(retiree, 0.01, 0.02, -50.0, [0.01, 0.022], [0.01, 0.02], [-100.0, -50.0])
+                                assert("STUDENTACCOUNT_ONLY_STUDENTS_2", False)
+                        when 2 then
+                                create account.make(student, 0.01, 0.02, -50.0, [0.01, 0.022], [0.01, 0.02], [-100.0, -50.0])
+                                account.add_authorized_signer (create {STUDENT}.make("STUDENT2", "STUDENT2"))
+                                assert("STUDENTACCOUNT_ONE_STUDENT_ONLY_1", False)
+                        when 3 then
+                                create account.make(student, 0.01, 0.02, -50.0, [0.01, 0.022], [0.01, 0.02], [-100.0, -50.0])
+                                account.add_authorized_signer (person)
+                                assert("STUDENTACCOUNT_ONE_STUDENT_ONLY_2", False)
+                        when 4 then
+                                create account.make(student, 0.01, 0.02, -50.0, [0.01, 0.022], [0.01, 0.02], [-100.0, -50.0])
+                                account.add_authorized_signer (retiree)
+                                assert("STUDENTACCOUNT_ONE_STUDENT_ONLY_3", False)
+                        else
+                        end
+                rescue
+                        if not (create {EXCEPTIONS}).is_developer_exception then
+                                retry_count := retry_count + 1
+                                retry
+                        end
+                end
+
+        CREATE_RETIREEACCOUNT
+                local
+                        retiree: RETIREE
+                        account: RETIREEACCOUNT
+                do
+                        create retiree.make("RETIREE", "RETIREE")
+                        create account.make(retiree, 0.01, 0.02, -50.0, [0.01, 0.022], [0.01, 0.02], [-100.0, -50.0])
+                        assert("CREATE_RETIREEACCOUNT", attached {ACCOUNT} account)
+                        assert("CREATE_RETIREEACCOUNT_MINAMOUNT", account.transfer_minamount = 1.0)
+                end
 
+
+        RETIREEACCOUNT_ONLY_RETIREES
+                local
+                        account: RETIREEACCOUNT
+                        retiree: RETIREE
+                        person: PERSON
+                        student: STUDENT
+                        retry_count: INTEGER
+                do
+                        create retiree.make("RETIREE", "RETIREE")
+                        create person.make("PERSON", "PERSON")
+                        create student.make("STUDENT", "STUDENT")
+
+                        inspect retry_count
+                        when 0 then
+                                create account.make(person, 0.01, 0.02, -50.0, [0.01, 0.022], [0.01, 0.02], [-100.0, -50.0])
+                                assert("RETIREEACCOUNT_ONLY_RETIREES_1", False)
+                        when 1 then
+                                create account.make(student, 0.01, 0.02, -50.0, [0.01, 0.022], [0.01, 0.02], [-100.0, -50.0])
+                                assert("RETIREEACCOUNT_ONLY_RETIREES_2", False)
+                        when 2 then
+                                create account.make(retiree, 0.01, 0.02, -50.0, [0.01, 0.022], [0.01, 0.02], [-100.0, -50.0])
+                                account.add_authorized_signer (create {RETIREE}.make("RETIREE2", "RETIREE2"))
+                                assert("RETIREEACCOUNT_ONE_RETIREE_ONLY_1", False)
+                        when 3 then
+                                create account.make(retiree, 0.01, 0.02, -50.0, [0.01, 0.022], [0.01, 0.02], [-100.0, -50.0])
+                                account.add_authorized_signer (person)
+                                assert("RETIREEACCOUNT_ONE_RETIREE_ONLY_2", False)
+                        when 4 then
+                                create account.make(retiree, 0.01, 0.02, -50.0, [0.01, 0.022], [0.01, 0.02], [-100.0, -50.0])
+                                account.add_authorized_signer (student)
+                                assert("RETIREEACCOUNT_ONE_RETIREE_ONLY_3", False)
+                        else
+                        end
+                rescue
+                        if not (create {EXCEPTIONS}).is_developer_exception then
+                                retry_count := retry_count + 1
+                                retry
+                        end
+                end
+end