Window Resize GetWindow() To 5, 76
Window Move GetWindow() To 2, 1

VisualizaF1("Numero_Producao_Corte, Data_Producao, Numero_Programacao_Corte,"+
             "Quantidade_Produzida, Observacoes","Numero_Producao_Corte")

Window GetAttributes GetWindow() To WinArray
WinArray["Title"]="** PRODUCAO DO CORTE **"
Window SetAttributes GetWindow() From WinArray