Antonio and Rao
Just ran across this xBrowse error with Edit_Get_Button when LabrBrow() closes.. the error only happens with 1408 and not with my older version. Here is my code and the error.
Rick Lipkin
Just ran across this xBrowse error with Edit_Get_Button when LabrBrow() closes.. the error only happens with 1408 and not with my older version. Here is my code and the error.
Rick Lipkin
// labor
ADD oCol to oLbxB AT 6 HEADER 'Labor' size 50 //60
oLbxB:aCols[ 6 ]:nEditType := EDIT_GET_BUTTON
oLbxB:aCols[ 6 ]:bEditBlock := {|row, col, oCol| ;
If(oRsDetail:Fields("Inventory Type"):Value = "Labor",;
( nAmount := _LabrBrow( ;
nRepairNumber,;
aEmp,;
aTech,;
oRsDetail,;
"","","","","","R","A",oRsDetail:Fields("Unique Line"):Value ),;
oRsDetail:Fields("Price"):Value := nAmount,;
oRsDetail:Update()), MsgInfo( "Type is not Labor")) } // repair
oLbxB:aCols[ 6 ]:addbmpfile( "clockview.bmp" )
oLbxB:aCols[ 6 ]:addbmpfile( "clockadd.bmp" )
oLbxB:aCols[ 6 ]:bBmpData := { | lValue | If( oRsDetail:Fields("IsLabor"):Value = .t., 1, 2 ) }
oLbxB:aCols[ 6 ]:lBtnTransparent := .t.Application
===========
Path and name: C:\Fox\SaLite\Saw32.Exe (32 bits)
Size: 5,045,760 bytes
Compiler version: xHarbour 1.2.3 Intl. (SimpLex) (Build 20131030)
FiveWin Version: FWHX 14.08
Windows version: 5.1, Build 2600 Service Pack 3
Time from start: 0 hours 0 mins 13 secs
Error occurred at: 10/17/2014, 10:08:06
Error description: Error BASE/1004 Class: 'NIL' has no exported method: EVAL
Args:
[ 1] = U
[ 2] = O TXBRWCOLUMN
[ 3] = U
[ 4] = N 27
Stack Calls
===========
Called from: => EVAL( 0 )
Called from: .\source\classes\XBROWSE.PRG => TXBRWCOLUMN:POSTEDIT( 11948 )
Called from: .\source\classes\XBROWSE.PRG => TXBRWCOLUMN:RUNBTNACTION( 11857 )
Called from: .\source\classes\XBROWSE.PRG => (b)TXBRWCOLUMN:CREATEBUTTONS( 11218 )
Called from: btnbmp.PRG => TBTNBMP:CLICK( 522 )
Called from: btnbmp.PRG => TBTNBMP:LBUTTONUP( 752 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1723 )
Called from: btnbmp.PRG => TBTNBMP:HANDLEEVENT( 1601 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3291 )
Called from: => WINRUN( 0 )
Called from: .\source\classes\WINDOW.PRG => TMDIFRAME:ACTIVATE( 1015 )
Called from: Main.prg => MAIN( 319 )