Histórico da Página
...
Exemplo de Uso
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
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 |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas