Customization Problem

You can look at the solution of Bernie Walker several weeks ago

Bernie Walker schreef:

> > Here is what I would do:
> > Use the Form Event Wizard, Select Event Type: EpiViewNotification,
> > Views: OrderDtl and click the blue arrow to create the dataview that
> > you can reference in code
> > (you can enter it manually, but this is less typing)
> >
> > You can delete the Sub that the wizard placed in the code or leave it.
> >
> > It created the dataview you can reference as edvOrderDtl
> >
> > now, for example, if txtepicustom9 is bound to OrderDtl.ShortChar09
> > you can use something like this to set it's value:
> >
> > txtepicustom9.text = jobnum.tables(0).rows(0)("AssemblySeq")
> > edvOrderDtl.dataView(edvOrderDtl.Row)("ShortChar09") =
> > jobnum.tables(0).rows(0)("AssemblySeq")
> > edvOderDtl.Notify( New EpiNotifyArgs(SalesOrderForm, edvOrderDtl.Row,
> > edvOrderDtl.Column))
> >
> > each time you alter a field in the dataview, use the edvOderDtl.Notify
> > method so the field gets marked as changed.
in your case it would be

Use the Form Event Wizard, Select Event Type: EpiViewNotification,
Views: "The table containing your child" and click the blue arrow to create the dataview that you can reference in your code





Matt Barron schreef:
> It just gives me the same problem and does not save the child table.
>
> -----Original Message-----
> From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On Behalf
> Of Fons van der Beek
> Sent: Tuesday, September 11, 2007 2:27 PM
> To: vantage@yahoogroups.com
> Subject: Re: [Vantage] Customization Problem
>
> try using "otrans.update()" instead of SendKeys.Send.............
>
> Greetz
> Fons
>
> dub554 schreef:
>
>> An answer to this question would solidify a multiple-month-long
>> project for me!
>>
>> Ok, I have a custom button that once it is clicked, it opens a search
>> using "SerialNoAdapter" and filters the results based on a user-input
>> job number.
>>
>> This information is saved into a dataset. Now, I need for each
>> individual field under the "Serial Number" column to be saved as a
>> different child under the parent.
>>
>> Here is my current code for the button click event:
>>
>> Private Sub btnEpiCustom3_Click(ByVal Sender As Object, ByVal Args As
>> System.EventArgs) Handles btnEpiCustom3.Click
>>
>> '//variable definitions
>> dim recselected as boolean
>> dim showsearch as boolean = false
>> dim whereclause as string = "JobNum = '" & txtepicustom8.text &"'"
>> dim multirecords as boolean = true
>> dim i as integer = 0
>>
>> '//opens a serial number search window based on the user-input job
>> number dim srlnum as dataset = searchfunctions.listlookup(otrans,
>> "SerialNoAdapter", recselected, showsearch, whereclause, multirecords)
>>
>> messagebox.show(srlnum.tables(0).rows.count(), "Number of rows in
>> DataSet")
>>
>> while i < srlnum.tables(0).rows.count()
>> otrans.getnewchild()
>> messagebox.show(i, "<-- current row")
>> txtepicustom13.focus()
>> txtepicustom13.text =
>> srlnum.tables(0).rows(i)("SerialNumber")
>> messagebox.show(txtepicustom13.text, "<-- current sr num")
>> SendKeys.Send("{F10}")
>> i=i+1
>> end while
>>
>> End Sub
>>
>>
>> F10 is linked to a Hot Key that will save the child. However, it still
>>
>
>
>> does not save the child when it is in the loop, only if I do it entry
>> by entry will it save it.
>>
>> In addition, i=2, it says it cant find the row in the database when I
>> can manually enter i=2 and it will give me the information I want.
>>
>> This is frustrating and refuse to call epicor support to get the
>> general run-around...
>>
>>
>>
>>
>> Useful links for the Yahoo!Groups Vantage Board are: ( Note: You must
>> have already linked your email address to a yahoo id to enable access.
>>
>
>
>> )
>> (1) To access the Files Section of our Yahoo!Group for Report Builder
>> and Crystal Reports and other 'goodies', please goto:
>> http://groups.yahoo.com/group/vantage/files/.
>> <http://groups.yahoo.com/group/vantage/files/.>
>> (2) To search through old msg's goto:
>> http://groups.yahoo.com/group/vantage/messages
>> <http://groups.yahoo.com/group/vantage/messages>
>> (3) To view links to Vendors that provide Vantage services goto:
>> http://groups.yahoo.com/group/vantage/links
>> <http://groups.yahoo.com/group/vantage/links>
>> Yahoo! Groups Links
>>
>>
>>
>>
>>
>
>
>
>
>
>
> Useful links for the Yahoo!Groups Vantage Board are: ( Note: You must have already linked your email address to a yahoo id to enable access. )
> (1) To access the Files Section of our Yahoo!Group for Report Builder and Crystal Reports and other 'goodies', please goto: http://groups.yahoo.com/group/vantage/files/.
> (2) To search through old msg's goto: http://groups.yahoo.com/group/vantage/messages
> (3) To view links to Vendors that provide Vantage services goto: http://groups.yahoo.com/group/vantage/links
> Yahoo! Groups Links
>
>
>
>



[Non-text portions of this message have been removed]
I have created a custom form in Vantage 8.03.

I have 3 text fields. In the first field, I type in a job number and
after I hit tab to move to the next field, it opens a search window.

I make a selection from that search window and I have 2 pieces of
information pulled from that line.

In this instance, it pulls "AssemblySeq" and "OpCode".

"AssemblySeq" gets pulled into the 2nd text field.

"OpCode" gets pulled into the 3rd and final text field.

That all works perfectly, however, I have a couple of combo boxes that
I need to make a few selections from after the text fields are filled.

Once I click on one of these combo boxes, for some unknown reason, the
information in the 3rd text field just disappears! I've been trying
to figure it out for a couple of hours but nothing I have done will
fix it!

Here is my code:

Private Sub txtepicustom8_LostFocus(ByVal Sender As Object, ByVal Args
As System.EventArgs) Handles txtEpiCustom8.LostFocus

dim recselected as boolean
dim showsearch as boolean = true
dim whereclause as string = "JobNum = '" & txtepicustom8.text & "'"
dim multirecords as boolean = true


dim jobnum as dataset = searchfunctions.listlookup(otrans,
"JobOperSearchAdapter", recselected, showsearch, whereclause,
multirecords)


if(recselected = true) then

txtepicustom9.text = jobnum.tables(0).rows(0)("AssemblySeq")
txtepicustom10.text = jobnum.tables(0).rows(0)("OpCode")

else

otrans.cleardatasets()

End if



end sub



I am thoroughly confused and if anyone knows how to keep the
information in the 3rd text box there, please let me know!
Be sure to log out of Vantage after saving the customization and then
log back in.

I have seen several strange things like that that go away when logging
out.



Dale Schuerman
Sr. Consultant

RAM Software Systems, Inc.
1701 N. Collins Blvd. - Suite 200
Richardson,TX 75080
(972) 669-0763


________________________________

From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On Behalf
Of dub554
Sent: Wednesday, August 22, 2007 2:17 PM
To: vantage@yahoogroups.com
Subject: [Vantage] Customization Problem



I have created a custom form in Vantage 8.03.

I have 3 text fields. In the first field, I type in a job number and
after I hit tab to move to the next field, it opens a search window.

I make a selection from that search window and I have 2 pieces of
information pulled from that line.

In this instance, it pulls "AssemblySeq" and "OpCode".

"AssemblySeq" gets pulled into the 2nd text field.

"OpCode" gets pulled into the 3rd and final text field.

That all works perfectly, however, I have a couple of combo boxes that
I need to make a few selections from after the text fields are filled.

Once I click on one of these combo boxes, for some unknown reason, the
information in the 3rd text field just disappears! I've been trying
to figure it out for a couple of hours but nothing I have done will
fix it!

Here is my code:

Private Sub txtepicustom8_LostFocus(ByVal Sender As Object, ByVal Args
As System.EventArgs) Handles txtEpiCustom8.LostFocus

dim recselected as boolean
dim showsearch as boolean = true
dim whereclause as string = "JobNum = '" & txtepicustom8.text & "'"
dim multirecords as boolean = true

dim jobnum as dataset = searchfunctions.listlookup(otrans,
"JobOperSearchAdapter", recselected, showsearch, whereclause,
multirecords)


if(recselected = true) then

txtepicustom9.text = jobnum.tables(0).rows(0)("AssemblySeq")
txtepicustom10.text = jobnum.tables(0).rows(0)("OpCode")

else

otrans.cleardatasets()

End if



end sub

I am thoroughly confused and if anyone knows how to keep the
information in the 3rd text box there, please let me know!




########################################################################
Attention:
This email message is privileged and confidential. If you are not the
intended recipient please delete the message and notify the sender.
Any views or opinions presented are solely those of the author.

This email message has been scanned for Viruses and Content and cleared
by MailMarshal SMTP

For more information go to http://www.ramsys.com
########################################################################


[Non-text portions of this message have been removed]
I often have the same problems as you describe, it drives me nuts...........

1)
Sometimes it helps to focus on the changed fields
----------------

