代码大全

18-61

18-61 C

EMP_LIST * Employees;

FILE * InputFile

18-62

18-62 C

EMP_LIST_PTR Employees;

File_PTR InputFile;

18.6

18-63

18-63 Basic

for TransactionID = 1 TO MaxRecords

' get transaction data

read TransactionType

read TransactionAmount

'procass transaction based on transaction type

if TransactionType = CustomerSale then

AcceptCoustomerSale(TransactionAmount)

elseif TransactionType CustomerReturn then

'either process return automatcally or get manager approval,

'if required

if TransactionAmount >= MgrApprovalRequired then

' try to got manager approval and then accept or reject return

' based on whether approval is granted

GetMgrApproval(APProval)

if Approval = True then

AcceptCustomerReturn(TransatiopnAmount)