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: |
| ||||||||
País(es): | Todos | ||||||||
Banco(s) de Dados: | Todos | ||||||||
Sistema(s) Operacional(is): | Todos |
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: |
|
||||||||
Retorno: |
|
#INCLUDE "PROTHEUS.CH" User Function MNTA330V() // 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
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: |
|
||||||||
Retorno: |
|
#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. // Verificao dbSelectArea("STJ") dbSetOrder(1) If dbSeek(xFilial("STJ")+cNumOS) lRet := .T. Else lRet := .F. EndIf Return lRet