RibaSoft

A sim, de boa, se eu puder ajudar em algo é só avisar. DEUS abençoe

Bom dia, desculpe minha leiguisse mas é pra eu fazer alguma coisa? A parte do zippar vc diz que o ACBr já zippa? A parte das somas, vc mesmo vai adaptar ou é pra eu fazer isso?

Ultima versão da classe do ADRCST, impedindo estoque negativo e zipando o arquivo. ADRCST.pas

Se for a unit com a Classe do ADRCST esta na resposta acima a ultima versão se for o Arquivo do ADRCST que apresenta erro de mime type não tenho mais o original pois ele foi corrigido conforme descrevia acima. Mas colocando só essa linha que comentei em um arquivo de texto já da o mesmo resultado "1000|0|01657|||85044010|2103700|CARREGADOR NOTEBOOK REF KP|UND|18,00||3,000|1,000" anexei abaixo o arquivo que deu o resultado acima caso ajude em algo. Qualquer coisa estou a disposição DEUS abençoe e desculpa a demora pra responder 202003.txt

Gente, tenho algo muito interessante pra compartilhar com vcs Ao gerar o arquivo de um cliente deu que o mesmo estava no formato inválido (text/x-algol56 ou vazio) sendo que o esperado seria o (text/plain). mandei alguns emails para um funcionário da receita que insistia em dizer que meu sistema estava gerando o arquivo no formato mime type inválido, mesmo eu insistindo que meu sistema estava gerando todos os arquivos da mesma forma e de vários arquivos só aquele dava errado. Uma coisa que ajudou muito foi o site https://htmlstrip.com/mime-file-type-checker Ele te retorna o mime type do arquivo. dai testei linha por linha e vejam que absurdo... Essa linha 1000|0|01657|||85044010|2103700|CARREGADOR NOTEBOOK REF KP|UND|18,00||3,000|1,000 foi apagado o "REF KP" e ficou assim 1000|0|01657|||85044010|2103700|CARREGADOR NOTEBOOK|UND|18,00||3,000|1,000 dai validou, ou seja a sequencia de caracteres influência no formato do arquivo. Graças a DEUS a muitos anos eu tinha visto umas curiosidades que falaram que de acordo com o que se escreve no arquivo de texto seu conteúdo é alterado. isso eu vi a mais de 15 anos e parece que a sequencia de caracteres pode gerar algum bug ainda.

Bom dia Aquela era só um rascunho pra ver se eu estava no caminho certo. Tenho uma funcional já pronta, restando apenas tratar algumas excessões. ADRCST.pas

Minha classe já esta validando as saídas 1200 e 1300, falta só a 1400 e 1500 agora.

Ola, tenho um cliente entre 47 que não aceita nenhuma das dlls do OpenSSL que veio na pasta dos fonts baixados a 3 dias, só aceita as dlls da pasta 1.0*** de uma versão antiga dos fontes, alguém sabe o que pode ser? Ele usa windows 10 Pergunto pq eu gostaria de colocar no meu instalador as mesmas dlls para todos os clientes de preferencia com as ultimas versões do OpenSSL Minhas configurações NFC.SSL.SSLType := LT_TLSv1_2; //Protocolo de Segurança de Comunicação NFC.SSL.SSLXmlSignLib := xsLibXml2; //Gerenciador de Assinatura NFC.SSL.Senha := Config.CertSenha; //Certificado A1 if (Config.CertTipo = 0) then //arquivo pfx begin NFC.SSL.SSLCryptLib := cryOpenSSL; //Gerenciador de Certificado NFC.SSL.SSLHttpLib := httpOpenSSL; //Gerenciador da Comunicação NFC.SSL.ArquivoPFX := Config.CertLocalPFX; end; //Certificado A3 if (Config.CertTipo = 1) then //do repositorio begin NFC.SSL.SSLCryptLib := cryWinCrypt; //Gerenciador de Certificado NFC.SSL.SSLHttpLib := httpWinHttp; //Gerenciador da Comunicação NFC.SSL.NumeroSerie := Config.CertSerie; NFC.SSL.CarregarCertificado; end;

