| Produto: | TOTVS Backoffice |
|---|---|
| Linha de Produto: | Linha Protheus |
| Segmento: | Backoffice |
| Módulo: | Gestão de Contratos |
| Função: | CNTA121- Medições |
| Ponto de Entrada: | CN121FIL |
| Descrição: | Possibilita que o desenvolvedor realize o filtro do browse que será exibido para o usuário | ||||||
|---|---|---|---|---|---|---|---|
| Eventos: | Executado antes da exibição do browse para o usuário | ||||||
| Programa Fonte: | CNTA121.prw | ||||||
| Função: | BrowseDef() | ||||||
| Retorno: |
|
#INCLUDE "Protheus.ch"
/*{Protheus.doc} U_CN121FIL()
Possibilita filtrar o browse da rotina <CNTA121>
*/
User Function CN121FIL()
Local cFiltro := ""
cFiltro := "CND_FILCTR == '"+ cFilAnt +"'"
Return cFiltro
#INCLUDE "Protheus.ch"
/*{Protheus.doc} U_CN121FIL()
Possibilita filtrar o browse da rotina <CNTA121>
É possível utilizar expressões SQL, basta adicionar um @ ao inicio da expressão. Válido somente para ambientes TopConnect.
*/
User Function CN121FIL()
Local cFilQuery := ""
Local cUsrId := RetCodUsr()
cFilQuery := "@CND_CONTRA IN (SELECT CNN.CNN_CONTRA "
cFilQuery += "FROM " + RetSqlName("CNN") + " CNN "
cFilQuery += "where CNN.D_E_L_E_T_ = '' "
cFilQuery += "and CNN_USRCOD = '"+cUsrId+"')"
Return(cFilQuery)