Ponto-de-Entrada: MNTA231V - Validação do Código do Produto
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:
Ponto de Entrada utilizado para adicionar validação do código do produto inserido na movimentação de rodados através das rotinas MNTA231 (Movimentação do Esquema de Pneus) e MNTA232 (Novo Esquema de Rodados Gráfico), chamadas pela rotina MNTA420 (Programa para O.S. Corretivas).
Programa Fonte
MNTA231
Sintaxe
MNTA231V - Validação do Código do Produto ( < cProdAnt> , < cProdAtu> , < cAlmoAnt> , < cAlmoAtu> , < cStatus> ) --> lRet
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
cProdAnt | Caracter | Código anterior do produto, encontrado na base. | X | ||||||||||||||
cProdAtu | Caracter | Código atual do produto, inserido pelo usuário. | X | ||||||||||||||
cAlmoAnt | Caracter | Código anterior do almoxarifado, encontrado na base. | X | ||||||||||||||
cAlmoAtu | Caracter | Código atual do almoxarifado, inserido pelo usuário. | X | ||||||||||||||
cStatus | Caracter | Código do status do produto, definido através da movimentação. | X |
Retorno
-
lRet(logico)
- Retorna o valor lógico da validação, True ou False.
Exemplos
User Function MNTA231V(cProdAnt,cProdAtu,cAlmoAnt,cAlmoAtu,cStatus)// Retorno da validação deve ser .T. ou .F.Local lRet := .F.// Chamada da validaçãoIf MsgYesNo("Produto Anterior: "+cProdAnt+Chr(13)+; "Produto Atual: "+cProdAtu+Chr(13)+Chr(13)+; "--------------------"+Chr(13)+Chr(13)+; "Almoxarifado Anterior: "+cAlmoAnt+Chr(13)+; "Almoxarifado Atual: "+cAlmoAtu+Chr(13)+Chr(13)+; "--------------------"+Chr(13)+Chr(13)+; "Status: "+cStatus,; "MNTA231V") lRet := .T.Else lRet := .F.EndIfReturn lRet
Variáveis
Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||||||
lRet | Lógico | Local | Sim |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas