代码大全

(singke) #1
else
RejectCustomerReturn(TransactionAmount)
end if
else
'manager approval not required, so accept return
AcceptCustomerReturn(TransactionAmount)
end if
end if
next TransactionlD

18-64 18-63

18-64 Basic
for TransactionID = 1 To MaxRecords


'read Transaction data
read TramsactionType
read TransacionAmount


'process transaction based on transaction type
if TransactionType = Customersalc then
AcceptCustomerSale(TransactionAmount)


elseif TransactionType = CustomerReturn then

' either process return automatically or get manager approval,
'if required
if TransactionAmoun t>= MgrApprovalRequired then

'try toget manager approval and then accept or reject the return
'basedo on wherther approval is granted
GetMgrApproval(Approval)
if Approval = True then
AcceptCustomerReturn(TransactionAmount)
else
RejectCustomerReturn(TransactionAmount)
end if
else

'manager approval not required, so accept return
Free download pdf