Histórico da Página
Ponto de entrada que permite adicionar validações aos processos de inclusão, alteração e exclusão de solicitações de serviço.
Características do Requisito
| Aviso |
|---|
Essa alteração foi realizada nas versões 11.8 e 12.1.17. |
Necessidade de um ponto de entrada que faça validação ao incluir ou alterar uma solicitação de serviço, não permitindo salvar se o retorno for falso.
Linha de Produto: | Microsiga Protheus. | ||||||
Segmento: | Manufatura | ||||||
Módulo: | SIGAMNT - Manutenção de Ativos e Gestão de Frotas | ||||||
Rotina: |
| ||||||
Países: | Todos. | ||||||
Bancos de Dados: | Todos. | ||||||
Sistemas Operacionais: | Todos. |
Ponto de Entrada
| Descrição: | Ponto de entrada chamado após clicar no botão Ok para confirmação para rotina de inclusão ou alteração de SS. | |||||||||||||||||||
| Programa Fonte: | MNTA280.prx / MNTSR.prw | |||||||||||||||||||
| Função: | MNTA280I() / ValidBusiness() | |||||||||||||||||||
| Localização: | Acessar o módulo Manutenção de Ativos - SIGAMNT em: Atualizações > Controle de Oficina > Solicitação de Serviço > Solicitação. | |||||||||||||||||||
| Parâmetros: |
| |||||||||||||||||||
| 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
|
| Bloco de código | ||||||
|---|---|---|---|---|---|---|
| ||||||
#Include 'Protheus.ch' User Function MNTA280I Local lRet Local lRetorno := .T. Local cError := '' Local cUser := UsrFullName( RetCodUsr() ) // Usuario Logado Local lRetornonOption := MsgYesNo("Atenção", "Deseja realmente incluir/alterar esse registro?") Return lRetornoParamIXB[1] If nOption == 3 .And. Trim( M->TQB_USUARI ) == Trim( cUser ) cError := 'Inclusão de solicitação de serviço não permitida!' EndIf Return { Empty( cError ), cError } |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas