SQLList := TStringList.Create;
SQLList.Add('100001=select * from customer');
SQLList.Add( '200001=update customer set customer=current_time where cust_no=1012');
SQLList.Values['200001']
SQLList := TStringList.Create;
SQLList.Add('100001=select * from customer');
SQLList.Add( '200001=update customer set customer=current_time where cust_no=1012');
SQLList.Values['200001']