代码大全

break;

case Withdrawal ;

ProcessWithdrawal TransRec AccountType TransRec.AcctNum,

TransRec.Amount ;

break

case Transfer

MakeFundsTransfer TransRec SrcAcctType TransRec TgtAcctType

TransRec. AcctNum TransRec Amount ;

break;

default

* process unknown transaction type *

LogTransError Unknown Transaction Type TransRec ;

break;

}

17.5

17.5.l

20
Gerald Weingerg
100 5 20
1986 50
25 20

200 600