Histórico da Página
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: | MNTA470E.prx |
Função: | MNTA470() |
| Parâmetros: | Parâmetros para utilização de PE em MVC http://tdn.totvs.com/x/cBtrD |
| 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. O nome do fonte a ser criado é MNTA470E, contudo, o nome da função a ser criada dentro do fonte deve ser MNTA470. |
| Bloco de código | ||||||
|---|---|---|---|---|---|---|
| ||||||
User Function MNTA470()
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("Deseja excluir a movimentação?", "Atenção")
EndIf
EndIf
Return lRetorno |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas