MontaAbrangencia

Função utilizada para retornar uma cláusula SQL de acordo com um campo e uma abrangência de valores.

Para montar abrangências de local quando existem valores especiais ("1.1.111==", por exemplo), deve ser utilizado o campo NumLoc nesta função. O campo CodLoc não é tratado pela função nesta situação.

Sintaxe: MontaAbrangencia(Alfa Tabela, Alfa Valores, Alfa End SqlAbr)

Parámetros:

Nome	Tipo	Descripción
Tabla	Alfa	Variável que recebe o campo da tabela que vai ser montada a abrangência.
Valores	Alfa	Variável que contém a faixa de valores na forma de abrangência.
SqlAbr	Alfa	Retorno Variável alfa que retorna a cláusula SQL correspondente à abrangência informada.

Ejemplo:

Definir Alfa xCodMot;

Definir Alfa xAbrMot;

Xnumemp = R034FUN.NumEmp;

Xtipcol = R034FUN.TipCol;

Xnumcad = R034FUN.NumCad;

MontaAbrangencia("R038HSA.CodMot",ECodMot,xcodmot);

Xabrmot = "";

Se ( xcodmot <> "( )" )

XAbrMot = ?And ? + xCodMot;

Chsa.SQL "SELECT * FROM R038HSA WHERE NUMEMP = :xnumemp AND TIPCOL = \ :xtipcol AND NUMCAD = :xnumcad __Inserir(:xAbrMot) ORDER BY DESC, SEQALT DESC";

...

Utilización: Generador de Reportes y Reglas.

Observações: Caso não seja informado nada na variável de abrangência na tela de entrada, esta retornará "()".

O comando MontaAbrangencia retorna "()" quando a abrangência está vazia.