Boa tarde, acabei de acabar a unit para geração do componente, como não consegui alguém para me orientar eu segui o padrão do componente da NFe . A unit está pronta para os registros 0000, 1000, 1010, 1100, 1110, 1200, 1210, 9000 ou seja para vendas do simples nacional para o consumidor final sem devoluções. vou implementar essa unit no meu sistema e depois continuarei melhorando-a adicionando novos registros para as demais operações e tratando as propriedades para verificar alguns erros já na geração do arquivo. Tem dois contadores que entraram em contato comigo por aqui que me auxiliarão nos cálculos, uma parceria que tocara minha mão de obra pelo conhecimento deles. Para quem já servir como está e quiser ir usando seque o exemplo de uso, qualquer duvida no que estiver ao meu alcance estarei a disposição. DEUS abençoe a todos. uses unitADRCST; //********************** try ADRCST := TADRCST.Create; ADRCST.PathSalvar := 'D:\Desktop'; //Abertura do arquivo e identificação do contribuinte with ADRCST.REG0000 do begin COD_VERSAO := 100; MES_ANO := '032020'; CNPJ := '99999999999999'; IE := '9999999999'; NOME := 'Empresa X'; CD_FIN := 0; N_REG_ESPECIAL := ''; CNPJ_CD := ''; IE_CD := ''; end; //Adiciona os itens with ADRCST.Item.New do begin with REG1000 do begin IND_FECOP := 1; COD_ITEM := '3'; COD_BARRAS := ''; COD_ANP := ''; NCM := '22021000'; CEST := '0300700'; DESCR_ITEM := 'REFRIGERANTE 200 ML'; UNID_ITEM := 'UND'; ALIQ_ICMS_ITEM := 18.00; ALIQ_FECOP := 2.00; end; //Identificação do inventário do produto with REG1010 do begin COD_ITEM := '3'; UNID_ITEM := 'UND'; QTD := 1.00; VL_TOT_ITEM := 1.00; TXT_COMPL := ''; end; //Registro 1100 – Totalizador das entradas do produto REG1100.MENOR_VL_UNIT_ITEM := 0.99; //Identificação das notas fiscais de entrada with REG1110.New do begin DT_DOC := '19022020'; COD_RESP_RET := 1; CST_CSOSN := 60; CHAVE := '*******************'; N_NF := 691640; CNPJ_EMIT := '9999999999999'; UF_EMIT := 'PR'; CNPJ_DEST := '319*************'; UF_DEST := 'PR'; CFOP := 5405; N_ITEM := 9; UNID_ITEM := 'UND'; QTD_ENTRADA := 12.00; VL_UNIT_ITEM := 0.99; VL_BC_ICMS_ST := 18.12; end; //Registro 1210 – Identificação das notas fiscais de saída para consumidor final with REG1210.New do begin DT_DOC := '06032020'; CST_CSOSN := 500; CHAVE := '4120033***********************************'; N_NF := 417; CNPJ_EMIT := '319**********************'; UF_EMIT := 'PR'; CNPJ_CPF_DEST := ''; UF_DEST := ''; CFOP := 5405; N_ITEM := 2; UNID_ITEM := 'UND'; QTD_SAIDA := 2.000; VL_UNIT_ITEM := 2.00; end; end; ADRCST.GerarArquivo; finally ADRCST.Free; end; unitADRCST.pas

Bom dia, ontem fiquei até as 01:00 da madruga pra adiantar, e já estou na metade, vou pegar firme aqui e mais tarde posto aqui a unit como está e o arquivo técnico do governo. A parte dos cálculos vou pegar com um contador, é mais pra ver se a unit está nos padrões ACBr. Muito obrigado pela atenção DEUS abençoe

Olá Eu comecei a unit me baseando na unit do nfe quem puder da uma olhada pra ver se esta no padrão acbr por favor unitADRCST.pas

Segue em anexo para quem mais interessar. DEUS abençoe 202003.txt

Olá Eu gostaria de desenvolver um componente gerador do arquivo ADRC-ST para o ACBr, e fui orientado pela Juliana Tamizou a criar esse tópico. Como sou autodidata e devidos a outras limitações, eu preciso da ajuda de alguém para poder seguir os padrões que já são usados nos demais componentes do ACBr. Principalmente na parte de criar lista de objetos, to pesquisando aq a respeito ainda, mas como existem varias formas, gostaria de me focar na forma que o ACBr já usa. Caso alguém tenha interesse em me ajudar no meu site estão os dados do meu contato. https://www.ribasoft.com.br/ DEUS abençoe