txtepicustom9.text = jobnum.tables(0).rows(0)("AssemblySeq")
txtepicustom9.focus()
txtepicustom10.text = jobnum.tables(0).rows(0)("OpCode")
txtepicustom10.focus()
----------------

2)
Sometimes calling the subroutine twice also helps .......... (i know how crazy it sounds)







Dale Schuerman schreef:
> Be sure to log out of Vantage after saving the customization and then
> log back in.
>
> I have seen several strange things like that that go away when logging
> out.
>
>
>
> Dale Schuerman
> Sr. Consultant
>
> RAM Software Systems, Inc.
> 1701 N. Collins Blvd. - Suite 200
> Richardson,TX 75080
> (972) 669-0763
>
>
> ________________________________
>
> From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On Behalf
> Of dub554
> Sent: Wednesday, August 22, 2007 2:17 PM
> To: vantage@yahoogroups.com
> Subject: [Vantage] Customization Problem
>
>
>
> I have created a custom form in Vantage 8.03.
>
> I have 3 text fields. In the first field, I type in a job number and
> after I hit tab to move to the next field, it opens a search window.
>
> I make a selection from that search window and I have 2 pieces of
> information pulled from that line.
>
> In this instance, it pulls "AssemblySeq" and "OpCode".
>
> "AssemblySeq" gets pulled into the 2nd text field.
>
> "OpCode" gets pulled into the 3rd and final text field.
>
> That all works perfectly, however, I have a couple of combo boxes that
> I need to make a few selections from after the text fields are filled.
>
> Once I click on one of these combo boxes, for some unknown reason, the
> information in the 3rd text field just disappears! I've been trying
> to figure it out for a couple of hours but nothing I have done will
> fix it!
>
> Here is my code:
>
> Private Sub txtepicustom8_LostFocus(ByVal Sender As Object, ByVal Args
> As System.EventArgs) Handles txtEpiCustom8.LostFocus
>
> dim recselected as boolean
> dim showsearch as boolean = true
> dim whereclause as string = "JobNum = '" & txtepicustom8.text & "'"
> dim multirecords as boolean = true
>
> dim jobnum as dataset = searchfunctions.listlookup(otrans,
> "JobOperSearchAdapter", recselected, showsearch, whereclause,
> multirecords)
>
>
> if(recselected = true) then
>
> txtepicustom9.text = jobnum.tables(0).rows(0)("AssemblySeq")
> txtepicustom10.text = jobnum.tables(0).rows(0)("OpCode")
>
> else
>
> otrans.cleardatasets()
>
> End if
>
>
>
> end sub
>
> I am thoroughly confused and if anyone knows how to keep the
> information in the 3rd text box there, please let me know!
>
>
>
>
> ########################################################################
> Attention:
> This email message is privileged and confidential. If you are not the
> intended recipient please delete the message and notify the sender.
> Any views or opinions presented are solely those of the author.
>
> This email message has been scanned for Viruses and Content and cleared
> by MailMarshal SMTP
>
> For more information go to http://www.ramsys.com
> ########################################################################
>
>
> [Non-text portions of this message have been removed]
>
>
>
> Useful links for the Yahoo!Groups Vantage Board are: ( Note: You must have already linked your email address to a yahoo id to enable access. )
> (1) To access the Files Section of our Yahoo!Group for Report Builder and Crystal Reports and other 'goodies', please goto: http://groups.yahoo.com/group/vantage/files/.
> (2) To search through old msg's goto: http://groups.yahoo.com/group/vantage/messages
> (3) To view links to Vendors that provide Vantage services goto: http://groups.yahoo.com/group/vantage/links
> Yahoo! Groups Links
>
>
>
>
tell me about it!

what exactly do you mean by calling the subroutine twice? do you just
copy and past the same code underneath the first one?

