TMKA260 - Rotina automática de Prospect

Descrição

TMKA260 - Rotina automática de Prospect

Observações

Rotina automática para geração e manutenção de prospects no módulo de Call Center

Exemplos

#INCLUDE "PROTHEUS.CH"
#INCLUDE "TBICONN.CH"
User Function MyTMK260()
Local aVetor := {}
PRIVATE lMsErroAuto := .F.
PREPARE ENVIRONMENT EMPRESA "99" FILIAL "01" MODULO "TMK" TABLES "SUS"
aVetor:={{"US_COD" ,"888888" ,Nil},;
{"US_LOJA" ,"01" ,Nil},;
{"US_NOME" ,"INC. AUTOMATICO" ,Nil},;
{"US_NREDUZ" ,"AUTOMATICO" ,Nil},;
{"US_TIPO" ,"R" ,Nil},;
{"US_END" ,"RUA AUTOMATICA" ,Nil},;
{"US_MUN" ,"SAO AUTOMATICO" ,Nil},;
{"US_EST" ,"SP" ,Nil}}
MSExecAuto({|x,y| TMKA260(x,y)},aVetor,3) //3- Inclusão, 4- Alteração, 5- Exclusão
If lMsErroAuto
Alert("Erro")
Else
Alert("Ok")
Endif

Preview

Veja também

Idioma

Português(Brasil)

Versões

Versões_Anteriores

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

Retorno

Eventos de chamada do Ponto de Entrada

Variáveis

Programa Fonte

TMKA260.PRW