Vb customization to copy from one ultragrid to another - solutio

I did not find how to do this with an ultra grid, but instead found how to copy from the first ultragrid active row to the ReportParam view...

Dim ParamView As EpiDataView = CType(oTrans.EpiDataViews("ReportParam"), EpiDataView)
Dim jobnumber as String = ugdEpiCustom1.ActiveRow.Cells(0).Value.ToString
Dim partnumber as String = ugdEpiCustom1.ActiveRow.Cells(1).Value.ToString
Dim lotnumber as String = ugdEpiCustom1.ActiveRow.Cells(3).Value.ToString
Dim binnumber as String = ugdEpiCustom1.ActiveRow.Cells(5).Value.ToString
Dim qty as String = ugdEpiCustom1.ActiveRow.Cells(2).Value.ToString
Dim weight as String = ugdEpiCustom1.ActiveRow.Cells(4).Value.ToString

ParamView.dataView(ParamView.Row)("Character01") = jobnumber
ParamView.dataView(ParamView.Row)("Character02") = partnumber
ParamView.dataView(ParamView.Row)("Character03") = lotnumber
ParamView.dataView(ParamView.Row)("Character04") = binnumber
ParamView.dataView(ParamView.Row)("Number01") = qty
ParamView.dataView(ParamView.Row)("Number02") = weight

I thought I would post this solution in case it helps anyone else.

--- In vantage@yahoogroups.com, "Karen Schoenung" wrote:
>
> Hello,
> I have a customized form for a report. I have two fields to enter a part and lot and click a button to retrieve dynamic query results from Part Tran history for MFG-STK parts - results show in an unbound ultragrid.
>
> I now want to use
> Private Sub ugdEpiCustom1_AfterRowActivate(ByVal Sender As Object, ByVal Args As System.EventArgs) Handles ugdEpiCustom1.AfterRowActivate
>
> and whatever additional code is required to copy the ONE selected row to another ultragrid that displays some of the columns for the ReportParam. This grid is named ugdEpiCustom2 and bound to ReportParam.
>
> I have found some pieces searching both this group and online, but I cannot get it to work...Any help is greatly appreciated!
>
> Thanks in advance,
> Karen
>