Histórico da Página
Ponto de Entrada
Descrição: | Ponto de entrada desenvolvido na rotina CTBA030 - Cadastro de Centro de Custo para validação de usuário ao pressionar botão Confirmar. Este ponto de entrada funciona na negativa do fonte, isto é, ao retornar .T. (Verdadeiro) ele retorna para o formulário não prosseguindo com as demais validações e posterior gravação. |
Localização: | Atualizações / Cadastros / Configurações Contabeis / Custos / Centro de Custo |
Eventos: | Inclusão / Alteração / Exclusão |
Programa Fonte: | CTBA030 |
Função: | Ct030TudOk |
Retorno |
Composition Setup |
---|
import.css=/download/attachments/327912/newLayout.css |
...
Abrangências: | Microsiga Protheus 8.11 , Microsiga Protheus 10 |
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 |
O ponto de entrada CTA030TOK é utilizado para validação de TOK da Rotina CTBA030.
CTBA030
CTA030TOK - Validação de Tok ( [ nOpc ] ) --> lRet
...
: |
|
...
|
...
|
...
- lRet(logico)
|
-Tratamento no Fonte CTBA030
If lCTA030TOK
If
...
ExecBlock("CTA030TOK",.F.,.F.,nOpc)
...
Return .F.
...
Endif
Endif
`Ponto de Entrada Exemplo:
#Include 'Protheus.ch'
User Function CTA030TOK()
Local nOpc := PARAMIXB
Local lRet := .F. // retornando FALSE sempre continua com as demais validacoes e gravacao
If MsgYesNo("Deseja Abandonar a Validação / Gravação e voltar a editar o formulário ? ", "Abandonar")
lRet := .T. // Verdadeiro
EndIf
Return( lRet )
...