Linha Microsiga Protheus

Árvore de páginas

  • Criado por Usuário desconhecido (flora.rocha), última alteração por Usuário desconhecido (felipe.valcanaia) em 03 jul, 2012

Ponto-de-Entrada: FT070ESP - Pós inclusão ou exclusão de entidade
Versões: Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Espanhol , Inglês
Descrição: 
Ponto de entrada executado após a inclusão ou exclusão de uma entidade (representante,grupo de representantes ou unidade vendas) na estrutura de vendas, ainda antes de confirmar a tela.
Eventos
  • Na inclusão ou exclusão de um grupo de representantes;
  • Na inclusão ou exclusão de uma unidade de vendas;
  • Na inclusão ou exclusão de um representante.
Programa Fonte 
.PRW
Sintaxe

FT070ESP - Pós inclusão ou exclusão de entidade ( [ cAlias ], [ cCodigo ], [ nRecno ], [ cEvento ] )

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
cAlias Caracter Nome da tabela da entidade
cCodigo Caracter Código da entidade
nRecno Numérico Número do registro no banco de dados
cEvento Caracter Evento executado antes de disparar o PE
Retorno
    ()
Observações

A váriavel cEvento, 4º parâmetro recebido pelo ponto de entrada, pode conter as seguintes opções:

  • "INCRP" - Inclusão de um representante;
  • "EXCRP" - Exclusão de um representante;
  • "INCGR" - Inclusão de um grupo de representantes;
  • "EXCGR" - Exclusão de um grupo de representantes;
  • "UNIVE" - Inclusão de uma unidade de vendas;
  • "EXUNIVEN" - Exclusão de uma unidade de vendas.
Exemplos 
User Function FT070ESP(cAlias,cCodigo,nRecno,cEvento)Do Case    Case cEvento == "INCRP"        Alert("Incluindo o vendedor:"+cCodigo)    Case cEvento == "EXCRP"        Alert("Excluindo o vendedor:"+cCodigo)    Case cEvento == "INCGR"        Alert("Incluindo o grupo:"+cCodigo)    Case cEvento == "EXCGR"        Alert("Excluindo o grupo:"+cCodigo)    Case cEvento == "UNIVE"        Alert("Incluindo a unidade de vendas:"+cCodigo)    Case cEvento == "EXUNIVEN"        Alert("Excluindo a unidade de vendas:"+cCodigo)EndCaseReturn Nil