--- In vantage@yahoogroups.com, Fons van der Beek
<fons.vanderbeek@...> wrote:
>
> I often have the same problems as you describe, it drives me
nuts...........
>
> 1)
> Sometimes it helps to focus on the changed fields
> ----------------
>
> txtepicustom9.text = jobnum.tables(0).rows(0)("AssemblySeq")
> txtepicustom9.focus()
> txtepicustom10.text = jobnum.tables(0).rows(0)("OpCode")
> txtepicustom10.focus()
> ----------------
>
> 2)
> Sometimes calling the subroutine twice also helps .......... (i know
how crazy it sounds)
>
>
>
>
>
>
>
> Dale Schuerman schreef:
> > Be sure to log out of Vantage after saving the customization and then
> > log back in.
> >
> > I have seen several strange things like that that go away when logging
> > out.
> >
> >
> >
> > Dale Schuerman
> > Sr. Consultant
> >
> > RAM Software Systems, Inc.
> > 1701 N. Collins Blvd. - Suite 200
> > Richardson,TX 75080
> > (972) 669-0763
> >
> >
> > ________________________________
> >
> > From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On
Behalf
> > Of dub554
> > Sent: Wednesday, August 22, 2007 2:17 PM
> > To: vantage@yahoogroups.com
> > Subject: [Vantage] Customization Problem
> >
> >
> >
> > I have created a custom form in Vantage 8.03.
> >
> > I have 3 text fields. In the first field, I type in a job number and
> > after I hit tab to move to the next field, it opens a search window.
> >
> > I make a selection from that search window and I have 2 pieces of
> > information pulled from that line.
> >
> > In this instance, it pulls "AssemblySeq" and "OpCode".
> >
> > "AssemblySeq" gets pulled into the 2nd text field.
> >
> > "OpCode" gets pulled into the 3rd and final text field.
> >
> > That all works perfectly, however, I have a couple of combo boxes that
> > I need to make a few selections from after the text fields are filled.
> >
> > Once I click on one of these combo boxes, for some unknown reason, the
> > information in the 3rd text field just disappears! I've been trying
> > to figure it out for a couple of hours but nothing I have done will
> > fix it!
> >
> > Here is my code:
> >
> > Private Sub txtepicustom8_LostFocus(ByVal Sender As Object, ByVal Args
> > As System.EventArgs) Handles txtEpiCustom8.LostFocus
> >
> > dim recselected as boolean
> > dim showsearch as boolean = true
> > dim whereclause as string = "JobNum = '" & txtepicustom8.text & "'"
> > dim multirecords as boolean = true
> >
> > dim jobnum as dataset = searchfunctions.listlookup(otrans,
> > "JobOperSearchAdapter", recselected, showsearch, whereclause,
> > multirecords)
> >
> >
> > if(recselected = true) then
> >
> > txtepicustom9.text = jobnum.tables(0).rows(0)("AssemblySeq")
> > txtepicustom10.text = jobnum.tables(0).rows(0)("OpCode")
> >
> > else
> >
> > otrans.cleardatasets()
> >
> > End if
> >
> >
> >
> > end sub
> >
> > I am thoroughly confused and if anyone knows how to keep the
> > information in the 3rd text box there, please let me know!
> >
> >
> >
> >
> >
########################################################################
> > Attention:
> > This email message is privileged and confidential. If you are not the
> > intended recipient please delete the message and notify the sender.
> > Any views or opinions presented are solely those of the author.
> >
> > This email message has been scanned for Viruses and Content and
cleared
> > by MailMarshal SMTP
> >
> > For more information go to http://www.ramsys.com
> >
########################################################################
> >
> >
> > [Non-text portions of this message have been removed]
> >
> >
> >
> > Useful links for the Yahoo!Groups Vantage Board are: ( Note: You
must have already linked your email address to a yahoo id to enable
access. )
> > (1) To access the Files Section of our Yahoo!Group for Report
Builder and Crystal Reports and other 'goodies', please goto:
http://groups.yahoo.com/group/vantage/files/.
> > (2) To search through old msg's goto:
http://groups.yahoo.com/group/vantage/messages
> > (3) To view links to Vendors that provide Vantage services goto:
http://groups.yahoo.com/group/vantage/links
> > Yahoo! Groups Links
> >
> >
> >
> >
>
dub554 schreef:
> tell me about it!
>
> what exactly do you mean by calling the subroutine twice? do you just
> copy and past the same code underneath the first one?
>

Yes...........
Personally i call several subroutines to change data, in one occasion i
called them twice, and it worked...

If it's possible you can also add an otrans.update

txtepicustom9.text = jobnum.tables(0).rows(0)("AssemblySeq")

txtepicustom9.focus()
otrans.update()

txtepicustom10.text = jobnum.tables(0).rows(0)("OpCode")
txtepicustom10.focus()
otrans.update()


In yoyr particulair case the customtext fields have no relation to other
tables, so there shouldn't be a delayed lookup, beware of such a
relation in other cases.
And if you have a solution, please let me know, it's one of the main
troubbles I have in customizing Vantage...........

In one case i'am considering to use a keyboard macro to enter data
(entering default productgroup/Tax rate in order entry)

P.S.
We are on Vantage 8.03

