Ponto de Entrada – MT120CPE

Exemplo do Ponto de Entrada MT120CPE.

Exemplo do Ponto de Entrada:

//Bibliotecas
#Include "Protheus.ch"

/*---------------------------------------------------------------------------------*
 | P.E.:  MT120CPE                                                                 |
 | Desc:  Setando a tecla F8 no Pedido de Compras                                  |
 | Link:  http://tdn.totvs.com/pages/releaseview.action?pageId=6085725             |
 | Obs:   Foi usado os PE MT120CPE e MT120FIM pois são os melhores encontrados     |
 |        para inclusão e limpeza das teclas F?                                    |
 *---------------------------------------------------------------------------------*/

User Function MT120CPE()
	Local lRet := .T.
	
	//Se não for inclusão
	If !INCLUI
		//Setando o F8
		Set Key VK_F8 To Alert('Tst')
	EndIf
Return lRet

Observações:

– Caso tenha dúvidas ou problemas com os exemplos, entre em contato;
– Se tiver sugestões de rotinas, pode entrar em contato;

Links:

Pesquisa no TDN

Etiquetas

Receba novidades

Seja VIP e receba novidades exclusivas por e-Mail gratuitamente.