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 Respuestas del motor de busqueda búsqueda que se llenaron colocaron en buscar Recibo, si .

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 13

Nova versão Atual

Chave