osmarbentojr

Bom dia @durvalcastro, na verdade eu acho que você não entendeu bem, não existe um "gesso" que vc molda daquele jeito e esta funcionando, tem que conhecer a legislação, ir testando e enviando em homologação. Abaixo segue uma parte do meu código, que ainda esta sendo ajustado para atender a todas as situações, mas que já funciona em produção if dm.Q1.FieldByName('pro_rcst').AsString = '000' then IBSCBS.CST := cst000; if dm.Q1.FieldByName('pro_rcst').AsString = '010' then IBSCBS.CST := cst010; if dm.Q1.FieldByName('pro_rcst').AsString = '011' then IBSCBS.CST := cst011; if dm.Q1.FieldByName('pro_rcst').AsString = '200' then IBSCBS.CST := cst200; if dm.Q1.FieldByName('pro_rcst').AsString = '220' then IBSCBS.CST := cst220; if dm.Q1.FieldByName('pro_rcst').AsString = '221' then IBSCBS.CST := cst221; if dm.Q1.FieldByName('pro_rcst').AsString = '222' then IBSCBS.CST := cst222; if dm.Q1.FieldByName('pro_rcst').AsString = '400' then IBSCBS.CST := cst400; if dm.Q1.FieldByName('pro_rcst').AsString = '410' then IBSCBS.CST := cst410; if dm.Q1.FieldByName('pro_rcst').AsString = '510' then IBSCBS.CST := cst510; if dm.Q1.FieldByName('pro_rcst').AsString = '515' then IBSCBS.CST := cst515; if dm.Q1.FieldByName('pro_rcst').AsString = '550' then IBSCBS.CST := cst550; if dm.Q1.FieldByName('pro_rcst').AsString = '620' then IBSCBS.CST := cst620; if dm.Q1.FieldByName('pro_rcst').AsString = '800' then IBSCBS.CST := cst800; if dm.Q1.FieldByName('pro_rcst').AsString = '810' then IBSCBS.CST := cst810; if dm.Q1.FieldByName('pro_rcst').AsString = '811' then IBSCBS.CST := cst811; if dm.Q1.FieldByName('pro_rcst').AsString = '820' then IBSCBS.CST := cst820; if dm.Q1.FieldByName('pro_rcst').AsString = '830' then IBSCBS.CST := cst830; IBSCBS.cClassTrib := dm.Q1.FieldByName('pro_cclasstrib').AsString; _vitem := dm.Q1.FieldByName('itenfe_quantidade').AsFloat * dm.Q1.FieldByName('itenfe_valor').AsFloat; _tot_baseibscbs := _tot_baseibscbs + _vitem; _val_ibsuf := (_vitem / 100) * 0.1; _val_ibsmun := (_vitem / 100) * 0.0; _val_cbs := (_vitem / 100) * 0.9; IBSCBS.gIBSCBS.vBC := _vitem; IBSCBS.gIBSCBS.gIBSUF.pIBSUF := 0.1; if dm.Q1.FieldByName('pro_rcst').AsString = '200' then //grupo de redução de base begin IBSCBS.gIBSCBS.gIBSUF.gRed.pRedAliq := 100; IBSCBS.gIBSCBS.gIBSUF.gRed.pAliqEfet := 0; _val_ibsuf := 0; end; IBSCBS.gIBSCBS.gIBSUF.vIBSUF := _val_ibsuf; IBSCBS.gIBSCBS.gIBSMun.pIBSMun := 0; if dm.Q1.FieldByName('pro_rcst').AsString = '200' then begin IBSCBS.gIBSCBS.gIBSMun.gRed.pRedAliq := 100; IBSCBS.gIBSCBS.gIBSMun.gRed.pAliqEfet := 0; _tot_ibsmun := 0; end; IBSCBS.gIBSCBS.gIBSMun.vIBSMun := _tot_ibsmun; IBSCBS.gIBSCBS.vIBS := _val_ibsmun + _val_ibsuf; IBSCBS.gIBSCBS.gCBS.pCBS := 0.9; if dm.Q1.FieldByName('pro_rcst').AsString = '200' then begin IBSCBS.gIBSCBS.gCBS.gRed.pRedAliq := 100; IBSCBS.gIBSCBS.gCBS.gRed.pAliqEfet := 0; _val_cbs := 0; end; IBSCBS.gIBSCBS.gCBS.vCBS := _val_cbs; _tot_ibsuf := _tot_ibsuf + _val_ibsuf; _tot_ibsmun := _tot_ibsmun + _val_ibsmun; _tot_cbs := _tot_cbs + _val_cbs; if dm.Q1.FieldByName('pro_rcst').AsString = '410' then begin _tot_ibsuf := 0; _tot_ibsmun := 0; _tot_cbs := 0; _tot_baseibscbs := 0; end; if dm.Q1.FieldByName('pro_rcst').AsString = '600' then begin IBSCBS.gIBSCBSMono.vTotCBSMonoItem := 0; IBSCBS.gIBSCBSMono.vTotIBSMonoItem := 0; end; end;

