Yes, I was getting errors with this part. The AttachHed table only contains the XFileRefNum. The AssemblySeq and MtlSeq I was trying to use the JobMtl Dataview but that gave an error also. I have a BPM right now sending
out the information from the JobMtlAttch table, the only problem is you
can not send an attachment with the email template they give you.
Currently im using the file:// method to display the attachment as a
clickable link in the email body. Would much rather have it appear as an attachment so the user can view it on their phone or if they're not on
the network. Would it make more sense to execute this code after my BPM
condition is met and then I would have access to the ttJobMtlAttch
table? Or are you aware of ABL code that would allow the adding of an attachment?
________________________________
From: Waffqle <waffqle@...>
To: vantage@yahoogroups.com
Sent: Wednesday, September 7, 2011 11:42 AM
Subject: Re: [Vantage] Temporary Tables E9
    'Dim rsJobDetail As EpiDataView =
CType(oTrans.EpiDataViews("AttachHed"), EpiDataView)
    'Dim JobNum As Integer =
rsJobDetail.dataView(rsJobDetail.Row)("XFileRefNum")
    'Dim Asm As Integer =
rsJobDetail.dataView(rsJobDetail.Row)("AssemblySeq")
    'Dim MtlSeq As Integer = rsJobDetail.dataView(
rsJobDetail.Row)("MtlSeq")
That should get you the info you need. I see you've got it commented, was it
generating an error?
out the information from the JobMtlAttch table, the only problem is you
can not send an attachment with the email template they give you.
Currently im using the file:// method to display the attachment as a
clickable link in the email body. Would much rather have it appear as an attachment so the user can view it on their phone or if they're not on
the network. Would it make more sense to execute this code after my BPM
condition is met and then I would have access to the ttJobMtlAttch
table? Or are you aware of ABL code that would allow the adding of an attachment?
________________________________
From: Waffqle <waffqle@...>
To: vantage@yahoogroups.com
Sent: Wednesday, September 7, 2011 11:42 AM
Subject: Re: [Vantage] Temporary Tables E9
    'Dim rsJobDetail As EpiDataView =
CType(oTrans.EpiDataViews("AttachHed"), EpiDataView)
    'Dim JobNum As Integer =
rsJobDetail.dataView(rsJobDetail.Row)("XFileRefNum")
    'Dim Asm As Integer =
rsJobDetail.dataView(rsJobDetail.Row)("AssemblySeq")
    'Dim MtlSeq As Integer = rsJobDetail.dataView(
