Busca a data de início do próximo período conforme o tipo do período e data parametrizada.
Parâmetros
| Nome | Tipo | Descrição | Referência |
|---|---|---|---|
| cTipo | Caracter | Código com o tipo do período. Valores aceitos: D (Diário), S (Semanal), Q (Quinzenal), M (Mensal) | |
| dData | Data | Data base para o cálculo. | X |
Exemplo de Uso
User Function proxPeriod()
Local lRet := .T.
Local dData := Nil
Set(_SET_DATEFORMAT, 'dd/mm/yyyy')
ConOut(REPLICATE("-",70))
dData := cToD("31/10/2023")
PCPMonitorUtils():BuscaProximoPeriodo("D",@dData)
ConOut("Diario: " + dToC(dData)) //Diario: 01/11/2023
dData := cToD("31/10/2023")
PCPMonitorUtils():BuscaProximoPeriodo("S",@dData)
ConOut("Semanal: " + dToC(dData)) //Semanal: 05/11/2023
dData := cToD("31/10/2023")
PCPMonitorUtils():BuscaProximoPeriodo("Q",@dData)
ConOut("Quinzenal: " + dToC(dData)) //Quinzenal: 01/11/2023
dData := cToD("31/10/2023")
PCPMonitorUtils():BuscaProximoPeriodo("M",@dData)
ConOut("Mensal: " + dToC(dData)) //Mensal: 01/11/2023
ConOut(REPLICATE("-",70))
Return lRet |