Linha de Produto: | Microsiga Protheus® |
---|---|
Segmento: | Serviços |
Módulo: | Fiscal |
Altera a query que retorna os dados para a apresentação do registro F500.
SPED FISCAL - SPEDXFUN.PRW |
Nome | Tipo | Descrição |
---|---|---|
PARAMIXB | Array of Record | [1] = Cláusula FROM da query a ser executada [2] = Cláusula WHERE da query a ser executada |
Nome | Tipo | Descrição |
---|---|---|
Array of Record | Array com a primeira posição contendo a cláusula FROM e a segunda posição contendo a cláusula WHERE. |
#include 'protheus.ch' #include 'parmtype.ch' User Function SPDF500A() Local cFrom := ParamIxb[1] Local cWhere := ParamIxb[2] Local aQuery := {} cFrom += " LEFT JOIN " + RetSqlName("SF2") cFrom += " SF2 ON(SF2.F2_FILIAL='" + xFilial("SF2") + "' " cFrom += "AND SF2.F2_DOC=SFT.FT_NFISCAL " cFrom += "AND SF2.F2_SERIE=SFT.FT_SERIE " cFrom += "AND SF2.F2_CLIENTE=SFT.FT_CLIEFOR " cFrom += "AND SF2.F2_LOJA=SFT.FT_LOJA " cFrom += "AND SF2.D_E_L_E_T_=' ')" cWhere += "SFT.FT_TIPOMOV='S' " aAdd(aQuery,cFrom) aAdd(aQuery,cWhere) Return aQuery |
Não se aplica.