sergiom

Italo Boa tarde, ficou assim: -<ICMS> -<ICMSOutraUF> <CST>91</CST> <vBCOutraUF>18390.17</vBCOutraUF> <pICMSOutraUF>12.00</pICMSOutraUF> <vICMSOutraUF>2206.82</vICMSOutraUF> </ICMSOutraUF> </ICMS> Eu fiz a alteração, cliente gerou novamente e saiu com 90. Tem que trocar 91 por 90. CST = 91 não existe para CTe. Abraços Sérgio

Boa tarde, a função abaixo (PCNComum\PCNConversao.pas) está gerando CST = 91 para cstICMSOutraUF. Valor correto é CST = 90 Isto para emissão de CTe. function CSTICMSToStr(const t: TpcnCSTIcms): string; begin // ID -> N02 - Tributada integralmente // ID -> N03 - Tributada e com cobrança do ICMS por substituição tributária // ID -> N04 - Com redução de base de cálculo // ID -> N05 - Isenta ou não tributada e com cobrança do ICMS por substituição tributária // ID -> N06 - Isenta // ID -> N06 - Não tributada // ID -> N06 - Suspensão // ID -> N07 - Diferimento A exigência do preenchimento das informações do ICMS diferido fica à critério de cada UF. // ID -> N08 - ICMS cobrado anteriormente por substituição // ID -> N09 - Com redução de base de cálculo e cobrança do ICMS por substituição tributária // ID -> N10 - ICMS pagto atribuído ao tomador ou ao terceiro previsto na legislação p/ ST // ID -> N10a - Operação interestadual para consumidor final com partilhado ICMS devido na operaçãoentre a UF de origem e a UF do destinatário ou a UF definida na legislação. (Ex. UF daconcessionária de entrega do veículos) (v2.0) // ID -> N10b - Grupo de informação do ICMS ST devido para a UF de destino,nas operações interestaduais de produtos que tiveram retenção antecipada de ICMS por ST na UF do remetente. Repasse via Substituto Tributário. (v2.0) // ID -> N11 - ICMS devido para outras UF // ID -> N12 - Outros result := EnumeradoToStr(t, ['', '00' , '10' , '20' , '30' , '40' , '41' , '50' , '51' , '60' , '70' , '80' , '81', '90', '91', 'SN', '10', '90', '41', '60'], [cstVazio, cst00, cst10, cst20, cst30, cst40, cst41, cst50, cst51, cst60, cst70, cst80, cst81, cst90, cstICMSOutraUF, cstICMSSN, cstPart10, cstPart90, cstRep41, cstRep60]); end; Atenciosamente Sérgio

Uma transportadora é do RJ e outra de MG. É o caso que mencionei. Quando o subcontratado recebe CTe do contratante fora do estado. Emitir como Redespacho e o tomador a empresa emissora do CTe contratante. É o jeito que está passando, só que gera ICMS.

Bom dia, ontem alguns CTe gerados em MG e recebidos em SP foram emitidos como subcontratação. Sexta foram emitidos como Redespacho e gerando ICMS. Eu creio que tem a ver com o ICMS. Se a origem do CTe que subcontratará o serviço for de outro estado, o subcontratante não conseguirá emitir subcontratado com isenção de ICMS como estava sendo feito. Infelizmente deveriamos ter um orgão centralizador que publicasse as regras lógicas implementadas na validação. A documentação é sempre falha. Regras deveria estar explícitas o máximo possível.

Até agora, a única solução é emitir como REDESPACHO. As emissões de subcontratação isentas de ICMS não mais serão possíveis. Somente se a transportadora contratante estiver dentro do mesmo estado. Se a contratante estiver fora do estado não poderá ser subcontratação e o subcontratado deverá emitir com ICMS. Tudo por conta do ICMS.

Italo, bom dia, obrigado. Não ajuda, pois este procedimento funcionava até o dia 15. Só para você entender melhor: Transportadora A - emitiu do Rio de Janeiro até Porto Velho. Inicio - Rio de Janeiro Término - Porto Velho Transportadora B - subcontratada, recebeu a carga em Guarulhos e vai levar até Porto Velho. Inicio - Guarulhos Término - Porto Velho Deste jeito funcionava até 15/05/2018. Dia 16/05/2018 rejeitou. Alterado para Inicio - Rio de Janeiro Término - Porto Velho Continua rejeitando, ou seja não passa de nenhum jeito. Atenciosamente Sérgio

