Ponto-de-Entrada: OX001HCB - Customização de Mensagem - Cliente Bloqueado
| 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:
Este Ponto de Entrada permite a customização da Mensagem de "Cliente Bloqueado"
Eventos
if SA1->A1_MSBLQL == "1"
if !lOX001Auto
// CUSTOMIZA MENSAGEMD E CLIENTE BLOQUEADO
If ExistBlock("OX001HCB")
ExecBlock("OX001HCB",.f.,.f.)
else
Help("",1,"GCP02CLIB") //"Cliente bloqueado"
// MsgInfo(STR0026, STR0025)
endif
endif
Return(.f.)
Endif
if !lOX001Auto
// CUSTOMIZA MENSAGEMD E CLIENTE BLOQUEADO
If ExistBlock("OX001HCB")
ExecBlock("OX001HCB",.f.,.f.)
else
Help("",1,"GCP02CLIB") //"Cliente bloqueado"
// MsgInfo(STR0026, STR0025)
endif
endif
Return(.f.)
Endif
Programa Fonte
OFIXX001
Sintaxe
OX001HCB - Customização de Mensagem - Cliente Bloqueado ( [ ] )
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| Array of Record |
Retorno
-
()
Observações
Exemplos
User Function OX001HCB()MsgInfo(“Ponto de Entrada OX001HCB”,”Atencao”)return nil
Variáveis
| Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||||||
| Array of Record | Global | Não |