Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 5

changes.mady.by.user Daniela Rodrigues Monstans Ferreira

Gravado em

comparado com

Nova versão 6

changes.mady.by.user Daniela Rodrigues Monstans Ferreira

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/327912/newLayout.css
Portuguese

Pagetitle
TMKA070 - Rotina Automatica de Contatos
TMKA070 - Rotina Automatica de Contatos

Função: TMKA070 - Rotina Automática de Contatos

 

Abrangências:Protheus 10
Versões:Protheus 10
Compatível Países:Todos
Sistemas Operacionais:Todos
Compatível às Bases de Dados:Todas TotvsDbAccess
Nível de Acesso:Nível 1 (Acesso Clientes)
Idiomas:Português (Brasil)

 

Descrição:
A função TMKA070 permite efetuar a inclusão de Contatos.
Programa Fonte:
TMKA070.prw
Sintaxe:

TMKA070 - Rotina Automática de Contatos ( [ aRotAuto ] )

Retorno:
    ()
Observações
Exemplos
User Function MyTmk070()
Local aContato := {}
Private lMsErroAuto

AAdd(aContato,{"U5_FILIAL", xFilial("SU5"),Nil})
AAdd(aContato,{"U5_CODCONT","000020", Nil})
AAdd(aContato,{"U5_CONTAT","Nome do contato", Nil})
AAdd(aContato,{"U5_EMAIL","[email protected]", Nil})

MSExecAuto({|x,y|TMKA070(x,y)},aContato,3) 

If lMsErroAuto		
MsgStop("Erro na gravação do contato")	
MostraErro()
Else	
MsgAlert('Incluido contato com sucesso.')	
EndIf
Return
Parâmetros:

 

 Nome  Tipo  Descrição  Default  Obrigatório  Referência 
 aRotAuto  Array of Record  Array contendo os campos a serem preenchidos.