Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Marcio Rogerio Menon

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Alexandre da Costa

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
MA040VLD - Validações do Cadastro de Vendedores

TK272QRY - Filtro dos Chamados Pendentes por Operador

Características do Requisito

Linha de Produto:

Microsiga Protheus®

Segmento:

Serviços

Módulo:

Faturamento

Call Center - SIGATMK

Rotina:

Rotina

Nome Técnico

MATA040

Telemarketing

Cadastro de Vendedores

TMKA272

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Versão:12.1.17 e superior.

Ponto de Entrada

Descrição:

A finalidade do ponto de entrada

MA040VLD

TK272QRY é permitir

ou não a inclusão, alteração ou exclusão de vendedores na rotina do Cadastro de Vendedores

que seja alterada a query do filtro padrão da janela de Chamados Pendentes X Operador no atendimento do Telemarketing.

Localização:

Atualizações

/Cadastros/Vendedores

→ Atendimento → Call Center → Telemarketing

Eventos:

MA040VLD( nOpc ) --> lRet

TK272QRY( cQuery, cOperador, lSuper ) → cNewQry

Programa Fonte:

MATA040

TMKA272.

PRX

PRW

Parâmetros:

nOpc - Tipo Numérico - Número da opção selecionada, sendo: 3- Inclusão, 4- Alteração e 5- Exclusão
ParâmetroTipoDescrição
cQueryCaractereQuery padrão utilizada para filtrar os chamados pendentes do operador.
cOperadorCaractereCódigo do Operador do atendimento.
lSuperLógicoTipo de Operador, sendo: .T. - Supervisor ou .F. - Operador.

Retorno:

Nome

Tipo

Descrição

Obrigatório

lRet

cNewQry

Lógico

.T. - Permite a execução da operação

.F. - Não permite a execução da operação

Caractere

Nova query que será utilizada para filtrar os chamados pendentes do operador.

Sim

Exemplo:

Bloco de código
languagec#
linenumberstrue
#Include 'Protheus.ch'

User Function MA040VLDTK272QRY()

Local _nOpc cNewQry	:= PARAMIXB[1]		//3- Inclusão, 4- Alteração e 5- ExclusãoQuery padrão
Local _cOperador:= PARAMIXB[2]		//Código do Operador
Local _lRetlSuper	:= PARAMIXB[3]		//.T.-> Supervisor ou .F.
Local-> Operador

If !_lSuper
    _cUsuariocNewQry := "SELECT * "
    _cNewQry += RetCodUsr()

If _nOpc == 4 .And. _cUsuario == "000001"
	Alert("Usuário não pode efetuar alterações.")
	_lRet := .F.
ElseIf _nOpc == 5 .And. _cUsuario == "000002"
	Alert("Usuário não pode efetuar exclusão.")
	_lRet := .F. "FROM " + RetSqlName("SUC") + " SUC "
    _cNewQry += "WHERE "
    _cNewQry += "SUC.UC_FILIAL  = '" + xFilial("SUC") + "' AND "
    _cNewQry += "SUC.UC_OPERADO = '" + _cOperador + "' AND "
    _cNewQry += "SUC.UC_STATUS  = '" + "2 " + "' AND "
    _cNewQry += "SUC.UC_CODCANC = '' AND "
    _cNewQry += "SUC.D_E_L_E_T_ = ' ' "
EndIf

Return _lRetcNewQry