Histórico da Página

...

Descripción

Actualizaciones

Punto de entrada:

F998BRFLT

Nombre del programa fuente:

RECEIPT.DATA.TLPP

Parámetros recibidos:

Nombre

Tipo

Descripción

PARAMIXB[1]

C

Expresión SQL estándar para la consulta (SELECT) que contará los registros a seleccionar.

PARAMIXB[2]

C

Expresión SQL estándar con filtros por campo que se utilizada para filtrar (WHERE) los registros a seleccionar.

PARAMIXB[3]

C

Este punto de entrada se ejecuta en dos partes, este parámetro indica el tipo de consulta (expresión SQL para el Query a la base de datos) que se debe retornar:

"complete" - El punto de entrada debe retornar una expresión de consulta (Query) completa, la cual se utiliza para determinar el total de registros que se visualizaran.

"where" - El punto de entrada solo complementa la expresión de condiciones (WHERE) para la selección de registros a visualizar.

PARAMIXB[4]

O

Contiene el Objeto Json con las Respuestas del motor de búsqueda que se colocaron en buscar Recibo.

Aviso

title	Importante

Este parámetro solo es necesario cuando se tiene configurado el grupo de preguntas FINA998BUS.

Respuesta:

Nombre	Tipo	Descripción	Obligatorio
queryNew	C	Retorna la expresión SQL de la consulta a realizar de acuerdo al tipo de Query; "complete" o "where".	Si

...

Bloco de código

title	Ejemplo
linenumbers	true
collapse	true

#Include 'Protheus.ch'

...


 
User Function

...

 F998BRFLT
   Local querySelect := Paramixb[1]

...


   Local queryWhere := Paramixb[2]

...


   Local queryOption := Paramixb[3]

...


   Local whereNew := " AND SEL.EL_RECIBO >= '0040

...

' "
   Local queryNew := ""

...


 
   IF queryOption == 'complete'

...


         queryNew := " SELECT " + querySelect + " AS totalreceipts FROM " + RetSqlName("SEL")

...


         queryNew += +" SEL WHERE " + queryWhere +

...

 whereNew
   ELSEIF queryOption == 'where'

...


         queryNew := queryWhere + whereNew

...


   ENDIF
 
RETURN queryNew

Bloco de código

language	applescript
title	Ejemplo con el Grupo de preguntas FINA998BUS
linenumbers	true
collapse	true

User Function F998BRFLT()

...


 
Local querySelect := Paramixb[1]

...


Local queryWhere

...

  := Paramixb[2]

...


Local queryOption := Paramixb[3]

...


Local jPergunte

...

   := Paramixb[4] // Objeto Json de Preguntas

...


Local whereNew := " "

...


Local queryNew := ""

...


 
      IF  jPergunte['form']['mv_par11'] != ""

...


        whereNew :=" AND EL_NATUREZ = '"+jPergunte['form']['mv_par11']+"'

...

 "
      EndIF
 
      IF queryOption == 'complete'
            queryNew := " SELECT " + querySelect + " AS totalreceipts FROM " + RetSqlName("SEL")
            queryNew += +" SEL WHERE " + queryWhere + whereNew
      ELSEIF queryOption == 'where'
            queryNew := queryWhere + whereNew
      ENDIF
 
RETURN queryNew

Card documentos

Informacao	La presente solución aplica para versión 12.1.33 o superior, siempre y cuando se tengan las rutinas actualizadas a la fecha de la expedición del issue.
Titulo	¡IMPORTANTE!

...

Árvore de páginas

Versões comparadas

Versão antiga 15

Nova versão Atual

Chave