Ponto-de-Entrada: OM160TIK - Validação do tempo para fechamento.
| Abrangências: | Microsiga Protheus 10 , Microsiga Protheus 11 |
| Versões: | Microsiga Protheus 10 , Microsiga Protheus 11 |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todos |
| Idiomas: | Português (Brasil) |
Descrição:
Ponto de entrada que seleciona um tipo de tempo para fechamento.
Eventos
#include "Protheus.ch"
User Function OM160TIK()
Local lRetorno := .t.
Local cAuxParam := ParamIxb[01]
MsgInfo("Ponto de Entrada na validação ao selecionar um tipo de tempo para fechamento.")
Return lRetorno
Programa Fonte
OFIOM160
Sintaxe
OM160TIK - Validação do tempo para fechamento. ( [ cParam01 ] ) --> lRetorno
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| cParam01 | Caracter | Indica o tipo de fechamento.Sendo 1 para fechamento individual e 2 para fechamento agrupado. |
Retorno
-
lRetorno(logico)
- Indica se pode selecionar o tipo de tempo para fechamento.
Observações
Fechamento Individual
If ExistBlock("OM160TIK")
lRetPE := ExecBlock("OM160TIK",.f.,.f.,{cParam01})
If !lRetPE
Return (.f.)
Endif
Endif
Fechamento Agrupado
If ExistBlock("OM160TIK")
lRetPE := ExecBlock("OM160TIK",.f.,.f.,{cParam01})
If !lRetPE
FS_VFILTVO1() // Volta Filtro VO1 pelo Usuario
Return (.f.)
Endif
Endif
Variáveis
| Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||||||
| Array of Record | Global | Não |