Bom dia @durvalcastro, na verdade é assim, o ACBR da um exemplo "genérico" de todos os campos "possíveis", não significa que colocando desse jeito para qualquer grupo de CST\CLASSTRIB funcione, pelo contrário, a depender do conjunto de informações, essa estrutura do exemplo muda, assim como os totais. Já tenho clientes em produção usando o CST 000, CST 200 e CST 600, todos ok, mas para cada um deles, existem uma variação desse exemplo.

Bom dia, depende do "exemplo" prático, pq para cada cst\cclasstrib a estrutura muda, e muda bastante, tenho alguns clientes rodando com algumas situações, se precisar de uma consultoria, me chama no privado.

Obrigado, eu já tenho o exe pronto, estava com BO apenas nos endpoints, vou validar tudo e posto o que deu ou não certo, obrigado

Sim, e os serviços ai dentro ?

Pessoal, bom dia, alguem conseguiu os endpoints de todos os serviços previstos para a geração própria ?

@Juliomar Marchetti bom dia, achei o manual especifico para geração do DADMDFe, gerei um xml de teste pra ver a tag do ciot, a tag é gerada corretamente no XMLs, mas tem uma "maravilhosos" sistemas que simplesmente coloca um layout da ponte que caiu, e dai vc pega um funcionário que não sabe nem ler bula de analgesico, resultado, tempestade perfeita.Segue os modelos "100% oficiais" que a cliente me mandou. Modelo Cte.pdf Modelo Manifesto Exportação.pdf Modelo Manifesto.pdf

@Juliomar Marchetti mas não existe nada para que saia o CIOT ? o cliente mandou isso

na impressão, me mandaram esse "modelo" de uma empresa que esta obrigando meu cliente a fazer igual

Pessoal, bom dia, estou utilizando o ciotonline para emissão do ciot, até ai tudo certo, estava colocando ele nas observações pq no campo especifico não sai, mas estou com dois clientes que não irão carregar mais se não for adequado isso, sabem me dizer se preciso atualizar fontes, algo a respeito ?? No meu fonte esta assim: rodo.infANTT.RNTRC := dmMdf.mdf_rntc; if dmMdf.mdf_ciot <> '' then begin rodo.CIOT := dmMdf.mdf_ciot; with rodo.infANTT.infCIOT.New do begin CIOT := dmMdf.mdf_ciot; CNPJCPF := udmSys._dademp_documento01; end; end; Mas já tentei as variações possiveis e nada, tirei a linha rodo.CIOT := dmMdf.mdf_ciot; e não foi, já troque de New para Add em with rodo.infANTT.infCIOT e também não foi, alguem pode ajudar ? Obrigado desde já.

Pessoal, agora vamos lá, tenho transportadora que dentro do estado de SP não faz manifesto, apenas interestadual, se todo frete remunerado tenho que gerar o ciot, e, os dados do veiculo\origem destino estão no MDF, tenho que emitir MDF pra todas as operações ?

