Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

Retorna uma lista de períodos até a data atual, conforme o tipo e quantidade de períodos parametrizados que vai até a data atual.

Parâmetros

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

...

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


Exemplo de Uso

Bloco de código
languagecpp
firstline1
linenumberstrue
User Function perPassado()
    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}|{30/10/2023,30/10/2023}|{29/10/2023,29/10/2023}|{28/10/2023,28/10/2023}|{27/10/2023,27/10/2023}
    ConOut("Tipo D: " + ArrTokStr(PCPMonitorUtils():RetornaListaPeriodosPassado("D","4")))

    //Tipo S: {29/10/2023,31/10/2023}|{22/10/2023,28/10/2023}|{15/10/2023,21/10/2023}|{08/10/2023,14/10/2023}|{01/10/2023,07/10/2023}
    ConOut("Tipo S: " + ArrTokStr(PCPMonitorUtils():RetornaListaPeriodosPassado("S","4")))

    //Tipo Q: {16/10/2023,31/10/2023}|{01/10/2023,15/10/2023}|{16/09/2023,30/09/2023}|{01/09/2023,15/09/2023}|{16/08/2023,31/08/2023}
    ConOut("Tipo Q: " + ArrTokStr(PCPMonitorUtils():RetornaListaPeriodosPassado("Q","4")))

    //Tipo M: {01/10/2023,31/10/2023}|{01/09/2023,30/09/2023}|{01/08/2023,31/08/2023}|{01/07/2023,31/07/2023}|{01/06/2023,30/06/2023}
    ConOut("Tipo M: " + ArrTokStr(PCPMonitorUtils():RetornaListaPeriodosPassado("M","4")))

    ConOut(REPLICATE("-",70))

Return lRet