Boa noite, estou com um problema na emissão com CTe de subcontratado. No caso meu cliente é o subcontratado. 3. Webservice de Recepção – Regras de Validação de Documentos Anteriores G091 Se o tipo de serviço for igual a Subcontratação: - Código 832 Os CT-e informados em DocAnt (chCTe) devem possuir o mesmo código de município de início e fim de prestação do CT-e de subcontratação OBS: Retornar a primeira chave do CT-e anterior com situação inválida A validação será possível somente para chaves de acesso que existam na base de dados da SEFAZ Autorizadora Mesmo colocando a mesma cidade de origem e destino do cte subcontratante, o mesmo é rejeitado. Alguém passou por este problema? O Cte da empresa subcontratante, ele repete no Recebedor o Destinatário e no Expedidor a própria empresa emitente. Achei isto errado, pois não faço isso. Não sei se esta é a causa do problema. Atenciosamente Sérgio

Muito obrigado Juliomar.

pcnNFeR.pas Arquivo anexado Juliomar.

ACBr\Fontes\ACBrDFe\ACBrNFe\PCNNFe\pcnNFeR.pas ACBr\Fontes\ACBrDFe\ACBrNFe\PCNNFe\pcnNFeR.pas(970) Error: E2029 ')' expected but ';' found while Leitor.rExtrai(1, tagPag, '', i + 1) <> '' do begin NFe.pag.Add; (*YA01b*)NFe.pag.indPag := StrToIndpag(Ok, Leitor.rCampo(tcStr, 'indPag')); (*YA02*)NFe.pag.tPag := StrToFormaPagamento(ok, Leitor.rCampo(tcStr, 'tPag')); (*YA03*)NFe.pag.vPag := Leitor.rCampo(tcDe2, 'vPag'); if Leitor.rExtrai(2, 'card') <> '' then Bom dia, erro ao compilar pcnNFeR.pas. Correção acima, somente acrescer ) em vermelho. Atenciosamente Sérgio

A versão que eu tinha apontava somente para fs25, frx25, frxe25, frxDB25. Após apagar e atualizar veio com esta alteração. Problema resolvido. requires rtl, vcl, designide, dbrtl, dsnap, {$IFDEF VER140} fs6, frx6, frxe6, frxDB6, {$ENDIF} // D6 {$IFDEF VER150} fs7, frx7, frxe7, frxDB7, {$ENDIF} // D7 {$IFDEF VER170} fs9, frx9, frxe9, frxDB9, {$ENDIF} // D2005 {$IFDEF VER180} {$IFNDEF VER185} fs10, frx10, frxe10, frxDB10, {$ENDIF} // D2006 {$ENDIF} {$IFDEF VER185} fs11, frx11, frxe11, frxDB11, {$ENDIF} // D2007 {$IFDEF VER190} fs11, frx11, frxe11, frxDB11, {$ENDIF} // D2007 {$IFDEF VER200} fs12, frx12, frxe12, frxDB12, {$ENDIF} // D2009 {$IFDEF VER210} fs14, frx14, frxe14, frxDB14, {$ENDIF} // D2010 {$IFDEF VER220} fs15, frx15, frxe15, frxDB15, {$ENDIF} // XE {$IFDEF VER230} fs16, frx16, frxe16, frxDB16, {$ENDIF} // XE2 {$IFDEF VER240} fs17, frx17, frxe17, frxDB17, {$ENDIF} // XE3 {$IFDEF VER250} fs18, frx18, frxe18, frxDB18, {$ENDIF} // XE4 {$IFDEF VER260} fs19, frx19, frxe19, frxDB19, {$ENDIF} // XE5 {$IFDEF VER270} fs20, frx20, frxe20, frxDB20, {$ENDIF} // XE6 {$IFDEF VER280} fs21, frx21, frxe21, frxDB21, {$ENDIF} // XE7 {$IFDEF VER290} fs22, frx22, frxe22, frxDB22, {$ENDIF} // XE8 {$IFDEF VER300} fs23, frx23, frxe23, frxDB23, {$ENDIF} // Seattle {$IFDEF VER310} fs24, frx24, frxe24, frxDB24, {$ENDIF} // Berlin {$IFDEF VER320} fs25, frx25, frxe25, frxDB25, {$ENDIF} // Tokyo ACBr_Boleto;

Bom dia fiz uma instalação nova em uma máquina com Windows 10 x64, Delphi XE e Delphi Tokyo instalado. O Erro só ocorre no Delphi XE e somente na impressão do Boleto. Já desinstalei e reinstalei o Fast Report 5.61 e depois o ACBR. Na compilação não dá erro. Alguma dica para ajudar a solucionar este problema? Atenciosamente Sérgio

Apaguei a pasta .SVN e ai parou o erro. Obrigado.

Boa tarde, apaguei toda a pasta do ACBR e fiz um download novo pelo ACBRinstall_Trunk2 e o erro persiste. Checksum no arquivo CIDADES.INI. Alguma solução ou é problema com o trunk2? Atenciosamente Sergio

