Perguntas Como substituir botão padrão por uma rotina desenvolvida

Alessandro entra na rotina padrão ordem de separação e pressiona SHIFT + F6 e me passa o nome do fonte, se for em relatorios basta editar o menu SIGAFAT.XNU e substituir nesta opção pelo nome do seu programa e colocar como tipo função de usuário.

Alessandro também tenho este fonte, e analisando aqui você não vai conseguir substituir pelo que você desenvolveu, pois ele executa a função com nome fixo dentro do programa mesmo.

{STR0116 ,"ACDA100Re",0,4},; //"Impressao"

Function ACDA100Re()

No caso do Pedido de compra a gente tem o parâmetro MV_PCOMPRA aonde podemos colocar qual função será executada quando o usuário clicar em imprimir.

O Ideal mesmo é vc colocar sua rotina no menu e enviar um novo procedimento aos usuários para seguir ao menu para a impressão ao inves de clicar em imprimir.

Infelizmente não achei solução.

Descobri uma macete

Cria um ponto de entrada:

ACD100M

User Function ACD100M()

Nele vc vai enxergar o vetor aRotina

aRotina := { {STR0001 ,"AxPesqui", 0,1},; //"Pesquisar"
{STR0002 ,"ACDA100Vs",0,2},; //"Visualizar"
{STR0003 ,"ACDA100Al",0,3},; //"Alterar"
{STR0004 ,"ACDA100Et",0,5,5},; //"Estornar"
{STR0005 ,"ACDA100Gr",0,3},; //"Gerar"
{STR0116 ,"ACDA100Re",0,4},; //"Impressao"
{STR0006 ,"ACDA100Lg",0,3}} //"Legenda"

Faça o Seguinte:

User Function ACD100M()
aRotina[6,2] := "U_SEURELATORIO"
Return .t.

Faz o Teste ai.