Bat Geração de arquivo via bat com data do dia anterior

[Marcos Pereira Simões]

@ricardo_br, sem palavras pra agradecer.
God d+

Monstro

[Marcos Pereira Simões]

Em 10/10/2022 às 19:08, ricardo_br disse:

veja se é isso:

 

@echo off
:: %%a = Numero Dia Semana: Domingo=0 Segunda=1 Terça=2 Quarta=3 Quinta=4 Sexta=5 Sábado=6
:: Explicando:
:: Se for Segunda subtrai 3 dias da data de hoje para pegar a data de sexta-feira
:: Se for Domingo subtrai 2 dias da data de hoje para pegar a data de sexta-feira
:: se for Qualquer outro dia subtrai 1 dia da data de hoje:
for /f "delims=" %%a in ('"powershell (get-date).dayofweek.value__"') do (
                                                                          if %%a EQU 1 (
                                                                                        Powershell -command "(get-date).adddays(-3).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-3).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       )
                                                                          if %%a EQU 0 (
                                                                                        Powershell -command "(get-date).adddays(-2).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-2).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       ) 
                                                                          if %%a GTR 1 (
                                                                                        Powershell -command "(get-date).adddays(-1).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-1).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       )
                                                                         )

 

@ricardo_brboa tarde meu camarada!

 

Pra ilustrar...
dia 13/10 (qui) - gerei arquivo de data de 10/10 (seg)
dia 14/10 (sex) - gerei arquivo de data de 11/10 (ter)

 

dia 17/10 (seg) devo gerar arquivo de data de 12/10 (qua)
dia 18/10 (ter)   devo gerar arquivo de data de 13/10 (qui)
dia 19/10 (qua) devo gerar arquivo de data de 14/10 (sex)

e assim por diante (sempre desconsiderando sábado e domingo)

o esquema acima que me passou atende isso?

[ricardo_br]

Pelo que eu entendi seria assim, sempre o dia anterior desconsiderando sábado e domingo:

 

13/10 (Qui) -> 12/10 (Qua)
14/10 (Sex) -> 13/10 (Qui)
17/10 (Seg) -> 14/10 (Sex)
18/10 (Ter) -> 17/10 (Seg)
19/10 (Qua) -> 18/10 (Ter)

[Marcos Pereira Simões]

@ricardo_brna vdd são 3 dias anteriores, sempre desconsiderando o sábado e domingo.

Mas a ideia é a mesma que mencionou.

Digamos, segunda dia 17 eu gero 12/10 (desconsidera sáb e dom e menos 3 dias)

[ricardo_br]

Veja se está certo agora, subtrai 3 dias da data de hoje desconsiderando sábado e domingo:

 

@echo off
:: %%a = Numero Dia Semana: Domingo=0 Segunda=1 Terça=2 Quarta=3 Quinta=4 Sexta=5 Sábado=6
:: Explicando:
:: Se for Segunda subtrai 5 dias da data de hoje para pegar a data de quarta-feira
:: Se for Domingo subtrai 4 dias da data de hoje para pegar a data de quarta-frira
:: se for Qualquer outro dia subtrai 3 dia da data de hoje:
for /f "delims=" %%a in ('"powershell (get-date).dayofweek.value__"') do (
                                                                          if %%a EQU 1 (
                                                                                        Powershell -command "(get-date).adddays(-5).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-5).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       )
                                                                          if %%a EQU 0 (
                                                                                        Powershell -command "(get-date).adddays(-4).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-4).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       ) 
                                                                          if %%a GTR 1 (
                                                                                        Powershell -command "(get-date).adddays(-3).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-3).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       )
                                                                         )

 

[Marcos Pereira Simões]

@ricardo_brbom dia!
Agradeço muito, rodei hoje e gerou certinho o arquivo de data com o dia 12/10.

Amanhã dia 18, quando eu rodar, vai gerar o arquivo de data de 13/10?
Abcs

[ricardo_br]

Isso, pode testar mudando a data no relógio do Windows....

[Marcos Pereira Simões]

@ricardo_brbom dia!
Então, ontem eu rodei a bat e funcionou certinho, ou seja dia 17 e gerou o arquivo de datas com data de 12/10/2022 , ou seja, com 3 dias atrás desconsiderando o sábado e domingo, exatamente como eu queria.

Qua, Qui, Sex, Sáb, Dom, Seg

12     13    14   15     16     17

Porém seguindo minha lógica, hoje dia 18 deveria gerar dia 13, porém gerou 15 (Sábado).

[ricardo_br]

@Marcos Pereira Simões Sim, eu errei. Acho que agora tá certo:

 

@echo off
:: %%a = Numero Dia Semana: Domingo=0 Segunda=1 Terça=2 Quarta=3 Quinta=4 Sexta=5 Sábado=6
:: Explicando:
:: Se for Segunda subtrai 5 dias da data de hoje para pegar a data de quarta-feira
:: Se for Domingo subtrai 4 dias da data de hoje para pegar a data de quarta-frira
:: se for Qualquer outro dia subtrai 3 dia da data de hoje:
for /f "delims=" %%a in ('"powershell (get-date).dayofweek.value__"') do (
                                                                          if %%a EQU 1 (
                                                                                        Powershell -command "(get-date).adddays(-5).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-5).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       )
                                                                          if %%a EQU 2 (
                                                                                        Powershell -command "(get-date).adddays(-5).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-5).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       )
                                                                          if %%a EQU 3 (
                                                                                        Powershell -command "(get-date).adddays(-5).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-5).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       )
                                                                          if %%a EQU 0 (
                                                                                        Powershell -command "(get-date).adddays(-4).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-4).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       ) 
                                                                          if %%a GTR 4 (
                                                                                        Powershell -command "(get-date).adddays(-3).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-3).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       )
                                                                         )

 

[Marcos Pereira Simões]

@ricardo_brgod..
Muito bom, certinho.
valeu

[Marcos Pereira Simões]

2 horas atrás, Marcos Pereira Simões disse:

@ricardo_brgod..
Muito bom, certinho.
valeu

 

agora, Marcos Pereira Simões disse:

 

@ricardo_brmano, uns tempos atrás você me ajudou com uma bat (anexa) que compactava arquivos e que inclusive ignorava sábados e domingos.
Me ajuda, com base nessa bat anterior que você até corrigiu.
Pergunta: é possível aplicar a essa bat anexa a mesma regra para compactar?
Tipo gero os arquivos na segunda (17/10) e quando compactar no nome do arquivo iria a data de 14/10 sexta-feira.

Compactar.txt

[ricardo_br]

Veja se é isso em anexo

 

 

Compactar2.txt

[Marcos Pereira Simões]

Em 18/10/2022 às 10:55, ricardo_br disse:

@echo off
:: %%a = Numero Dia Semana: Domingo=0 Segunda=1 Terça=2 Quarta=3 Quinta=4 Sexta=5 Sábado=6
:: Explicando:
:: Se for Segunda subtrai 5 dias da data de hoje para pegar a data de quarta-feira
:: Se for Domingo subtrai 4 dias da data de hoje para pegar a data de quarta-frira
:: se for Qualquer outro dia subtrai 3 dia da data de hoje:
for /f "delims=" %%a in ('"powershell (get-date).dayofweek.value__"') do (
                                                                          if %%a EQU 1 (
                                                                                        Powershell -command "(get-date).adddays(-5).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-5).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       )
                                                                          if %%a EQU 2 (
                                                                                        Powershell -command "(get-date).adddays(-5).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-5).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       )
                                                                          if %%a EQU 3 (
                                                                                        Powershell -command "(get-date).adddays(-5).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-5).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       )
                                                                          if %%a EQU 0 (
                                                                                        Powershell -command "(get-date).adddays(-4).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-4).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       ) 
                                                                          if %%a GTR 4 (
                                                                                        Powershell -command "(get-date).adddays(-3).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-3).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       )
                                                                         )

@ricardo_brFala mano! beleza?
Cara, esse código acima só está funcionando se no lugar do GTR 4 eu trocar por EQU 4.
 

[ricardo_br]

@Marcos Pereira Simões Acho que tem razão tente GEQ ao invés de GTR | GEQ = Maior ou Igual

 

Ou então GTR 3 ao invés de 4...

[Marcos Pereira Simões]

4 minutos atrás, ricardo_br disse:

@Marcos Pereira Simões Acho que tem razão tente GEQ ao invés de GTR | GEQ = Maior ou Igual

 

Ou então GTR 3 ao invés de 4...

Opa, foi com GEQ, valeu..abcs

[Marcos Pereira Simões]

Em 14/10/2022 às 19:08, ricardo_br disse:

Veja se está certo agora, subtrai 3 dias da data de hoje desconsiderando sábado e domingo:

 

@echo off
:: %%a = Numero Dia Semana: Domingo=0 Segunda=1 Terça=2 Quarta=3 Quinta=4 Sexta=5 Sábado=6
:: Explicando:
:: Se for Segunda subtrai 5 dias da data de hoje para pegar a data de quarta-feira
:: Se for Domingo subtrai 4 dias da data de hoje para pegar a data de quarta-frira
:: se for Qualquer outro dia subtrai 3 dia da data de hoje:
for /f "delims=" %%a in ('"powershell (get-date).dayofweek.value__"') do (
                                                                          if %%a EQU 1 (
                                                                                        Powershell -command "(get-date).adddays(-5).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-5).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       )
                                                                          if %%a EQU 0 (
                                                                                        Powershell -command "(get-date).adddays(-4).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-4).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       ) 
                                                                          if %%a GTR 1 (
                                                                                        Powershell -command "(get-date).adddays(-3).tostring('yyyyMMdd')>'C:\Teste\Data.txt'"
                                                                                        Powershell -command "(get-date).adddays(-3).tostring('yyyyMMdd')>>'C:\Teste\Data.txt'"
                                                                                       )
                                                                         )

 

@ricardo_brboa tarde meu amigo!
Cara, tô com uma situação meio louca.
Quando eu rodo essa bat, gera certinho como eu quero, mas tem um detalhe que demorei pra conseguir encontrar.
O arquivo está sendo gerado com encoding UCS-2 LE BOM, mas esse arquivo está sendo rejeitado pelo sistema, pois o devido teria que ser UTF-8.

O código abaixo que você fez pra mim também, gera UTF-8.

 

@echo off

SetLocal EnableDelayedExpansion

for /f "skip=1 tokens=3" %%a in ('reg query "HKCU\Control Panel\International" -v "sShortDate"') do set FormatoData=%%a

FOR /L %%a in (0,1,6) do IF /I "!FormatoData:~%%a,4!"=="yyyy" set "PAno=%%a,4"
FOR /L %%a in (0,1,6) do IF /I "!FormatoData:~%%a,2!"=="mm" set "PMeses=%%a,2"
FOR /L %%a in (0,1,6) do IF /I "!FormatoData:~%%a,2!"=="dd" set "PDias=%%a,2"

set DataAtual=!Date:~%PAno%!!Date:~%PMeses%!!Date:~%PDias%!
set Ano=!Date:~%PAno%!
set Mes=!Date:~%PMeses%!
set Dia=!Date:~%PDias%!

:: MesNu e DiaNu são data do Mês e Dia sem 0 na frente

set /a MesNu=10000%Mes% %% 10000
set /a DiaNu=10000%Dia% %% 10000
set /a AnoNu=%Ano%

@echo off
Powershell (get-date).adddays(-3).tostring('yyyyMMdd')>"C:\Users\marcos.psimoes\Downloads\Marcos\Data.txt"
Powershell (get-date).adddays(-3).tostring('yyyyMMdd')>>"C:\Users\marcos.psimoes\Downloads\Marcos\Data.txt"

Exit

:MesAnterior

IF !MesNu! EQU 1 (set MesNu=12& set /a AnoNu=!AnoNu! - 1) else (set /a MesNu-=1)

xcopy . temp /l /i /d:!MesNu!-!Contador!-!AnoNu! > nul 2>&1
IF /i !Errorlevel! EQU 0 (set DiaNu=!Contador!) else (Set /a Contador=!Contador!-1 & goto :MesAnterior)
goto :EOF
 

[ricardo_br]

@Marcos Pereira Simões Veja esse código, deverá salvar em UTF8:

 

https://pastebin.com/raw/mADjN3Vi

 

 

[Marcos Pereira Simões]

@ricardo_br mano, salvou como ANSI, não consigo testar agora, mas creio que talvez funcione.
Como é determinado na bat o encoding?
valeu e obrigado mais uma vez. 

[ricardo_br]

@Marcos Pereira Simões Como você testa o tipo de codificação? Porque eu abro o arquivo final no bloco de notas, vou em "Salvar como" ai aparece a codificação atual ai consta "UTF8" para mim....

[Marcos Pereira Simões]

@ricardo_br te mandando um print

[ricardo_br]

Pode ser que esteja reconhecendo como ascii porque não tem qualquer caractere unicode no arquivo se você colocar um caractere unicode como ç ê í ó acho que vira UTF-8...

[Marcos Pereira Simões]

3 minutos atrás, ricardo_br disse:

Pode ser que esteja reconhecendo como ascii porque não tem qualquer caractere unicode no arquivo se você colocar um caractere unicode como ç ê í ó acho que vira UTF-8...

beleza meu amigo, creio que vai funcionar

[Marcos Pereira Simões]

3 horas atrás, ricardo_br disse:

Pode ser que esteja reconhecendo como ascii porque não tem qualquer caractere unicode no arquivo se você colocar um caractere unicode como ç ê í ó acho que vira UTF-8...

Funcionou...valeu, obrigado.