Ponto-de-Entrada: MT390VLV - Validade de lotes
| Abrangências: | Microsiga Protheus 10 , Microsiga Protheus 11 |
| Versões: | Microsiga Protheus 8.11 , Microsiga Protheus 10 |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todos |
| Idiomas: | Espanhol , Inglês |
LOCALIZAÇÃO:
1 - Function A390Valid() - Responsável pela alteração de data de validade de lotes;
2 - Function Q215GrvAll() - Grava os dados referentes ao Resultado:
Se o ponto de entrada retornar True, a informação do campo QEL_DTVAL(Data Valid.) é replicada para o campo B8_DTVALID(Data Validad), caso contrario a alteração é gravada apenas no campo QEL_DTVAL(Data Valid.).
EM QUE PONTO : Antes da alteração da validade.
Eventos Programa Fonte: MATA390.PRX
Sintaxe: MT390VLV - Validade de lotes ( [ PARAMIXB ] ) --> lRet Parâmetros:
| Nome |
|
| Tipo |
|
| Descrição |
|
| Default |
|
| Obrigatório |
|
| Referência |
|
| PARAMIXB |
|
| data |
|
| Elemento tipo data contendo a nova data digitada na tela. |
|
|
|
|
|
|
|
|
|
|
RetornolRet(logico)- .T. = Valida a mudança de data de validade do lote..F. = Não valida.
Exemplo:
| Bloco de código |
|---|
| language | cpp |
|---|
| title | Exemplo |
|---|
| linenumbers | true |
|---|
|
#INCLUDE "TOTVS.CH"
USER FUNCTION MT390VLV()
LOCAL lRet := .F.
LOCAL dData := PARAMIXB[1]
// VALIDAÇÕES DO USUÁRIO
RETURN lRet
|
