SQL e Banco de Dados - Fórum RM 2020
Sentenças SQL, Scripts, e demais arquivos relacionados ao banco de dados RM.
Para quaisquer arquivos, sempre postem compactado, por favor.
7Scripts Internos TOTVS
Script Relacionamento Eventos x Acumuladores
A tabela PEVENTOS do RMLabore (Gestão de Folha de Pagamentos) possui um campo chamado INCACUMULADORES, que registra com asteriscos as incidências que o evento possui. Pra tratar via sentenças SQL essa informação, é um pouco chato, pois, tem que testar o conteúdo deste campo, e comparar com a tabela que guarda os nomes dos acumuladores.
Pra facilitar, criei 2 scripts (de formas diferentes) para ler automaticamente e tratar esses dados em suas sentenças. Pode até usar isso numa View se quiser já deixar no banco para facilitar sempre que precisar.
Bem, segue a ideia, e as sentenças.
Peventos
PCodAcum
By Rodrigo Borsato
Base Vazia 10.80 SQLServer
Conforme necessidade do pessoal aqui do Fórum, estamos postando aqui esse arquivo com a base Vazia SQL Server 10.80.
Arquivo Compactado com 8 Mb que deverá ser descompactado e importado no banco de dados.
Exporta Imagem Labore
By Jamensson
A solução foi desenvolvida para exportar todas as imagens dos funcionários para a pasta c:\ImagensLabore\ concatenando CHAPA+NOME.JPG.
Script de Acerto de Valores por extenso
Na versão do RM labore 11.20 , no gerador de relatórios , quando um campo está formatado como especial e escolhido como "valor monetário por extenso" , ele coloca somente valores (Exemplo: 34,00 estava como trinta e quatro) , faltando a palavra reais e/ou centavos). Com o anexo (script) ele corrige o problema e funciona corretamenteeu testei e funcionou corretamente.
Script Chave Incialização
By RL Sistemas
SELECT * FROM GPARAMS
SELECT * FROM GCOLIGADA * UPDATE GPARAMS USALICENCATOTVS SET = 0, CANUSESTARTPSW = 0, EMERGENCYKEY = NULL LICENCEMIGRATION, LICENCESERVERADDRESS = NULL, NULL = NULL LICENCESERVERPORT = CONTROLELIC = 22703
OBS: Verificar o controle de licenças e fazer o backup
Script Acerta Usuarios - SQL 2008
Script para acerto de usuários necessário sempre que é baixado um backup, onde é ajustado no banco de dados os acessos ao usuário RM e SYSDBA.
Este script deve ser rodado no Microsoft SQL Server Management Studio, e deve ser rodado pelo usuário SA ou um usuário administrador do banco de dados.
LEMBRE-SE os scripts para acerto de usuários para o SQL Server são diferentes para o SQL 2000, SQL 2005 e SQL 2008. Se precisar das versões anteriores, acesse neste tópico do Fórum:
http://www.forumrm.com.br/index.php?showtopic=1249
DIRF 2010, scripts para gerar layout dos valores de bancos de dados e planilha excel
By lugao
desenvolvi os scripts em anexo para gerar layout da dirf.
Na verdade uso 3 scripts, um absorve informações de uma planilha de pagamento de autônomos, outro de um sistema que tenho externo ao corpore e outro do RM Fluxus...
Seguindo os comentários e dividindo os arquivos se chega ao layout final, aceito pelo programa validador de 2010.
Script para Recuperar Senha do Windows Server através do SQL Server
Mais uma dica que vai ajudar na hora do aperreio.
Utilizei esse script quando um ex-funcionário da antiga empresa onde trabalhava mudou a senha do Windows 2003 do nosso servidor de banco de dados!!
Postem seus comentário e/ou se existe outra forma de fazer isso.
Função para Gerar Valores por Extenso
Você precisa montar sentenças SQL para relatórios, como contratos e outros tipos quaisquer, onde precisa que determinados valores sejam impressos por extenso ?
Com esta função você pode fazer isso tranquilo.
Basta criar a função no banco de dados, e chamá-la na sua sentença, por exemplo:
SELECT dbo.Extenso(1820)
-- Retorno: Um Mil Oitocentos e Vinte Reais
SELECT dbo.Extenso(1820.05)
-- Retorno: Um Mil Oitocentos e Vinte Reais e Cinco centavos
SELECT Idmov, CodCfo, DataEmissao, ValorLiquido, dbo.Extenso(ValorLiquido) From Tmov Where CodColigada = 1 and IdMov = 123
-- Retorno: 123, FOR12345, 01/06/2009, 150.00, Cento e Cinquenta Reais
Função - Trata Maiusculas e Minusculas
Função para o devido tratamento de Nomes e demais campos de texto que desejar retornar a primeira letra maiúsculo e as demais minúsculo
Essa função formata os campos de texto, normalmente NOMES, para a primeira Maiuscula e as demais Minusculas.
Exemplo 1: Select Nome, dbo.NomeMaiusculo(nome) From Pfunc Order by Nome
Se estava tudo maiusculo ou ora maiusculo ora minusculo, retornará corrigido.
Exemplo 2: Update Pfunc Set Nome = dbo.NomeMaiusculo(nome) From Pfunc
Altera todos os cadastros para normalizar os mesmos.
Muito útil para acerto de cadastros e para Geração de Arquivos, bastando criar a função e usá-la em sentenças SQL.
Quando é feita importação de dados da folha (RMLabore), e não existem registros dos Históricos da data da ADMISSÃO por que não existiam nos arquivos Origem, estes podem ser "arrumados" diretamente pelo Banco de Dados.