AW: A40 bugs V4MD

[Florian Bogeschdorfer]

I just had one occasion where at least updateAllrecords() did work. But I
could not confirm it, same bug now.

> -----Ursprüngliche Nachricht-----
> Von: valentina-bounces at lists.macserve.net 
> [mailto:valentina-bounces at lists.macserve.net] Im Auftrag von 
> Igor Gomon
> Gesendet: Mittwoch, 8. Oktober 2003 09:11
> An: Valentina Developers
> Betreff: Re: A40 bugs V4MD
> 
> Hi Florian,
> I will test this.
> 
> --
> Best regards,
> Igor Gomon
> -------------------------------------------------------------
> e-mail: giv_ua at inbox.ru
> web: http://www.paradigmasoft.com
> 
> To subscribe to the Valentina mail list go to:
> http://listserv.macserve.net/mailman/listinfo/valentina
> 
> 
> 
> ----- Original Message -----
> From: "Florian Bogeschdorfer" <fb at memedia.de>
> To: "'Valentina Developers'" <valentina at lists.macserve.net>
> Sent: Wednesday, October 08, 2003 9:58 AM
> Subject: AW: A40 bugs V4MD
> 
> 
> Igor, these are the interesting lines of the log file:
> 
> 09:56:24.282000 (2808): (584) SQL: select RecID, * from 
> KUNDENtable ORDER BY KD_ID; # of records: 8  09:56:24.292000 
> (2812): (584) CURSOR(e48b38): FirstRecord : OK  
> 09:56:24.292000 (2804): (584) CURSOR(e48b38): FirstRecord : 
> OK  09:56:28.498000 (2808): (584) ERROR #0: No error  
> 09:58:59.866000 (2808): (584) SQL: select RecID, * from Z_DAY 
> ORDER BY Z_DAY_Time; # of records: 0
> 
> This is my involved code:
> 
> 
> on resetDatabaseDay
>   repeat with i= 1 to VALcursors.count
>     VALcursors[i]=0
>   end repeat
>   x=VALmakeCursorWithAllRecordsFromTable ("KUNDENtable","KD_ID")
>   if x=0 then
>     --fehler
>     alert VALerror
>     alert "DB konnte nicht zurückgesetzt werden"
>     exit
>   else
>     y=updateAllRecords(x,[#inhouse:0,#KD_checkedInToday:0])
>     if y=1 then
>       --      alert ("Datenbank wurde zurückgesetzt")
>     else
>       alert "Datenbank konnte nicht zurückgesetzt werden"
>     end if
>     x=0
>   end if
>   x=VALmakeCursorWithAllRecordsFromTable ("Z_DAY","Z_DAY_Time")
>   if x=0 then
>     --fehler
>     alert VALerror
>     alert "DB konnte nicht zurückgesetzt werden"
>     exit
>   else
>     y=deleteAllRecords(x)
>     if y=1 then
>       alert ("Datenbank wurde zurückgesetzt")
>     else
>       alert "Datenbank konnte nicht zurückgesetzt werden"
>     end if
>     x=0
>   end if
> End
> 
> on VALmakeCursorWithAllRecordsFromTable tableName, o
>   set xCursor = new( xtra "VCursor", GetRef(VAL[#ID]), 
> "select RecID, * from "&tableName&&"ORDER BY"&&o,2,1,2)
>   if ValentinaError()<>0 then
>     VALerror=ValentinaErrorString()
>     xCursor=0
>     return 0
>   else
>     return xCursor
>   end if
> end
> 
> _______________________________________________
> Valentina mailing list
> Valentina at lists.macserve.net
> http://lists.macserve.net/mailman/listinfo/valentina
> 
> _______________________________________________
> Valentina mailing list
> Valentina at lists.macserve.net
> http://lists.macserve.net/mailman/listinfo/valentina