http://www.pendriveapps.com
Softwares para carregar no pen-drive ou HD Externo.
Programas portáteis (portable)
terça-feira, 30 de novembro de 2010
domingo, 28 de novembro de 2010
Sankhya - Erro na abertura do HELP
Quando executar/chamar o Help do sistema, o mesmo apresentar um erro de falta do programa WINHELP32.exe:
Acesse o site http://support.microsoft.com/kb/917607 , baixe e instale uma atualização de acordo com a versão do seu sistema operacional que criará os executáveis correspondentes na pasta Windows/System.
Acesse o site http://support.microsoft.com/kb/917607 , baixe e instale uma atualização de acordo com a versão do seu sistema operacional que criará os executáveis correspondentes na pasta Windows/System.
quinta-feira, 25 de novembro de 2010
sábado, 20 de novembro de 2010
domingo, 14 de novembro de 2010
quarta-feira, 10 de novembro de 2010
domingo, 7 de novembro de 2010
Function - Retira Letras/Números
Fiz uma function abaixo, que retira os numeros ou as letras de um campo string.. por exemplo o integrachave....
Exemplo:
-- TRAZER SOMENTE OS NUMEROS DE UM CAMPO
SELECT dbo.FNC_RETIRALETRANUM('FABIOFUMIO1978','N')
FROM GCOLIGADA
go
-- TRAZER SOMENTE AS LETRAS DE UM CAMPO
SELECT dbo.FNC_RETIRALETRANUM('FABIOFUMIO1978','N')
FROM GCOLIGADA
go
Com isso não precisa-se tratar os campos do INTEGRACHAVE da CLANCA...
Exemplo:
SELECT dbo.FNC_RETIRALETRANUM(INTEGRACHAVE,'N')
FROM CLANCA
go
Script de criação:
CREATE FUNCTION dbo.FNC_RETIRALETRANUM (@TEXTO VARCHAR(255), @FUNCAO VARCHAR(1))
RETURNS VARCHAR(255)
AS
BEGIN
-- RETIRAR CARACTERES/NUMEROS
DECLARE @TAMTEXTO INT,
@NOVOTEXTO VARCHAR(255),
@CONTADOR INT
SET @TAMTEXTO = LEN(@TEXTO)
SET @NOVOTEXTO = ''
SET @CONTADOR = 1
BEGIN
IF @FUNCAO = 'L' -- LETRAS
BEGIN
WHILE @CONTADOR <= @TAMTEXTO BEGIN IF SUBSTRING(@TEXTO,@CONTADOR,1) NOT IN ('1','2','3','4','5','6','7','8','9','0','!','@','#','$','%','¨','&','*','(',')', '+','=','-','\','<','>',':'';','?','/','|','[',']','{','}')
BEGIN
SET @NOVOTEXTO = @NOVOTEXTO + SUBSTRING(@TEXTO, @CONTADOR, 1)
END
SET @CONTADOR = @CONTADOR+1
END
END
IF @FUNCAO = 'N' -- NÚMEROS
BEGIN
WHILE @CONTADOR <= @TAMTEXTO
BEGIN
IF SUBSTRING(@TEXTO,@CONTADOR,1) IN ('1','2','3','4','5','6','7','8','9','0')
BEGIN
SET @NOVOTEXTO = @NOVOTEXTO + SUBSTRING(@TEXTO, @CONTADOR, 1)
END
SET @CONTADOR = @CONTADOR+1
END
END
RETURN (@NOVOTEXTO)
END
END
Exemplo:
-- TRAZER SOMENTE OS NUMEROS DE UM CAMPO
SELECT dbo.FNC_RETIRALETRANUM('FABIOFUMIO1978','N')
FROM GCOLIGADA
go
-- TRAZER SOMENTE AS LETRAS DE UM CAMPO
SELECT dbo.FNC_RETIRALETRANUM('FABIOFUMIO1978','N')
FROM GCOLIGADA
go
Com isso não precisa-se tratar os campos do INTEGRACHAVE da CLANCA...
Exemplo:
SELECT dbo.FNC_RETIRALETRANUM(INTEGRACHAVE,'N')
FROM CLANCA
go
Script de criação:
CREATE FUNCTION dbo.FNC_RETIRALETRANUM (@TEXTO VARCHAR(255), @FUNCAO VARCHAR(1))
RETURNS VARCHAR(255)
AS
BEGIN
-- RETIRAR CARACTERES/NUMEROS
DECLARE @TAMTEXTO INT,
@NOVOTEXTO VARCHAR(255),
@CONTADOR INT
SET @TAMTEXTO = LEN(@TEXTO)
SET @NOVOTEXTO = ''
SET @CONTADOR = 1
BEGIN
IF @FUNCAO = 'L' -- LETRAS
BEGIN
WHILE @CONTADOR <= @TAMTEXTO BEGIN IF SUBSTRING(@TEXTO,@CONTADOR,1) NOT IN ('1','2','3','4','5','6','7','8','9','0','!','@','#','$','%','¨','&','*','(',')', '+','=','-','\','<','>',':'';','?','/','|','[',']','{','}')
BEGIN
SET @NOVOTEXTO = @NOVOTEXTO + SUBSTRING(@TEXTO, @CONTADOR, 1)
END
SET @CONTADOR = @CONTADOR+1
END
END
IF @FUNCAO = 'N' -- NÚMEROS
BEGIN
WHILE @CONTADOR <= @TAMTEXTO
BEGIN
IF SUBSTRING(@TEXTO,@CONTADOR,1) IN ('1','2','3','4','5','6','7','8','9','0')
BEGIN
SET @NOVOTEXTO = @NOVOTEXTO + SUBSTRING(@TEXTO, @CONTADOR, 1)
END
SET @CONTADOR = @CONTADOR+1
END
END
RETURN (@NOVOTEXTO)
END
END
Function - Calcula Dias/Quantidade
Function que a partir de uma Data Inicial e a quantidade de dias, calcula o próximo dia útil desconsiderando feriados. (Baseado nas tabelas do CorporeRM)
CREATE FUNCTION dbo.FNC_CALCULADIASQTDADE ( @DATAINICIAL DATETIME,
@QUANTIDADE INT)
RETURNS DATETIME
AS
BEGIN
DECLARE @DATATMP DATETIME,
@CONTADOR INT
SET @DATATMP = @DATAINICIAL
SET @CONTADOR = 1
WHILE @CONTADOR < @QUANTIDADE
BEGIN
IF (DATENAME(DW,@DATATMP) NOT IN ('SATURDAY','SUNDAY')
AND NOT EXISTS (SELECT *
FROM GFERIADO
WHERE YEAR(DIAFERIADO) = YEAR(@DATATMP)
AND MONTH(DIAFERIADO) = MONTH(@DATATMP)
AND DAY(DIAFERIADO) = DAY(@DATATMP)))
BEGIN
SET @CONTADOR = @CONTADOR+1
END
SET @DATATMP = @DATATMP+1
END
RETURN (@DATATMP)
END
CREATE FUNCTION dbo.FNC_CALCULADIASQTDADE ( @DATAINICIAL DATETIME,
@QUANTIDADE INT)
RETURNS DATETIME
AS
BEGIN
DECLARE @DATATMP DATETIME,
@CONTADOR INT
SET @DATATMP = @DATAINICIAL
SET @CONTADOR = 1
WHILE @CONTADOR < @QUANTIDADE
BEGIN
IF (DATENAME(DW,@DATATMP) NOT IN ('SATURDAY','SUNDAY')
AND NOT EXISTS (SELECT *
FROM GFERIADO
WHERE YEAR(DIAFERIADO) = YEAR(@DATATMP)
AND MONTH(DIAFERIADO) = MONTH(@DATATMP)
AND DAY(DIAFERIADO) = DAY(@DATATMP)))
BEGIN
SET @CONTADOR = @CONTADOR+1
END
SET @DATATMP = @DATATMP+1
END
RETURN (@DATATMP)
END
C# - Tecla Enter (modelo/exemplo)
private void txtResultado_KeyPress(object sender, KeyPressEventArgs e)
{
if (e.KeyChar == 13) //ENTER pressionado
{
Executa_Calculo();
}
}
{
if (e.KeyChar == 13) //ENTER pressionado
{
Executa_Calculo();
}
}
terça-feira, 2 de novembro de 2010
CONTABILIDADE PARA PEQUENAS E MÉDIAS EMPRESAS
http://www.cfc.org.br/uparq/normas_pme.pdf
Livro Gratuito
Regras Contábeis para Pequenas e Médias Empresas do Conselho Federal de Contabilidade.
Livro Gratuito
Regras Contábeis para Pequenas e Médias Empresas do Conselho Federal de Contabilidade.
Assinar:
Postagens (Atom)