... oGets:= Array( 05 ), aGets:= Array( 05 ) Local oBtns:= Array( 05 ) Local oBmp,oDlg1,oFont1 LOCAL lAceptar := .F. Local aCampos,aValues,aWhere, lAppend Local cStock1 :=0, oStock1 Local cStock2 :=0, oStock2 Local cStock3 :=0, oStock3 Local cStock4 :=0, oStock4 cStock1:=cTab_Art:in1_art cStock2:=cTab_Art:in2_art ...