Andre Cristiano Ittner

bom dia, Por favor alguém sabe como funciona essa situação ?

Bom dia, tenho um cliente que está começando a industrializar para terceiros, então tenho duvida com relação a movimentação do estoque. exemplo : digamos que ele recebe nota para industrialização seguintes itens cfop 5901 : 100kg trigo 100kg açúcar 10kg fermento ele industrializa 50% desses itens que vai ser pão digamos : 50un pães então quando dar entrada no sistema da produção vai ter que alimentar + 50 unidades de pao e - 50kg trigo - 50kg açúcar - 5kg fermento AGORA VEM MINHA DÚVIDA : vou fazer a nota de retorno 5902 o correto é descrever os itens que vieram na nota para retorno exemplo: 50kg trigo 50kg açúcar 5kg fermento se for assim, como vocês fazem para baixar o estoque que esta lançado no item "pão" ? que foi alimentado la na produção ou devo retornar 50 un de pão como é o fluxo disso pensando no estoque e correto para sped? lembrando que o cliente precisa do bloco K do sped espero ter sido claro com minha dúvida. desde ja obrigado

Sicredi

Bom dia a Todos, Estava tentando entender como funciona o processo de geração do boleto pix pelo modo de arquivos cnab240, vendo o manual que o banco me passou e vendo o componente AcbrBoleto, e fazendo uns testes não consegui fazer aparecer no boleto o QRCode, então olhando no manual do banco vi que no retorno de remessa e "Segmento Y4" tem um campo "URL do QrCode" ai a minha pergunta "Só posso imprimir o boleto com o QRCode quando eu receber esse retorno? o componente não gera essa URL ?" acho muita informação com API mas não por arquivo CNAB desde ja obrigado!

Pode ser porque um computador esta emitindo uma nota fiscal e outro estar consultando ? apesar de serem processos diferentes pode bloquear ?

bom dia, estou com apenas um cliente com volta e meia problema com consumo indevido, Erro 656 Menssagen: Rejeicao: Consumo Indevido (Deve ser utilizado o ultNSU nas solicitacoes subsequentes. Tente apos 1 hora) interessante que as vezes a primeira consulta do dia já da consumo indevido, até gerei logs para ver se havia alguma falha no sistema "infringindo as regras da sefaz", porém não UltNsu := busca_ultimo_nsu_gravado; iContDown := 0; while true do begin try inc(iContDown); DM.ACBrNFe.DistribuicaoDFePorUltNSU(FrmEmpresa.Endereco.Estado.Ibge, FrmEmpresa.CNPJ, UltNsu); if (DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.cStat > 105) and (DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.cStat <> 138) then // então tem erro begin bAchou := true; // para nao mostrar msg de erro novamente if (DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.cStat = 137) or // nao existe registros (DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.cStat = 656) or (DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.ultNSU = DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.maxNSU)then begin if (DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.cStat = 656) then begin if DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.ultNSU <> ultNSU then dlalerta('ultNSU utilizado nesta consulta [' + ultNSU + '] é diferente ' + 'do ultNSU consultado na Sefaz [' + DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.ultNSU + '].' + constEnterTab + 'Aguarde 1 hora para a próxima consulta.') else dlalerta(dlRetornaNFeStatus(DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.cStat) + constEnterTab + 'Aguarde 1 hora para a próxima consulta.') end; if (DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.cStat = 137) then dlalerta('Atenção...: Não existem mais registros disponíveis.' + constEnterTab + 'Aguarde 1 hora para a próxima consulta.') else dlalerta('Atenção...: Este é o último lote de registros disponíveis para distribuição.' + constEnterTab + 'Aguarde 1 hora para a próxima consulta.'); end else dlalerta(dlRetornaNFeStatus(DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.cStat)); Break; end; except on e : exception do begin dlalerta(dlRetornaNFeStatus(DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.cStat) + constEnterTab + e.Message); Break; end; end; for x := 0 to DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Count -1 do begin if DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[x].resDFe.tpNF = tnSaida then begin iNsu := dlStrToInt(DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[x].NSU); sCNPJ := DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[x].resDFe.CNPJCPF; sRazao := DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[x].resDFe.xNome; sIE := DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[x].resDFe.IE; dDataEmi := DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[x].resDFe.dhEmi; cValor := DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[x].resDFe.vNF; sChave := DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[x].resDFe.chDFe; ... ... grava no banco de dados.. end; end; UltNsu := DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.ultNSU; if iContDown = 10 then // maximo 10 consultas begin Break; end; if (DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Count < 50) then Break; end; UltNsu := DM.ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.ultNSU; .. grava na base ultimo nsu .. pode ser alguma coisa relacionada com certificado de segurança, ssl algo do tipo segue print como está no computador do cliente : alguem consegue me dar uma ideia do que pode estar acontecendo ?

