Italo Giurizzato Junior

Boa tarde a todos, Os fontes estão atualizados? Disponibilizei uma correção esta semana.

Boa tarde a Todos, Muito obrigado pelas respostas, acredito sim que o ideal seja mudar para o dbExpress, mas isso vai levar muito tempo, hoje tenho um sistema com 80 módulos. Vou estudar todas as possibilidades.

Bom dia a todos, Aqui na empresa uma maquina das quase 120, apresentou a mensagem: "insufficient disk space - INMEM000.REM) ao executar um programa escrito em Delphi 7 com acesso ao banco de dados MS-SQL Server via ODBC (utilizo os componentes da paleta BDE). Este arquivo é salvo na pasta Temp do usuário: Exemplo: C:\Documents and Settings\italo\Configurações locais\Temp Em outras maquinas o arquivo é criado ao executar a aplicação e consequentemente é apagado ao finaliza-la. Pesquisando em outros Fórum encontrei a seguinte resposta para o problema: O seu HD tem espaço ??? O usuário tem limitação de espaço ??? Se as respostas as perguntas acima forem SIM e NÃO respectivamente, pode ser um problema que minha equipe encontrou quando o espaço no HD é igual a multiplos de 4 GB, o BDE tem um bug em que ele ao fazer alguns calculos para criar arquivos temporários erra no resto da divisão por 4 ( no caso sempre com valores multiplos de 4 GB ) e retorna que não há espaço em disco. Solução que encontramos ( por mais idiota que pareça ) liberar 1 GB de espaço em disco ou consumir 1 GB de espaço, para que o BDE faça a conta corretamente. Isso procede? O que o pessoal da Embarcadero tem a dizer sobre esse problema?

Bom dia Elvis, Desculpe na demora em responder, mas fiz as alterações sugeridas em seu poste, e algumas modificações no componente, favor atualizar os fontes e testar.

Boa tarde Rene, Foi feita uma alteração na função Valida, diferente da sua proposta, pois teriamos outras situações. Acredito que com a alteração vai contemplar tudo. Atualize os seus fontes, qualquer problema, por favor relate.

Bom dia a todos, Como o prazo para utilizar a versão 1.03 do CTe esta se esgotando, mandei para o SVN o ACBr.inc alterado, conforme pedido do Alexandre.

Bom dia Silvério, Essa atributo de identificação da uma dor de cabeça, pois no bloco de assinatura ela tem quer ser Id e não id dai o erro.

Boa tarde a todos, O componente possui uma função para realizar o cancelamento da NFSe, para tal devemos carregar o XML da respectiva NFSe a ser cancelada e passar como parametro o código de cancelamento: 1 - Erro de emissão; 2 - Serviço não concluido; 3 - RPS Cancelado na Emissão. A impressão do DANFSe detecta se a NFSe foi cancelada ou não, caso afirmativo imprime a tarja: NFS-e Cancelada Porque não esta aparecendo a tarja? Simples o XML não foi atualizado, uma vez que a função CancelarNFSe somente solicita o cancelamento e salva o retorno da mesma. Para que o XML seja atualizado havia a necessidade de realizar uma consulta do tipo ConsutarNFSeporRPS. Realizei uma alteração na função CancelarNFSe que vai realizar automaticamente essa consulta e consequentemente atualizar o XML. Favor baixar a atualização e realizar os testes. Fico no aguardo de um retorno.

Boa tarde a todos, Fiz uma comparação no que diz respeito ao XML enviado e retornado com relação as: NT 2010/008 - Registro de Eventos da Nota Fiscal Eletrônica Carta de Correção; NT 2011/006 - Cancelamento da NF-e como Evento da Nota Fiscal Eletrônica; NT 2012/002 - Manifestação do Destinatário. Bom pessoal salvo algumas alterações, para o Cancelamento e Manifesto, podemos utilizar as rotinas para a Carta de Correção. A minha sugestão é transformar as rotinas que gera e le o XML hoje usado pela CCe, em rotinas para gerar e ler o XML de eventos. Dependendo da chamada CCe, Cancelar ou Manifesto, o XML a ser gerado pela rotina inclui os campos especificos e ao ler o retorno, le os dados especificos dependendo do tipo de evento. Não sei se ficou claro, mas a implementação do Cancelamento por evento e a Manifestação do Destinatário que tambem é um evento, esta facil de ser realizada.

