Called from: livencli.prg => (b)LIVENCLI( 116 )
CONTROL "Check", 6900, "BorCheck", NOT WS_VISIBLE|0x00000003, 164, 16, 7, 8
CONTROL "Check", 6900, "Button", BS_AUTOCHECKBOX|WS_TABSTOP, 164, 16, 7, 8
DEFINE DIALOG oFld RESOURCE "BOXCOMU" TITLE cabe FONT oFont
REDEFINE LISTBOX oLbx FIELDS "" ID 1300 OF oFld ;
SIZES 90, 220, 50, 70, 35, 35, 35, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 60, 15 ;
HEADERS &cTituls
oLbx:bLine := {| nAt| nAt := oLbx:nAt, ;
iif( nAt > Len( aDatosBox ), Array( 18 ), ;
{ aDatosBox[ nAt, 1 ], ;
aDatosBox[ nat, 19 ], ;
Transform( aDatosBox[ nat, 20 ], p_dmil ), ;
Transform( aDatosBox[ nat, 2 ], p_cmill ), ;
Transform( aDatosBox[ nat, 21 ], '999.99' ), ;
iif( aDatosBox[ nat, 3 ] <> '0', Transform( aIva[ Val(aDatosBox[ nat,3 ] ) ],"99.99" ), ' 0.00' ), ;
Transform( aDatosBox[ nat, 4 ], p_dmil ), ;
iif( aDatosBox[ nat, 5 ], 'SI', 'NO' ), ;
iif( aDatosBox[ nat, 6 ], 'SI', 'NO' ), ;
iif( aDatosBox[ nat, 7 ], 'SI', 'NO' ), ;
iif( aDatosBox[ nat, 8 ], 'SI', 'NO' ), ;
iif( aDatosBox[ nat, 9 ], 'SI', 'NO' ), ;
iif( aDatosBox[ nat, 10 ], 'SI', 'NO' ), ;
iif( aDatosBox[ nat, 11 ], 'SI', 'NO' ), ;
iif( aDatosBox[ nat, 12 ], 'SI', 'NO' ), ;
iif( aDatosBox[ nat, 13 ], 'SI', 'NO' ), ;
iif( aDatosBox[ nat, 14 ], 'SI', 'NO' ), ;
iif( aDatosBox[ nat, 15 ], 'SI', 'NO' ), ;
iif( aDatosBox[ nat, 16 ], 'SI', 'NO' ), ;
iif( aDatosBox[ nat, 17 ], 'SI', 'NO' ) } ) }
oLbx:SetArray( aDatosBox )
oLbx:bRClicked := {| nRow, nCol, nAt| nAt := oLbx:nAt, CanviaMes( aDatosBox, nAt, nCol, oLbx ), oLbx:Refresh() }
oLbx:bEdit :={|ncol|EditCel3( oLbx,nCol,@aDatosBox,oFld,@ntotal ) }
oLbx:nClrPane := {|| iif( IsPar( oLbx:nAt ), CLR_LNOA01, CLR_LNOA02 ) }
Application
===========
Path and name: I:\Gestcdx\Contawin.exe (32 bits)
Size: 4,372,480 bytes
Compiler version: Harbour 3.2.0dev (r1506171039)
FiveWin Version: FWH 15.09
Windows version: 6.1, Build 7601 Service Pack 1
Time from start: 0 hours 0 mins 7 secs
Error occurred at: 28-10-2015, 23:43:22
Error description: Error BASE/1005 Message not found: TWBROWSE:_BEDIT
Args:
[ 1] = O TWBROWSE
Stack Calls
===========
Called from: => __ERRRT_SBASE( 0 )
Called from: ../../../tobject.prg => TWBROWSE:ERROR( 0 )
Called from: ../../../tobject.prg => (b)HBOBJECT( 0 )
Called from: ../../../tobject.prg => TWBROWSE:MSGNOTFOUND( 0 )
Called from: ../../../tobject.prg => TWBROWSE:_BEDIT( 0 )
Called from: Boxcuotas.prg => PRESENTACUOTA( 91 )
Error description: Error BASE/1005 Message not found: TWBROWSE:_BEDIT
Return to FiveWin para Harbour/xHarbour
Users browsing this forum: Antonio Linares, Google [Bot], wilsongamboa and 48 guests