Perguntas Rotina automatica

Galera, boa tarde!

Estou tentando chamar a MATA410 quando eu aciono um botao.

DEFINE MSDIALOG oDlg TITLE "Consulta Pedido" FROM 000,000 TO 100,200 PIXEL
@ 010, 010 SAY "Deseja Visualizar a lista de pedidos?" SIZE 100,100 OF oDlg PIXEL
DEFINE SBUTTON FROM 030, 010 TYPE 1 ACTION (nOpca := U_MATA410() ) ENABLE OF oDlg
DEFINE SBUTTON FROM 030, 040 TYPE 2 ACTION (nOpca := 2, oDlg:End()) ENABLE OF oDlg
ACTIVATE MSDIALOG oDlg CENTERED

Só que está dando erro, já adc no projeto, mas nao consigo chamar a funcao.

Alguem sabe?
Desde já agradeco!

Eu acho que é a funcao MSEXECAUTO()
Mas nao sei utiliza-la, alguem sabe ?

Consegui galera, segue ae como usei o MsExecAuto()


DEFINE MSDIALOG oDlg TITLE "Consulta Pedido" FROM 000,000 TO 100,200 PIXEL // FROM TO PIXEL = Tamanho da janela. Ex: de 000 até 600, 000 até 800
@ 010, 010 SAY "Deseja Visualizar a lista de pedidos?" SIZE 100,100 OF oDlg PIXEL
DEFINE SBUTTON FROM 030, 010 TYPE 1 ACTION (nOpca := MsExecAuto(Mata410()) ) ENABLE OF oDlg
DEFINE SBUTTON FROM 030, 040 TYPE 2 ACTION (nOpca := 2, oDlg:End()) ENABLE OF oDlg
ACTIVATE MSDIALOG oDlg CENTERED

Cara, nunca tinha visto a utilização do ExecAuto dessa forma...

Acho que para chamar a rotina vc poderia simplesmente chamá-la pelo nome:

DEFINE SBUTTON FROM 030, 010 TYPE 1 ACTION (nOpca := Mata410()) ENABLE OF oDlg

Utilizo ExecAuto para realizar as operações padrões (Incluir/Alterar/Excluir) automaticamente.
Exemplo:
MSExecAuto({|x, y, z| Mata410(x, y, z)}, aCabec, aItens, nOpc)

O vetor aCabec deve conter os dados do cabeçalho do pedido (pelo menos os campos obrigatórios).
A matriz aItens deve conter os itens do pedido.
A variável nOpc deve conter uma das seguinte opções: 3-Inclusão, 4-Alteração, 5-Exclusão

Att.

Everton