Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 2

changes.mady.by.user Cristiano Kair

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Cristiano Kair

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

Ponto de entrada que verifica o número da Ordem de Serviço gerada pelo Plano Manutenção (MNTA330)

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

Processamento do Plano de Manutenção

Rotina(s) envolvida(s)

Nome Técnico

MNTA330V

Ponto de Entrada

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos


 

Deck of Cards
startHiddenfalse
effectDuration0.5
historyfalse
idsamples
effectTypefade
Card
Antes do Release 12.1.33
defaulttrue
id1
labelVersão Atual
Aviso

Os detalhes abaixo aplicam-se às versões posteriores ou igual à  do fonte MNTA330.PRX

Ponto de Entrada

Descrição:

Ponto de entrada executado na rotina de Processamento de Plano de Manutenção (MNTA330) que verifica o número da Ordem de Serviço. É executado quando o Plano é salvo.

Localização:

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

Programa Fonte:

MNTA330.prx

Função:

MNTA330V()

Parâmetros:
NomeTipo
cNumOS
Descrição
ParamIXB[1]CaracterNúmero da O.S. que será verificada

Retorno:

Nome

Tipo

Descrição

Obrigatório

 lRet

Lógico

Se O.S. já existe retorna verdadeiro ( .T. ), se não existe e pode ser gerada retorna falso ( .F. ) 

X

Bloco de código
titleExemplo do Ponto de Entrada MNTA330V()
#INCLUDE "PROTHEUS.CH"

User Function MNTA330V(cNumOS)

	// Retorna .T. - O.S. ja existe
	// Retorna .F. - O.S. nao existe e pode ser gerada
	Local lRet := .F.
	Local cNumOS := ParamIXB[1]
	
	// Verificao
	dbSelectArea("STJ")
	dbSetOrder(1)
	If dbSeek(xFilial("STJ")+cNumOS)
		lRet := .T.
	Else
		lRet := .F.
	EndIf
	
Return lRet
Card
Após o Release 12.1.33
id2
labelVersão Antiga
Aviso

Os detalhes abaixo aplicam-se às versões anteriores à  do fonte MNTA330.PRX

Ponto de Entrada

Descrição:

Ponto de entrada executado na rotina de Processamento de Plano de Manutenção (MNTA330) que verifica o número da Ordem de Serviço

Localização:

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

Programa Fonte:

MNTA330.prx

Função:

MNTA330V()

Parâmetros:
NomeTipo
ParamIXB[1]
Descrição
cNumOSCaracterNúmero da O.S. que será verificada
Caracter

Retorno:

Nome

Tipo

Descrição

Obrigatório

 lRet

Lógico

Se O.S. já existe retorna verdadeiro ( .T. ), se não existe e pode ser gerada retorna falso ( .F. ) 

X

Bloco de código
titleExemplo do Ponto de Entrada MNTA330V()
#INCLUDE "PROTHEUS.CH"

User Function MNTA330V(cNumOS)

	// Retorna .T. - O.S. ja existe
	// Retorna .F. - O.S. nao existe e pode ser gerada
	Local lRet := .F.
	Local cNumOS := ParamIXB[1]
	
	// Verificao
	dbSelectArea("STJ")
	dbSetOrder(1)
	If dbSeek(xFilial("STJ")+cNumOS)
		lRet := .T.
	Else
		lRet := .F.
	EndIf
	
Return lRet