S++Business systems language
DEMO SOURCE · SPP / APP / PHYRead the book

cboddeposit-scene-openBankRepaymentAccounts.spp

cboddeposit/account/cboddeposit-scene-openBankRepaymentAccounts.spp

Download original file · Bank deposit source contents

1domain cboddeposit;23Scenario serial openBankRepaymentAccounts(4    BankAccount interestSubject,5    BankAccount collectionSubject,6    BankAccount principalSubject,7    InterestIncomeAccount,8    CollectionInterestIncomeAccount,9    PrincipalRecoveryAccount,10    InternalAccountOpeningAgreement11) {12    checkInternalAccountNumbers(interestSubject, collectionSubject, principalSubject);13    prepareInternalAccounts(14        interestSubject,15        collectionSubject,16        principalSubject,17        InterestIncomeAccount,18        CollectionInterestIncomeAccount,19        PrincipalRecoveryAccount,20        InternalAccountOpeningAgreement21    );22    transaction {23        insertBankAccount(interestSubject);24        insertBankAccount(collectionSubject);25        insertBankAccount(principalSubject);26        insertInterestIncomeAccount;27        insertCollectionInterestIncomeAccount;28        insertPrincipalRecoveryAccount;29    }30}