from yunus.prg I saw there is
//FW_ArrayToDBF( aData, cFieldList, bProgress, lOverWrite, lRecallDeleted, bTrigger )
- Code: Select all Expand view
if ! Empty( oBrw:aDeleted )
AEval( oBrw:aDeleted, { |a| a[ 9 ] := -a[ 9 ] } )
IIT->( FW_SaveArrayToDBF( cItemFlds, oBrw:aDeleted ) )
endif
I tried on Tdatabase with
if ! Empty( oBrowse:aDeleted )
AEval( oBrowse:aDeleted, { |a| a[ 19 ] := -a[19 ] } )
oRigheInvoice:ArrayToDBF(oBrowse:aDeleted, cItemFlds )
endif
but not run ok
How I can to delete the records on dbf , are on oBrowse:adeleted?
