Exemplo do Ponto de Entrada MT010INC.
Exemplo do Ponto de Entrada:
//Bibliotecas #Include "Protheus.ch" /*------------------------------------------------------------------------------------------------------* | P.E.: MT010INC | | Desc: Ponto de entrada após inclusão do produto | | Link: http://tdn.totvs.com/pages/releaseview.action?pageId=6087685 | *------------------------------------------------------------------------------------------------------*/ User Function MT010INC() Local aArea := GetArea() Local cRetorno := "" RecLock('SB1', .F.) B1_X_USER := RetCodUsr() SB1->(MsUnlock()) RestArea(aArea) Return
Observações:
– Caso tenha dúvidas ou problemas com os exemplos, entre em contato;
– Se tiver sugestões de rotinas, pode entrar em contato;