Create new Record In UD from Other Form

Works out Great for me. Thank you.



--- In vantage@yahoogroups.com, "bw2868bond" <bwalker@...> wrote:
>
> May not be the most elegant or even the best way to accomplish
but...
>
> On the tools menu open Assembly Reference Manager
> Add references for Epicor.Mfg.AD.UD03
> and Epicor.Mfg.IF.UD03
>
> '//use this code to create the adapter,
> '//connect to Business Object,
> '//Create an empty dataset:
>
> dim udAdapter As UD03Adapter = New UD03Adapter(ReceiptEntryForm)
> dim udConnected As Boolean = udAdapter.BOConnect()
> dim newUD03 as Boolean = udAdapter.GetaNewUD03()
>
> '// Assign values to fields
>
> <one line>
> udAdapter.UD03Data.Tables("UD03").Rows(0)("Key1") =
edvRcvDtl.dataView
> (0)("Character01").ToString()
> </one line>
>
> '//do the same for keys 2-5 except set them = String.Empty
> '//set any other fields to whatever you need them to be.
> '//then call
> udAdapter.Update()
> udAdapter.Dispose()
>
> This of course requires you to have already defined edvRcvDtl
>
> Good Luck
>
> If anyone has better way of doing this Please chime in...
>
> Bernie.
>
> --- In vantage@yahoogroups.com, "Michael McWilliams"
> <mmcwilliams22@> wrote:
> >
> > I am trying to Create A new records in UD03 from Receipt Entry.
Any
> > Ideas where to start? I have the FKV to UD03 I just have to
figure
> out
> > how I create a new Record where RcvDtl.Character01 will be Key1
in
> UD03.
> >
>
I am trying to Create A new records in UD03 from Receipt Entry. Any
Ideas where to start? I have the FKV to UD03 I just have to figure out
how I create a new Record where RcvDtl.Character01 will be Key1 in UD03.
In 8.0 and above, you can write a Business Object override. I create a
new UD01 with the part number as key when a new part number is created
in Part maintenance.

I think this requires the development version of Progress to compile the
override.



Hope this helps



Dale E. Schuerman

________________________________

From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On Behalf
Of Michael McWilliams
Sent: Wednesday, February 28, 2007 10:47 AM
To: vantage@yahoogroups.com
Subject: [Vantage] Create new Record In UD from Other Form



I am trying to Create A new records in UD03 from Receipt Entry. Any
Ideas where to start? I have the FKV to UD03 I just have to figure out
how I create a new Record where RcvDtl.Character01 will be Key1 in UD03.




########################################################################
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]
May not be the most elegant or even the best way to accomplish but...

On the tools menu open Assembly Reference Manager
Add references for Epicor.Mfg.AD.UD03
and Epicor.Mfg.IF.UD03

'//use this code to create the adapter,
'//connect to Business Object,
'//Create an empty dataset:

dim udAdapter As UD03Adapter = New UD03Adapter(ReceiptEntryForm)
dim udConnected As Boolean = udAdapter.BOConnect()
dim newUD03 as Boolean = udAdapter.GetaNewUD03()

'// Assign values to fields

<one line>
udAdapter.UD03Data.Tables("UD03").Rows(0)("Key1") = edvRcvDtl.dataView
(0)("Character01").ToString()
</one line>

'//do the same for keys 2-5 except set them = String.Empty
'//set any other fields to whatever you need them to be.
'//then call
udAdapter.Update()
udAdapter.Dispose()

This of course requires you to have already defined edvRcvDtl

Good Luck

If anyone has better way of doing this Please chime in...

Bernie.

--- In vantage@yahoogroups.com, "Michael McWilliams"
<mmcwilliams22@...> wrote:
>
> I am trying to Create A new records in UD03 from Receipt Entry. Any
> Ideas where to start? I have the FKV to UD03 I just have to figure
out
> how I create a new Record where RcvDtl.Character01 will be Key1 in
UD03.
>