Muito obrigado pela rápida resposta, vou fazer isso então, se quiser encerrar esse tópico da minha parte pode ficar a vontade pois criarei outro sobre o componente conforme vc instruiu. DEUS abençoe

Bom dia Visto que graças a DEUS meu sistema está gerando os arquivos ADRCST com sucesso, estou criando uma unit para disponibilizar aqui e se o pessoal do ACBr achar viável, se criar um componente, por isso gostaria de saber se há interesse na criação do componente, e se alguém poderia me supervisionar e auxiliar para a criação dessa unit nos moldes dos demais componentes já disponibilizados pelo ACBr para facilitar a criação do componente. Caso não haja interesse do ACBr na criação desse componente eu disponibilizarei meu código de alguma forma. Agradeço a atenção de todos DEUS abençoe

SUCESSO!!! Consegui baseado nos cálculos dessa planilha que estou disponibilizando abaixo, reajustei ela hoje. Agora vou desenvolver um aplicativo para um contador, para eu aprender os demais cálculos e situações para poder disponibilizar aqui um componente, classe ou aplicativo completo. Calculo ADRC-ST.xlsx

Olá, consegui descobrir o erro que estava dando, é por causa da codificação do arquivo, quem usa o notepad++ deve usar o UTF-8 (sem BOM). Apareceu, outros erros agora, e irei revisar para ver o que mais está de errado, muito obrigado, vc me ajudou muito pois achei que era erro da receita e por isso parei de tentar, mas como vc falou que conseguiu validar percebi que o erro era meu mesmo, DEUS abençoe

Boa Tarde, após o envio vc fez a consulta do mesmo? Pergunto porque aparentemente meu arquivo está igual ao seu, e é retornado uma mensagem de erro mesmo assim.

Que bom, parece que estou no caminho certo!!! Ontem conversei com um senhor chamado Jaime, ele diz ter bastante experiencia na parte contábil e precisa gerar esse arquivo para diversos ramos de atividade em diversos tipos de operação, vou desenvolver um aplicativo pra ele e ele me passara seu conhecimento, dai assim que eu terminar vou disponibilizar aqui tudo bem explicadinho. Mitiyo Yamakawa Gomide, pelo que entendi vc conseguiu validar o arquivo junto a receita, vc pode me passar como fez por favor?

https://drive.google.com/drive/folders/1KxbTCUo54gxRn385F55--gLdbCFzuAtX Coloquei os arquivos nessa pasta minha do google, são as planilhas, tudo o que eu consegui e entendi então neles. No meu site tem o meu contato, se eu puder ajudar em algo mais estou a disposição https://www.ribasoft.com.br/

Boa tarde, ta complicado, não estou conseguindo ter muitas informações concretas, eu fiz uma planilha de cálculos do ADRC-ST e uma planilha de calculo de ICMS ST com MVA, quem viu as planilhas disse que aparentemente estão certas, mas não conheço ninguém que tenha conseguido validar ainda o arquivo junto a receita, o máximo que consegui foi enviar mas da um erro sem sentido. Se quiser dar uma olhada esta tudo aq mesmo, nas respostas anteriores.

Boa tarde, eu consegui acessar com cpf de senha do cliente, normal, usei o chrome, se for problema de navegador tenta passar o CCleaner no seu pc pra ver se resolve.

Deu certinho, apaguei os componestes de impressão do NFCe do meu projeto e coloquei-os novamente da paleta do ACBrNFe. Muito obrigado, eu não tinha visto mesmo essa Noticia. parabéns aos desenvolvedores. gostei de como ficou, atualizei meu tutorial de instalação e configuração dos componentes caso alguém queira um passo a passo bem detalhado: https://www.ribasoft.com.br/p/pascal.html#i01

Muito obrigado, desculpa minha desinformação, marquei lá já pra ver se consigo acompanhar as noticias. DEUS abençoe.

Olá, ao atualizar os fontes hoje, os arquivos da pasta \Pacotes\Lazarus\ACBrDFe\ACBrNFe\DANFE\NFCe sumiram. Alguém sabe me dizer de mudou o método de impressão do cupom da NFCe pelo fortes com o lazarus? Ou se preciso fazer algo pra que esses arquivos apareçam?, já apaguei tudo e baixei tudo de novo e eles continuam faltando. Agradeço a atenção de todos. DEUS abençoe