...
| Linha Línea de Produtoproducto: | Microsiga Protheus® |
|---|---|
Segmento: | Backoffice |
Módulo: | Financeiro Financiero |
| Função Función: | FINA645 – Provis Dev DuvidosDeu Dudos |
...
O ponto El punto de entrada F645QYABT permite tratamento de datas da seleção de títulos no abatimento, vencidos após atraso, somente os vencidos e todos os 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.
...
| Nome Nombre | Tipo | Descrição Descripción |
|---|---|---|
PARAMIXB | Caracter Carácter | Query em andamentoen marcha para oel filtro de títulos. |
...
Tipo | Descrição Descripción |
|---|---|
| Caracter Carácter | Expressão SQL com a condição Expresión SQL con la condición de filtro de datafecha. |
...
...
| Bloco de código | ||||
|---|---|---|---|---|
| ||||
#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 //------------------------------------------------------------------------------- // TratamentoTratamiento de datasfechas de seleçãoselección de títulos en noel abatimentodescuento, vencidos después aposdel atraso //------------------------------------------------------------------------------- If mv_par03 == 1 //Todos los titulostítulos cQryDt += " AND SE1SUB.E1_EMISSAO BETWEEN '" + Dtos(MV_PAR08) + "' AND '" + Dtos(MV_PAR09) + "' " + CRLF ElseIf MV_PAR03 == 2 //TitulosTítulos vencidos cQryDt += " AND SE1SUB."+cCpoVenc+" < '" + DToS(MV_PAR01) + "' " + CRLF ElseIf MV_PAR03 == 3 //Vct aposVcto. después del atraso cQryDt += " AND SE1SUB."+cCpoVenc+" < '" + DToS(MV_PAR01 - MV_PAR02) + "' " + CRLF //DataFecha de referencia - quantidadecantidad de diasdías de atraso EndIf RestArea(aArea) Return cQryDt |
...