DESVIO DA REGRA DO PLANO DE MANUTENÇÃ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
MNTA330	Plano de Manutenção

Rotina(s) envolvida(s)	Nome Técnico
MNTA330	Ponto de Entrada

Chamados Relacionados

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Ponto de Entrada

Descrição:

Ponto de Entrada que possibilita alterar regra do plano de manutenção.

Localização:

SIGAMNT: Atualizações/Plano de Manutenção/Plano

Eventos:

Plano (MNTA330)

Programa Fonte:

MNTA330.PRX

Função:

MNTA330G()

Variáveis:

Nome

Tipo

Descrição

_TIPO

caracter

Indica o tipo de controle da manutenção:

C - Contador

T - Tempo

A - Tempo/Contador

F - Contador Fixo

S - Segundo Contador

_CUMDOIS

numérico

Indica quando é controlado por contador:

1 - Primeiro contador

2 - Segundo contador

Retorno:

Nome	Tipo	Descrição	Obrigatório
lRet	Lógico	Indica se gera ordem de serviço.	Sim

#Include 'Protheus.ch'

User Function MNTA330G()

	Local _TIPO := PARAMIXB[1] // retorna o tipo de controle da manutenção
	Local _CUMDOIS := PARAMIXB[2] //retorna se tipo do contador
	

	If _TIPO == "C" .And. _CUMDOIS = 1 //Verifica se a manutenção é controlada por contador e primeiro contador 
		If _CONPROX == 0 //neste exemplo irá gerar apenas uma ordem de serviço para cada manutenção com a data atual e contador a 100
			_CONPROX := 100
			_DTPROX := dDatabase 
			Return .t.
		EndIf
	EndIf
Return .F.