Например, при смене текущей записи делаем так:
Код:
ClientDataSet2.Filter := 'Name = ''' + ClientDataSet1.FieldByName('Name').AsString + '*''';
ClientDataSet2.Filtered := True;
В ClientDataSet1 выбираем данные из первой таблицы (10001, 10002 и т.д.)
В ClientDataSet2 выбираем данные из второй таблицы (10001000001, 10001000002, 10002000001 и т.д.)