Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

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

...

Ponto-de-Entrada: CTA030TOK - Validação de Tok
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
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

...

:

Nome

Tipo

Descrição

...

Obrigatório

...

 lRet

...

Retorno
    lRet(logico)

 Logico

 Retornando .T. (Verdadeiro) não prossegue voltando o foco ao formulário de entrada de dados

 Não

-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 ) 

...