cesar_moura

Italo, bom dia. Realmente, atribuindo o código da situação tributária a propriedade "SituTrib" ele sai impresso no DACTe, porém o código 80 não é reconhecido, ele imprime o "00" não testei os demais. códigos. Feliz Natal a todos os colegas ACBr.

prezados colegas saudações. No meu DACTe também não sai CST <> 00 mesmo eu movendo a referida CTS para o componente. sera que mais alguém esta com esse problema ? no meu caso estou enviando o código 90 para o componente "CTe.Imp.ICMS.ICMS90.CST := cst90;". Grato se alguém ajudar.

difícil... sobra pra gente de técnologia digerir e transformar esses atos políticos em números. Eles deveriam antes de divulgar uma lei dessas estudar a viabilidade técnica e o impacto que isso pode trazer. ficamos igual bobos esperando o meteóro cair pra ver onde vai ser o estrago. Brasil....

ok Régys obrigado pelo esclarecimento. A proposito, vc sabe se esta prevista uma nova versão do LayOut para um futuro próximo ?? eu sempre pesquiso na SEFAZ para saber as novidades, creio que se houver alguma coisa sera publicada lá certo ?? Abraço.

Publicado no G1.com 10/12/2012 10h45 - Atualizado em 10/12/2012 13h39 Dilma publica lei que determina informar tributos em nota fiscal Divulgação, porém, só será obrigatória daqui a seis meses. Presidente Dilma vetou necessidade de informar valores do IR e da CSLL. A presidente Dilma Rousseff publicou nesta segunda-feira (10) no "Diário Oficial da União" a lei 12.741, que determina que os tributos incidentes sobre os produtos e serviços devem ser explicitados na nota fiscal. sera que isso implicara em mudança do layout do XML como na versão 2 ?? alguém esta acomoanhando isso ??. abraço a todos.

Bom dia Italo. Rapaz, valeu demais a ajuda, conclui a tarefa agora posso passar para frente. Conto com você nas próximas dúvidas. Forte abraço.

