Histórico da Página

O ponto de entrada F700QRYSE2 está presente na função FinLdSE2() e possibilita criar e manipular a query.

#Include 'Protheus.ch'

User function F700QRYSE2()

Local cQuery := PARAMIXB[1]

Alert("Executou o PE F700QRYSE2")

cQuery += "UNION ALL "

cQuery += "SELECT E2_FILIAL Branch, 4 Type, E2_TIPO Tipo, "
cQuery += "E2_MOEDA Currency, "
cQuery += "SUM(E2_SALDO + E2_SDACRES - E2_SDDECRE) Balance FROM "
cQuery += RetSqlName("SE2")
cQuery += " WHERE E2_SALDO > 0 AND E2_FILIAL = '" + xFilial("SE2")
cQuery += "' AND E2_VENCREA > '" + Dtos(dDataBase) + "' AND D_E_L_E_T_ = ' ' "
cQuery += "GROUP BY E2_FILIAL, E2_TIPO, E2_MOEDA "

Return cQuery

Português(Brasil)

Microsiga_Protheus11

Todos

Todas

cQuery := PARAMIXB[1]

cQuery(caracter)

If lF700QRY lF700QRYSE2
cQuery := Execblock("F700QRY",.f.,.f.,{ cQuery } ) // permite manipualção das query
Endif

FINA700.PRX