> --- In vantage@yahoogroups.com, Fons van der Beek
> <fons.vanderbeek@...> wrote:
>
>> I often have the same problems as you describe, it drives me
>>
> nuts...........
>
>> 1)
>> Sometimes it helps to focus on the changed fields
>> ----------------
>>
>> txtepicustom9.text = jobnum.tables(0).rows(0)("AssemblySeq")
>> txtepicustom9.focus()
>> txtepicustom10.text = jobnum.tables(0).rows(0)("OpCode")
>> txtepicustom10.focus()
>> ----------------
>>
>> 2)
>> Sometimes calling the subroutine twice also helps .......... (i know
>>
> how crazy it sounds)
>
>>
>>
>>
>>
>>
>> Dale Schuerman schreef:
>>
>>> Be sure to log out of Vantage after saving the customization and then
>>> log back in.
>>>
>>> I have seen several strange things like that that go away when logging
>>> out.
>>>
>>>
>>>
>>> Dale Schuerman
>>> Sr. Consultant
>>>
>>> RAM Software Systems, Inc.
>>> 1701 N. Collins Blvd. - Suite 200
>>> Richardson,TX 75080
>>> (972) 669-0763
>>>
>>>
>>> ________________________________
>>>
>>> From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On
>>>
> Behalf
>
>>> Of dub554
>>> Sent: Wednesday, August 22, 2007 2:17 PM
>>> To: vantage@yahoogroups.com
>>> Subject: [Vantage] Customization Problem
>>>
>>>
>>>
>>> I have created a custom form in Vantage 8.03.
>>>
>>> I have 3 text fields. In the first field, I type in a job number and
>>> after I hit tab to move to the next field, it opens a search window.
>>>
>>> I make a selection from that search window and I have 2 pieces of
>>> information pulled from that line.
>>>
>>> In this instance, it pulls "AssemblySeq" and "OpCode".
>>>
>>> "AssemblySeq" gets pulled into the 2nd text field.
>>>
>>> "OpCode" gets pulled into the 3rd and final text field.
>>>
>>> That all works perfectly, however, I have a couple of combo boxes that
>>> I need to make a few selections from after the text fields are filled.
>>>
>>> Once I click on one of these combo boxes, for some unknown reason, the
>>> information in the 3rd text field just disappears! I've been trying
>>> to figure it out for a couple of hours but nothing I have done will
>>> fix it!
>>>
>>> Here is my code:
>>>
>>> Private Sub txtepicustom8_LostFocus(ByVal Sender As Object, ByVal Args
>>> As System.EventArgs) Handles txtEpiCustom8.LostFocus
>>>
>>> dim recselected as boolean
>>> dim showsearch as boolean = true
>>> dim whereclause as string = "JobNum = '" & txtepicustom8.text & "'"
>>> dim multirecords as boolean = true
>>>
>>> dim jobnum as dataset = searchfunctions.listlookup(otrans,
>>> "JobOperSearchAdapter", recselected, showsearch, whereclause,
>>> multirecords)
>>>
>>>
>>> if(recselected = true) then
>>>
>>> txtepicustom9.text = jobnum.tables(0).rows(0)("AssemblySeq")
>>> txtepicustom10.text = jobnum.tables(0).rows(0)("OpCode")
>>>
>>> else
>>>
>>> otrans.cleardatasets()
>>>
>>> End if
>>>
>>>
>>>
>>> end sub
>>>
>>> I am thoroughly confused and if anyone knows how to keep the
>>> information in the 3rd text box there, please let me know!
>>>
>>>
>>>
>>>
>>>
>>>
> ########################################################################
>
>>> Attention:
>>> This email message is privileged and confidential. If you are not the
>>> intended recipient please delete the message and notify the sender.
>>> Any views or opinions presented are solely those of the author.
>>>
>>> This email message has been scanned for Viruses and Content and
>>>
> cleared
>
>>> by MailMarshal SMTP
>>>
>>> For more information go to http://www.ramsys.com
>>>
>>>
> ########################################################################
>
>>> [Non-text portions of this message have been removed]
>>>
>>>
>>>
>>> Useful links for the Yahoo!Groups Vantage Board are: ( Note: You
>>>
> must have already linked your email address to a yahoo id to enable
> access. )
>
>>> (1) To access the Files Section of our Yahoo!Group for Report
>>>
> Builder and Crystal Reports and other 'goodies', please goto:
> http://groups.yahoo.com/group/vantage/files/.
>
>>> (2) To search through old msg's goto:
>>>
> http://groups.yahoo.com/group/vantage/messages
>
>>> (3) To view links to Vendors that provide Vantage services goto:
>>>
> http://groups.yahoo.com/group/vantage/links
>
>>> Yahoo! Groups Links
>>>
>>>
>>>
>>>
>>>
>
>
>
>
> Useful links for the Yahoo!Groups Vantage Board are: ( Note: You must have already linked your email address to a yahoo id to enable access. )
> (1) To access the Files Section of our Yahoo!Group for Report Builder and Crystal Reports and other 'goodies', please goto: http://groups.yahoo.com/group/vantage/files/.
> (2) To search through old msg's goto: http://groups.yahoo.com/group/vantage/messages
> (3) To view links to Vendors that provide Vantage services goto: http://groups.yahoo.com/group/vantage/links
> Yahoo! Groups Links
>
>
>
>
You could also try the event: "afterfieldchange"

dub554 schreef:
> tell me about it!
>
> what exactly do you mean by calling the subroutine twice? do you just
> copy and past the same code underneath the first one?
>
> --- In vantage@yahoogroups.com, Fons van der Beek
> <fons.vanderbeek@...> wrote:
>
>> I often have the same problems as you describe, it drives me
>>
> nuts...........
>
>> 1)
>> Sometimes it helps to focus on the changed fields
>> ----------------
>>
>> txtepicustom9.text = jobnum.tables(0).rows(0)("AssemblySeq")
>> txtepicustom9.focus()
>> txtepicustom10.text = jobnum.tables(0).rows(0)("OpCode")
>> txtepicustom10.focus()
>> ----------------
>>
>> 2)
>> Sometimes calling the subroutine twice also helps .......... (i know
>>
> how crazy it sounds)
>
>>
>>
>>
>>
>>
>> Dale Schuerman schreef:
>>
>>> Be sure to log out of Vantage after saving the customization and then
>>> log back in.
>>>
>>> I have seen several strange things like that that go away when logging
>>> out.
>>>
>>>
>>>
>>> Dale Schuerman
>>> Sr. Consultant
>>>
>>> RAM Software Systems, Inc.
>>> 1701 N. Collins Blvd. - Suite 200
>>> Richardson,TX 75080
>>> (972) 669-0763
>>>
>>>
>>> ________________________________
>>>
>>> From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On
>>>
> Behalf
>
>>> Of dub554
>>> Sent: Wednesday, August 22, 2007 2:17 PM
>>> To: vantage@yahoogroups.com
>>> Subject: [Vantage] Customization Problem
>>>
>>>
>>>
>>> I have created a custom form in Vantage 8.03.
>>>
>>> I have 3 text fields. In the first field, I type in a job number and
>>> after I hit tab to move to the next field, it opens a search window.
>>>
>>> I make a selection from that search window and I have 2 pieces of
>>> information pulled from that line.
>>>
>>> In this instance, it pulls "AssemblySeq" and "OpCode".
>>>
>>> "AssemblySeq" gets pulled into the 2nd text field.
>>>
>>> "OpCode" gets pulled into the 3rd and final text field.
>>>
>>> That all works perfectly, however, I have a couple of combo boxes that
>>> I need to make a few selections from after the text fields are filled.
>>>
>>> Once I click on one of these combo boxes, for some unknown reason, the
>>> information in the 3rd text field just disappears! I've been trying
>>> to figure it out for a couple of hours but nothing I have done will
>>> fix it!
>>>
>>> Here is my code:
>>>
>>> Private Sub txtepicustom8_LostFocus(ByVal Sender As Object, ByVal Args
>>> As System.EventArgs) Handles txtEpiCustom8.LostFocus
>>>
>>> dim recselected as boolean
>>> dim showsearch as boolean = true
>>> dim whereclause as string = "JobNum = '" & txtepicustom8.text & "'"
>>> dim multirecords as boolean = true
>>>
>>> dim jobnum as dataset = searchfunctions.listlookup(otrans,
>>> "JobOperSearchAdapter", recselected, showsearch, whereclause,
>>> multirecords)
>>>
>>>
>>> if(recselected = true) then
>>>
>>> txtepicustom9.text = jobnum.tables(0).rows(0)("AssemblySeq")
>>> txtepicustom10.text = jobnum.tables(0).rows(0)("OpCode")
>>>
>>> else
>>>
>>> otrans.cleardatasets()
>>>
>>> End if
>>>
>>>
>>>
>>> end sub
>>>
>>> I am thoroughly confused and if anyone knows how to keep the
>>> information in the 3rd text box there, please let me know!
>>>
>>>
>>>
>>>
>>>
>>>
> ########################################################################
>
>>> Attention:
>>> This email message is privileged and confidential. If you are not the
>>> intended recipient please delete the message and notify the sender.
>>> Any views or opinions presented are solely those of the author.
>>>
>>> This email message has been scanned for Viruses and Content and
>>>
> cleared
>
>>> by MailMarshal SMTP
>>>
>>> For more information go to http://www.ramsys.com
>>>
>>>
> ########################################################################
>
>>> [Non-text portions of this message have been removed]
>>>
>>>
>>>
>>> Useful links for the Yahoo!Groups Vantage Board are: ( Note: You
>>>
> must have already linked your email address to a yahoo id to enable
> access. )
>
>>> (1) To access the Files Section of our Yahoo!Group for Report
>>>
> Builder and Crystal Reports and other 'goodies', please goto:
> http://groups.yahoo.com/group/vantage/files/.
>
>>> (2) To search through old msg's goto:
>>>
> http://groups.yahoo.com/group/vantage/messages
>
>>> (3) To view links to Vendors that provide Vantage services goto:
>>>
> http://groups.yahoo.com/group/vantage/links
>
>>> Yahoo! Groups Links
>>>
>>>
>>>
>>>
>>>
>
>
>
>
> Useful links for the Yahoo!Groups Vantage Board are: ( Note: You must have already linked your email address to a yahoo id to enable access. )
> (1) To access the Files Section of our Yahoo!Group for Report Builder and Crystal Reports and other 'goodies', please goto: http://groups.yahoo.com/group/vantage/files/.
> (2) To search through old msg's goto: http://groups.yahoo.com/group/vantage/messages
> (3) To view links to Vendors that provide Vantage services goto: http://groups.yahoo.com/group/vantage/links
> Yahoo! Groups Links
>
>
>
>
Are the text boxes bound to a dataview? If so, you may need to notify
the dataview that the data has changed.

