Помогите пожалуйста разобраться с TClientDataSet

for i:=0 to length(mas)-1 do
begin
DataModule1.StoredProc.Close;
DataModule1.StoredProc.ProcedureName:='PoiskNomDoc ';
DataModule1.StoredProc.Parameters.Clear;
DataModule1.StoredProc.Parameters.Refresh;
DataModule1.StoredProc.Parameters.ParamByName('@no m_doc').Value:=mas[i];
DataModule1.StoredProc.ExecProc;

DataModule1.ClientDataSet.Active:=true;
DataModule1.ClientDataSet.Append;
DataModule1.ClientDataSet.FieldByName('nom_doc_com ').AsInteger := DataModule1.StoredProc.FieldValues['nom_doc_com'];
DataModule1.ClientDataSet.FieldByName('nom_doc_pri v').AsInteger := DataModule1.StoredProc.FieldValues['nom_doc_priv'];
DataModule1.ClientDataSet.FieldByName('dat_beg').A sDateTime := DataModule1.StoredProc.FieldValues['dat_beg'];
DataModule1.ClientDataSet.FieldByName('dat_end').A sDateTime := DataModule1.StoredProc.FieldValues['dat_end'];
DataModule1.ClientDataSet.FieldByName('nom_scan'). AsInteger := DataModule1.StoredProc.FieldValues['nom_scan'];
DataModule1.ClientDataSet.Post;
end;
FormMain.GridRezPoisk.DataSource.DataSet.Open;

Ошибка: Отсутствуют данные поставщика.

ClientDataSet связала с DataSource через MasterSource, а DataSource c StoredProc.
И видимо это неправильно, раз данные не получены...
Подскажите как надо сделать.