V4RB: VException??

[Ruslan Zasukhin]

On 3/5/10 11:29 PM, "Claudius Sailer" <claudius.sailer at me.com> wrote:

Hi Claudius,

> I have following Code
> 
> 
>   SQLString="SELECT RecID,Online FROM Currencies"
>   CurEx=V4RBSQLSelect(tmpDB,SQLString)
>   Ende=CurEx.RecordCount
>   
>   //Links korrigieren in Currencies
>   cmd="ALTER TABLE Currencies MODIFY COLUMN Online OBJECTPTR CONSTRAINT
> Currencies_Online__Online REFERENCES Online ON DELETE RESTRICT"
>   count=V4RBSQLExecute(tmpDB,cmd)
>   
>   for i=1 to Ende
>     CurEx.Position=i
>     cmd="UPDATE Currencies SET Online=" +
> CurEx.stringfield("Online").getstring + "where RecID=" +
> CurEx.stringfield("RecID").getstring
>     MsgBox cmd
>     count=V4RBSQLExecute(tmpDB,cmd)
>   next
> 
> 
> for fixing a problem with my Links. After ALTER TABLE all ObjectPtr-fields
> have value 0. 

Few days ago somebody have report this to mantis it seems
We consider this as bug. Should be fixed for 4.7

> So I want to rewrite the old values to the table.

Where from you will get them?

> But on the line
> CurEx.Position=i I ge tan VExeption. Does anybody knows why?

Look into exception.errNumber, err.Msg to see what error you get.

> Are Cursors destroyed by ALTER TABLE command?

Not sure. Ivan ?


-- 
Best regards,

Ruslan Zasukhin
VP Engineering and New Technology
Paradigma Software, Inc

Valentina - Joining Worlds of Information
http://www.paradigmasoft.com

[I feel the need: the need for speed]