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.

MAAVCRFIN - Substituição da query da Avaliação de Crédito Financeiro do Cliente

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

Faturamento

Rotina:

Rotina

Nome Técnico

FATXFUN

Função de Avaliação de Crédito Financeiro do Cliente - MaAvalCred()

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 MAAVCRFIN é permitir que o usuário possa alterar a query padrão de avaliação de crédito financeiro do cliente.

Eventos:

MAAVCRFIN ( cQuery, cCodCli, cLojaCli ) --> cRet

Programa Fonte:

MATA050.PRX

Parâmetros:

cQuery - Tipo Caracter - Query padrão utilizada na avaliação de crédito

cCodCli - Tipo Caracter - Código do Cliente que está em avaliação de crédito

cLojaCli - Tipo Caracter - Loja do Cliente que está em avaliação de crédito

Retorno:

cRet - Tipo Caracter - Query que será utilizada na avaliação de crédito

Aviso

Para execução deste ponto de entrada o parâmetro MV_CREDCLI deve estar com seu conteúdo preenchido com "L" (sem aspas).


Exemplo:

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

User Function MA050PREMaAvCrFin()

Local cQuerySE1 := ParamIxb[1]
Local _nOpccCodCli := ParamIxb[2]
Local cLoja := PARAMIXB		//3- Inclusão, 4- Alteração e 5- Exclusão

If _nOpc == 4
	Alert("Passou pelo PE: MA050PRE")
EndIf

Return NilParamIxb[3]
	
cQuerySE1 := "SELECT MIN(E1_VENCREA) VENCREAL "
cQuerySE1 += "FROM "+RetSqlName("SE1")+" SE1 "
cQuerySE1 += "WHERE SE1.E1_FILIAL='"+xFilial("SE1")+"' AND "
cQuerySE1 += "SE1.E1_CLIENTE='"+cCodCli+"' AND "
cQuerySE1 += "SE1.E1_LOJA='"+cLoja+"' AND "
cQuerySE1 += "SE1.E1_STATUS='A' AND "
cQuerySE1 += "SE1.D_E_L_E_T_=' ' "


Return (cQuerySE1)