Linha Microsiga Protheus - Espanhol

Atalhos

Árvore de páginas

Carregando...
Tempo aproximado para leitura: 2 minutos

01. DATOS GENERALES

Línea de producto:

Microsiga Protheus®

Segmento:

Backoffice

Módulo:

Financiero

Función:

FINA645 – Provis Deu Dudos

02. DESCRIPCIÓN

El punto de entrada F645QYABT permite el tratamiento de fechas de la selección de títulos en el descuento, vencidos después del atraso, solamente los vencidos y todos los títulos.

03. PARÁMETROS      

Nombre

Tipo

Descripción

PARAMIXB

Carácter

Query en marcha para el filtro de títulos.

04. DEVOLUCIÓN

Tipo

Descripción

Carácter

Expresión SQL con la condición de filtro de fecha.

05. EJEMPLO DE UTILIZACIÓN


F645QYABT
#INCLUDE 'TOTVS.CH'

User Function F645QYABT() as character
Local aArea         := GetArea() as array
Local cQuery        := PARAMIXB as character
Local cQryDt        := "" as character
Local cParVenc		:= AllTrim(SuperGetMV( 'MV_PDDREF ' ,.F., '1' )) as character
Local cCpoVenc		:= IIF(cParVenc == '1', "E1_VENCREA" , Iif(cParVenc == '2', "E1_VENCTO" , "E1_VENCORI")) as character

//-------------------------------------------------------------------------------
// Tratamiento de fechas de selección de títulos en el descuento, vencidos después del atraso
//-------------------------------------------------------------------------------
If mv_par03 == 1 //Todos los títulos
	cQryDt += " AND SE1SUB.E1_EMISSAO 	BETWEEN	'" + Dtos(MV_PAR08) + "'	AND '" + Dtos(MV_PAR09) + "' " + CRLF

ElseIf MV_PAR03 == 2 //Títulos vencidos
	cQryDt += " AND SE1SUB."+cCpoVenc+" < '" + DToS(MV_PAR01) + "' " + CRLF

ElseIf MV_PAR03 == 3 //Vcto. después del atraso
	cQryDt += " AND SE1SUB."+cCpoVenc+" < '" + DToS(MV_PAR01 - MV_PAR02) + "' " + CRLF //Fecha de referencia - cantidad de días de atraso 

EndIf

RestArea(aArea)

Return cQryDt