Bernie.

--- In vantage@yahoogroups.com, "dub554" <mebarron@...> wrote:
>
> I have created a custom form in Vantage 8.03.
>
> I have 3 text fields. In the first field, I type in a job number and
> after I hit tab to move to the next field, it opens a search window.
>
> I make a selection from that search window and I have 2 pieces of
> information pulled from that line.
>
> In this instance, it pulls "AssemblySeq" and "OpCode".
>
> "AssemblySeq" gets pulled into the 2nd text field.
>
> "OpCode" gets pulled into the 3rd and final text field.
>
> That all works perfectly, however, I have a couple of combo boxes
that
> I need to make a few selections from after the text fields are
filled.
>
> Once I click on one of these combo boxes, for some unknown reason,
the
> information in the 3rd text field just disappears! I've been trying
> to figure it out for a couple of hours but nothing I have done will
> fix it!
>
> Here is my code:
>
> Private Sub txtepicustom8_LostFocus(ByVal Sender As Object, ByVal
Args
> As System.EventArgs) Handles txtEpiCustom8.LostFocus
>
> dim recselected as boolean
> dim showsearch as boolean = true
> dim whereclause as string = "JobNum = '" & txtepicustom8.text
& "'"
> dim multirecords as boolean = true
>
>
> dim jobnum as dataset = searchfunctions.listlookup(otrans,
> "JobOperSearchAdapter", recselected, showsearch, whereclause,
> multirecords)
>
>
> if(recselected = true) then
>
> txtepicustom9.text = jobnum.tables(0).rows(0)("AssemblySeq")
> txtepicustom10.text = jobnum.tables(0).rows(0)("OpCode")
>
> else
>
> otrans.cleardatasets()
>
> End if
>
>
>
> end sub
>
>
>
> I am thoroughly confused and if anyone knows how to keep the
> information in the 3rd text box there, please let me know!
>
do you have an example in howto update the dataview?

bw2868bond schreef:
> Are the text boxes bound to a dataview? If so, you may need to notify
> the dataview that the data has changed.
>
> Bernie.
>
> --- In vantage@yahoogroups.com, "dub554" <mebarron@...> wrote:
>
>> I have created a custom form in Vantage 8.03.
>>
>> I have 3 text fields. In the first field, I type in a job number and
>> after I hit tab to move to the next field, it opens a search window.
>>
>> I make a selection from that search window and I have 2 pieces of
>> information pulled from that line.
>>
>> In this instance, it pulls "AssemblySeq" and "OpCode".
>>
>> "AssemblySeq" gets pulled into the 2nd text field.
>>
>> "OpCode" gets pulled into the 3rd and final text field.
>>
>> That all works perfectly, however, I have a couple of combo boxes
>>
> that
>
>> I need to make a few selections from after the text fields are
>>
> filled.
>
>> Once I click on one of these combo boxes, for some unknown reason,
>>
> the
>
>> information in the 3rd text field just disappears! I've been trying
>> to figure it out for a couple of hours but nothing I have done will
>> fix it!
>>
>> Here is my code:
>>
>> Private Sub txtepicustom8_LostFocus(ByVal Sender As Object, ByVal
>>
> Args
>
>> As System.EventArgs) Handles txtEpiCustom8.LostFocus
>>
>> dim recselected as boolean
>> dim showsearch as boolean = true
>> dim whereclause as string = "JobNum = '" & txtepicustom8.text
>>
> & "'"
>
>> dim multirecords as boolean = true
>>
>>
>> dim jobnum as dataset = searchfunctions.listlookup(otrans,
>> "JobOperSearchAdapter", recselected, showsearch, whereclause,
>> multirecords)
>>
>>
>> if(recselected = true) then
>>
>> txtepicustom9.text = jobnum.tables(0).rows(0)("AssemblySeq")
>> txtepicustom10.text = jobnum.tables(0).rows(0)("OpCode")
>>
>> else
>>
>> otrans.cleardatasets()
>>
>> End if
>>
>>
>>
>> end sub
>>
>>
>>
>> I am thoroughly confused and if anyone knows how to keep the
>> information in the 3rd text box there, please let me know!
>>
>>
>
>
>
>
> Useful links for the Yahoo!Groups Vantage Board are: ( Note: You must have already linked your email address to a yahoo id to enable access. )
> (1) To access the Files Section of our Yahoo!Group for Report Builder and Crystal Reports and other 'goodies', please goto: http://groups.yahoo.com/group/vantage/files/.
> (2) To search through old msg's goto: http://groups.yahoo.com/group/vantage/messages
> (3) To view links to Vendors that provide Vantage services goto: http://groups.yahoo.com/group/vantage/links
> Yahoo! Groups Links
>
>
>
>
Yes!
for me it worked!

