Histórico da Página

#INCLUDE 'Protheus.ch'
 
User FUNCTION F370E5F()
    LOCAL cQRY    := PARAMIXB
    LOCAL cSELECT := ""
    LOCAL cFROM   := ""
    LOCAL cWHERE  := ""
 
    cSELECT := SUBSTR(cQRY, 1, AT("FROM",cQRY)-1)
    cFROM   := SUBSTR(cQRY, AT("FROM",cQRY),AT("WHERE",cQRY)-1-LEN(cSELECT))
    cWHERE  := SUBSTR(cQRY, AT("WHERE",cQRY))

    cWHERE += " AND SE5.E5_RECONC = 'x' "

    cQRY := cSELECT + cFROM + cWHERE

    CONOUT('<<< Execução do PE F370E5F >>> THREAD['+ GetThreadID() +'] - SQLCommand[' + cQry + ']')

RETURN cQry