Alaska Software Inc. - Topdown 7 bug 01 to report?
Username: Password:
AuthorTopic: Topdown 7 bug 01 to report?
Nestor G. TorresTopdown 7 bug 01 to report?
on Thu, 30 Apr 2009 13:58:37 +0200
Hi Guys,

I've recompiled the whole of the RAPS application ...and to start off with 
installed the vanilla topdown 7.
All has compiled and linked after a few tries that required adding some 
additional topdown modules and
making various changes in code.
When starting RAPS I get an error based on the following code that used to 
work...errror message
follows sample code:


********************* Create app window using Top-down function
oDlg := tdApp(cTitle,,'raised')
oDlg:icon     := 530
oDlg:close    :={|u1,u2,oDlg| 
IIf(Chk_Customer_Close_All(oDlg),enditall(oDlg) , nil) }

oDlg:create()

oDlg:drawingArea:setColorBG(tdRGB({120,140,170}))


aSize := oDlg:currentSize()

*** SetAppWindow() sets the default parent window for the application.

SetAppWindow(oDlg)

oDlg:addBar('bottom',1.2)   creates a StatusBar space below the drawing 
area


Then I get the following Error which points to addbar
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@


------------------------------------------------------------------------------
ERROR LOG of "C:\TVHS\PGM\VHS00000.exe" Date: 30/04/2009 13:31:23

Xbase++ version     : Xbase++ (R) Version 1.90.355
Operating system    : Windows XP 05.01 Build 02600 Service Pack 3
------------------------------------------------------------------------------
oError:args         :
           -> NIL
oError:canDefault   : N
oError:canRetry     : Y
oError:canSubstitute: N
oError:cargo        : NIL
oError:description  : Unknown variable
oError:filename     :
oError:genCode      :         22
oError:operation    : ROW_PX
oError:osCode       :          0
oError:severity     :          2
oError:subCode      :       2000
oError:subSystem    : BASE
oError:thread       :          1
oError:tries        :          2
------------------------------------------------------------------------------
CALLSTACK:
------------------------------------------------------------------------------
Called from TDCDLG:ADDBAR(328)
Called from MAIN(175)
Nestor G. TorresRe: Topdown 7 bug 01 to report?
on Thu, 30 Apr 2009 14:17:58 +0200
Hi Guys,

After some additional investigation I found that the appmain.prg has been 
changed ...I normally do not change this and my focus is always on the 
functions and classes update....I will now have a look at making changes in 
this area...Sorry for the false alarm.

Kind Regards,
Nestor

<Nestor G. Torres> wrote in message 
news:9361a84$b1ffa07$1672@news.alaska-software.com...
> Hi Guys,
>
> I've recompiled the whole of the RAPS application ...and to start off with 
> installed the vanilla topdown 7.
> All has compiled and linked after a few tries that required adding some 
> additional topdown modules and
> making various changes in code.
> When starting RAPS I get an error based on the following code that used to 
> work...errror message
> follows sample code:
>
>
> ********************* Create app window using Top-down function
> oDlg := tdApp(cTitle,,'raised')
> oDlg:icon     := 530
> oDlg:close    :={|u1,u2,oDlg| 
> IIf(Chk_Customer_Close_All(oDlg),enditall(oDlg) , nil) }
>
> oDlg:create()
>
> oDlg:drawingArea:setColorBG(tdRGB({120,140,170}))
>
>
> aSize := oDlg:currentSize()
>
> *** SetAppWindow() sets the default parent window for the application.
>
> SetAppWindow(oDlg)
>
> oDlg:addBar('bottom',1.2)   creates a StatusBar space below the drawing 
> area
>
>
> Then I get the following Error which points to addbar
> @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
>
>
> ------------------------------------------------------------------------------
> ERROR LOG of "C:\TVHS\PGM\VHS00000.exe" Date: 30/04/2009 13:31:23
>
> Xbase++ version     : Xbase++ (R) Version 1.90.355
> Operating system    : Windows XP 05.01 Build 02600 Service Pack 3
> ------------------------------------------------------------------------------
> oError:args         :
>           -> NIL
> oError:canDefault   : N
> oError:canRetry     : Y
> oError:canSubstitute: N
> oError:cargo        : NIL
> oError:description  : Unknown variable
> oError:filename     :
> oError:genCode      :         22
> oError:operation    : ROW_PX
> oError:osCode       :          0
> oError:severity     :          2
> oError:subCode      :       2000
> oError:subSystem    : BASE
> oError:thread       :          1
> oError:tries        :          2
> ------------------------------------------------------------------------------
> CALLSTACK:
> ------------------------------------------------------------------------------
> Called from TDCDLG:ADDBAR(328)
> Called from MAIN(175)
>
>
Ben BodensteinRe: Topdown 7 bug 01 to report?
on Tue, 08 Apr 2014 23:11:58 +0200
Yes, you need to declare row_px and col_px as PUBLIC variables.
One of those things you miss if you do not read the changes! 