rsJobDetail.Row)("MtlSeq")
That should get you the info you need. I see you've got it commented, was it
generating an error?
On Wed, Sep 7, 2011 at 11:36 AM, Ted Koch <tkoch77@...> wrote:
> **
>
>
> What I'm trying to accomplish is send out an email via Outlook with the
> attachment that was added to the material and the job number, assembly, and
> material sequence the attachment was attached to. Right now I have this code
> executing when the Attachment Management form closes. It wouldn't be that
> hard except the Attachment Management form does not contain a job number or
> anything related to the job. Here is the code I have so far.
>
>Â Â Private Sub AttachmentDetailForm_Closing(ByVal sender As Object, ByVal
> args As System.ComponentModel.CancelEventArgs)
>Â Â Â Â ' Add Event Handler Code
>
>Â Â Â Â Dim answer as DialogResult
>Â Â Â Â Dim FileName, Recipient, recipientList() as string
>Â Â Â Â Dim i As Integer
>Â Â Â Â Dim opts As LaunchFormOptions = New LaunchFormOptions()
>Â Â Â Â 'textbox containing path to attachment
>
>Â Â Â Â Dim txtFileLoc as EpiTextBox =
> CType(csm.GetNativeControlReference("8aed990f-769c-4ea5-abb3-0b611fdd7c68"),EpiTextBox)
>
>
>Â Â Â Â 'ask if the user would like to email the attachment
>Â Â Â Â answer = MessageBox.Show("Would you like to email a
> notification?","E-mail
> Notification",MessageBoxButtons.YesNo,MessageBoxIcon.Question)
>
>Â Â Â Â If answer = DialogResult.Yes Then
>Â Â Â Â Â Â FileName = txtFileLoc.text
>
>Â Â Â Â 'Dim rsJobDetail As EpiDataView =
> CType(oTrans.EpiDataViews("AttachHed"), EpiDataView)
>Â Â Â Â 'Dim JobNum As Integer =
> rsJobDetail.dataView(rsJobDetail.Row)("XFileRefNum")
>Â Â Â Â 'Dim Asm As Integer =
> rsJobDetail.dataView(rsJobDetail.Row)("AssemblySeq")
>Â Â Â Â 'Dim MtlSeq As Integer =
> rsJobDetail.dataView(rsJobDetail.Row)("MtlSeq")
>
>
>Â Â Â Â Recipient = InputBox("Enter Recipient(s)" & vbCr & "Seperate
> multiple recipients with a semi-colon(;)!")
>
>Â Â Â Â recipientList = Split(Recipient, "; ")
>
>Â Â Â Â ' Create the Outlook application.
>Â Â Â Â Dim oApp As New Microsoft.Office.Interop.Outlook.Application()
>Â Â Â Â ' Create a new mail item.
>Â Â Â Â Dim oMsg As Microsoft.Office.Interop.Outlook.MailItem =
> DirectCast(oApp.CreateItem(Microsoft.Office.Interop.Outlook.OlItemType.olMailItem),
> Microsoft.Office.Interop.Outlook.MailItem)
>Â Â Â Â ' Set HTMLBody.
>Â Â Â Â 'add the body of the email
>Â Â Â Â oMsg.HTMLBody = "Hello, Ted!!"
>Â Â Â Â 'Add an attachment.
>Â Â Â Â Dim sDisplayName As [String] = "MyAttachment"
>Â Â Â Â Dim iPosition As Integer = CInt(oMsg.Body.Length) + 1
>Â Â Â Â Dim iAttachType As Integer =
> CInt(Microsoft.Office.Interop.Outlook.OlAttachmentType.olByValue)
>Â Â Â Â 'now attached the file
>Â Â Â Â Dim oAttach As Microsoft.Office.Interop.Outlook.Attachment =
> oMsg.Attachments.Add(FileName, iAttachType, iPosition, sDisplayName)
>Â Â Â Â 'Subject line
>Â Â Â Â oMsg.Subject = "Test Attachment Sending"
>Â Â Â Â ' Add a recipient.
>Â Â Â Â Dim oRecips As Microsoft.Office.Interop.Outlook.Recipients =
> DirectCast(oMsg.Recipients, Microsoft.Office.Interop.Outlook.Recipients)
>Â Â Â Â ' Change the recipient in the next line if necessary.
>Â Â Â Â Dim oRecip As Microsoft.Office.Interop.Outlook.Recipient
>Â Â Â Â For Each person As String In recipientList
>Â Â Â Â oRecip = DirectCast(oRecips.Add(person),
> Microsoft.Office.Interop.Outlook.Recipient)
>Â Â Â Â oRecip.Resolve()
>Â Â Â Â Next
>
>Â Â Â Â ' Send.
>Â Â Â Â oMsg.Send()
>Â Â Â Â ' Clean up.
>Â Â Â Â oRecip = Nothing
>Â Â Â Â oRecips = Nothing
>Â Â Â Â oMsg = Nothing
>Â Â Â Â oApp = Nothing
>Â Â 'end of try block
>
>Â Â 'end of catch
>
> 'end of Email Method
>
>
>Â Â Â Â else
>
>Â Â Â Â end if
>Â Â End Sub
>
> ________________________________
> From: Waffqle <waffqle@...>
> To: vantage@yahoogroups.com
> Sent: Wednesday, September 7, 2011 11:28 AM
> Subject: Re: [Vantage] Temporary Tables E9
>
>
> You can't access the ttTables as they only exist during the BO method call.
>
> However, once you're created an Adapter/BO you should be able to just
> GetByID the Job you're interested in and read whatever data you like. Show
> us your current code and we can probably help you sort it out.
>
> On Wed, Sep 7, 2011 at 11:15 AM, tkoch77 <tkoch77@...> wrote:
>
> > **
> >
> >
> > Is it possible to bring in temporary table data with VB or C# code? I am
> > trying to bring information from the JobMtlAttch table; so far not having
> > much luck. I run a trace and can see the data I am interested in (JobNum,
> > AssemblySeq, MtlSeq), not sure how to pull this data from this though.
> The
> > trace data below is happening during the JobEntry Update method.
> >
> > <paramDataSetChanges>
> > <paramDataSet name='cc' useDataSetNbr='0' >
> > </paramDataSet>
> > <paramDataSet name='ds' useDataSetNbr='0' >
> > <changedValue tableName='JobMtlAttch' rowState='Added' rowNum='72'
> > colName='Company' ><![CDATA[100]]></changedValue>
> > <changedValue tableName='JobMtlAttch' rowState='Added' rowNum='72'
> > colName='JobNum' ><![CDATA[000088]]></changedValue>
> > <changedValue tableName='JobMtlAttch' rowState='Added' rowNum='72'
> > colName='AssemblySeq' ><![CDATA[0]]></changedValue>
> > <changedValue tableName='JobMtlAttch' rowState='Added' rowNum='72'
> > colName='MtlSeq' ><![CDATA[70]]></changedValue>
> > <changedValue tableName='JobMtlAttch' rowState='Added' rowNum='72'
> > colName='DrawingSeq' ><![CDATA[0]]></changedValue>
> > <changedValue tableName='JobMtlAttch' rowState='Added' rowNum='72'
> > colName='XFileRefNum' ><![CDATA[0]]></changedValue>
> > <changedValue tableName='JobMtlAttch' rowState='Added' rowNum='72'
> > colName='DrawDesc' ><![CDATA[51415K45.jpg]]></changedValue>
> > <changedValue tableName='JobMtlAttch' rowState='Added' rowNum='72'
> > colName='FileName' ><![CDATA[C:\Users\Theodore
> > koch\Desktop\partpics\51415K45.jpg]]></changedValue>
> > <changedValue tableName='JobMtlAttch' rowState='Added' rowNum='72'
> > colName='PDMDocID' ><![CDATA[]]></changedValue>
> > <changedValue tableName='JobMtlAttch' rowState='Added' rowNum='72'
> > colName='DocTypeID' ><![CDATA[]]></changedValue>
> > <changedValue tableName='JobMtlAttch' rowState='Added' rowNum='72'
> > colName='RowIdent' ><![CDATA[]]></changedValue>
> > <changedValue tableName='JobMtlAttch' rowState='Added' rowNum='72'
> > colName='RowMod' ><![CDATA[A]]></changedValue>
> > <changedValue tableName='JobMtlAttch' rowState='Added' rowNum='72'
> > colName='DBRowIdent' ><![CDATA[]]></changedValue>
> > </paramDataSet>
> > </paramDataSetChanges>
> >
> > Thanks in advance,
> > Ted
> >
> >
> >
>
> --
> *Waffqle Driggers*
>
> *High End Dev, System Design, Profit Drinking
> *
> *:: 904.962.2887*
> *:: waffqle@...*
> *:: NO FAXES*
>
> *
>
> *
>
> [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/linksYahoo! Groups Links
>
> [Non-text portions of this message have been removed]
>
>Â
>
--
*Waffqle Driggers*
*High End Dev, System Design, Profit Drinking
*
*:: 904.962.2887*
*:: waffqle@...*
*:: NO FAXES*
*
*
[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/.%c2%a0
(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/linksYahoo! Groups Links
[Non-text portions of this message have been removed]