StrataFrame Forum » StrataFrame Application Framework - V1 » Business Objects and Data Access (How do I?) » One Custom Field Shows and The Other Does Not

RE: One Custom Field Shows and The Other Does Not

Terry Bottorff — Mon, 14 May 2012 22:03:33 GMT

I agree I learn more here then anything I can do.

One Custom Field Shows and The Other Does Not

Terry Bottorff — Mon, 14 May 2012 22:03:33 GMT

I have a Form where I am trying to use 2 Custom Fields. One works as it should the other does not?

I have attached a picture showing that the Custom Field shows up in the BO Visualizer and a picture showing that it does Not show up in a MessageBox nor a Bound Text box???????

Here is my Custom Field Code:

Protected Overrides Function GetCustomBindablePropertyDescriptors() As MicroFour.StrataFrame.Business.FieldPropertyDescriptor()

Return New MicroFour.StrataFrame.Business.FieldPropertyDescriptor() { _

New MicroFour.StrataFrame.Business.ReflectionPropertyDescriptor("Cowboy_Name", GetType(MyBaseRoughStockBO)), _

New MicroFour.StrataFrame.Business.ReflectionPropertyDescriptor("Cowboy_InvertedName", GetType(MyBaseRoughStockBO)), _

New MicroFour.StrataFrame.Business.ReflectionPropertyDescriptor("PRCANUM", GetType(MyBaseRoughStockBO))}

End Function

<

Browsable(False), _

BusinessFieldDisplayInEditorAttribute(), _Description("PRCA Number"), _

DesignerSerializationVisibility(DesignerSerializationVisibility.Hidden)> _

Public ReadOnly Property PRCANUM() As String

Get

' Return MyBase.RequiredFields

If Me.CurrentDataTable.Columns.Contains("Membershipcd") Then

If Not TypeOf (Me.CurrentRow.Item("membershipcd")) Is DBNull Then

Return CStr(Me.CurrentRow.Item("membershipcd")) + Me.CurrentRow.Item("membershipnumber").ToString

Else

Return ""

End If

Else

Return ""

End If

End Get

End Property

I'm Sorry I can not get the last part to format correctly? This is the Custom Field that Shows in the BO but not in the MessageBox nor the Bound Text Box?

TIA.

RE: One Custom Field Shows and The Other Does Not

Edhy Rijo — Mon, 14 May 2012 16:04:12 GMT

[quote][b]Terry Bottorff (5/14/2012)[/b][hr]Your welcome but Edhy is the real help. He's here for everyone.[/quote]
Hi Terry,

Thanks so much for the kind words, but I am simply doing what others have done for me before, in this and other communities like VFP and by the way, it is a good way to keep learning :P

RE: One Custom Field Shows and The Other Does Not

Terry Bottorff — Mon, 14 May 2012 15:44:59 GMT

Your welcome but Edhy is the real help. He's here for everyone.

RE: One Custom Field Shows and The Other Does Not

Edhy Rijo — Mon, 14 May 2012 13:41:42 GMT

You are welcome Fabian.

RE: One Custom Field Shows and The Other Does Not

Fabian R Silva, - — Mon, 14 May 2012 13:31:42 GMT

Greetings,sorry for revive this post.

I only like to say thank you Edhy and Terry for this post, I was out of ideas on how to populate a BO from a join and use a custom field to use some fk fields on a form and here you propose a good solution using the rows of the datatable. this is x1000 better than using a scalar value on each get to give to the BO value by value.

Thanks again!.

RE: One Custom Field Shows and The Other Does Not

Terry Bottorff — Mon, 02 Jan 2012 15:33:42 GMT

Well after all of this. I was getting an error every not and again so it was time to delete the whole form and start again. Even started with a little older version of the project. Everything seems to work now so I am really not sure about any of the problems I was having.

Just a bug in the night I think.

RE: One Custom Field Shows and The Other Does Not

Edhy Rijo — Mon, 02 Jan 2012 10:05:07 GMT

Hi Terry,

Glad it is working out.

RE: One Custom Field Shows and The Other Does Not

Terry Bottorff — Mon, 02 Jan 2012 09:59:42 GMT

Edhy I put a Break on the Get and I must have changed something else because it is working. I have NO IDEA why. I did delete some of my code and put some of your code into play and so I am sure I had some weird character in my code that your code fixed.

Thanks so much.

I don't believe how much time I spent chasing a mystery....!

RE: One Custom Field Shows and The Other Does Not

Edhy Rijo — Sat, 31 Dec 2011 11:03:11 GMT

Hi Terry,

So the problem is that it is not showing in a listview?

I believe my previous explanation has a lot to do because it is a calculated field as such the CFP will only contain data when the source SELECT returns the data for it. With listview it could be tricky in a sense of how you are loading its data ex ParentFormLoading VS manually loading. I love SF ListViews, but I learned in a hard way that it is a good idea to have control on when to load the data (lv.Refresh()), so in the listview Populate data settings I always use a copy data from bo and manually drop a BO instance in the form, assign it to the list view and fill this BO manually then refresh the listview.

