#Include 'Protheus.ch'
User Function AF251VLO()
Local oGetDTot := paramixb[1]
Local oGetDadImp := paramixb[2]
/*
-------------------------------------------------------------------------
Call - ExecBlock( 'AF251VLO', .F., .F., {@oGetDadTot, @oGetDadImp})
Note: oGetDadosC, object of the upper tab "Complements", is private
--------------------------------------------------------------------------
*/
Alert("Entry Point Executed")
oGetDTot:aCols[1,4] := 20000
oGetDadImp:aCols[1][3]:= 10
oGetDTot:ForceRefresh()
oGetDadImp:ForceRefresh()
Return ({ oGetDTot, oGetDadImp }) |