Boa tarde Marcos, No caso da NFe, isso é possível, uma vez que na versão 2.0 da mesma o que ocorreu foi o acrescimo de novos campos. Mas o CTe, teve alterações drasticas quebrando o XML em 2, sendo que o primeiro é igual para todos os modais e o segundo é especifico ao modal em questão, sem falar nos novos campos, nos que foram removidos e outros que tiveram os seus nomes alterados. Portanto não vejo outra alternativa, que não seja utilizar 2 aplicações, uma para cada versão.

Bom dia a todos, Para o CTe temos o DACTE em Quick Report e Fast Report sendo que este último esta desatualizado com relação a nova versão 1.04 O arquivo ACBr.inc que encontra-se na pasta ...\Fontes\ACBrComum possui uma diretiva de compilação que precisa ser descomentada para que o componente possa gerar o PDF.

Boa noite, Os fontes foram removidos do branches.

Boa noite Rene, Anexe o XML que foi gerado, validado e transmitido, para que possamos verificar.

Boa noite Fabio, Anexo o XML, para que possamos verificar qual é o problema.

Bom dia Toya, o campo cNF, o ideal é ser um valor randomico, não sendo possível gerar esse numero randomico, deixe o cNF igual ao numero da nota. Espero ter ajudado.

Bom dia Valdir, O componente ACBrNFSe esta sendo desenvolvido segundo o padrão ABRASF, a prefeitura de São Paulo utiliza outro padrão.

Bom dia Rene, Tenho um programa usado somente para carregar o xml e visualizar / imprimir o DACTE e esta tudo correto, esta sendo apresentado no quadro USO EXCLUSIVO DO EMISSOR DO CT-E as 4 observações que constam no XML. A linha (ACBrCTe.Conhecimentos.Items[0].CTe.Compl.ObsCont.Items[0].xTexto) realmente é essa usada para ler o conteudo do campo xTexto.

Boa noite Rene, A geração do XML esta em conformidade com o manual veja na página 104 do manual ( versão 1.04b ), note que xCampo é Atributo e xTexto é Elemento. Agora quanto a leitura do XML, poste o XML completo do CTe com dois ou mais campos de observação adicionado em ObsCont para que eu possa verificar.

