Your code sample is OK for the DO CASE. If you have several references of the object inside the CASE, the you can use code like this:
WITH THIS
DO CASE
CASE .EventType = "A"
WITH .EventType
.Code = "S12"
...
ENDWITH
...
ENDCASE
ENDWITH
HTH
>I want to use "WITH THIS.EventType" but how do I handle the CASE .EventType? Something like .Value? Or can I not have an object.object this way?
>
>
> WITH THIS
> DO CASE
> CASE .EventType = 'A'
> .EventType.Code = 'S12'
>
>