Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 3

changes.mady.by.user Lucas Raminelli

Gravado em

comparado com

Nova versão 4

changes.mady.by.user Lucas Raminelli

Gravado em

Chave

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

...

Descrição

EECAC100 - Manutenção de clientes

Observações

Utilizado para a manutenção do cadastro do cliente dentro do modulo Easy Export Control

Exemplos

User Function EECAC100()

Local cParam := If(Type("ParamIxb") = "A",ParamIxb[1],If(Type("ParamIxb") = "C",ParamIxb,""))


If cParam == "ANTES_SALVAR"
MsgInfo("Entrou no ponto de entrada 'ANTES_SALVAR'.")
lRet := .F.
Endif

 

If cParam == "AC100CRIT_CLIENTES"
MsgInfo("Entrou no ponto de entrada 'ANTESAC100CRIT_SALVARCLIENTES'.")
IF M->A1_TIPO == 'X' .AND. Empty(M->A1_CGC)
Msginfo("Campo CNPJ vazio","Atenção")
lValidCli := .F.
EndIF
Endif

Return Nil

Preview

Veja também

 

Idioma

Português(Brasil)

Versões

Microsiga_Protheus11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

 

Parâmetros

 NomeTipoDescriçãoDefaultObrigatórioReferência
 ANTES_SALVARCarácterParâmetro que valida a gravação de um novo Import/Cliente.    
 AC100CRIT_CLIENTESCarácterParâmetro que valida campos antes da gravaçãõ gravação do processo de um novo Import/Cliente   

Retorno

()

Eventos de chamada do Ponto de Entrada

 

Variáveis

 NomeTipoEscopoPode AlterarDescrição
 lRetLógicoPrivateSimVariável responsável de definir se o processo será salvo, ou se retornará uma mensagem de erro
 lValidCli LógicoPrivateSimVariável responsável para validar os dados dos campos, possibilitando prosseguir o processo ou não permitir salvar o mesmo

Programa Fonte

EECAC100.PRW