Thank you - that was missing in one of my projects. Still need more routine...

<t>Is there a known limit to the number of CASEs in a DO/CASE construct? I have a simple construct like<br/>
<br/>
DO CASE<br/>
CASE symField == #A4HHST<br/>
symClass := #HHST<br/>
(...)<br/>
ENDCASE<br/>
where the compiler crashes if I have more than 668 CASE conditions (reproducable). Since ...

<r>I hope that this is a trivial problem:<br/>
<br/>
I declare a simple codeblock like this<br/>
<br/>
aInfo[2] := {#PERSJAHR, { { {|oSrv| oSrv:FG( #PZZADNR ) }, 1, {|Jahr, AGS, PK| PK }, .f. }}}<br/>
<br/>
which will receive a class instance that has a FG method. However, the compiler throws<br ...

<r>There seems to be another issue. The scope of #DEFINE is limited to its prg. In VO it's not, so you cal set a switch for a whole app at one single point. Thus, a global compiler switch in former VO code works no more and requires deep analysis of <B><s>[b]</s>all<e>[/b]</e></B> the transported ...

<r>Hi Chris,<br/>
<br/>
in VO passing a custoim FileSpec didn't suffice to do the job since there were some aditional file()-calls within the SDK dbServer code. In XSharp I'm actually trying to pass the custom FileSpec as a first parameter, which of course compiles because at a first glance I didn't ...

<t>Thank you - especially - Array2ObjectArray is a very useful hint which suits me for many other occasions.<br/>
<br/>
The reason why I need the dirty trick (I'm telling this because maybe there is a better approach):<br/>
<br/>
We need to stick to DBFs due to a reporting software which we mußte ...

<r>In my <COLOR color="green"><s>[color=green]</s>VO Code<e>[/color]</e></COLOR> I use Sendclass to modify a SDK constructor's behaviour. This looks like this and worked fine for more than a decade:<br/>
<br/>
<COLOR color="green"><s>[color=green]</s>(this is part of my dbServer_Subclass INit ...

I'm sorry, but it seems to be an error in my callstack. If I write a 5-Liner it works; looks like it does in my code as well but logs a misleading call stack on the debug console. Please close the case.

<r>Does anyone have an idea why even a very simple instantiation of an Error subclass crashes in my code?<br/>
<br/>
class ADSError inherit Error<br/>
method @@Throw() as void pascal<br/>
local oCB as Codeblock<br/>
safedebout32( self:SubCode, self:FuncSym, self:CallFuncSym )<br/>
if !empty ...

Robert,

dank je wel!