Retorna uma lista de períodos a partir da data atual, conforme o tipo e quantidade de períodos parametrizados.

Parâmetros

NomeTipoDescrição
cTipoCaracterCódigo com o tipo do período. Valores aceitos: D (Diário), S (Semanal), Q (Quinzenal), M (Mensal).
cPeriodosCaracterQuantidade de períodos.


Retorno

TipoDescrição
ArrayMatriz da lista de períodos futuros com as colunas de data inicio e fim de cada período.


Exemplo de Uso

User Function perFuturo()
    Local lRet  := .T.
    
    Set(_SET_DATEFORMAT, 'dd/mm/yyyy')
    Private dDatabase := cToD("31/10/2023")

    ConOut(REPLICATE("-",70))
    
    //Tipo D: {31/10/2023,31/10/2023}|{01/11/2023,01/11/2023}|{02/11/2023,02/11/2023}|{03/11/2023,03/11/2023}|{04/11/2023,04/11/2023}
    ConOut("Tipo D: " + ArrTokStr(PCPMonitorUtils():RetornaListaPeriodosFuturo("D","4")))

    //Tipo S: {31/10/2023,04/11/2023}|{05/11/2023,11/11/2023}|{12/11/2023,18/11/2023}|{19/11/2023,25/11/2023}|{26/11/2023,02/12/2023}
    ConOut("Tipo S: " + ArrTokStr(PCPMonitorUtils():RetornaListaPeriodosFuturo("S","4")))

    //Tipo Q: {31/10/2023,31/10/2023}|{01/11/2023,15/11/2023}|{16/11/2023,30/11/2023}|{01/12/2023,15/12/2023}|{16/12/2023,31/12/2023}
    ConOut("Tipo Q: " + ArrTokStr(PCPMonitorUtils():RetornaListaPeriodosFuturo("Q","4")))

    //Tipo M: {31/10/2023,31/10/2023}|{01/11/2023,30/11/2023}|{01/12/2023,31/12/2023}|{01/01/2024,31/01/2024}|{01/02/2024,29/02/2024}
    ConOut("Tipo M: " + ArrTokStr(PCPMonitorUtils():RetornaListaPeriodosFuturo("M","4")))

    ConOut(REPLICATE("-",70))

Return lRet