It's a different approach you are working with the dataviews, I (and
mbarron@...) have used the screen objects.

I was told that working with the screen objects is more reliable, but
this is not true (as it turns out).
Tnx for your clear example, this made it for me very easy to use.......

Bernie Walker schreef:
> Here is what I would do:
> Use the Form Event Wizard, Select Event Type: EpiViewNotification,
> Views: OrderDtl and click the blue arrow to create the dataview that
> you can reference in code
> (you can enter it manually, but this is less typing)
>
> You can delete the Sub that the wizard placed in the code or leave it.
>
> It created the dataview you can reference as edvOrderDtl
>
> now, for example, if txtepicustom9 is bound to OrderDtl.ShortChar09
> you can use something like this to set it's value:
>
> txtepicustom9.text = jobnum.tables(0).rows(0)("AssemblySeq")
> edvOrderDtl.dataView(edvOrderDtl.Row)("ShortChar09") =
> jobnum.tables(0).rows(0)("AssemblySeq")
> edvOderDtl.Notify( New EpiNotifyArgs(SalesOrderForm, edvOrderDtl.Row,
> edvOrderDtl.Column))
>
> each time you alter a field in the dataview, use the edvOderDtl.Notify
> method so the field gets marked as changed.
>
> This way, you set the text in the texbox and you additionally modified
> the value of the field in the dataview, and you told the dataview that
> the row and column have changed.
>
> I hope this works out for you.
>
> Bernie.
>
> ------------------------------------------------------------------------
> *From:* Fons van der Beek [mailto:fons.vanderbeek@...]
> *Sent:* Thursday, August 23, 2007 2:18 AM
> *To:* Bernie Walker
> *Subject:* Re: [Vantage] Re: Customization Problem
>
> The issues I had was in the SalesOrderForm, the dataview was "OrderDtl"
>
>
> Bernie Walker schreef:
>> If you would like a detailed example I would need to know:
>> What form are you customizing and what dataview are the text boxes bound to
>> Otherwise:
>> edv.Notify( New EpiNotifyArgs(FormName, edv.Row, edv.Column))
>>
>> Where edv is the name of dataview you declared and set equal to the base form dataview and FormName is the name of the Form you are customizing.
>>
>> -----Original Message-----
>> From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On Behalf Of Fons van der Beek
>> Sent: Wednesday, August 22, 2007 6:56 PM
>> To: vantage@yahoogroups.com
>> Subject: Re: [Vantage] Re: Customization Problem
>>
>> do you have an example in howto update the dataview?
>>
>> bw2868bond schreef:
>>
>>> Are the text boxes bound to a dataview? If so, you may need to notify
>>> the dataview that the data has changed.
>>>
>>> Bernie.
>>>
>>> --- In vantage@yahoogroups.com, "dub554" <mebarron@...> wrote:
>>>
>>>
>>>> I have created a custom form in Vantage 8.03.
>>>>
>>>> I have 3 text fields. In the first field, I type in a job number and
>>>> after I hit tab to move to the next field, it opens a search window.
>>>>
>>>> I make a selection from that search window and I have 2 pieces of
>>>> information pulled from that line.
>>>>
>>>> In this instance, it pulls "AssemblySeq" and "OpCode".
>>>>
>>>> "AssemblySeq" gets pulled into the 2nd text field.
>>>>
>>>> "OpCode" gets pulled into the 3rd and final text field.
>>>>
>>>> That all works perfectly, however, I have a couple of combo boxes
>>>>
>>>>
>>> that
>>>
>>>
>>>> I need to make a few selections from after the text fields are
>>>>
>>>>
>>> filled.
>>>
>>>
>>>> Once I click on one of these combo boxes, for some unknown reason,
>>>>
>>>>
>>> the
>>>
>>>
>>>> information in the 3rd text field just disappears! I've been trying
>>>> to figure it out for a couple of hours but nothing I have done will
>>>> fix it!
>>>>
>>>> Here is my code:
>>>>
>>>> Private Sub txtepicustom8_LostFocus(ByVal Sender As Object, ByVal
>>>>
>>>>
>>> Args
>>>
>>>
>>>> As System.EventArgs) Handles txtEpiCustom8.LostFocus
>>>>
>>>> dim recselected as boolean
>>>> dim showsearch as boolean = true
>>>> dim whereclause as string = "JobNum = '" & txtepicustom8.text
>>>>
>>>>
>>> & "'"
>>>
>>>
>>>> dim multirecords as boolean = true
>>>>
>>>>
>>>> dim jobnum as dataset = searchfunctions.listlookup(otrans,
>>>> "JobOperSearchAdapter", recselected, showsearch, whereclause,
>>>> multirecords)
>>>>
>>>>
>>>> if(recselected = true) then
>>>>
>>>> txtepicustom9.text = jobnum.tables(0).rows(0)("AssemblySeq")
>>>> txtepicustom10.text = jobnum.tables(0).rows(0)("OpCode")
>>>>
>>>> else
>>>>
>>>> otrans.cleardatasets()
>>>>
>>>> End if
>>>>
>>>>
>>>>
>>>> end sub
>>>>
>>>>
>>>>
>>>> I am thoroughly confused and if anyone knows how to keep the
>>>> information in the 3rd text box there, please let me know!
>>>>
>>>>
>>>>
>>> Useful links for the Yahoo!Groups Vantage Board are: ( Note: You must
>>> have already linked your email address to a yahoo id to enable access.
>>> )
>>> (1) To access the Files Section of our Yahoo!Group for Report Builder and Crystal Reports and other 'goodies', please goto: http://groups.yahoo.com/group/vantage/files/.
>>> (2) To search through old msg's goto:
>>> http://groups.yahoo.com/group/vantage/messages
>>> (3) To view links to Vendors that provide Vantage services goto:
>>> http://groups.yahoo.com/group/vantage/links
>>> Yahoo! Groups Links
>>>
>>>
>>>
>>>
>>>
>>
>>
>>
>> Useful links for the Yahoo!Groups Vantage Board are: ( Note: You must have already linked your email address to a yahoo id to enable access. )
>> (1) To access the Files Section of our Yahoo!Group for Report Builder and Crystal Reports and other 'goodies', please goto: http://groups.yahoo.com/group/vantage/files/.
>> (2) To search through old msg's goto: http://groups.yahoo.com/group/vantage/messages
>> (3) To view links to Vendors that provide Vantage services goto: http://groups.yahoo.com/group/vantage/links
>> Yahoo! Groups Links
>>
>>
>>
>>
>



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

