Re: To Nages : delete records - Resolved !!!
Posted: Wed Jun 23, 2021 7:53 am
If I delete a record on aData then I must save the aData on dbf
from yunus.prg I saw there is
//FW_ArrayToDBF( aData, cFieldList, bProgress, lOverWrite, lRecallDeleted, bTrigger )
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?
from yunus.prg I saw there is
//FW_ArrayToDBF( aData, cFieldList, bProgress, lOverWrite, lRecallDeleted, bTrigger )
Code: Select all | Expand
if ! Empty( oBrw:aDeleted )
AEval( oBrw:aDeleted, { |a| a[ 9 ] := -a[ 9 ] } )
IIT->( FW_SaveArrayToDBF( cItemFlds, oBrw:aDeleted ) )
endifI 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?