I have, thanks. It said that refresh wasn't a part of the jobclosing
set.
I ended up creating a disconnected checkbox control and changing it's
state based on a button click as the jobhead data is changed.
Not the most direct approach but the only way I could get to work.
Thanks,
Ross.
On Sep 2, 2009, at 12:24 AM, Robert Brown <robertb_versa@...>
wrote:
set.
I ended up creating a disconnected checkbox control and changing it's
state based on a button click as the jobhead data is changed.
Not the most direct approach but the only way I could get to work.
Thanks,
Ross.
On Sep 2, 2009, at 12:24 AM, Robert Brown <robertb_versa@...>
wrote:
> Have you tried a general otrans.refresh() statement as the last
> thing you do after your updating?
>
> Rob
>
>
>
>
> ________________________________
> From: rossh777 <ross.hughes@...>
> To: vantage@yahoogroups.com
> Sent: Monday, August 31, 2009 3:33:14 PM
> Subject: [Vantage] Refresh FKV in Job Closing
>
>
> Hi All,
>
> I have a customization in Job Closing that pulls in JobHead data
> with a FKV.
>
> There is a toggle button with an onclick event that will flip the
> status of a field in JobHead.
>
> Everything works fine except the checkbox does not update until you
> exit Job Closing and restart or clear the job and enter it again.
>
> Is there a method that can be called for this checkbox/screen to
> refresh? Maybe a better way to approach this whole thing? I can't
> directly get at the JobHead table with a bound control although this
> would be ideal.
>
> The code is below.
>
> Thanks,
> Ross
> ------------ --------- ------
> Private Sub btnToggle_Click( ByVal Sender As Object, ByVal Args As
> System.EventArgs) Handles btnToggle.Click
> '// ** Place Event Handling Code Here **
>
> Dim edvJobHead As EpiDataView = CType(oTrans. EpiDataViews
> ( "JobHead" ), EpiDataView)
> Dim Ignore As Boolean = edvJobHead.dataView (edvJobHead. Row)
> ("CheckBox20 ")
> Dim JobNumber As String = edvJobHead.dataView (edvJobHead. Row)
> ("JobNum" )
> 'Messagebox. Show(Ignore)
>
> Dim JobEntryAdapter As JobEntryAdapter = New JobEntryAdapter
> ( JobClosingForm)
> JobEntryAdapter. BOConnect( )
>
> Dim JobData As Data.DataSet = JobEntryAdapter. GetData(JobNumbe r)
>
> Dim found As Boolean = JobEntryAdapter. GetByID(JobNumbe r)
>
> if (found) then
> If Ignore = True Then
> JobData.Tables( 0).Rows(0) ("Checkbox20" ) = False
> JobEntryAdapter. Update
> Else
> JobData.Tables( 0).Rows(0) ("Checkbox20" ) = True
> JobEntryAdapter. Update
> End If
> End If
>
> JobEntryAdapter. Dispose()
>
> End Sub
>
>
>
>
>
>
>
> [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
>
>
>