I used the advice about the focus() before I assigned a value to that
field and it solved my problems. I'll probably keep it that way and if
it starts to act up, I'll definitely be implementing Bernie's strategy.

Thanks for both inputs.

________________________________

From: Fons van der Beek [mailto:fons.vanderbeek@...]
Sent: Thursday, August 23, 2007 7:27 AM
To: Bernie Walker
Cc: vantage@yahoogroups.com; Matt Barron
Subject: Re: [Vantage] Re: Customization Problem


Yes!
for me it worked!

It's a different approach you are working with the dataviews, I (and
mbarron@...) have used the screen objects.

I was told that working with the screen objects is more reliable, but
this is not true (as it turns out).
Tnx for your clear example, this made it for me very easy to use.......

Bernie Walker schreef:

Here is what I would do:
Use the Form Event Wizard, Select Event Type:
EpiViewNotification, Views: OrderDtl and click the blue arrow to create
the dataview that you can reference in code
(you can enter it manually, but this is less typing)

You can delete the Sub that the wizard placed in the code or
leave it.

It created the dataview you can reference as edvOrderDtl

now, for example, if txtepicustom9 is bound to
OrderDtl.ShortChar09 you can use something like this to set it's value:

txtepicustom9.text = jobnum.tables(0).rows(0)("AssemblySeq")
edvOrderDtl.dataView(edvOrderDtl.Row)("ShortChar09") =
jobnum.tables(0).rows(0)("AssemblySeq")
edvOderDtl.Notify( New EpiNotifyArgs(SalesOrderForm,
edvOrderDtl.Row, edvOrderDtl.Column))

each time you alter a field in the dataview, use the
edvOderDtl.Notify method so the field gets marked as changed.

This way, you set the text in the texbox and you additionally
modified the value of the field in the dataview, and you told the
dataview that the row and column have changed.

I hope this works out for you.

Bernie.

________________________________

From: Fons van der Beek [mailto:fons.vanderbeek@...]
Sent: Thursday, August 23, 2007 2:18 AM
To: Bernie Walker
Subject: Re: [Vantage] Re: Customization Problem


The issues I had was in the SalesOrderForm, the dataview was
"OrderDtl"


Bernie Walker schreef:

If you would like a detailed example I would need to
know:
What form are you customizing and what dataview are the
text boxes bound to
Otherwise:
edv.Notify( New EpiNotifyArgs(FormName, edv.Row,
edv.Column))

Where edv is the name of dataview you declared and set
equal to the base form dataview and FormName is the name of the Form you
are customizing.

-----Original Message-----
From: vantage@yahoogroups.com
[mailto:vantage@yahoogroups.com] On Behalf Of Fons van der Beek
Sent: Wednesday, August 22, 2007 6:56 PM
To: vantage@yahoogroups.com
Subject: Re: [Vantage] Re: Customization Problem

do you have an example in howto update the dataview?

bw2868bond schreef:


Are the text boxes bound to a dataview? If so,
you may need to notify
the dataview that the data has changed.

Bernie.

--- In vantage@yahoogroups.com, "dub554"
<mebarron@...> <mailto:mebarron@...> wrote:



I have created a custom form in Vantage
8.03.

I have 3 text fields. In the first
field, I type in a job number and
after I hit tab to move to the next
field, it opens a search window.

I make a selection from that search
window and I have 2 pieces of
information pulled from that line.

In this instance, it pulls "AssemblySeq"
and "OpCode".

"AssemblySeq" gets pulled into the 2nd
text field.

"OpCode" gets pulled into the 3rd and
final text field.

That all works perfectly, however, I
have a couple of combo boxes



that



I need to make a few selections from
after the text fields are



filled.



Once I click on one of these combo
boxes, for some unknown reason,



the



information in the 3rd text field just
disappears! I've been trying
to figure it out for a couple of hours
but nothing I have done will
fix it!

Here is my code:

Private Sub
txtepicustom8_LostFocus(ByVal Sender As Object, ByVal



Args



As System.EventArgs) Handles
txtEpiCustom8.LostFocus

dim recselected as boolean
dim showsearch as boolean = true
dim whereclause as string = "JobNum =
'" & txtepicustom8.text



& "'"



dim multirecords as boolean = true


dim jobnum as dataset =
searchfunctions.listlookup(otrans,
"JobOperSearchAdapter", recselected,
showsearch, whereclause,
multirecords)


if(recselected = true) then

txtepicustom9.text =
jobnum.tables(0).rows(0)("AssemblySeq")
txtepicustom10.text =
jobnum.tables(0).rows(0)("OpCode")

else

otrans.cleardatasets()

End if



end sub



I am thoroughly confused and if anyone
knows how to keep the
information in the 3rd text box there,
please let me know!




Useful links for the Yahoo!Groups Vantage Board
are: ( Note: You must
have already linked your email address to a
yahoo id to enable access.
)
(1) To access the Files Section of our
Yahoo!Group for Report Builder and Crystal Reports and other 'goodies',
please goto: http://groups.yahoo.com/group/vantage/files/.
(2) To search through old msg's goto:
http://groups.yahoo.com/group/vantage/messages
(3) To view links to Vendors that provide
Vantage services goto:
http://groups.yahoo.com/group/vantage/links
Yahoo! Groups Links









Useful links for the Yahoo!Groups Vantage Board are: (
Note: You must have already linked your email address to a yahoo id to
enable access. )
(1) To access the Files Section of our Yahoo!Group for
Report Builder and Crystal Reports and other 'goodies', please goto:
http://groups.yahoo.com/group/vantage/files/.
(2) To search through old msg's goto:
http://groups.yahoo.com/group/vantage/messages
(3) To view links to Vendors that provide Vantage
services goto: http://groups.yahoo.com/group/vantage/links
Yahoo! Groups Links









[Non-text portions of this message have been removed]
An answer to this question would solidify a multiple-month-long
project for me!

Ok, I have a custom button that once it is clicked, it opens a search
using "SerialNoAdapter" and filters the results based on a user-input
job number.

This information is saved into a dataset. Now, I need for each
individual field under the "Serial Number" column to be saved as a
different child under the parent.

Here is my current code for the button click event:

Private Sub btnEpiCustom3_Click(ByVal Sender As Object, ByVal Args As
System.EventArgs) Handles btnEpiCustom3.Click

