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 |
DescriçãoLocalização:
LOCALIZAÇÃO : Function 1 - Function A390Valid()
-
Responsável
pela
alteração
de
data
de
validade
de
lotes.EM QUE PONTO : Antes da alteração da validade.lotes;
2 - Function Q215GrvAll() - Grava os dados referentes ao Resultado.
2.1 - Na rotina de Resultados(QIEA215) do SIGAQIE o retorno deste PE é tratado conforme abaixo:
Se o ponto de entrada retornar True:
A informação do campo QEL_DTVAL(Data Valid.) é replicada para o campo B8_DTVALID(Data Validad) conforme regras do parâmetro MV_QVALLOT(https://tdn.totvs.com/x/2ElKEg).
Se o ponto de entrada retornar False:
A informação do campo QEL_DTVAL(Data Valid.) é alterada conforme informada na tela de Resultados(QIEA215) e o conteúdo do campo B8_DTVALID(Data Validad) não é alterado.
Em que ponto: Antes da alteração da validade.
Programa Fonte: 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. |
|
|
|
|
|
|
|
|
|
|
Retorno:lRet(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 |
Exemplos USER FUNCTION MT390VLVLOCAL lRet := .T.
LOCAL dData := PARAMIXB[1]
// VALIDAÇÕES DO |
USUÁRIORETURN 