Logística - Linha Protheus - TMS - Ponto de entrada TM250EST Exclusão de Contrato do Carreteiro

Dúvida
Como implementar o ponto de entrada TM250EST Exclusão de Contrato do Carreteiro?

Ambiente
TOTVS Logística - TOTVS TMS (Linha Protheus) - Gestão de Transportes (TMS) - Todas as versões

Solução
O ponto de entrada TM250EST está localizado no fonte TMSA250 - Contrato de Carreteiro, e é executado após a exclusão do Contrato do Carreteiro.

Programa Fonte: TMSA250.PRW

Sintaxe: TM250EST - Exclusão de Contrato do Carreteiro ( [ cContrat ], [ lRet ] ) --> Nil

Parâmetros:

• cContrat
  • Tipo: Array of Record
  • Descrição: Número do Contrato excluído.
• lRet
  • Tipo: Array of Record;
  • Descrição: Verifica se ocorreu algum erro durante a exclusão.

User Function TM250Est()

Local cContrat := ParamIXB[1]
Local lRet := ParamIXB[2]

If lRet
    MsgAlert( 'O Contrato : ' + cContrat + ' foi excluido com sucesso ...', 'ATENCAO' )
Else
    MsgAlert( 'Ocorreu algum erro durante a exclusao' )
End if

Return Nil