Trecho do ponto de entrada que faz a chamada para o Ponto de Entrada que o cliente renomeia para XMT116AGR
O fonte MT116AGR.prx (pasta 0-Pontos Entrada Protheus) apenas chama a função U_MLA116GR() (fonte MLA116GR.prw, pasta Pontos Entrada do projeto Central XML), que contém a regra:
If lUsaCXml
// Depois da Gravação do CTR/CTE pela Rotina Mata116 forço a voltar a variavel para .T. para evitar o erro de fechar o dialog
If Type("l116Auto") <> "U" .And. Type("oMulti") <> "U"
l116Auto := .T.
Endif
Endif
RestArea(aAreaOld)
// Chamada para Ponto de entrada nativo do Cliente - Padrão adição da letra "X" ao nome do Ponto de entrada
If ExistBlock("XMT116AGR")
ExecBlock("XMT116AGR",.F.,.F.)
EndIf
Return
l116Auto para .T., evitando erro ao fechar o diálogo.XM_USACXML indica se a Central XML está em uso (padrão .T.).ZEXPEXML, se compilado, recebe {"MT116AGR", PARAMIXB}; retornando .F., a rotina sai sem executar a regra nem o XMT116AGR.Documentação oficial no TDN
MT116AGR - Linha Microsiga Protheus - TDN (totvs.com)
| Linha de Produto: | Microsiga Protheus |
|---|---|
| Módulo: | Compras (SIGACOM) |
| Rotina: | Conhecimento de Frete - MATA116 |
| Ponto de Entrada: | MT116AGR |
| Versões: | Advanced Protheus 5.08, Advanced Protheus 6.09, Advanced Protheus 7.10, Microsiga Protheus 8.11, Microsiga Protheus 10, Protheus 12 |
| País(es): | Todos |
| Banco(s) de Dados: | Todos |
| Sistema(s) operacional(is): | Todos |
| Descrição: | Ponto de entrada executado após a gravação do Documento de Frete (CTRC/CT-e) de compras. |
|---|---|
| Eventos: | Executado na inclusão, depois de encerrada a transação de gravação do documento e da gravação da contabilização (não é executado no TOTVS Colaboração). |
| Programa Fonte: | MATA116.PRW |
| Função: | A116Inclui |
| Sintaxe: | MT116AGR ( ) --> Nil |
| Parâmetros: | Não possui. |
| Retorno: | Nenhum. |
Exemplo:
User Function MT116AGR()
// Customizações do cliente após a gravação do documento de frete
Return