segue documentação Manual Técnico de Cobrança Bancária – 240 Posições.pdf

Bom dia, Segue alteração no Arquivo banco cedred. em Homologação solicitaram para alterar no Header do arquivo a identificação do banco fixado no fonte como CECRED que a alguns anos mudou de nome para AILOS. Fiz a alteração, se alguem puder subir o arquivo, agradeço . abraços. ACBrBancoCecred.pas

UP, alguém pode pode adicionar essa alteração ? Obrigado!

Boa tarde a todos, Na geração do arquivo cnab240 para banco Sicrebi, não está verificando informação do campos "CodigoMoraJuros (cjValorDia, cjTaxaMensal, cjIsento, cjValorMensal, cjTaxaDiaria)", está opção de acordo com o manual possui 3 condições : 1’ - Valor monetário ‘2’ – Taxa Mensal ‘3’ - Isento porém na geração do segmento "P" esta verificando se valor de juros maior que 0 "zero" então condição = 1 -Valor monetário, se igual a 0 "zero" então condição = ‘3’ - Isento, ignorando valor informado no campo "CodigoMoraJuros" que pode ser 2- taxa mensal. fiz a alteração no fonte, segue em anexo para implementação. sem mais, abraços. ACBrBancoSicredi.pas

Boa tarde, Procurei no fórum erros semelhantes, encontrei algumas alternativas porém nenhum me resolvel. Segue o problema: <a href="https://ibb.co/NKTSj9t"><img src="https://i.ibb.co/NKTSj9t/Capturarxxxx.jpg" alt="Capturarxxxx" border="0"></a> Can't load package C:\...LibD28\win32\DCLACBr_BoletoFR.bpl não foi possível encontrar o móduto especificado. para todos os aquivos ACBR aonde possuem Fast Report 1 - Estou usando : delphi versão :11.1 - Fast Repost versão: 6.9.14 e acbr atualizado hj. o que ja tentei fazer : reinstalar o ACBR, apagar todos DCU e BPL dele e instalar novamente, sem sucesso. 2 - já coloquei no path a pasta ..\ACBR2\Lib\Delphi\LibD28\Win32 3- já copiei todas as bpl na pasta system32 obs. o fast report está funcionando normalmente. alguém tem alguma ideia do que pode ser ?

Alguém tem ideia do que pode ser ?

Infelizmente não deu certo segue imagem de como esta os parametros da child

Boa tarde, Estou com dificuldades para montar um relatório que vai ser assim : Pedidos e seus item, até ai tranquilo, o que não estou conseguindo é que as vezes esses itens podem contar uma observação, e quando tiver queria que aparecesse abaixo de cada item. tentei adicionar um child, porém quando esse campos obs esta vazio mesmo assim ele pila uma linha. ja fiz isso a um tempo atras mas não lembro mais como fiz, não me lembro se adicionei uma banda de child ou detail OBS uso fastreport versão que acompanha o delphi segue imagem onde aparece linha em branco quando não tem obs no item

Obrigado pelo retorno, mas as dlls do openssl estão ok