Customization: Add a button to search for customer

Oops my bad..i seen I had an error..that should have been

Sub DestroyCustomCode() not sub initialize! Sorry...





Rob Bucek

Production Control Manager

PH: (715) 284-5376 ext 311

Mobile: (715)896-0590

FAX: (715)284-4084

<http://www.dsmfg.com/>

(Click the logo to view our site) <http://www.dsmfg.com/>





From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On Behalf
Of Rob Bucek
Sent: Monday, March 14, 2011 11:13 AM
To: vantage@yahoogroups.com
Subject: RE: [Vantage] Customization: Add a button to search for
customer





I suppose under Sub InitializeCustomCode()

you could put [yourdatasetvariablename] = nothing

By my code it would have looked like..

dsEmpBasic = nothing

Rob Bucek

Production Control Manager

PH: (715) 284-5376 ext 311

Mobile: (715)896-0590

FAX: (715)284-4084

<http://www.dsmfg.com/>

(Click the logo to view our site) <http://www.dsmfg.com/>

From: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
[mailto:vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com> ] On
Behalf
Of Linda Lowney
Sent: Monday, March 14, 2011 11:07 AM
To: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
Subject: RE: [Vantage] Customization: Add a button to search for
customer

Hi Rob,

One more question. Do I have to dispose of the data set or view and if
so, how exactly?

Regards,

Linda

From: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
[mailto:vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com> ] On
Behalf
Of Linda Lowney
Sent: Monday, March 14, 2011 11:05 AM
To: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
Subject: RE: [Vantage] Customization: Add a button to search for
customer

Hi Rob,

Thank you very much. That worked great!!!!

Regards,

Linda

From: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
[mailto:vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com> ] On
Behalf
Of Rob Bucek
Sent: Monday, March 14, 2011 10:11 AM
To: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
Subject: RE: [Vantage] Customization: Add a button to search for
customer

Below is the code I used to do just that, but for the employee table..
import the customer dll's and use the customer adaptors instead of the
employee.. in customization look under tools, and object explorer to get
the syntax.. the reference to the character fields is where I am storing
the information I bring back in the current dataset. HTH..

Private Sub btnEmployee_Click(ByVal Sender As Object,
ByVal Args As System.EventArgs) Handles btnEmployee.Click

'// ** Place Event Handling Code Here **

Dim recSelected As Boolean

Dim whereClause As String = String.Empty

