Here is an example.
Â
Dim adaPartAdapter As PartAdapter = New PartAdapter(UD105Form)
Dim dsPartAdapter As Data.DataSet
Dim fields As String() = New String(){"PartNum","PartDescription"}
adaPartAdapter.BOConnect()
Dim optsPart As SearchOptions = New SearchOptions(SearchMode.AutoSearch)
optsPart.NamedSearch.WhereClauses.Add("Part", "Company = '" &
UD105Form.Session.CompanyID & "' AND PartNum = '" & etbPartNum.Text & "'")
Dim MorePagesPart As Boolean
dsPartAdapter = adaPartAdapter.GetRows(optsPart, MorePagesPart)
ucbEpiCustom6.DataSource = dsPartAdapter.Tables("Part")
ucbEpiCustom6.ValueMember = "PartNum"
ucbEpiCustom6.DisplayMember = "PartDescription"
ucbEpiCustom6.SetColumnFilter(fields)
________________________________
From: bobschnable <bschnable@...>
To: vantage@yahoogroups.com
Sent: Mon, October 4, 2010 10:42:06 AM
Subject: [Vantage] Re: Part List Ultra Grid View
Â
I'm not sure which route we're going to go, but the fields I would need to
filter on would be VB fields Character01 and CheckBox1-3. So If you wouldn't
mind providing an example of how I could utilize the PartAdapter directly.
Thanks.
Â
Dim adaPartAdapter As PartAdapter = New PartAdapter(UD105Form)
Dim dsPartAdapter As Data.DataSet
Dim fields As String() = New String(){"PartNum","PartDescription"}
adaPartAdapter.BOConnect()
Dim optsPart As SearchOptions = New SearchOptions(SearchMode.AutoSearch)
optsPart.NamedSearch.WhereClauses.Add("Part", "Company = '" &
UD105Form.Session.CompanyID & "' AND PartNum = '" & etbPartNum.Text & "'")
Dim MorePagesPart As Boolean
dsPartAdapter = adaPartAdapter.GetRows(optsPart, MorePagesPart)
ucbEpiCustom6.DataSource = dsPartAdapter.Tables("Part")
ucbEpiCustom6.ValueMember = "PartNum"
ucbEpiCustom6.DisplayMember = "PartDescription"
ucbEpiCustom6.SetColumnFilter(fields)
________________________________
From: bobschnable <bschnable@...>
To: vantage@yahoogroups.com
Sent: Mon, October 4, 2010 10:42:06 AM
Subject: [Vantage] Re: Part List Ultra Grid View
Â
I'm not sure which route we're going to go, but the fields I would need to
filter on would be VB fields Character01 and CheckBox1-3. So If you wouldn't
mind providing an example of how I could utilize the PartAdapter directly.
Thanks.
--- In vantage@yahoogroups.com, Steven Gotschall <sgotschall@...> wrote:
>
> Yes, but only for the fields returned by the Search Function. If you wish to
>
> access the entire Part table, then you would have to call the PartAdapter
> directly, which is much slower. Let me know if you need an example of this.
>
>
>
>
> ________________________________
> From: bobschnable <bschnable@...>
> To: vantage@yahoogroups.com
> Sent: Fri, October 1, 2010 5:21:04 PM
> Subject: [Vantage] Re: Part List Ultra Grid View
>
> ÂÂ
> Thanks Steven that's perfect. I assume by utilizing the whereClause parameter I
>
> can filter out my data set as I wish?
>
> --- In vantage@yahoogroups.com, Steven Gotschall <sgotschall@> wrote:
> >
> > Here is one way. Add This to your form's on load event. Change
> >ugdEpiCustom1
> >
> > to the name of your ultragrid.
> >
> > Dim recSelected As Boolean
> > Dim whereClause As String = String.Empty
> > Dim dsPartAdapter As DataSet =
> > Epicor.Mfg.UI.FormFunctions.SearchFunctions.listLookup(oTrans, "PartAdapter"
>,
>
>
> > recSelected, False, whereClause)
> > ugdEpiCustom1.DataSource = dsPartAdapter.Tables(0)
> >
> > ÂÂÂ
> >
> > ________________________________
> > From: bobschnable <bschnable@>
> > To: vantage@yahoogroups.com
> > Sent: Fri, October 1, 2010 4:15:07 PM
> > Subject: [Vantage] Part List Ultra Grid View
> >
> > ÂÂÂ
> > Hello Group,
> >
> > I have added an Ultra Grid view to Part Setup, under the Part Rev tab. When I
>
> > use the Part as the data source, it only display the current part I'm
>selected
>
>
> > on in the grid view, which is what I expected.
> >
> >
> > I want to display the entire part list in this grid view however. I am at a
> > loss.
> >
> > Thanks in advance for the help.
> >
> > Bob
> >
> >
> >
> >
> >
> >
> >
> > [Non-text portions of this message have been removed]
> >
>
>
>
>
>
>
>
> [Non-text portions of this message have been removed]
>
[Non-text portions of this message have been removed]