Linha Microsiga Protheus

Árvore de páginas

Define se deverá gravar a ordem de serviço

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Manufatura

Módulo:

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

Rotina:

Rotina

Nome Técnico

MNTA420

Ordem de Serviço Corretiva

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Ponto de Entrada

Descrição:

Ponto de Entrada chamado ao confirmar a tela que irá definir se os dados informados em tela deverão ser salvos.

Localização:

SIGAMNT: Atualizações→ Controle de Oficina → Ordens de Serviço → Corretiva

Eventos:

Ordem de Serviço Corretiva ( MNTA420.prx )

Programa Fonte:

MNTA420.prx

Função:

NG420CHK()

Retorno:

Tipo

Descrição

Obrigatório

Lógico

Define se as informações deverão ser salvas.

Sim

 

MNTA4207.prw
#Include 'Totvs.ch'

//-------------------------------------------------------------------
/*/{Protheus.doc} MNTA4207
Possibilita ao usuário definir se os dados informados são válidos 
e deverão ser gravados em base
/*/
//-------------------------------------------------------------------
User Function MNTA4207()
	
	Local aArea   := GetArea() // Salva area de trabalho
	Local lReturn := .T.

	lReturn := MsgYesNo('Deseja gravar os dados?','Atenção')
	
	RestArea( aArea ) // Retorna para area de trabalho ativa.

Return lReturn