Dim dsEmpBasic As DataSet =
Epicor.Mfg.UI.FormFunctions.SearchFunctions.listLookup(oTrans,"EmpBasicA
dapter", recSelected, True, whereClause)

If (recSelected) Then

Dim edvoprView As EpiDataView =
CType(oTrans.EpiDataViews("oprView"), EpiDataView)

edvoprView.dataView(edvoprView.Row)("Character01") =
dsEmpBasic.Tables(0).Rows(0)("EmpID")

edvoprView.dataView(edvoprView.Row)("Character04") =
dsEmpBasic.Tables(0).Rows(0)("Name")

edvoprView.Notify( New EpiNotifyArgs(oTrans,
edvoprView.Row,edvoprView.Column) )

End If

End Sub

Rob Bucek

Production Control Manager

PH: (715) 284-5376 ext 311

Mobile: (715)896-0590

FAX: (715)284-4084

<http://www.dsmfg.com/>

(Click the logo to view our site) <http://www.dsmfg.com/>

From: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
[mailto:vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com> ] On
Behalf
Of Linda Lowney
Sent: Friday, March 11, 2011 2:26 PM
To: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
Subject: [Vantage] Customization: Add a button to search for customer

I need to add a button to search for a customer so that I can get
customer information into an unrelated screen. Can someone please point
me in the right direction?

Regards,

Linda Lowney

Pride Signs

255 Pinebush Road

Cambridge, ON N1T 1B9

P 519 622 4040 ext. 258

F 519 622 4031

www.pridesigns.com <http://www.pridesigns.com>

[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]

[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]
I need to add a button to search for a customer so that I can get
customer information into an unrelated screen. Can someone please point
me in the right direction?



Regards,



Linda Lowney

Pride Signs

255 Pinebush Road

Cambridge, ON N1T 1B9

P 519 622 4040 ext. 258

F 519 622 4031

www.pridesigns.com <http://www.pridesigns.com>









[Non-text portions of this message have been removed]
Below is the code I used to do just that, but for the employee table..
import the customer dll's and use the customer adaptors instead of the
employee.. in customization look under tools, and object explorer to get
the syntax.. the reference to the character fields is where I am storing
the information I bring back in the current dataset. HTH..





Private Sub btnEmployee_Click(ByVal Sender As Object,
ByVal Args As System.EventArgs) Handles btnEmployee.Click

'// ** Place Event Handling Code Here **


Dim recSelected As Boolean

Dim whereClause As String = String.Empty

Dim dsEmpBasic As DataSet =
Epicor.Mfg.UI.FormFunctions.SearchFunctions.listLookup(oTrans,"EmpBasicA
dapter", recSelected, True, whereClause)

If (recSelected) Then

Dim edvoprView As EpiDataView =
CType(oTrans.EpiDataViews("oprView"), EpiDataView)

edvoprView.dataView(edvoprView.Row)("Character01") =
dsEmpBasic.Tables(0).Rows(0)("EmpID")

edvoprView.dataView(edvoprView.Row)("Character04") =
dsEmpBasic.Tables(0).Rows(0)("Name")

edvoprView.Notify( New EpiNotifyArgs(oTrans,
edvoprView.Row,edvoprView.Column) )

End If



End Sub



Rob Bucek

Production Control Manager

PH: (715) 284-5376 ext 311

Mobile: (715)896-0590

FAX: (715)284-4084

<http://www.dsmfg.com/>

(Click the logo to view our site) <http://www.dsmfg.com/>





From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On Behalf
Of Linda Lowney
Sent: Friday, March 11, 2011 2:26 PM
To: vantage@yahoogroups.com
Subject: [Vantage] Customization: Add a button to search for customer





I need to add a button to search for a customer so that I can get
customer information into an unrelated screen. Can someone please point
me in the right direction?

Regards,

Linda Lowney

Pride Signs

255 Pinebush Road

Cambridge, ON N1T 1B9

P 519 622 4040 ext. 258

F 519 622 4031

www.pridesigns.com <http://www.pridesigns.com>

[Non-text portions of this message have been removed]





[Non-text portions of this message have been removed]
Hi Rob,



Thank you very much. That worked great!!!!



Regards,

Linda



From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On Behalf
Of Rob Bucek
Sent: Monday, March 14, 2011 10:11 AM
To: vantage@yahoogroups.com
Subject: RE: [Vantage] Customization: Add a button to search for
customer





Below is the code I used to do just that, but for the employee table..
import the customer dll's and use the customer adaptors instead of the
employee.. in customization look under tools, and object explorer to get
the syntax.. the reference to the character fields is where I am storing
the information I bring back in the current dataset. HTH..

Private Sub btnEmployee_Click(ByVal Sender As Object,
ByVal Args As System.EventArgs) Handles btnEmployee.Click

'// ** Place Event Handling Code Here **

Dim recSelected As Boolean

Dim whereClause As String = String.Empty

Dim dsEmpBasic As DataSet =
Epicor.Mfg.UI.FormFunctions.SearchFunctions.listLookup(oTrans,"EmpBasicA
dapter", recSelected, True, whereClause)

If (recSelected) Then

Dim edvoprView As EpiDataView =
CType(oTrans.EpiDataViews("oprView"), EpiDataView)

edvoprView.dataView(edvoprView.Row)("Character01") =
dsEmpBasic.Tables(0).Rows(0)("EmpID")

edvoprView.dataView(edvoprView.Row)("Character04") =
dsEmpBasic.Tables(0).Rows(0)("Name")

edvoprView.Notify( New EpiNotifyArgs(oTrans,
edvoprView.Row,edvoprView.Column) )

End If

End Sub

Rob Bucek

Production Control Manager

PH: (715) 284-5376 ext 311

Mobile: (715)896-0590

FAX: (715)284-4084

<http://www.dsmfg.com/>

(Click the logo to view our site) <http://www.dsmfg.com/>

From: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
[mailto:vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com> ] On
Behalf
Of Linda Lowney
Sent: Friday, March 11, 2011 2:26 PM
To: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
Subject: [Vantage] Customization: Add a button to search for customer

I need to add a button to search for a customer so that I can get
customer information into an unrelated screen. Can someone please point
me in the right direction?

Regards,

Linda Lowney

Pride Signs

255 Pinebush Road

Cambridge, ON N1T 1B9

P 519 622 4040 ext. 258

F 519 622 4031

www.pridesigns.com <http://www.pridesigns.com>

[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]
Hi Rob,



One more question. Do I have to dispose of the data set or view and if
so, how exactly?



Regards,

Linda



From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On Behalf
Of Linda Lowney
Sent: Monday, March 14, 2011 11:05 AM
To: vantage@yahoogroups.com
Subject: RE: [Vantage] Customization: Add a button to search for
customer





Hi Rob,

Thank you very much. That worked great!!!!

Regards,

Linda

From: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
[mailto:vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com> ] On
Behalf
Of Rob Bucek
Sent: Monday, March 14, 2011 10:11 AM
To: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
Subject: RE: [Vantage] Customization: Add a button to search for
customer

Below is the code I used to do just that, but for the employee table..
import the customer dll's and use the customer adaptors instead of the
employee.. in customization look under tools, and object explorer to get
the syntax.. the reference to the character fields is where I am storing
the information I bring back in the current dataset. HTH..

Private Sub btnEmployee_Click(ByVal Sender As Object,
ByVal Args As System.EventArgs) Handles btnEmployee.Click

'// ** Place Event Handling Code Here **

Dim recSelected As Boolean

Dim whereClause As String = String.Empty

Dim dsEmpBasic As DataSet =
Epicor.Mfg.UI.FormFunctions.SearchFunctions.listLookup(oTrans,"EmpBasicA
dapter", recSelected, True, whereClause)

If (recSelected) Then

Dim edvoprView As EpiDataView =
CType(oTrans.EpiDataViews("oprView"), EpiDataView)

edvoprView.dataView(edvoprView.Row)("Character01") =
dsEmpBasic.Tables(0).Rows(0)("EmpID")

edvoprView.dataView(edvoprView.Row)("Character04") =
dsEmpBasic.Tables(0).Rows(0)("Name")

edvoprView.Notify( New EpiNotifyArgs(oTrans,
edvoprView.Row,edvoprView.Column) )

End If

End Sub

Rob Bucek

Production Control Manager

PH: (715) 284-5376 ext 311

Mobile: (715)896-0590

FAX: (715)284-4084

<http://www.dsmfg.com/>

(Click the logo to view our site) <http://www.dsmfg.com/>

From: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
[mailto:vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com> ] On
Behalf
Of Linda Lowney
Sent: Friday, March 11, 2011 2:26 PM
To: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
Subject: [Vantage] Customization: Add a button to search for customer

I need to add a button to search for a customer so that I can get
customer information into an unrelated screen. Can someone please point
me in the right direction?

Regards,

Linda Lowney

Pride Signs

255 Pinebush Road

Cambridge, ON N1T 1B9

P 519 622 4040 ext. 258

F 519 622 4031

www.pridesigns.com <http://www.pridesigns.com>

[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]





[Non-text portions of this message have been removed]
I suppose under Sub InitializeCustomCode()



you could put [yourdatasetvariablename] = nothing



By my code it would have looked like..



dsEmpBasic = nothing





Rob Bucek

Production Control Manager

PH: (715) 284-5376 ext 311

Mobile: (715)896-0590

FAX: (715)284-4084

<http://www.dsmfg.com/>

(Click the logo to view our site) <http://www.dsmfg.com/>





From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On Behalf
Of Linda Lowney
Sent: Monday, March 14, 2011 11:07 AM
To: vantage@yahoogroups.com
Subject: RE: [Vantage] Customization: Add a button to search for
customer





Hi Rob,

One more question. Do I have to dispose of the data set or view and if
so, how exactly?

Regards,

Linda

From: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
[mailto:vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com> ] On
Behalf
Of Linda Lowney
Sent: Monday, March 14, 2011 11:05 AM
To: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
Subject: RE: [Vantage] Customization: Add a button to search for
customer

Hi Rob,

Thank you very much. That worked great!!!!

Regards,

Linda

From: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
[mailto:vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com> ] On
Behalf
Of Rob Bucek
Sent: Monday, March 14, 2011 10:11 AM
To: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
Subject: RE: [Vantage] Customization: Add a button to search for
customer

Below is the code I used to do just that, but for the employee table..
import the customer dll's and use the customer adaptors instead of the
employee.. in customization look under tools, and object explorer to get
the syntax.. the reference to the character fields is where I am storing
the information I bring back in the current dataset. HTH..

Private Sub btnEmployee_Click(ByVal Sender As Object,
ByVal Args As System.EventArgs) Handles btnEmployee.Click

'// ** Place Event Handling Code Here **

Dim recSelected As Boolean

Dim whereClause As String = String.Empty

Dim dsEmpBasic As DataSet =
Epicor.Mfg.UI.FormFunctions.SearchFunctions.listLookup(oTrans,"EmpBasicA
dapter", recSelected, True, whereClause)

If (recSelected) Then

Dim edvoprView As EpiDataView =
CType(oTrans.EpiDataViews("oprView"), EpiDataView)

edvoprView.dataView(edvoprView.Row)("Character01") =
dsEmpBasic.Tables(0).Rows(0)("EmpID")

edvoprView.dataView(edvoprView.Row)("Character04") =
dsEmpBasic.Tables(0).Rows(0)("Name")

edvoprView.Notify( New EpiNotifyArgs(oTrans,
edvoprView.Row,edvoprView.Column) )

End If

End Sub

Rob Bucek

Production Control Manager

PH: (715) 284-5376 ext 311

Mobile: (715)896-0590

FAX: (715)284-4084

<http://www.dsmfg.com/>

(Click the logo to view our site) <http://www.dsmfg.com/>

From: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
[mailto:vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com> ] On
Behalf
Of Linda Lowney
Sent: Friday, March 11, 2011 2:26 PM
To: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
<mailto:vantage%40yahoogroups.com>
Subject: [Vantage] Customization: Add a button to search for customer

I need to add a button to search for a customer so that I can get
customer information into an unrelated screen. Can someone please point
me in the right direction?

Regards,

Linda Lowney

Pride Signs

255 Pinebush Road

Cambridge, ON N1T 1B9

P 519 622 4040 ext. 258

F 519 622 4031

www.pridesigns.com <http://www.pridesigns.com>

[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]

[Non-text portions of this message have been removed]





[Non-text portions of this message have been removed]