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

VisualizaF1("Numero_Programacao, Data_Programacao,"+
             "Destino_Producao, Nome Fantasia EmitDest, Situacao_Programacao, Observacoes","Nome Fantasia EmitDest")

Window GetAttributes GetWindow() To WinArray
WinArray["Title"]="** PROGRAMACAO PRODUCAO INTERNA/EXTERNA **"
Window SetAttributes GetWindow() From WinArray
 
