FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour error in five DBU
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: error in five DBU
Posted: Sun Jun 10, 2012 02:32 PM

We can post the PRG only and everone build the EXE :-)

Security essentials (built in Windows eight) does not complain, but who knows...

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 3022
Joined: Fri Oct 07, 2005 01:45 PM
Re: error in five DBU
Posted: Sun Jun 10, 2012 05:07 PM

Ah ... the culprit ... Norton Sonar

I require my clients to remove it from their computers. If you haven't paid to register a software package with Norton, Sonar removes it from the computer. I had it removing my applications because they were "not popular". That is nonsense. Most packages at least ask if you want to quarantine or remove it, but Sonar just takes it away.

A web search will display lots of complaints about this product.

I too use Microsoft Security Essentials and have not had a problem in the years since its release. Prior to that, I used Microsofts other free malware protection and also had great results.

Tim

Tim Stone
http://www.MasterLinkSoftware.com
http://www.autoshopwriter.com
timstone@masterlinksoftware.com
Using: FWH 23.10 with Harbour 3.2.0 / Microsoft Visual Studio Community 2022-24 32/64 bit
Posts: 181
Joined: Thu Apr 17, 2008 02:38 PM
Re: error in five DBU
Posted: Mon Jun 11, 2012 03:16 PM
hi all

another small error

Application
===========
Path and name: C:\dbu\fivedbu.exe (32 bits)
Size: 5,330,944 bytes
Compiler version: Harbour 3.2.0dev (Rev. 17516)
FiveWin Version: FWH 12.04
Windows version: 6.1, Build 7601 Service Pack 1

Time from start: 0 hours 0 mins 14 secs
Error occurred at: 11/06/2012, 17:03:33
Error description: Error BASE/1119 Argument error: CTOD
Args:
[ 1] = D 20/05/2010

Stack Calls
===========
Called from: => CTOD( 0 )
Called from: C:\fwteam\samples\fivedbu.prg => (b)SETEDITTYPE( 560 )
Called from: .\source\classes\XBROWSE.PRG => TXBRWCOLUMN:RUNBTNACTION( 10969 )
Called from: .\source\classes\XBROWSE.PRG => TXBRWCOLUMN:EDIT( 10481 )
Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:LDBLCLICK( 3556 )
Called from: => TWINDOW:HANDLEEVENT( 0 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1700 )
Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:HANDLEEVENT( 11632 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3153 )
Called from: => WINRUN( 0 )
Called from: .\source\classes\WINDOW.PRG => TMDIFRAME:ACTIVATE( 980 )
Called from: C:\fwteam\samples\fivedbu.prg => MAIN( 58 )

Code (fw): Select all Collapse
      row 560 original
      
     case cType == "D"
           oBrw:aCols[ 2 ]:nEditType = EDIT_BUTTON
           oBrw:aCols[ 2 ]:bEditBlock = { || If( ! Empty( oBrw:aRow[ 2 ] ) .and. ;
                                                 ! AllTrim( DtoC( oBrw:aRow[ 2 ] ) ) == "/  /",;
                                                 MsgDate( CtoD( oBrw:aRow[ 2 ] ) ),;
                                                 MsgDate( Date() ) ) }

      row 560 modifed

     case cType == "D"
           oBrw:aCols[ 2 ]:nEditType = EDIT_BUTTON
           oBrw:aCols[ 2 ]:bEditBlock = { || If( ! Empty( oBrw:aRow[ 2 ] ) .and. ;
                                                 ! AllTrim( DtoC( oBrw:aRow[ 2 ] ) ) == "/  /",;
                                                 MsgDate( oBrw:aRow[ 2 ] ),;
                                                 MsgDate( Date() ) ) }


bye
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: error in five DBU
Posted: Tue Jun 12, 2012 06:10 PM

Mauri,

Fixed, thanks! :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion