MarceloPeron

ok, obrigado !

Certo Juliomar, na aplicação de exemplo ví que há 3 procedures (Alimentar_Componente_layout_Proprio, Alimentar_Componente_layout_PadraoNacional e Alimentar_Componente_layout_ABRASF) cada uma dessas alimentando o layout em questão. Quando vc diz que o ACBrNFSeX já abstraí isso, na realidade, vc deve fazer a alimentação dos layouts como cada uma dessas procedures, certo ?

Boa tarde a todos, Estamos migrando nosso sistema TMS e, com a adoção da NFSe de layout nacional, surgiu a dúvida se ainda vale a pena implementar o layout padrão ABRASF e até mesmo o layout próprio (usado por algumas) prefeituras já que, por força da Lei Complementar nº 214/2025 todas as prefeituras devem (ou deveriam) adotar o padrão nacional a partir de 01/01/25. Estou discutindo, internamente aqui, se isso não seria uma parda de tempo. qual a opinião dos Srs ?

Obrigado

Bom dia Juliomar, lí sim. O trecho printado abaixo da NT orienta que sendo lotação (apenas um DFe), tem que informar. Porém meus gestores estão achando estranho ter que informar pagamento quando o veículo pertence a transportadora mesmo e o motorista é um funcionário CLT da transportadora. Sendo assim, é isso mesmo ?

Bom dia Srs, Alguns dos nossos clientes (transportadoras) possuem veículo próprio. Quando é assim, no layout do XML, não informamos a tag "prop" (do proprietário). Mesmo assim, estamos recebendo a rejeição "As informações de pagamento devem ser informadas para carga lotação". O tpEmit é 1 porque a transportadora é prestadora de serviço ( não é carga própria). Se a própria transportadora é a proprietária do veículo, para uma carga lotação, devemos mesmo informar a tag InfPag ?

Certo Juliomar, iremos pedir ao cliente para verificar com o seu contador. Obrigado

Boa tarde, temos um cliente com uma filial em PE que já emite CTe há vários anos. Hoje, devido a uma necessidade nossa, ao fazer o envio, deste mesmo cliente, em ambiente de homologação, recebemos a rejeição: IE Emitente não autorizada a emitir CT-e para o modal informado. No caso, o tipo do CTe é normal e o modal é o rodoviário (a forma mais comum utilizada pelo cliente). Será que é possível que o cliente esteja autorizado a emitir em produção mas não está em homologação ? Obrigado

Boa tarde, estou com uma dificuldade na consulta do boleto pela API ITAU, estou conseguindo registrar normal, mas na colsulta só me retorno http 400 '{"error":{"codigo":"400","mensagem":"Erro na validação de Campos","campos":[{"campo":"view","mensagem":"View inválida","valor":"full"}]}}' procedure TfrmFfat003a.RetornoAPIItau; VAR vTitulo : TACBrTitulo; vDvAge : String; begin Try DmHfat003a.qAPI.First; UniProgressBarAPI.Visible := True; UniProgressBarAPI.Min := 0; UniProgressBarAPI.Max := DmHfat003a.qAPI.RecordCount; UniSession.Synchronize; UniProgressBarAPI.Position := 0; Application.ProcessMessages; While DmHfat003a.qAPI.Eof = False do Begin ACBrBoleto.Banco.TipoCobranca := cobItau; ACBrBoleto.Configuracoes.WebService.VersaoDF := 'V2'; ACBrBoleto.Configuracoes.WebService.Ambiente := taHomologacao; ACBrBoleto.Configuracoes.WebService.SSLCryptLib := cryOpenSSL; ACBrBoleto.Configuracoes.WebService.SSLHttpLib := TSSLHttpLib.httpOpenSSL; ACBrBoleto.Configuracoes.WebService.SSLType := TSSLType.LT_TLSv1_2; ACBrBoleto.Configuracoes.WebService.UseCertificateHTTP := True; ACBrBoleto.Configuracoes.WebService.Operacao := tpConsultaDetalhe; ACBrBoleto.Configuracoes.WebService.Filtro.Clear; ACBrBoleto.Configuracoes.WebService.Filtro.indicadorSituacao := isbNenhum; ACBrBoleto.Configuracoes.WebService.Filtro.dataMovimento.DataInicio := Now - 30; ACBrBoleto.Configuracoes.WebService.Filtro.dataVencimento.DataFinal := Now; ACBrBoleto.Cedente.CedenteWS.ClientID := DmHfat003a.Parametros.ClientID; ACBrBoleto.Cedente.CedenteWS.ClientSecret := DmHfat003a.Parametros.ClientSecret; ACBrBoleto.Cedente.CedenteWS.KeyUser := DmHfat003a.Parametros.DeveloperKey; ACBrBoleto.Cedente.CedenteWS.Scope := DmHfat003a.Scope.Itau; ACBrBoleto.Cedente.CedenteWS.IndicadorPix := False; If ACBrBoleto.Configuracoes.WebService.Ambiente = taProducao Then Begin ACBrBoleto.Configuracoes.WebService.Certificado := DmHfat003a.Parametros.CertificadoChavePem; ACBrBoleto.Configuracoes.WebService.ChavePrivada := DmHfat003a.Parametros.CertificadoChavePrivada; End; ACBrBoleto.ListadeBoletos.Clear; ACBrBoleto.Cedente.Conta := DmHfat003a.qAPICONTA.AsString; ACBrBoleto.Cedente.ContaDigito := DmHfat003a.qAPIDV_CONTA.AsString; ACBrBoleto.Cedente.Agencia := DmHfat003a.qAPIAGENCIA.AsString; ACBrBoleto.Cedente.AgenciaDigito := '0'; ACBrBoleto.Cedente.Modalidade := ''; ACBrBoleto.Cedente.CodigoCedente := DmHfat003a.qAPIAGENCIA.AsString + DmHfat003a.qAPICONTA.AsString + DmHfat003a.qAPIDV_CONTA.AsString; vTitulo := ACBrBoleto.CriarTituloNaLista; With vTitulo do Begin Vencimento := StrToDateTimeDef(DmHfat003a.qAPIVENCIMENTO.AsString,0); DataDocumento := StrToDateTimeDef(DmHfat003a.qAPIFATURAMENTO.AsString,0); NumeroDocumento := DmHfat003a.qAPINUMERO_INTERNO.AsString; EspecieDoc := 'DM'; Aceite := atNao; DataProcessamento := Now; Carteira := DmHfat003a.qAPICARTEIRA.AsString; NossoNumero := DmHfat003a.qAPINUMERO_BOLETO.AsString; ValorDocumento := DmHfat003a.qAPIVALOR.AsFloat; Sacado.NomeSacado := DmHfat003a.qAPIPAGADOR.AsString; Sacado.Logradouro := DmHfat003a.qAPILOGRADOURO.AsString; Sacado.Numero := DmHfat003a.qAPINUMERO.AsString; Sacado.Bairro := DmHfat003a.qAPIBAIRRO.AsString; Sacado.CEP := DmHfat003a.qAPICEP.AsString; Sacado.Cidade := DmHfat003a.qAPICIDADE.AsString; Sacado.UF := DmHfat003a.qAPIESTADO.AsString; Sacado.CNPJCPF := DmHfat003a.qAPICNPJ.AsString; ValorDesconto := DmHfat003a.qAPIDESCONTO.AsFloat; PercentualMulta := DmHfat003a.qAPIMULTA_ATRASO.AsFloat; CodigoMoraJuros := cjValorDia; End; ACBrBoleto.Cedente.Nome := DmHfat003a.Parametros.NomeEmpresa; ACBrBoleto.Cedente.CNPJCPF := DmHfat003a.Parametros.CNPJEmpresa; ACBrBoleto.Enviar; dm_rc.rc_ShowSweetAlert('Erro',IntToStr(ACBrBoleto.ListaRetornoWeb[0].HTTPResultCode) + ' - ' + ACBrBoleto.ListaRetornoWeb[0].DadosRet.TituloRet.CodigoEstadoTituloCobranca + ' - ' + ACBrBoleto.ListaRetornoWeb[0].DadosRet.TituloRet.EstadoTituloCobranca, 'error'); UniSession.Synchronize; UniProgressBarAPI.Position := UniProgressBarAPI.Position + 1; Application.ProcessMessages; DmHfat003a.qAPI.Next; End; Except On E : Exception do dm_rc.rc_ShowSweetAlert('Erro',E.Message,'error'); End; end;

Obrigado pelo retorno Italo, a sua resposta foi o que eu imaginava. Vou discutir a questão aqui com os meus responsáveis.

Bom dia a todos, Um dos nossos clientes está solicitando um QRCode de chave PIX na impressão do CTe, para CTe a vista. Minha dúvida é: se fizermos isso, estaremos alterando o layout de impressão de uma forma que fique fora do padrão ? Será que poderemos ter problemas com a fiscalização por termos incluído uma informação que não está prevista no layout normal ?

Bom dia, Desde ontem estou tendo dificuldades na consulta de disponibilidade da sefaz com clientes de MG, está havendo alguma intermitência ? Ora tenho o status 107 ora não me retorna nada.

Obrigado Italo

Boa tarde, Fomos informados por um cliente que desde o dia 03/04/23, é possível substituir um CTe sem Nota Fiscal ou CTe de anulação (Ajuste SINIEF N. 31 de 23/09/22). Porém, quando fazemos o envio, o ACBrCTe monta as tags "tomaICMS e refCTe, que no caso não tem valores, e assim cai na validação do componente. Segue abaixo trecho do meu código da montagem da informação do CTe substituto. de que forma eu devo montar o trecho ? If qCTeNUM_ID_CTE_44_SUB.AsString <> '' Then Begin If qCTeFJ_CONSIG.AsString <> 'J' Then vChCteAnu := qCTeCHV_ANU_CTE_SUB.AsString Else vChCteAnu := ''; With infCTeNorm.infCteSub do Begin chCte := qCTeNUM_ID_CTE_44_SUB.AsString; refCteAnu := vChCteAnu; If qCTeFJ_CONSIG.AsString = 'J' Then Begin If qCTeTP_CHV_ANU_CTE_SUB.AsString = 'NFE' Then tomaICMS.refNFe := qCTeCHV_ANU_CTE_SUB.AsString Else Begin tomaICMS.refCte := qCTeCHV_ANU_CTE_SUB.AsString; Case StrToIntDef(qCTeAJUTOMACTESUB.AsString,0) Of 0 : indAlteraToma := tiNao; 1 : indAlteraToma := tiSim; End; End; End; End; End;

Entendi Juliomar, foi o que eu pensei também. Vou passar isso para os meus responsáveis. Obrigado