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 2

changes.mady.by.user Marcio Rogerio Menon

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:

FaturamentoCall Center - SIGATMK

Rotina:

Rotina

Nome Técnico

MATA040TMKA272

Cadastro de VendedoresTelemarketing

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 Vendedoresque seja alterado a query de 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 TK272QRY( cQuery, cOperador, lSuper ) --> lRetcNewQry

Programa Fonte:

MATA040TMKA272.PRXPRW

Parâmetros:nOpc

cQuery - Tipo Caracter - Query padrão utilizada para filtrar os chamados pendentes do operador;
cOperador - Tipo Caracter - Código do Operador do atendimento;
lSuper - Tipo Lógico - Tipo de Operador, sendo: .T. - Supervisor ou .F. - Operador - Tipo Numérico - Número da opção selecionada, sendo: 3- Inclusão, 4- Alteração e 5- Exclusão

Retorno:

Nome

Tipo

Descrição

Obrigatório

lRetcNewQry

Lógico

Caracter

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

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

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

Sim

Exemplo:

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

User Function MA040VLDtk272qry()

Local _nOpccNewQry	 := 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.
Local _cUsuario := 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.-> Supervisor ou .F.-> Operador

If !_lSuper
    _cNewQry := "SELECT * "
    _cNewQry += "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