Árvore de páginas

Ponto de entrada que realiza validações ao confirmar Entrada/Saída através do Controle de Portaria (MNTA985)

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

MNTA985

Portaria

Rotina(s) envolvida(s)

Nome Técnico

MNTA9857

Ponto de Entrada

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos


Ponto de Entrada

Descrição:

Ponto de entrada executado na rotina de Controle de Portaria (MNTA985) que permite realizar o reporte de contador específico

Programa Fonte:

MNTA985.prw
Localização:SIGAMNT: Atualizações/Controle de Oficina/Controle de Portaria/Portaria

Função:

MNTA9857()
Parâmetros:

Nome

Tipo

Descrição

ParamIXB[1]LógicoIndica se é uma entrada
ParamIXB[2]LógicoIndica se é uma saída
ParamIXB[3]ArrayInformações referentes ao veículo selecionado, sendo:

[1] - Empresa;

[2] - Filial;

[3] - Código.




Retorno:

Nome

Tipo

Descrição

Obrigatório

lRetLógicoRetorna verdadeiro (.T.) ao confirmar a gravação, caso contrário, retorna falso (.F.)X
Exemplo do Ponto de Entrada MNTA9857()
#Include 'Protheus.ch'

 User Function MNTA9857()
 
	Local lEntra := ParamIXB[1]
	Local lSai := ParamIXB[2]
	Local aInfo := aClone(ParamIXB[3])
	Local lRetorno := .T.

	//Mensagens em tela para Entrada/Saída de Veículos na aba Frota.
	If lEntra //Caso seja entrada de veículo.
		If !MsgYesNo("Ponto de Entrada MNTA9857 para gravação de reporte de contador específico!")
			lRetorno := .F.
		EndIf
	ElseIf lSai //Caso seja saída de veículo.
		If !MsgYesNo("Ponto de Entrada MNTA9857 para gravação de reporte de contador específico!")
			lRetorno := .F.
		EndIf
	EndIf

Return lRetorno