Histórico da Página

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