Boa noite Esta ocorrendo esse erro porque você não esta alimentando corretamente o componente, veja como fazer estudando o fragmento de código abaixo: {$IFDEF PL_104} case DM_CNT.Conhec2CSTICMS.AsInteger of 00: begin Imp.ICMS.SituTrib := cst00; Imp.ICMS.ICMS00.CST := cst00; // Tributação Normal ICMS Imp.ICMS.ICMS00.vBC := RoundTo(DM_CNT.Conhec2BaseCalc.AsFloat, -2); Imp.ICMS.ICMS00.pICMS := RoundTo(DM_CNT.Conhec2AliqICMS.AsFloat, -2); Imp.ICMS.ICMS00.vICMS := RoundTo(DM_CNT.Conhec2ValorICMS.AsFloat, -2); end; 20: begin Imp.ICMS.SituTrib := cst20; Imp.ICMS.ICMS20.CST := cst20; // Tributação com BC reduzida do ICMS Imp.ICMS.ICMS20.pRedBC := RoundTo(DM_CNT.Conhec2ReducaoICMS.AsFloat, -2); Imp.ICMS.ICMS20.vBC := RoundTo(DM_CNT.Conhec2BaseCalc.AsFloat, -2); Imp.ICMS.ICMS20.pICMS := RoundTo(DM_CNT.Conhec2AliqICMS.AsFloat, -2); Imp.ICMS.ICMS20.vICMS := RoundTo(DM_CNT.Conhec2ValorICMS.AsFloat, -2); end; 40: begin Imp.ICMS.SituTrib := cst40; Imp.ICMS.ICMS45.CST := cst40; // ICMS Isento end; 41: begin Imp.ICMS.SituTrib := cst41; Imp.ICMS.ICMS45.CST := cst41; // ICMS não Tributada end; 51: begin Imp.ICMS.SituTrib := cst51; Imp.ICMS.ICMS45.CST := cst51; // ICMS diferido end; 60: begin Imp.ICMS.SituTrib := cst60; Imp.ICMS.ICMS60.CST := cst60; // Tributação atribuida ao tomador ou 3. por ST Imp.ICMS.ICMS60.vBCSTRet := RoundTo(DM_CNT.Conhec2BaseCalc.AsFloat, -2); Imp.ICMS.ICMS60.pICMSSTRet := RoundTo(DM_CNT.Conhec2AliqICMS.AsFloat, -2); Imp.ICMS.ICMS60.vICMSSTRet := RoundTo(DM_CNT.Conhec2ValorICMS.AsFloat, -2); Imp.ICMS.ICMS60.vCred := RoundTo(DM_CNT.Conhec2CreditoICMS.AsFloat, -2); end; 90: begin Imp.ICMS.SituTrib := cst90; Imp.ICMS.ICMS90.CST := cst90; // ICMS Outros Imp.ICMS.ICMS90.pRedBC := RoundTo(DM_CNT.Conhec2ReducaoICMS.AsFloat, -2); Imp.ICMS.ICMS90.vBC := RoundTo(DM_CNT.Conhec2BaseCalc.AsFloat, -2); Imp.ICMS.ICMS90.pICMS := RoundTo(DM_CNT.Conhec2AliqICMS.AsFloat, -2); Imp.ICMS.ICMS90.vICMS := RoundTo(DM_CNT.Conhec2ValorICMS.AsFloat, -2); Imp.ICMS.ICMS90.vCred := RoundTo(DM_CNT.Conhec2CreditoICMS.AsFloat, -2); end; end; {$ENDIF}

Bom dia Elvis, O problema é que os municipios do estado do Mato Grosso não são obrigados a contratar o mesmo provedor de NFSe. Exemplo: Cuiaba é ISS.NET Primavera do Leste é Abaco Caceres é FISSLEX O componente que encontra-se na pasta Branches já tem algumas rotinas para o provedor ISS.NET, não me recordo se esta 100%.

Camila, Se possível poste os XML gerados, ou mande por e-mail.

Boa tarde Camila, Para qual cidade você esta tentando enviar ou consultar?

Boa tarde a todos, Para obter o numero do RPS: ACBrNFSe1.NotasFiscais.Items[x].NFSe.IdentificacaoRps.Numero Para obter o numero da NFSe: ACBrNFSe1.NotasFiscais.Items[x].NFSe.Numero Sendo que x é o indice da nota na lista do componente.

Boa tarde Ant. Carlos, Você tem certeza que a versão do seu Quick Report é a 7.0 ? Até onde sei a versão mais atual do QR para o Delphi 7 é a 5.02. A que vem com o Delphi 7 é a versão 3.0 Se a versão do seu Quick Report for posterior a 3.0, você deve alterar ou melhor descomentar uma diretiva de compilação que encontra-se no arquivo ACBr.inc da pasta: ...\Fontes\ACBrComum Procure por esta diretiva no final do arquivo: ACBr.inc Espero ter ajudado.

Bom dia Rene, Como ocorreu alterações na estrutura do XML de uma versão para outra, com a inclusão de novas tags, exclusão de outras e inclusive algumas tags foram renomeadas. Isso não é possível, ou você usa o componente para versão 1.03 ou para 1.04 Sugestão, ter duas aplicação, uma para cada versão. Espero ter ajudado.