StrataFrame Forum » StrataFrame Application Framework - V1 » WinForms (How do I?) » Detect new record in a form

Detect new record in a form

Tiong Diu King — Thu, 23 Sep 2010 19:25:22 GMT

Hi Ivan,

In the SF Maintenance form, How do we know the current form's record is new and then return me boolean ?

Please advice

RE: Detect new record in a form

Ivan George Borges — Thu, 23 Sep 2010 19:25:22 GMT

You are welcome, Tiong. :cool:

RE: Detect new record in a form

Tiong Diu King — Thu, 23 Sep 2010 19:10:39 GMT

Hi Ivan,

I did it with your solution.

Thanks

RE: Detect new record in a form

Ivan George Borges — Thu, 23 Sep 2010 10:21:44 GMT

You should test you BO's editing state. As in:

[codesnippet]    If YourBO.EditingState = MicroFour.StrataFrame.Business.BusinessEditingState.Adding Then
        Textbox1.Text = modEmployee.careerhis_sequence_increment(BO_hretCareerHis1.iChsEmployee_FK)
    End If
[/codesnippet]

Or you can use the BO's EditingStateChanged event and set your isnew property:

[codesnippet]    Private Sub YourBO_EditingStateChanged(ByVal e As MicroFour.StrataFrame.Business.EditingStateChangedEventArgs) _
        Handles YourBO.EditingStateChanged

        If e.EditingState = MicroFour.StrataFrame.Business.BusinessEditingState.Adding Then
            isnew = True
        Else
            isnew = False
        End If

    End Sub
[/codesnippet]

RE: Detect new record in a form

Tiong Diu King — Thu, 23 Sep 2010 08:43:10 GMT

Hi Ivan,

Your solution still can't work when i test it. I did it with my own solution and please advice

Private Sub ComboBox1_Validated(ByVal sender As Object, ByVal e As System.EventArgs) Handles ComboBox1.Validated
        If isnew = True Then
            Textbox1.Text = modEmployee.careerhis_sequence_increment(BO_hretCareerHis1.iChsEmployee_FK)
        End If

        'If MicroFour.StrataFrame.Business.BusinessEditingState.Adding Then
        '    Textbox1.Text = modEmployee.careerhis_sequence_increment(BO_hretCareerHis1.iChsEmployee_FK)
        'End If
    End Sub

    Public Property isnew() As Boolean
        Get
            Return x
        End Get
        Set(ByVal Value As Boolean)
            x = Value
        End Set
    End Property

    Private Sub MaintenanceFormToolStrip1_ItemClicked(ByVal sender As Object, ByVal e As System.Windows.Forms.ToolStripItemClickedEventArgs) Handles MaintenanceFormToolStrip1.ItemClicked
        If e.ClickedItem.Text = "New" Then
            isnew = True
        Else
            isnew = False
        End If
    End Sub

Thanks

RE: Detect new record in a form

Tiong Diu King — Thu, 23 Sep 2010 08:29:04 GMT

Hi Ivan,

You had help me again with your solution.

Thanks

RE: Detect new record in a form

Ivan George Borges — Thu, 23 Sep 2010 08:21:01 GMT

Hi Tiong.

Have a look at the BO's EditingState property.

EditingState Property

All StrataFrame business objects have an EditingState property. This property indicates the current state of the business object, and there are three valid states:

Idle - When a business object is not in Add or Edit mode, it is in an idle state. When bound to controls and the editing state are managed by StrataFrame, the fields bound to a business object in this state will be disabled.
Adding - The current row within the business object is new. Additionally, all fields bound to the business object, when managed by StrataFrame, will be enabled.
Editing - The current row within the business object is an existing record that is being modified. All fields bound to the business object, when managed by StrataFrame, will be enabled.