Produto:

Protheus ADVPL

Ocorrência:

Como criar um filtro no Ponto de Entrada M410FSQL na versão P12

Passo a passo:

O ponto de entrada M410FSQL tem comportamentos diferentes na P11 e na P12, a expressão utilizada na P11 deverá ser em SQL já na P12 a expressão deverá ser em ADVPL pois ambas utilizam classe diferentes

Descrição na P11: Ponto de Entrada que permite filtrar os pedidos de venda exibidos na mBrowse, em que deve ser informada uma expressão SQL para a realização do filtro.

Retorno: cFilSQL - ( Caracter) - Expressão SQL

Descrição na P12 : Ponto de Entrada que permite filtrar os pedidos de venda exibidos na FWMBrowse, em que deve ser informada uma expressão ADVPL para a realização do filtro.

Retorno: cFilSQL - ( Caracter) - Expressão ADVPL

Exemplo de customização na p12

#INCLUDE "PROTHEUS.CH"
#INCLUDE "rwmake.ch"

User Function M410FSQL()

Local _vpFiltro := ""

Alert("M410FSQL")

//_vpFiltro := "C5_CLIENTE = 'CL0003'"
//_vpFiltro := "C5_NUM > '000015' .and. C5_TIPO == 'N'"
_vpFiltro := "C5_CLIENT $ 'CL0007|CL0003|'"

Return(_vpFiltro)