Histórico da Página
...
Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: CTA030TOK - Validação de Tok
Descrição: O ponto de entrada CTA030TOK é utilizado para validação de TOK da Rotina CTBA030. Programa Fonte CTBA030 Sintaxe CTA030TOK - Validação de Tok ( [ nOpc ] ) --> lRet Parâmetros:
Retorno lRet
Exemplos If lCTA030TOK If ExecBlock("CTA030TOK",.F.,.F.,nOpc) Return .F. EndifEndif Variáveis
|
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: |
|
-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.
If MsgYesNo("Deseja Abandonar ? ", "Abandonar")
lRet := .T. / / Verdadeiro
EndIf
Return( lRet )