mcob
-
Total de ítens
71 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por mcob
-
-
Boa Tarde a todos.
A Porto Seguro mudou o endereço de averbação, por motivo de segurança e passou a utilizar o TLS 1.2 / 1.3, está é a causa da mensagem de erro que está recebendo.
Abaixo segue o novo endereço de averbação, que você deve alterar no arquivo:
const
AURI: string = 'https://api.averbeporto.com.br';no create do componente
FURL := 'https://api.averbeporto.com.br/websys/php/conn.php';não vou anexar o meu arquivo aqui, pois, o meu delphi é o XE2 e por esse motivo tem algumas diferença a serem consideradas.
espero ter ajudado.
Abraços a todos.
-
5
-
-
Boa Tarde, a todos
Sim, a cidade de Jundiaí mudou de provedor.
Antes era Ginfes e a partir de 01/05/2023 passou a ser GISSONLINE, estou tentando conseguir os novos parâmetros para a configuração do componente.
Assim que conseguir posto aqui.
Abraços.
-
Bom Dia a todos
Segundo o manual esta tag é referente a modalidade do frete e deve ser preenchida com um das opções abaixo:
0=Contratação do Frete por conta do Remetente (CIF);
1=Contratação do Frete por conta do Destinatário (FOB);
2=Contratação do Frete por conta de Terceiros;
3=Transporte Próprio por conta do Remetente;
4=Transporte Próprio por conta do Destinatário;
9=Sem Ocorrência de Transporte.exemplo: modFrete := mfContaEmitente (referente a opção 0)
espero ter ajudado.
Abraços.
-
Bom Dia a todos
Pesquisando na internet, vi que esta extensão de arquivo é do Adobe PhotoShop CC, e também encontrei algumas ferramentas específicas para abri-lo, além do abobe photoshop cc.
Veja neste link: https://www.solvusoft.com/pt-br/file-extensions/file-extension-amp/
-
Bom Dia, a Todos
problema resolvido.
Abraços.
-
Boa Tarde, a todos
Estou com o seguinte problema em um cliente, ele emitiu uma nota fiscal com uma informação com ponto e vírgula (;) no campo de Observação (infCpl).
Até aí tudo bem, mas como o ponto e vírgula está definido como quebra de linha, ao imprimir o DANFE ele faz a quebra de linha e a empresa para quem o cliente emitiu a nota não está aceitando deste forma.
Tentei mudar o (;) para pipe (|) e a quebra de linha não parou, ao imprimir a nota continua.
Fiz da seguinte forma, via linha de código, pois, no componente não encontrei onde alterar :
NFe.Configuracoes.WebServices.QuebradeLinha := '|' ;
Desde já, agradeço pela colaboração.
Abraços
-
Bom Dia, a Todos
Tive este mesmo problema a algum tempo atrás, isso ocorria quando a logo do cliente era muito grande, exemplo:
Imagem da Logo com 320px
Para resolver fiz a redução da imagem para no máximo 120px, pois com o xml que foi anexado sem a imagem não ocorre o problema no pdf.
Espero ter ajudado
Abraços a todos
-
1
-
-
Bom Dia, a todos
Testes efetuados e tudo ok.
Abraços.
-
Boa Tarde
Fiz os testes solicitados, e não encontrei nenhum problema, exceto na instalação que não aparece a imagem do componente referente a pré-fatura.
Isso aconteceu, porque o arquivo ACBrEdi.dcr não foi atualizado, então ao substituir pelo que está no arquivo zipado enviado no poste inicial e reinstalado a imagem apareceu.
Por via das dúvidas, estou enviando o arquivo novamente em anexo.
Obrigado e Abraços a todos.
-
2
-
-
Boa Tarde,
Eu que agradeço, vou fazer a atualização e fazer os testes e assim que finalizar reporto.
Abraços, t+
-
1
-
-
Bom Dia, a todos
Segue em anexo, o componente ACBrEDI atualizado agora com a função de pre-fatura.
Alterações Efetuadas, nas funções:
Conhecimentos (CONEMB) => Antes apenas fazia a leitura dos registros, agora é possível também gravar. (permite leitura e gravação);
Cobrança (DOCCOB) => Idem ao de Conhecimentos;
Nota Fiscal (NOTAFIS) => Antes apenas fazia a gravação dos registros, agora é possível também a leitura. (permite leitura e gravação);
Ocorrências (OCOR) => Idem ao de Conhecimentos.
Pre-Fatura (PREFAT) => Como as outras funções permite a leitura e gravação dos registros. (nova função, o manual referente ao layout está no arquivo em anexo)
Abraços
Miguel Carlos
-
2
-
-
Bom Dia, a todos
Fiz a atualização e os testes solicitados, e todo ok.
Abraços
-
1
-
-
Bom Dia, a Todos
Segue em anexo, os arquivos do componente contendo apenas os arquivos necessários conforme combinado.
Abraços, e um fiz ano novo a todos
Miguel Carlos
-
3
-
-
Boa Tarde,
Ok, vou verificar tudo e remover o que não for necessário e envio novamente assim que terminar.
Abraços
-
1
-
-
Bom Dia, a todos
Quanto aos ajustes deve ser porque o desenvolvimento foi feito em delphi xe2, acho que isso já era esperado, pois não tenho o 7 para testar.
Acabei de baixar as atualizações e vi que o componente foi incluso ao pacote do ACBr. e acabei de instalar, pelo Instalador deu erro porque estava faltando o arquivo .res, mas foi só cria-lo
Quanto aos componentes os que enviei compactado no início do tópico não tinha este ACBrEDI, os componentes eram registrados separados, até ia comentar isso com você, fiz um teste inicial arqui através de um sistema que tenho gerei os arquivos sem problemas. Apenas apareceu este outro ACBrEDI que está empacotando os outros.
Quanto aos .rc e .dcr são referente as imagens do componente, esqueci de remove-los, como também alguns arquivos que não estão sendo usados tais, como: ACBrEDICONEMB.pas e o ACBrEDINotaFisClass.pas
Abraços
Miguel Carlos
-
1
-
-
Bom Dia, a todos
EMBarbosa , toda a documentação está junto com o arquivo zipado em anexo .
Abraços.
-
1
-
-
Bom Dia, a todos
O EDI são arquivos de troca de informações entre o cliente e a transportadora cadastrada, é utilizado por algumas empresas tais como: Acor, Ypê dentre outras, para agilizar o processo de troca das informações relacionadas com os seguintes arquivos:
CONEMB => Conhecimentos (CT-e) gerados pela transportadora
OCORREN => Ocorrências fatos que geraram uma Devolução, re-entrega, etc.
DOCCOB => Documento pelo qual a transportadora efetua a Cobrança dos serviços prestados
NOTFIS => Romaneio referente as notas fiscais que serão ou deverão ser embarcadas pela transportadora.
Então resolvi criar um componente para gerar estes arquivos, já faço uso dele a algum tempo e agora que está funcionando em alguns clientes meus, estou fazendo a doação do mesmo ao projeto ACBr, se assim a equipe achar viável.
O componente está preparado para gerar os arquivos nas seguintes versões: 3.0, 3.0a, 3.1 e 5.0.
Em anexo os arquivos para análise, estão separados de acordo com as pastas do projeto.
Desde já obrigado pela atenção.
Miguel Carlos.
-
3
-
-
Boa Tarde, a Todos
Também estava com esse problema, mas resolvi da seguinte forma:
rodo.infANTT.RNTRC := 'numero RNTRC' ; desta forma não deu mais esta rejeição.
Abraços
-
1
-
-
Bom Dia, a todos
Segue em anexo, o arquivo cidade.ini com a inclusão da cidade de Várzea Paulista para o provedor GovDigital
Abraços.
-
Bom Dia, a todos
Passei por esse problema também, e resolvi reduzindo o tamanho da imagem do logo que as empresas utilizavam, pois, dependendo do tamanho delas quando gerava o PDF ocorria este problema. Não sei se é o seu problema mas tenta quem sabe?.
Abraços.
Miguel Carlos.
-
2
-
-
Bom Dia, a Todos
Italo, consultei a Sefaz e me passaram o link de produção do evento, acabei de fazer o teste e funcionou.
Segue em anexo o arquivo INI alterado.
Abraços.
-
Boa Tarde, a Todos
Também estou com o mesmo problema, já testei no demo também ocorre o mesmo UF =. SP.
Abraços.
-
Bom Dia, a Todos
Italo, baseado nesta informação, resolvi montar uma DLL mas ela ficou com mais de 2mb e não consigo anexa-la aqui no fórum.
Posso lhe enviar por e-mail e você disponibiliza-la no svn.
Abraços.
-
Boa Tarde
msiscampos, peço desculpas esqueci de informar que fiz esta unit em XE2 e não tenho o D7, por isso não tenho como fazer isso.
Estou anexando o arquivo enviado pela Porto Seguro contendo o exemplo que utilizei, quem sabe alguém que tenha o D7 possa adapta-lo.
Abraços
Averbação de Carga Porto Seguro
em ACBrCTe
Postado
Bom dia a todos
Segue um exemplo de como faço a chamada para averbação:
function AverbaPorto( aFile, xUsuario, xSenha, xProtCte: string; bMSg: boolean = False
string ;
var
fSeg: TPortoSeguroIndy ;
bStatus: boolean ;
xProt: String ;
begin
xProt := '99999' ;
fSeg := TPortoSeguroIndy.create ;
fSeg.UserName := xUsuario ;
fSeg.Password := xSenha ;
bStatus := fSeg.UpLoad( aFile ) ;
if bStatus then
xProt := fSeg.Protocolo
else
if bMsg then
ShowMessage(stringReplace(fSeg.MensagemRetorno,';',#13,[rfReplaceAll])) ;
fSeg.Destroy ;
result := xProt ;
end;
espero que te ajude.
Abraços.