Ponto-de-Entrada: MNTA330V - Verifica Número da Ordem de Serviço
Abrangências: | Microsiga Protheus 10 |
Versões: | Microsiga Protheus 10 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Idiomas: | Espanhol , Inglês |
Descrição:
Este Ponto de Entrada verifica se o número da Ordem de Serviço que será gerada, através do Plano de Manutenção (MNTA330), já existe na tabela STJ (Ordens de Serviço da Manutenção).
Programa Fonte
MNTA330
Sintaxe
MNTA330V - Verifica Número da Ordem de Serviço ( < cNumOS> ) --> lRet
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
cNumOS | Caracter | Número da Ordem de Serviço a verificar. | X |
Retorno
-
lRet(logico)
- Retorna .T. se a O.S. já existir.Retorna .F. se a O.S. não existir, podendo ser gerada.
Exemplos
User Function MNTA330V(cNumOS)// Retorna .T. - O.S. ja existe// Retorna .F. - O.S. nao existe e pode ser geradaLocal lRet := .F.// VerificaodbSelectArea("STJ")dbSetOrder(1)If dbSeek(xFilial("STJ")+cNumOS) lRet := .T.Else lRet := .F.EndIfReturn lRet
Variáveis
Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||||||
cNumOS | Caracter | Local | Não | |||||||||||
lRet | Lógico | Local | Não |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas