I am moving to step by step from xHarbour to Harbour. I have compiled the below code in Harbour its gives an error but where as the same code works fine in xHarbour. I am not able find out why ? or whether Harbour supports this kind of syntax. Please help on this. Thanks in advance..!
- Code: Select all Expand view
oLovBrw:bKeyChar := < | n, f |
IF n == VK_RETURN
oGet:cText( PadR(AllTrim( oQry:FieldGet( "acct_name" ) ),50 ) )
aPartyInfo := { oQry:FieldGet( "coctr_id" ) , oQry:FieldGet( "tcs_percent" ) }
oLovWnd:END()
ENDIF
>
Thanks
Shridhar