Histórico da Página

...

05. EXEMPLO DE UTILIZAÇÃO

#Include Protheus#include "protheus.ch"        

User Function F110QRCP()                                                                       
    Local aArea    := GetArea()
    Local cQuery   := PARAMIXB[1]
    Local cOrderBy := ""
    Local cAux     := ""
    Local cFilRet  := ""

    //Montando Filtro de retorno para exibição dos títulos baixadoscFilRet Montando o filtro de retorno para exibição dos titulos que serão baixados
    cFilRet := " AND E1 AND E1_PREFIXO PREFIXO = 'TST' "
     
    //Efetua a quebra de query e order bycOrderBy := SubsStrEfetua a separação da query e order by
    cOrderBy := SubStr(cQuery, RAt("ORDER BYORDER BY", cQuery), Len(cQuery))
    cAux := SubStr(cQuery, 1, RAt("ORDER BY", cQuery)-1)
     
    //Monta o retorno da query
    cQuery := cAux + cFilRet + cOrderBy
      
    RestArea(aArea)
Return cQuery

<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}
</style>