Boa noite Italo... Valeu o puxão de orelha, descobri o que é Componente do Complemento, (ADEME, FRETE, SECAT) montei a rotina, ta assinando o XML, mas esta me retornando essa msg ai em baixo. Falha na validação dos dados do Conhecimento 145 Content for element '{http://www.portalfiscal.inf.br/cte}rem' is incomplete according to the DTD/Schema. Expecting: {http://www.portalfiscal.inf.br/cte}email, {http://www.portalfiscal.inf.br/cte}infNF, {http://www.portalfiscal.inf.br/cte}in.... postei o XML, no caso do CTe de Complemento tem mais algum código diferente além do "1" não consegui identificar isso no manual. mais uma vez, obrigado. 52121008540566000118570010000001455000056533-cte.xml

Boa Noite Italo. Agradeço demais sua atenção, mas a dificuldade desse Complemento de CTe esta em entender o COMPONENTE do Complemento. Desculpa mas ainda não ficou claro para mim. Quando vc disse: "Emiti-se um CTe de complementação de valores, onde informo o CTe que vai ser complementado, o(s) componente(s) do valor do frete que ficou/ficaram faltando e mais as informações relativas aos impostos complementados ICMS no caso." Significa que no CTe de Complemento só preciso informar o Remetente, Destinatário ou tem mais dados que preciso informar ?? Obrigado pela paciência, abraço.

Boa tarde Italo. Não estou achando muita lógica nesses componentes uma vez que já passei a chave não justificaria passar dados dos CTe´s Complementados. Ainda não entendi o que devo informar nesses Componentes, se são valores dos CTe´s Complementados (que eu estou complementando) ou se são valores do CTe de Complemento, esse que eu estaria gerando no momento. vc pode me dar um exemplo bem simples... rsrs Obrigado

Bom dia Italo beleza, ajudou demais, achei a classe. Agora tenho uma dúvida fácil pra vc --> Informações do Detalhamento do CTe Complementado: esses são os CTes que receberam os Valores de Complemento (número do Cte e Valor) correto ??? --> Informações dos Componentes Complementados xNome vComp Que informações são essas ??? são os dados que estão sendo complementados ?? tipo Valor do ICMS obrigado

Boa noite Italo. Pretendo alimentar o componente pois preciso gerar um CTe de Complemento e informar a chave dos CTe´s Complementados. Não estou achando como mover os dados para o Componente ACBrCTe na procedure GerarCTe.

Pessoal, saudações não estou achando essa classe "infCteComp" para mover os dados do complemento do CTe onde ela fica ?? Obrigado.

Com certeza eu e minha equipe estaremos lá, sera um grande prazer conhecer profissionais que como nós ajudamos nosso país a melhorar cada vez mais o nível de gestão das empresas brasileiras. Até lá....

Pessoal, saudações. Muito estranho... de uma máquina com o Windows XP, minha Aplicação consegue trabalhar normalmente no ambiente de Homologação da SEFAZ-GO mas a mesma Aplicação/Configuração no Servidor Windows Server 2003 não consigue, me retorna a mensagem abaixo. Sera que esta faltando alguma coisa no meu ambiente do Servidor ?. Abraço a todos. -- Consultar CTe. An error occurred in the secure channel support - URL:https://homologacao.cte.sefaz.rs.gov.br/ws/cteconsulta/cteconsulta.asmx- SOAPAction:http://www.portalfiscal.inf.br/cte/wsdl/CteConsulta/cteConsultaCT --Enviar Cte. An error occurred in the secure channel support - URL:https://homologacao.cte.sefaz.rs.gov.br/ws/cterecepcao/cterecepcao.asmx- SOAPAction:http://www.portalfiscal.inf.br/cte/wsdl/Cterecepcao/cterecepcaoLote

blz Markapollo, universitários, please...

Rapaz... acho que to fazendo pergunta sem lógica... mas como aprendemos por fragmentos é assim mesmo... rsrs Abri os XML´s que meu sistema gera e todos eles já tem a autorização no final do arquivo, mas persiste o problema da TARJA quando da reimpressão do DANFE, não sei o porque. Tem alguma configuração no ACBrNFeMonitor ???

Pessoal, saudações. Quando reimprimo um DANFE, ele sai com uma tarja informando que não é autorizado, para que isso não ocorra preciso Salvar o XML da NFe com os dados da autorização de uso(procNFe). Estudando a Classe vi que são os atributos abaixo que devem ser alimentados acho... mas depois de informados esses dados devo usar a sintaxe "NFeW.gerador.SalvarArquivo(Caminho + NomeArquivoXML)" para gravar a autorização no XML que eu gerei ??? alguém pode me dar uma luz ??? Obrigaduu Propriedades da Classe procNFe: NFe.procNFe.tpAmb NFe.procNFe.verAplic NFe.procNFe.chNFe NFe.procNFe.dhRecbto NFe.procNFe.nProt NFe.procNFe.digVal NFe.procNFe.cStat NFe.procNFe.xMotivo

Kiko, como já disse nosso companheiro Wagner Aragão você é o kara mesmo... o Problema era o CNPJ e o Cod. do Orgão. Agora a dúvida em relação a mandar mais de um evento na mesma Carta de Correção, sei que tenho que repetir os eventos anteriores para informar uma nova correção, já tentei de tudo, se tiver um exemplo de um XML que deu certo eu agradeço. Gostaria de concluir a CCe usando o ACBrNFeMoinitor V7 para postar a solução COMPLETA de forma a ajudar os demais companheiros. Abraço.

Kiko, estava usando a versão errada do ACBrNFeMonitor. Mas mesmo depois que corrigi apareceu essa mensagem de erro, vc sabe o que pode ser isso ??? NFE.CARTADECORRECAO("[CCE] idLote=1 [EVENTO001] chNFe=52101103862256000104550040000006029600669831 cOrgao=35 CNPJ=558287000130 dhEvento=13/04/12 16:20:25 nSeqEvento=1 xCorrecao=RAZAO SOCIAL GUIMARAES E MOURA LTDA") ERRO: Falha na validação dos dados da carta de correção 1871 - Element '{http://www.portalfiscal.inf.br/nfe}chNFe': This element is not expected. Expected is one of ( {http://www.portalfiscal.inf.br/nfe}CNPJ, {http://www.portalfiscal.inf.br/nfe}CPF ).

bem observado, o CNPJ estava sendo passado errado mas nesse caso, o registro é de um CPF. Mas ainda não é esse o problema. O que acho estranho é o ACBrNFeMonitor retornar "COMANDO ERRADO", isso que não entendo, mesmo gerando o arquivo ENTNFE.TXT com a sintaxe correta ele retorna esse erro, se fosse algum parâmetro passado errado, deveria retornar outra mensagem não acha ???

falta pouco... ok, valeu, fiz a quebra de linhas mas mesmo assim retorna o erro. Publiquei ai em baixo o erro a a procedure, usei as duas opções , gerar o arquivo NFEENT.TXT no diretório do ACBrNFeMonitor e a comentada que monta o comando da CCe numa varialvel com as quebras de linha e chama a procedure "mACBrGravaComando". Nas duas situações retornam o mesmo erro, já comparei com os demais formatos de comando nos post´s aqui do forum e não to achando o erro... se algum colega puder ajudar... Obrigaduuu Retorna o ERRO: Comando inválido (NFE.CARTADECORRECAO("[CCE] idLote=1 [EVENTO001] chNFe=52101103862256000104550040000006029600669831 cOrgao=35 CNPJ=5582870130 dhEvento=12/04/12 15:47:47 nSeqEvento=1 xCorrecao=FDKJGHDKJGHURHRSHI) procedure TFrmConsultaNotaFiscal.BitBtn3Click(Sender: TObject); Var CPFCNPJ, CMDCCE, NomeArquivo, NomeArquivoCCe: string; Arq : TextFile; seqnfe, seqeve, orgao, lote: integer; begin If Length(Cpo_MotivoCorrecao.Text) = 0 Then Begin ShowMessage('Informe o Motivo da Correção.'); Exit; End; PathWRK := 'C:\DANFE-Nfe' + IntToStr(CodEmpresa); SoDANFE := 9; // Informa que o ACBrNFeMonitor a ser executado é o do DANFE AtivaAcbr; //Ativar ACBrNFeMonitor SoDANFE := 0; ListaErrosPCN.Clear; ListaErrosPCN.Color := ClYellow; tbCadastro.Enabled := False; GroupBox4.Enabled := False; BitBtn1.Enabled := False; //ACBrNFeMonitor - Status do Serviço msg := ''; ResultMsg := ''; ListaErrosPCN.Lines.add('- Verificando Status Serviço... Aguarde!'); Application.ProcessMessages; // mACBrStsServico(msg, PathWRKARQ); // If Copy(trim(ResultMsg),1,3) = 'OK:' then Begin //ACBrNFeMonitor - Enviar Carta de Correção CPFCNPJ := ''; If QryNotaind_tipo_ident.Value = 'J' Then CPFCNPJ := '' +IntToStr(QryNotanum_base_cpf_cnpj.Value) + '' + IntToStr(QryNotaseq_filial_cliente.Value) + '' + IntToStr(QryNotanum_dv_cpf_cnpj.Value); If QryNotaind_tipo_ident.Value = 'F' Then CPFCNPJ := '' +IntToStr(QryNotanum_base_cpf_cnpj.Value) + '' + IntToStr(QryNotanum_dv_cpf_cnpj.Value); lote := 1; seqnfe := 1; seqeve := 1; orgao := 35; ListaErrosPCN.Lines.add('- Enviando Carta de Correção... Aguarde!'); Application.ProcessMessages; //----------------------------------------------------- NomeArquivo := '' + PathWRK + '\CCE.TXT'; NomeArquivoCCe := '' + PathWRK + '\ENTNFE.TXT'; Screen.Cursor := CrHourGlass; AssignFile(arq, NomeArquivo); Rewrite(arq); Write(arq,'NFE.CARTADECORRECAO("[CCE]'+chr(13)+chr(10)); Write(arq,'idLote=' + FormatFloat('0',lote) + chr(13)+chr(10)); Write(arq,'[EVENTO' + FormatFloat('000',seqeve) + ']'+chr(13)+chr(10)); Write(arq,'chNFe=' + Copy(QryNotachave_nfe.AsString,1,44) + chr(13)+chr(10)); Write(arq,'cOrgao=' + FormatFloat('0',orgao) + chr(13)+chr(10)); Write(arq,'CNPJ=' + CPFCNPJ + chr(13)+chr(10)); Write(arq,'dhEvento=' + FormatDateTime('dd/mm/yy hh:mm:ss',Now) + chr(13)+chr(10)); Write(arq,'nSeqEvento=' + FormatFloat('0',seqeve) + chr(13)+chr(10)); Write(arq,'xCorrecao=' + Cpo_MotivoCorrecao.Text + chr(13)+chr(10)); Screen.Cursor := CrDefault; System.Close(arq); If Not (copyfile(pchar(NomeArquivo), pchar(NomeArquivoCCe), false)) then Begin showmessage('Não copiou' + NomeArquivo + ' para ' + NomeArquivoCCe + ''); Exit; End Else DeleteFile(NomeArquivo); //----------------------------------------------------- {CMDCCE := '[CCE]'+chr(13)+chr(10); CMDCCE := CMDCCE + ' idLote=1'+chr(13)+chr(10); CMDCCE := CMDCCE + ' [EVENTO001]'+chr(13)+chr(10); CMDCCE := CMDCCE + ' chNFe=' + Copy(QryNotachave_nfe.AsString,1,44) + ''+chr(13)+chr(10); CMDCCE := CMDCCE + ' cOrgao=35'+chr(13)+chr(10); CMDCCE := CMDCCE + ' CNPJ=' + CPFCNPJ + ''+chr(13)+chr(10); CMDCCE := CMDCCE + ' dhEvento=' + FormatDateTime('dd/mm/yy hh:mm:ss',Now) + ''+chr(13)+chr(10); CMDCCE := CMDCCE + ' nSeqEvento=1'+chr(13)+chr(10); CMDCCE := CMDCCE + ' xCorrecao=' + Cpo_MotivoCorrecao.Text + '")' +chr(13)+chr(10); msg := ''; ResultMsg := ''; msg := mACBrGravaComando('', 'NFE.CARTADECORRECAO("' + CMDCCE + ''); ResultMsg := msg; ListaErrosPCN.Lines.add(msg);} //----------------------------------------------------- End; ListaErrosPCN.Color := ClWindow; tbCadastro.Enabled := True; BitBtn1.Enabled := True; GroupBox4.Enabled := True; end;

Caros colegas de luta, saudações... Preciso de ajuda, usando o ACBrNFeMonitor para enviar a CCe, não estou sabendo como passar o comando. Já usei as seguintes estratégias e retorna sempre "ERRO: Comando inválido..." 1 - criei um arquivo texto com o nome de NFEENT.txt contendo os comandos da CCe e gravei na pasta que o ACBrNFeMonitor usa. 2 - alimentei uma variável com os comandos da CCe (Exemplo abaixo). CMDCCE := '[CCE]'; CMDCCE := CMDCCE + ' idLote=1'; CMDCCE := CMDCCE + ' [EVENTO001]'; CMDCCE := CMDCCE + ' chNFe=' + Copy(QryNotachave_nfe.AsString,1,44) + ''; CMDCCE := CMDCCE + ' cOrgao=35'; CMDCCE := CMDCCE + ' CNPJ=' + CPFCNPJ + ''; CMDCCE := CMDCCE + ' dhEvento=' + FormatDateTime('dd/mm/yy hh:mm:ss',Now) + ''; CMDCCE := CMDCCE + ' nSeqEvento=1'; CMDCCE := CMDCCE + ' xCorrecao=' + Cpo_MotivoCorrecao.Text + ''; msg := ''; ResultMsg := ''; msg := mACBrGravaComando('', 'NFE.CARTADECORRECAO("' + CMDCCE + '")'); ResultMsg := msg; - Enviando Carta de Correção... Aguarde! ERRO: Comando inválido (NFE.CARTADECORRECAO("[CCE] idLote=1 [EVENTO001] chNFe=52101103862256000104550040000006029600669831 cOrgao=35 CNPJ=5582870130 dhEvento=12/04/12 11:11:13 nSeqEvento=1 xCorrecao=TTTTTYYYYYYYYYYYYYRRRRRRRRR")) Por favor, se algum colega souber ou quizer postar um exemplo bem prático de como passar os comandos da CCe para o ACBrNFeMonitor postando inclusive a sintaxe eu ficaria muito grato. Obrigado a Todos.

blz, fico feliz a ideia era te passar a estrutura para vc montar a sua rotina mas essa estrutura esta me retornando o seguinte erro: envio o comando: NFE.CARTADECORRECAO("[CCE] idLote =1 [EVENTO001] chNFe=52101103862256000104550040000006029600669831 cOrgao=35 CNPJ=5582870130 dhEvento=10/04/12 16:34:46 nSeqEvento=1 xCorrecao=RAZAO SOCIAL GUIMARAES E MOURA LTDA") ele retorna: ERRO: Comando inválido (NFE.CARTADECORRECAO("[CCE] idLote =1 [EVENTO001] chNFe=52101103862256000104550040000006029600669831 cOrgao=35 CNPJ=5582870130 dhEvento=10/04/12 16:34:46 nSeqEvento=1 xCorrecao=RAZAO SOCIAL GUIMARAES E MOURA LTDA")) Onde esta erro será ??? alguém consegue ver ?? Obrigado.

Boa tarde, se vc usa o ACBrNFeMonitor2 Ver.0.7.1a - OpenSSL da uma olhada nessa procedure, espero ajudar. procedure TFrmConsultaNotaFiscal.BitBtn3Click(Sender: TObject); Var i, j, k: integer; s, CStat, CPFCNPJ, CMDCC: string; begin If Length(Cpo_MotivoCorrecao.Text) = 0 Then Begin ShowMessage('Informe o Motivo da Correção.'); Exit; End; SoDANFE := 9; // Informa que o ACBrNFeMonitor a ser executado é o do DANFE AtivaAcbr; SoDANFE := 0; ListaErrosPCN.Clear; ListaErrosPCN.Color := ClYellow; tbCadastro.Enabled := False; GroupBox4.Enabled := False; BitBtn1.Enabled := False; PathWRK := 'C:\Nfe' + IntToStr(CodEmpresa) + '\'; PathWRKARQ := PathWRK + QryNotachave_nfe.AsString; PathWRK := 'C:\DANFE-Nfe' + IntToStr(CodEmpresa); //ACBrNFeMonitor - Status do Serviço msg := ''; ResultMsg := ''; ListaErrosPCN.Lines.add('- Verificando Status Serviço... Aguarde!'); Application.ProcessMessages; mACBrStsServico(msg, PathWRKARQ); if Copy(trim(ResultMsg),1,3) = 'OK:' then Begin //ACBrNFeMonitor - Enviar Carta de Correção msg := ''; ResultMsg := ''; CPFCNPJ := ''; If QryNotaind_tipo_ident.Value = 'J' Then CPFCNPJ := '' +IntToStr(QryNotanum_base_cpf_cnpj.Value) + '' + IntToStr(QryNotaseq_filial_cliente.Value) + '' + IntToStr(QryNotanum_dv_cpf_cnpj.Value); If QryNotaind_tipo_ident.Value = 'F' Then CPFCNPJ := '' +IntToStr(QryNotanum_base_cpf_cnpj.Value) + '' + IntToStr(QryNotanum_dv_cpf_cnpj.Value); ListaErrosPCN.Lines.add('- Enviando Carta de Correção... Aguarde!'); Application.ProcessMessages; CMDCC := '[CCE] idLote =1 [EVENTO001] chNFe=' + Copy(QryNotachave_nfe.AsString,1,44) + ' cOrgao=35 CNPJ=' + CPFCNPJ + ''; CMDCC := CMDCC + ' dhEvento=' + FormatDateTime('dd/mm/yy hh:mm:ss',Now) + ' nSeqEvento=1 xCorrecao=' + Cpo_MotivoCorrecao.Text + ''; msg := mACBrGravaComando('', 'NFE.CartadeCorrecao("' + CMDCC + '")'); ResultMsg := msg; ListaErrosPCN.Lines.add(msg); //NFE.CartadeCorrecao("[CCE] idLote =1 [EVENTO001] chNFe=35111100164276000105550010000092261991646266 cOrgao=35 CNPJ=65531758000100 dhEvento=18/11/2011 15:34:08 nSeqEvento=1 xCorrecao=CORRECOES NA NFE ATRAVES DA CARTA DE CORRECAO DE TESTE") End; ListaErrosPCN.Color := ClWindow; tbCadastro.Enabled := True; BitBtn1.Enabled := True; GroupBox4.Enabled := True; end;

prezados colegas, saudações. Sempre que vou reimprimir o DANFE tenho que consulta-lo na SEFAZ ou então é impresso no DANFE uma TARJA informando que o mesmo não é válido como resolver isso ??? Abraços