... Pr. de Lista',; 'Laboratorio' } ; ARRAY aPedido REDEFINE BTNBMP oBtn RESOURCE 'b_xbasura' ID 4017 OF oDlg ; ACTION (Sound(),aPedido:={{0,'','',0,0,0,0,0,0,0} },; oBrwPed:SetArray(aPedido),; oBrwPed:Refresh(),; oBrwPed:aSelected:={},; oBrwPed:aCols[2]:cFooter:=0,oBrwPed:maketotals()) ...