Chamado após confirmação da exclusão, na rotina de Movimentação de Bens (MNTA470)

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Manufatura

Módulo:

SIGAMNT - Manutenção de Ativos e Gestão de Frotas

Rotina:

MNTA470 - Movimentação de Bens

Chamados Relacionados

MNG-4688

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Ponto de Entrada

Descrição:

Ponto de entrada chamado após clicar no botão Ok para confirmar a exclusão, na gravação da movimentação (TPN).

Programa Fonte:

MNTA470.prx

Função:

MNTA470()

Parâmetros:

http://tdn.totvs.com/pages/viewpage.action?pageId=208345968

Retorno:

.T. ou .F. (logico)

.T. indica que a verificação está correta, .F. indica que há algum problema e/ou não deverá prosseguir

Observação:Este ponto de entrada foi descontinuado no modelo antigo, passado a partir da versão 12.1.17 para o modelo MVC.

 


User Function MNTA470E()

    Local aParam    := PARAMIXB
    Local oObject   := ''
    Local cIdPonto  := ''
    Local cIdModel  := ''
    Local lRetorno  := .T.
    Local nOpc      := 0

    If aParam <> NIL
        oObj        	:= aParam[1]
        cIdPonto    	:= aParam[2]
        cIdModel   	 := aParam[3]
        nOpc       	 := oObj:GetOperation()

        If cIdPonto == 'MODELPOS' .And. nOpc == 5
              lRetorno := MsgYesNo("Atenção","Deseja excluir a movimentação?")
        EndIf
    EndIf

Return lRetorno