Perguntas Usar "Conhecimento" rotina personalizada

Moçada bom dia.

Não sei se já está funcionando ae...
Mas fizemos assim para o pedido de compra:

o q o fonte faz:

após confirmar a inclusão do pedido de compra, o sistema apresenta a mensagem se quer ou nao incluir banco de conhecimento.


#INCLUDE "PROTHEUS.CH"
#include "rwmake.ch"


USER FUNCTION MT120GOK()

Local _cnum := PARAMIXB[1]
Local _lInclui := PARAMIXB[2]

If !_lInclui

return

endif

If MsgYesNo("Deseja adicionar Banco de Conhecimento?")


MsDocument("SC7", SC7->(RECNO()), 4)
Endif

Return


Resolveu aqui.

Espero ter ajudado.