On 2009/04/30 02:17 PM, Nestor G. Torres wrote:
> Hi Guys,
>
> After some additional investigation I found that the appmain.prg has been
> changed ...I normally do not change this and my focus is always on the
> functions and classes update....I will now have a look at making changes in
> this area...Sorry for the false alarm.
>
> Kind Regards,
> Nestor
>
> <Nestor G. Torres> wrote in message
> news:9361a84$b1ffa07$1672@news.alaska-software.com...
>> Hi Guys,
>>
>> I've recompiled the whole of the RAPS application ...and to start off with
>> installed the vanilla topdown 7.
>> All has compiled and linked after a few tries that required adding some
>> additional topdown modules and
>> making various changes in code.
>> When starting RAPS I get an error based on the following code that used to
>> work...errror message
>> follows sample code:
>>
>>
>> ********************* Create app window using Top-down function
>> oDlg := tdApp(cTitle,,'raised')
>> oDlg:icon     := 530
>> oDlg:close    :={|u1,u2,oDlg|
>> IIf(Chk_Customer_Close_All(oDlg),enditall(oDlg) , nil) }
>>
>> oDlg:create()
>>
>> oDlg:drawingArea:setColorBG(tdRGB({120,140,170}))
>>
>>
>> aSize := oDlg:currentSize()
>>
>> *** SetAppWindow() sets the default parent window for the application.
>>
>> SetAppWindow(oDlg)
>>
>> oDlg:addBar('bottom',1.2)   creates a StatusBar space below the drawing
>> area
>>
>>
>> Then I get the following Error which points to addbar
>> @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
>>
>>
>> ------------------------------------------------------------------------------
>> ERROR LOG of "C:\TVHS\PGM\VHS00000.exe" Date: 30/04/2009 13:31:23
>>
>> Xbase++ version     : Xbase++ (R) Version 1.90.355
>> Operating system    : Windows XP 05.01 Build 02600 Service Pack 3
>> ------------------------------------------------------------------------------
>> oError:args         :
>>            -> NIL
>> oError:canDefault   : N
>> oError:canRetry     : Y
>> oError:canSubstitute: N
>> oError:cargo        : NIL
>> oError:description  : Unknown variable
>> oError:filename     :
>> oError:genCode      :         22
>> oError:operation    : ROW_PX
>> oError:osCode       :          0
>> oError:severity     :          2
>> oError:subCode      :       2000
>> oError:subSystem    : BASE
>> oError:thread       :          1
>> oError:tries        :          2
>> ------------------------------------------------------------------------------
>> CALLSTACK:
>> ------------------------------------------------------------------------------
>> Called from TDCDLG:ADDBAR(328)
>> Called from MAIN(175)
>>
>>
>
>
Thomas BraunRe: Topdown 7 bug 01 to report?
on Wed, 09 Apr 2014 10:39:09 +0200
Ben Bodenstein wrote:

> Yes, you need to declare row_px and col_px as PUBLIC variables.
> One of those things you miss if you do not read the changes! 

I think you are a bit late, let me just highlight the important part:
 
> On 2009/04/30 02:17 PM, Nestor G. Torres wrote:
  ^^^^^^^^^^^^^


Thomas