Histórico da Página
Ponto de Entrada: F645QYDT - Tratamento de datas para seleção de títulos
Linha de Produto: | Microsiga Protheus | ||||
Segmento: | Serviços. | ||||
Módulo: | Financeiro | ||||
Rotina: |
| ||||
Ponto de Entrada: | F645QYDT | ||||
Chamados Relacionados | |||||
Requisito (ISSUE): | PCREQ-7787 | ||||
País(es): | Todos | ||||
Banco(s) de Dados: | Todos | ||||
Tabelas Utilizadas: | Todos | ||||
Sistema(s) Operacional(is): | Todos | ||||
Versões/Release: | 12.1.23 |
Descrição
Ponto de entrada para tratamento de datas de seleção de títulos, vencidos após atraso.
Ponto de Entrada
Descrição: | Condição da Query do cliente |
Localização: | Miscelâneas / Contábil |
Eventos: | Provisão de PDD |
Programa Fonte: | FINA645.PRW |
Função: | FA645TiCon |
Retorno: | cQuery: Condição do cliente |
Exemplo:
#Include 'Protheus.ch'
User Function F645QYDT()
Local cCab:= PARAMIXB[1]
Local cTipo:= PARAMIXB[2]
Local dDataRef:= PARAMIXB[3]
Local dDtAtraso:= PARAMIXB[4]
If mv_par01 == 1
cQuery += " AND EX_DATA BETWEEN '" + Dtos(MV_PAR02) + "' AND '" + Dtos(MV_PAR03) + "' "+CRLF //Todos
EndIf
If mv_par01 == 2
cQuery += " AND TABELA."+cTipo+" < '" + DToS(dDataRef) + "' "+CRLF //Só os vencidos
ElseIf mv_par01 == 3
cQuery += " AND TABELA."+cTipo+" < '" + DToS(dDtAtraso) + "' " +CRLF//Só os vencidos a mais de 90 dias
EndIf
cQuery := ChangeQuery(cQuery)
Return