'//variable definitions
dim recselected as boolean
dim showsearch as boolean = false
dim whereclause as string = "JobNum = '" & txtepicustom8.text
&"'"
dim multirecords as boolean = true
dim i as integer = 0

'//opens a serial number search window based on the
user-input job number
dim srlnum as dataset = searchfunctions.listlookup(otrans,
"SerialNoAdapter", recselected, showsearch, whereclause, multirecords)

messagebox.show(srlnum.tables(0).rows.count(), "Number of
rows in DataSet")

while i < srlnum.tables(0).rows.count()
otrans.getnewchild()
messagebox.show(i, "<-- current row")
txtepicustom13.focus()
txtepicustom13.text =
srlnum.tables(0).rows(i)("SerialNumber")
messagebox.show(txtepicustom13.text, "<-- current sr num")
SendKeys.Send("{F10}")
i=i+1
end while

End Sub


F10 is linked to a Hot Key that will save the child. However, it
still does not save the child when it is in the loop, only if I do it
entry by entry will it save it.

In addition, i=2, it says it cant find the row in the database when I
can manually enter i=2 and it will give me the information I want.

This is frustrating and refuse to call epicor support to get the
general run-around...
try using "otrans.update()" instead of SendKeys.Send.............

Greetz
Fons


dub554 schreef:
> An answer to this question would solidify a multiple-month-long
> project for me!
>
> Ok, I have a custom button that once it is clicked, it opens a search
> using "SerialNoAdapter" and filters the results based on a user-input
> job number.
>
> This information is saved into a dataset. Now, I need for each
> individual field under the "Serial Number" column to be saved as a
> different child under the parent.
>
> Here is my current code for the button click event:
>
> Private Sub btnEpiCustom3_Click(ByVal Sender As Object, ByVal Args As
> System.EventArgs) Handles btnEpiCustom3.Click
>
> '//variable definitions
> dim recselected as boolean
> dim showsearch as boolean = false
> dim whereclause as string = "JobNum = '" & txtepicustom8.text
> &"'"
> dim multirecords as boolean = true
> dim i as integer = 0
>
> '//opens a serial number search window based on the
> user-input job number
> dim srlnum as dataset = searchfunctions.listlookup(otrans,
> "SerialNoAdapter", recselected, showsearch, whereclause, multirecords)
>
> messagebox.show(srlnum.tables(0).rows.count(), "Number of
> rows in DataSet")
>
> while i < srlnum.tables(0).rows.count()
> otrans.getnewchild()
> messagebox.show(i, "<-- current row")
> txtepicustom13.focus()
> txtepicustom13.text =
> srlnum.tables(0).rows(i)("SerialNumber")
> messagebox.show(txtepicustom13.text, "<-- current sr num")
> SendKeys.Send("{F10}")
> i=i+1
> end while
>
> End Sub
>
>
> F10 is linked to a Hot Key that will save the child. However, it
> still does not save the child when it is in the loop, only if I do it
> entry by entry will it save it.
>
> In addition, i=2, it says it cant find the row in the database when I
> can manually enter i=2 and it will give me the information I want.
>
> This is frustrating and refuse to call epicor support to get the
> general run-around...
>
>
>
>
> Useful links for the Yahoo!Groups Vantage Board are: ( Note: You must have already linked your email address to a yahoo id to enable access. )
> (1) To access the Files Section of our Yahoo!Group for Report Builder and Crystal Reports and other 'goodies', please goto: http://groups.yahoo.com/group/vantage/files/.
> (2) To search through old msg's goto: http://groups.yahoo.com/group/vantage/messages
> (3) To view links to Vendors that provide Vantage services goto: http://groups.yahoo.com/group/vantage/links
> Yahoo! Groups Links
>
>
>
>
It just gives me the same problem and does not save the child table.

-----Original Message-----
From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On Behalf
Of Fons van der Beek
Sent: Tuesday, September 11, 2007 2:27 PM
To: vantage@yahoogroups.com
Subject: Re: [Vantage] Customization Problem

try using "otrans.update()" instead of SendKeys.Send.............

Greetz
Fons

dub554 schreef:
> An answer to this question would solidify a multiple-month-long
> project for me!
>
> Ok, I have a custom button that once it is clicked, it opens a search
> using "SerialNoAdapter" and filters the results based on a user-input
> job number.
>
> This information is saved into a dataset. Now, I need for each
> individual field under the "Serial Number" column to be saved as a
> different child under the parent.
>
> Here is my current code for the button click event:
>
> Private Sub btnEpiCustom3_Click(ByVal Sender As Object, ByVal Args As
> System.EventArgs) Handles btnEpiCustom3.Click
>
> '//variable definitions
> dim recselected as boolean
> dim showsearch as boolean = false
> dim whereclause as string = "JobNum = '" & txtepicustom8.text &"'"
> dim multirecords as boolean = true
> dim i as integer = 0
>
> '//opens a serial number search window based on the user-input job
> number dim srlnum as dataset = searchfunctions.listlookup(otrans,
> "SerialNoAdapter", recselected, showsearch, whereclause, multirecords)
>
> messagebox.show(srlnum.tables(0).rows.count(), "Number of rows in
> DataSet")
>
> while i < srlnum.tables(0).rows.count()
> otrans.getnewchild()
> messagebox.show(i, "<-- current row")
> txtepicustom13.focus()
> txtepicustom13.text =
> srlnum.tables(0).rows(i)("SerialNumber")
> messagebox.show(txtepicustom13.text, "<-- current sr num")
> SendKeys.Send("{F10}")
> i=i+1
> end while
>
> End Sub
>
>
> F10 is linked to a Hot Key that will save the child. However, it still

> does not save the child when it is in the loop, only if I do it entry
> by entry will it save it.
>
> In addition, i=2, it says it cant find the row in the database when I
> can manually enter i=2 and it will give me the information I want.
>
> This is frustrating and refuse to call epicor support to get the
> general run-around...
>
>
>
>
> Useful links for the Yahoo!Groups Vantage Board are: ( Note: You must
> have already linked your email address to a yahoo id to enable access.

> )
> (1) To access the Files Section of our Yahoo!Group for Report Builder
> and Crystal Reports and other 'goodies', please goto:
> http://groups.yahoo.com/group/vantage/files/.
> <http://groups.yahoo.com/group/vantage/files/.>
> (2) To search through old msg's goto:
> http://groups.yahoo.com/group/vantage/messages
> <http://groups.yahoo.com/group/vantage/messages>
> (3) To view links to Vendors that provide Vantage services goto:
> http://groups.yahoo.com/group/vantage/links
> <http://groups.yahoo.com/group/vantage/links>
> Yahoo! Groups Links
>
>
>
>