Linha Microsiga Protheus

Árvore de páginas

01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Serviços
Módulo:Fiscal


02. DESCRIÇÃO

Criado ponto de entrada no IMPXFIS para modificar o where da QUERY no momento que o sistema enquadra a geração da tabela CDV/CDA para alimentar a tag cBenef caso configurado.


03. Especificação

Parâmetros do ponto de entrada:

NomeTipoDescrição
PARAMIXB[1]Carácter

Retorna query alterada

PARAMIXB[2]CarácterCST
PARAMIXB[3]CarácterCFOP
PARAMIXB[4]CarácterProduto
PARAMIXB[5]CarácterGrupo Trib. Produto
PARAMIXB[6]CarácterGrupo Cli/For
PARAMIXB[7]CarácterCliente/Fornecedor

04. EXEMPLO DE UTILIZAÇÃO


MAVLDCQry
#INCLUDE "PROTHEUS.CH"


User Function MAVLDCQry()

Local cWhere := ParamIxb[1]
Local cCST := ParamIxb[2]
Local cCfop := ParamIxb[3]
Local cProduto := ParamIxb[4]
Local cGrpTrbPd := ParamIxb[5]
Local cGrpCliFor:= ParamIxb[6]
Local cCliFor := ParamIxb[7]

cWhere += " AND F3K.F3K_FILIAL = " + ValToSQL( xFilial("F3K") ) + " "
cWhere += " AND F3K.D_E_L_E_T_ = ' ' "
cWhere += " AND (F3K.F3K_PROD = " + ValToSQL(cProduto) + " OR F3K.F3K_PROD = ' ' ) "
cWhere += " AND F3K.F3K_CFOP= " + ValToSQL(cCfop) + " AND F3K.F3K_CST= " + ValToSQL(cCST) + " "
cWhere += " AND F3K.F3K_GRPLAN = " + ValToSQL(cGrpTrbPd) + " "
cWhere += " AND CDY.CDY_DTINI <> ' ' AND CDY.CDY_DTINI <= " + ValToSql(dDataBase) + " AND (CDY.CDY_DTFIM >= " + ValToSql(dDataBase) + " OR CDY.CDY_DTFIM = ' ') "

Return cWhere



05. DEMAIS INFORMAÇÕES

Não há

06. ASSUNTOS RELACIONADOS

     3685244 DSERFIS1-8591 DT Tratamento para preencher tag cBenef com tabela da receita 5.2