Pular para o conteúdo principal

Postagens

Mostrando postagens de maio, 2009

Postagem em destaque

BlackTDN :: Social :: Rifa Festival da Arte Capoeira Projeto Eu Sou Ninja

Angariar fundos para cobrir os custos logísticos do "Festival da Arte Capoeira" e apoiar o projeto Eu Sou Ninja em sua missão de promover a integração social e cultural na comunidade de Jacaraípe. Com a criação da rifa, buscamos envolver a comunidade de forma ativa no financiamento do evento, permitindo que todos contribuam para o sucesso do festival e para a continuidade das atividades do projeto. Prêmio: Copia da minha biblioteca pessoal de AdvPL/TLpp ..etc Participe da Rifa Eu já contribui. Só falta você! ```cmd Pasta de C:\GitHub\naldodj-tlpp 13/04/2024 19:17 . 19/03/2024 13:49 .. 05/01/2024 12:22 2.742 .gitattributes 14/11/2023 16:02 83 .gitignore 02/12/2023 20:08 .vscode 05/01/2024 12:05 bin 13/04/2024 19:18 4.121 ChangeLog.txt 27/12/2023 02:05 include 14/11/2023 16:02 27.030 LICENSE.txt 14/11/2023 16:02 0 makepatch.lst 14/11/2

Protheus :: "Integrando o Totvs Development Studio (IDE) ao TortoiseSVN"

Hoje postarei uma dica de como integrar o Totvs Development Studio (IDE) ao SVN (Subversion) utilizando o "client" TortoiseSVN para controle de versão dos fontes do Totvs/Protheus. Utilizaremos, para isso, macros do IDE. No Exemplo, a macro $SOURCE_NAME irá retornar o caminho completo do "fonte" a ser manipulado. Algumas macros do IDE são: $SOURCE_NAME $SOURCE_NAME_NO_DRIVE $SOURCE_SHORT_NAME $SOURCE_CURSOR_LINE $SOURCE_CURSOR_COLUMN $SOURCE_CURSOR_WORD $SOURCE_EXECUTION_LINE $SOURCE_PATH $SOURCE_EXT $SOURCE_DRIVE $SYSTEM_DATE $SYSTEM_TIME $SYSTEM_USER_NAME $SYSTEM_USER_ACCESS $VERSION_ADD_FILE $VERSION_ASK_FOR_COMMENT $VERSION_CHECK_OUT $VERSION_CHECK_IN $VERSION_GET_LAST $VERSION_REMOVE_FILE $VERSION_UNDO_CHECK_OUT Observações: Se o server do SubVersion estiver em linux, não utilize a macro $SOURCE_NAME_NO_DRIVE, pois essa, quando o arquivo "fonte" possui _ ("underline"), passa-o como "upper case" fazendo com que o cliente do SubVersi

Protheus :: "Windows® PowerShell® Removendo Relatórios Antigos"

Quem trabalha com o totvs/protheus sabe que existem arquivos, por exemplo, os de relatórios (extensão *.#r) que às vezes precisam ser excluídos. Sendo assim, resolvi postar uma dica de como utilizar um "script" em Windows® PowerShell® para essa finalidade. No exemplo abaixo, presumo que o totvs/protheus está instalado abaixo de c:\totvs\. E nesse exemplo verifico e excluo todos os arquivos *.#* com diferença de data maior que 90 (noventa) dias. (Ajuste o caminho de acordo com a sua necessidade) ls -path d:\totvs\* -include *.#* -recurse | ? {$_.lastwritetime -lt (date).addDays(-90)} | foreach {rm -recurse -force $_} ou get-childitem -path d:\totvs\* -include *.#* -recurse | ? {$_.lastwritetime -lt (date).addDays(-90)} | foreach {remove-item -recurse -force $_} Para isso, criei um agendamento no "task manager/agendador de tarefas" do Windows® que será executado a cada último domingo dos meses de março, junho, setembro e dezembro e em executar coloquei o seguinte con

Protheus :: "Windows® PowerShell® Sincronizando Arquivos

Para quem possui um servidor de Contingência do Totvs/Protheus ou apenas um local para efetuar a cópia de todos os arquivos utilizados pelo Totvs/Protheus para posterior "backup" ou ainda para ter um ambiente de desenvolvimento o mais próximo possível do de produção, segue um "script", em Windows® PowerShell®, para tal finalidade. Esse "script" copia todos os arquivos do diretório informado, excluindo os arquivos de índices, temporários e de trabalho de um servidor para outro. No meu caso, criei uma tarefa no Windows® "Task Manager/Agendador de Tarefas", que é executada diariamente e a cada 2 horas para esse fim. Segue o "script". function SyncTotvsPath { param( $totvsTarget = "d:\totvs\", $totvsSource = "\\100.0.9.5\d$\totvs\" ) if( !$totvsTarget.endsWith("\")) { $totvsTarget+="\" } if( !$totvsSource.endsWith("\")) { $totvsSource+="\" } $log =

Windows® PowerShell® :: Sincronizando as Ferramentas da SysInternals

Para quem sabe da utilizade das Ferramentas disponibilizadas pela "SysInternals" para o gerenciamento do Windows®, segue um "script", em Windows® PowerShell® , para sincronizar essas ferramentas com a última versão disponibilizada em http:\\live.sysinternals\tools. Observação: Para que seja possível acessar a web via Windows® PowerShell® faz-se necessário que o "serviço" do Windows WebClient (Cliente da Web) esteja ativo. function Get-SysInternals { param ( $sysIntDir="c:\windows\system32\" ) if( !$sysIntDir.endsWith("\")) { $sysIntDir+="\" } $log = join-path $sysIntDir "SysInternalsChanges.log" if ( Test-Path $log ) { $SysInternalsChanges = get-item $log if ( $SysInternalsChanges.Length -ge 61440 ) { $SysInternalsChanges.Delete() } } add-content -force $log -value "`n`n[$(get-date)]SysInternals sync has started" dir \\live.sysinternals.com\tools -recurse | foreach { $fileName