Linha Microsiga Protheus

Árvore de páginas

Ponto-de-Entrada: CT010TOK - Valida confirmação de calendário
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) , Português (Portugal) , Espanhol , Inglês
Descrição: 
Ponto de Entrada permite inserir validações adicionais ao confirmar Cadastro de Calendário.
Programa Fonte 
CTBA010.PRW
Sintaxe

CT010TOK - Valida confirmação de calendário ( < nOpc> ) --> lRet

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
nOpc Numérico Operação 3=Inclusão4=Alteração5=Exclusã X
Retorno
    lRet(logico)
  • .t. - continua gravando normalmente..f. - aborta.
Exemplos 
#include "Protheus.ch"User Function CT010TOK()Local nOpc := ParamIXB[1]Local lRet := .F.If nOpc > 2	If RetCodUsr() == "000000"		If MsgYesNo("Evidencia do Ponto de Entrada CT010TOK - Dados estao Corretos ?")			lRet := .T.		EndIf	Else		Alert("Evidencia do Ponto de Entrada CT010TOK - Somente Administrador pode incluir calendario. ")	EndIfEndIfReturn lRet