... FOR a := 1 to Len( aCargo ) SYSREFRESH() nContador2++ IF Upper( Alltrim(aCargo[ a,4 ])) <> "CONFIRMADO" aCargo[ a,4 ] := "PREPARADO" ENDIF IF ( nPos := Ascan( aTemp,{|x,y| x[5] == aCargo[ a,5 ] } ) ) > 0 aTemp[ nPos,7 ] += aCargo[ a,7 ] // valor aTemp[ nPos,4 ] ...