Pessoal, bom dia, bom, primeiro, tem que gerar o CIOT, seja diretamente pela ANTT, seja via qualquer integradora, a grande questão é, informar os dados necessários, valor do frete mínimo e gerar o número do CIOT para os documentos, até aqui, ok, seja direto, seja via qualquer portal tem que gerar. Da questão do pagamento, hoje eu conversei com um gerente do Target Bank, que esta credenciado ao governo\ANTT, e expus a seguinte situação : faço emissão de CT-e\MDF-e para clientes, que são na sua grande maioria, transportadoras com carga própria, tem alguns terceirizados mas em resumo é carga própria, e contratei plataforma para geração do CIOT (no caso a ciotoline), preciso de integração de pagamento ??? Ele afirmou que não preciso de integradora, que posso fazer o pagamento do frete\recebimento do frete, obedecendo, claro, a questão do valor do frete minimo. Comentou que a própria ANTT disse que a transportadora pode apresentar o pagamento pelo meio\canal que quiser para o CIOT, desde que obedecido o frete minimo. Juntando a fala dele, mais o caso do ciotonline que não tem pagamento, eu acredito (desconheço detalhes da lei) ser possivel consumo do webservice da ANTT diretamente.

Pessoal, bom dia, depois de alguns testes, eu estava setando o IBSCBS.CST assim ACBrDfe.Conversao.TCSTIBSCBS(4)) mas ele não gerava as tags, não dava erro, passava pelo código, mas não funcionava, tive que colocar IF para que ficasse assim IBSCBS.CST := cst200, e dai passou, mas, ta bom, obrigado a todos.

Pessoal, boa noite, fui fazer um ajuste nos meus fontes hoje, para um cliente sobre a reforma, e não gera as tags da reforma. Repassei duas vezes o fonte, olhei o exemplo, reinstalei o acbr marcando a opção do XML document, e nada, tem algum "liga\desliga" nas ultimas atualizações ??? Obrigado desde já.

Boa tarde, tenho uma rotina que faz isso sobre os XMLS, um exe paralelo, vc configura, importa os documentos e ele gera, se tiver interessa me chama no privado.

Pessoal, boa tarde, tudo bem ? A muitos anos que não tenho uma rotina de TEF desenvolvida, não trabalho nos segmentos que exigem, mas peguei um cliente no MT, e preciso implementar. Queria saber qual TEF indicar para ele, e qual seria o mais tranquilo de desenvolver ? Agradeço desde já.

Boa tarde @Juliomar Marchetti, vamos lá, por partes.... - não existe outra cópia, apenas uma pasta do acbr, já há alguns anos que faço assim, e ontem mesmo, reinstalei tudo de novo, como ando fazendo em algumas situações. - outro ponto é, todos os outros fontes estão ok, inclusive o CT-e normal, de modo que, se fosse um erro "genérico" do componente em si, ou de alimentar o componente de algum modo, teria dado em outro documento. Debugando, observe que, meu breakpoint esta lá em cima, quando chega na linha do case, ele "pula' a linha do mocteos para a linha em vermelho, usando o F8 novamente ele da o erro de nenhum elemento encontrado Parando ai, e voltando pro fonte, ele para nessa linha que seria a falta de um "nó", justamente a informação complementar onde ele gera o qrcode. Outra questão, peguei os componente do exemplo e copiei e colei no fonte, imaginando que pudesse ser alguma configuração deixada pra trás, mesmo assim o erro permanece