Essa alteração não subiu para o trunk. Apaguei tudo, mandei atualizar baixando os arquivos e continua dando o erro. Este tipo de alteração devia ser testada com mais cautela. Após baixar o arquivo FONTES.ZIP e atualizar, instalou sem erros e voltou a funcionar redondo. Obrigado e atualize o trunk por favor.

Bom dia, erro ao compilar ACBRUTIL.PAS, baixado agora pela manhã. Em vermelho o erro e a correção. function Split(const ADelimiter, AString: string): TSplitResult; var i: Integer; vRows: TStrings; begin vRows := TStringList.Create; try vRows.Delimiter := ADelimiter[1]; {$IFDEF CompilerVersion >= 18} //Delphi 2006+ vRows.StrictDelimiter := True; vRows.DelimitedText := AString; {$ELSE} vRows.DelimitedText := '"' + StringReplace(AString, ADelimiter, '"' + ADelimiter + '"', [rfReplaceAll]) + '"'; {$IFEND} ->>>>> correto ->>>>> {$ENDIF} SetLength(Result, vRows.Count); for i := 0 to vRows.Count - 1 do Result := vRows.Strings; finally FreeAndNil(vRows); end; end; Atenciosamente Sérgio

Boa tarde, como acesso esta pasta "\Branches\Fontes\ACBrDFe\ACBrCIOT" ? SVN (trunk2) hoje (02/03/2018) está fora do ar, é devido ao problema no http://sourceforge.net?

Ok então vamos manter um tópico aqui, pois o DT-e tem um longo trajeto até ser implementado e bom que todos vão se inteirando dos requisitos que virão.

Juliomar pesquisei DTe, DT-e, Documento Eletrônico de Transporte e não encontrei. Tem o tópico? Foi publicado em MDF-e?

Bom dia, seria bom abrir um novo tópico sobre DT-e - Documento Eletrônico de Transporte http://www.antt.gov.br/salaImprensa/noticias/arquivos/2017/12/ANTT_abre_AP_sobre_documento_eletronico_de_transporte.html Em fase de estudos e discussões. OBS: Não confundir com DTe - Domicilio Tributário eletrônico http://idg.receita.fazenda.gov.br/interface/lista-de-servicos/cadastros/cnpj/opcao-pelo-domicilio-tributario-eletronico-dte-acesso-via-portal-e-cac minutaantt.pdf

Estou em contato com uma empresa e ela tem o EMTU. Registro Estadual é ARTESP e nacional/internacional, o TAF é ANTT. Alguém que trabalha com empresas de fretamento de São Paulo, sabe informar se tem o EMTU, este pode ser utilizado na TAG ou a empresa terá que tirar o registro estadual na ARTESP.

Ítalo, bom dia, a maioria dos contadores não sabem. O IOB tem um simulador de ICMS e não atende transporte. Em conversa com o IOB, eles dizem que tem projetos mas sem previsão. A verdade é uma questão financeira: R$ 1.000.000,00 de mercadoria emitida em nota fiscal, irá gerar R$ 180.000,00 de ICMS para aliquota comum de 18%. A mesma mercadoria transportadora, irá gerar um frete na faixa de 6%, ou seja R$ 60.000,00, com um icms em geral de 12% ou 7%. Aliquotas internas varia de 17% a 20% (RJ). Então teremos em alguns caso ICMS de R$ 12.000,00. Sendo assim fiscalmente o mercado de transporte trabalha com valores muito baixos perto do mercado de nota fiscal e a maioria se dedica só a este segmento. Há muito desconhecimento em alíquotas. Pelo que eu vi 11% para passageiro e 17% para pessoas. Existe uma diferença de passageiro e pessoa. Passageiro = serviço normal - bilhetes avulsos. Pessoas = serviço fretado - contratação do veículo. Mas um contador disse que seu cliente é isento e trabalha com lucro presumido. Por isso perguntei, pois como temos vários desenvolvedores, cada um com clientes diversificados, a troca de experiência e informações é muito útil.

@bsoft - muito obrigado pelo retorno. Em um serviço de VAN ou ONIBUS fretado, que tipo de documento haveria para um excesso de bagagem? Uma nota fiscal que a empresa emitiria para cobrar o excesso, seria este o caso?

Quais são as aliquotas para o CT-e OS? Sabe me dizer? Há uma clara distinção em transporte de pessoas e transporte de passageiros. Pessoas atividade privada, passageiros atividade pública. Sendo assim para o transporte de passageiros a alíquota seria de 17% e passageiros 12%. Alguém sabe se procede esta informação?

Este grupo infDocRef, no caso de um fretamento de passageiros, tem que informar algum documento? Ele seria utilizado no transporte de bagagem ou valores? Alguém tem experiência com CT-e OS? Estava estudando para entender o processo e me deparei com estas e outras dúvidas.