Now if after reviewing my suggestions still you don't get it to work, please create a small VB sample project using one of the SF Sample database tables that would duplicate the issue and upload it here, I will gladly take a look and make it work or if you prefer, I can do one remote support session to take a look at the issue on hand with your project, feel free to email for connection details.

RE: One Custom Field Shows and The Other Does Not

Terry Bottorff — Sat, 31 Dec 2011 06:22:27 GMT

Op's I forgot the synch list with the CF added to it.

Could it be because it is a Calculated CF?

RE: One Custom Field Shows and The Other Does Not

Terry Bottorff — Sat, 31 Dec 2011 06:20:13 GMT

Edhy I have not put any of your code into use yet but I will but I thought I would show you some other pictures so you can see what I think is working yet not working?

The first picture is the BO visualizer that shows the CF and at least Visually they are Full. Then I show you the Synch List with text boxes and in the Synch List one of the CF show up and one of the CF shows in a bound text box but not the PRCANum in the other bound textbox. Also, then the messagebox shows blank for the me.bbpointsbo1.prcanum ......

Then I added the CF to the synch list and they all show as blanks but again Visually in the BO Visualizer they are all there?

RE: One Custom Field Shows and The Other Does Not

Edhy Rijo — Fri, 30 Dec 2011 15:38:53 GMT

Hi Terry,

Ok, if using a JOIN to get the field, then your code is OK. Basically what is happening is that when you are accessing the BO.PRCANUM, if those fields included in the JOIN are empty, then you will not get anything, this could happen when adding a new record and trying to show the BO.PRCANUM will be empty.

If you debug the code before showing the message box image, you will see the field is empty. Put a breakpoint in your property Get line and see what happen when showing the value in the message box.

On a side note, I try to distinguish my Custom Field Properties form regular BO properties by prefix them with "cfp_", also in my JOIN SELECT I name those fields with the prefix ex: SELECT membershipcd AS cfp_membershipcd or do the expression at the field level instead of the BO like SELECT (membershipcd + membershipnumber) AS cfp_PRCANUM, then in the BO CFP I use the required column as expected. I use a lot of CFPs and in some cases like when adding a new record, I need to show the value, so in the CFP GET I check for empty value and even do a search to show the correct value, here is a sample:

[codesnippet]

    <Browsable(False), _
     BusinessFieldDisplayInEditor(), _
     Description("Card Name with the Card Code."), _
     DesignerSerializationVisibility(DesignerSerializationVisibility.Hidden)> _
     Public Overridable ReadOnly Property [cfp_CardName]() As String
         ' Check to see if datatable contains the custom field in
         ' case object was filled by a method that doesn't contain the field.
         Get
             Dim columnName As String = "cfp_CardName"
             If Me.CurrentDataTable.Columns.Contains(columnName) Then
                 If Not TypeOf (Me.CurrentRow.Item(columnName)) Is DBNull Then
                     '-- In some cases the Me.CurrentRow.Item(columnName) could be empty so
                     '   lets look at the value if there is a FK_Items value
                     Dim cfpCardName As String = CStr(Me.CurrentRow.Item(columnName))
                     If String.IsNullOrEmpty(cfpCardName) And Me.Count > 0 Then
                         Using bo As New bizItems
                             bo.FillByPrimaryKey(Me.FK_Items)
                             If bo.Count > 0 Then
                                 cfpCardName = bo.ItemName
                             End If
                         End Using
                     End If
                     Return cfpCardName
                 Else
                     Return String.Empty
                 End If
             Else
                 Return String.Empty
             End If
         End Get
     End Property
[/codesnippet]

Hope that will give you an idea to help you find the issue.

P.S.
Happy new year to you too!!!!

RE: One Custom Field Shows and The Other Does Not

Terry Bottorff — Fri, 30 Dec 2011 15:19:06 GMT

I am using a Join Select to get it out of another table. It is working with the other name field and the Name field and prcanum field are both coming out of the same joined table??????

I am checking to see if it exist since that was part of a sample I saw and used one time. It will be there and I believe I already am dealing with it in the BO. Yes I do handel it in the BO so I really don't need that piece. Just left over from a copy and paste when I started using CFP.

Any other Thoughts?

Have a Great and Prosperous New Years.

RE: One Custom Field Shows and The Other Does Not

Edhy Rijo — Fri, 30 Dec 2011 14:53:46 GMT

Hi Terry,

Couple of things...

Why are you checking if "Membershipcd" exist? could it be possible that this field would not exist in this BO? or is this part of another table and you are using a JOIN SELECT to get this field?, if this is the case, then the field will only have a value when getting the data, so at the time you are using this property, it may not have any value.
When using custom field properties (CFP) that will use values of the BO fields, I prefer to use the Me.FieldName instead of the Me.CurrentRow.Item("ItemName"). Also if you set your BO properties in the BOM to deal with Null values, then you don't need to check for DBNull, only check the property value directly.