Pessoal, bom dia, estou com um problema recorrente a muito tempo, e eis que agora, como preciso atualizar todos meus fontes para a reforma tributária, precisei debruçar sobre os fontes para ver. Meu problema é na geração do CT-e OS, onde, pelo exemplo funciona normalmente, os XMLs gerados, tanto no meu sistema como no exemplo são "quase" idênticos, exceto pelo fato de, no meu sistema, ele não gerar a tag infCTeSupl, que seria exatamente a tag do qrcode. Fui debugar, e o erro esta no assinar do componente, exatamente no trecho with TACBrCTe(TConhecimentos(Collection).ACBrCTe) do begin case Configuracoes.Geral.ModeloDF of moCTeOS: FXMLAssinado := SSL.Assinar(String(XMLUTF8), 'CTeOS', 'infCte'); moGTVe: FXMLAssinado := SSL.Assinar(String(XMLUTF8), 'GTVe', 'infCte'); moCTeSimp: FXMLAssinado := SSL.Assinar(String(XMLUTF8), 'CTeSimp', 'infCte'); else FXMLAssinado := SSL.Assinar(String(XMLUTF8), 'CTe', 'infCte') end; onde ele dá o erro quando tenta passar pela linha moGTVe: FXMLAssinado := SSL.Assinar(String(XMLUTF8), 'GTVe', 'infCte'); Lembrando que estou gerando um CT-e OS, o mesmo esta correto no modelo e alimentação do mesmo, os XMLs gerados são identicos, mas, alguma coisa no meio do caminho faz o modelo "mudar' para GTVe e dar o erro. Uma curiosidade é que, ao entrar no case, ele "pula" direto pra linha do moGTVe, e ao debugar dá erro nela. Sem mais, agradeço desde já.

Pessoal bom dia !!! Adequei quase todos meus clientes para a NFC-e, os ainda pendentes são aqueles clientes que emitem apenas o cartão de crédito, e ainda assim no final do mês. De qualquer forma, ainda sobraram 3 ou 4, só que nesses que sobraram, estou tento problemas com o envio, onde, eu envio e não vem retorno algum. Gera o XML normal, mas sem retorno nenhum. Ao trazer a base, certificado e tudo mais para o ambiente de desenvolvimento, tudo funciona normal. Sei da questão dos arquivos e afins, mas os mesmos que utilizo nos clientes que funcionam, utilizo aqui, qual poderia ser o problema ? alguma sugestão de verificação ??? Aguardo, e obrigado a todos!

Opa @valterpatrick, vai ser útil sim, vou verificar, agradeço, vou testar, abraço !!!

Pessoal, bom dia!!! Eu já utilizo a manifestação de NF-e para baixar os XMLs de entrada do meu cliente, tudo certo até aqui, mas me deparei com um problema mais "chato", em relação a manifestação\download. Na emissão da NF-e\CT-e é possível informar os autorizados a baixar o XML, tanto cpf como cnpj, e claro, a nota de saída do meu cliente ele mesmo não pode baixar, mas estou com uma situação "peculiar" onde eu preciso autorizar um CPF\CNPJ a baixar essa nota do meu cliente, que pelo site da sefaz, mediante certificado digital funciona, mas preciso de uma "ferramenta" para isso, como um manifestador onde quem vai baixar vai ser um CPF. É possível manifestar pelo NSU como é feito com notas de entrada, ou no caso dos CPF\CNPJ informado para autorização de download apenas pelo site ? Seria possível com a chave da NF-e ? Agradeço a atenção de todos.

Bom dia, me chama no whats 18 997079726

Pessoal bom dia, já estamos emitindo, em homologação, NF-e e NFC-e nas regras de reforma tributária, utilizando CBS\IBS, notas de crédito, notas de venda a órgãos governamentais, quem tirar interesse em consultaria a respeito, estamos a disposição, com exemplos, XML autorizados e também re-factoring de fontes. Para quem irá precisar se aquedar ao Sped, também fazemos a emissão do mesmo, quem precisar de consultoria na geração do Sped Fiscal e Contábil, estamos a disposição, obrigado !!!

Pessoal, boa tarde, tudo bem ? Tenho um problema recorrente com certificados digitais A3, quando o cartão é da marca Thales CWB, onde, quando instalo o safenet, ele reconhece o cartão normalmente, acesso e-cac e outros sites que usam certificado digital, mas quando uso pelo sistema, para emissão da NF-e, ele da o erro dizendo que o provedor de criptografia não foi encontrado, e quando faço a leitora dos certificados para seleção, também não funciona. Alguem teria alguma receita de bolo para esses "benditos' cartões ? Desde já obrigado

Aqui funcionou refazendo tudo, mas mais um detalhe, tive cliente que voltou sozinho, mas atualizei, obrigado a todos