If Then Statement Help

[vbplg]

I am new to this stuff, so please bear with me. I have a Clrion 5.0b app that has a browse to display a listing of items. Currently the listing is color code somehow automatically. What I need is for the listing to be color coded based off of the following:

If CUS:LoadColor='Green' Then DIS:Round='1'
ELSE
If etc.....


Could someone please help from the basics. I don't know where to start with all of this.

 

[ChrisH2]

I would try putting the code below in the embed point Browse.SetQueueRecord before the parent call.
The parent call to the base class is where the listbox columns or hotfields are written to the queue.

CASE CUS:LoadColor
OF 'GREEN'
DIS:Round = '1'
OF 'RED'
DIS:Round = '2'
OF 'BLUE'
DIS:Round = '3'
OF 'BLACK'
DIS:Round = 'C'
END

Note: This will only set the value in the listbox's queue it wont change DIS:round value in the table.

 

[vbplg]

Perfect.....That's it. It works great. I even learned some new Clarion stuff.


Thanks a lot!