Jump to content

Marcos Ramos

Membros
  • Content Count

    15
  • Joined

  • Last visited

Community Reputation

2 Neutral

About Marcos Ramos

  • Rank
    Novato

Recent Profile Visitors

671 profile views
  1. Não são os exemplos que estou tentando fazer a compilação. Estou tentando tentando instalar ele no win64, para que eu possa fazer a minha aplicação compilar em 64, hoje o instalador cria somente o diretório do 32 e só instala o 32bits.
  2. Boa Noite, existe algum roteiro diferente para instalar o ACBR e compilar os projetos para 64 bits, fiz a instalação padrao e ao tentar compilar da alguns erros
  3. Bom dia Italo, obrigado pelo retorno, acabei de matar aqui o problema, no ambiente de produção a mesma nota fiscal autorizou, apenas no ambiente de homologação esta dando rejeição, muito obrigado a todos e podem encerrar o topico
  4. o ie do destinatario ta como 1 e o imposto ta calculando correto
  5. sim, eu havia testado no validados, no caso ele esta validando certinho o xml porem quando bate na sefaz ele retorna a mensagem de rejeicao por causa do cst Rejeicão: informado CST de diferimento sem as informações de diferimento [nitem:1]
  6. Boa Tarde, estou tentando emitir uma nfe na qual o emitente é pessoa fisica com diferimento de icms porem a mesma esta retornando Informado CST de diferimento sem as informações de diferimento, ja revisei tudo e nao consigo achar o que esta causando a rejeição anexei o arquivo a mensagem para analise, xmlNFE
  7. tive um problema com o registro Header do CNAB400, foi solucionado da forma que esta abaixo procedure TACBrBancoSafra.GerarRegistroHeader400(NumeroRemessa: integer; ARemessa: TStringList); var aAgencia, aConta, wLinha: String; begin aTotal := 0; aCount := 0; FNumeroRemessa := NumeroRemessa; with ACBrBanco.ACBrBoleto.Cedente do begin aAgencia := PadLeft(ACBrBoleto.Cedente.Agencia, 4, '0') + PadLeft(ACBrBoleto.Cedente.AgenciaDigito, 1, '0'); aConta := PadLeft(ACBrBoleto.Cedente.Conta, 8, '0') + PadLeft(ACBrBoleto.Cedente.ContaDigito, 1, '0'); wLinha := '0' + // ID do Registro Header '1' + // ID do Arquivo de Remessa 'REMESSA' + // Literal de Remessa '01' + // Código do Tipo de Serviço PadRight('COBRANCA', 15) + // Descrição do tipo de serviço + "brancos" aAgencia+aConta + // Codigo da Empresa no Banco // PadRight(CodigoCedente, 14, '0') Space(6) + // "brancos" PadRight(Nome, 30) + // Nome da Empresa IntToStr(Numero) + // Código do Banco - 237 PadRight('BANCO SAFRA', 15) + // Nome do Banco - BANCO SAFRA + "brancos" FormatDateTime('ddmmyy', Now) + // Data de geração do arquivo Space(291) + // "brancos" IntToStrZero(NumeroRemessa, 3) + // Nr. Sequencial de Geração do Arquivo IntToStrZero(1, 6); // Nr. Sequencial do Registro no Arquivo ARemessa.Text := ARemessa.Text + UpperCase(wLinha); end; end; essa informação do código da empresa no banco estava vindo alimentada pelo código do cedente, dai o banco questionou alinhamentos posições e zeros, dai copiei a mesma rotina do registro de transação, onde ele separa ambos e faz o tratamento
  8. sim, no momento que dou enter a primeira coisa que faço é desabilitar o botão, e além disso dou um setfocus pra outro componente, mas mesmo assim ainda da problema
  9. bom dia, estou tendo um problema com RDPrint e gostaria de saber de alguém já passou por isso, tenho rotinas no sistema onde o usuário finaliza uma operação e já sai impresso um comprovante da mesma, porem dependendo da intensidade que o operador aperta a tecla enter do nada o aplicativo tenta mandar varias vezes a mesma impressão, é quase como se por ex. na rotina eu dou 3 enter e ele dispara 3 vezes o evento on-click do botão, já tive casos dele duplicar realmente a rotina e gravar varias vezes a mesma informação, já tentei desativar o botão ao executar a rotina mas da problema do mesmo jeito, pelos testes que fiz se desativar a impressão funciona normalmente, montei uma rotina que grava um txt ao invez que imprimir e rodou beleza, só quando uso o rdprint tenho problemas, alguém já se deparou com isso, e poderia me dar uma luz
  10. Bom dia pessoal, estou montando um projeto utilizando o componente sped fiscal e estou com uma duvida em relação ao preenchimento do mesmo, por ex. ao alimentar os registros com as informações, teria como ja checar o que esta dentro do componente, tipo estou inserindo registros de unidades, dai antes de mandar uma unidade de medida para o componente checar se a mesma ja nao esta la dentro,
  11. Pessoal eu sei que esse assunto já foi discutido aqui varias vezes mas eu estou com um problema a dias e não consigo achar uma solução, estou fazendo a seguinte simulação qtd preco unit total 1,100 33,33 36,66 1,200 33,33 40,00 1,300 33,33 43,33 1,400 33,33 46,66 1,500 33,33 50,00 0,333 33,33 11,10 --------------------------------------- subtotal 227,75 desconto 0,50 total 227,25 joia dai eu fecho a venda e faço o rateio do desconto pra emissão da nfce qtd preco unit desconto total 1,100 33,33 0,08 36,58 1,200 33,33 0,09 39,91 1,300 33,33 0,01 43,23 1,400 33,33 0,01 46,56 1,500 33,33 0,11 49,88 0,333 33,33 0,02 11,08 ----------------------------------------------------- total 0,50 227,24 observem que no final ele da 0,01 centavos de diferença em relação a primeira lista sem o rateio, em todas as operações eu estou usando o RoundAbnt quando lanço o produto na venda eu faço RoundAbnt(qtd x preco_unit) , sera que alguém tem alguma ideia em relação a esta rotina onde estes valores possam bater, para que não de diferença
  12. bom dia Andre, eu vi um video onde voce faz uma emissao de nfce no modulo ecfteste, fiquei curioso como foi feito, vi que existe a ecf virtual, que da pra configurar ela como modelo no componente acbr ecf porem nao tem como conectar o acbrecf no nfe, uma outra duvida, essa saida da ecf virtual eu consiguiria mandar direto pra impressora ao invez de um txt? no caso com a ecf virtual daria pra usar o componente do tef
  13. Gostaria de saber se é possivel fazer uma carta de correção de uma NFC-e emitida, em relacao a NFe eu ja utilizo e funciona muito bem, fiz alguns testes com XML de NFC-e e nao deu certo
  14. amigos vou deixar a solução aqui caso alguem passe por este problema, em contato com o suporte do banco me foi passado a mesma informacao que esta no manual do layout do boleto, convenios apenas com (4,6,7) posições, na verdade nao existe convenio de 8 posicoes, o pessoal da agencia local esta totalmente desinformado em relacao a passar essas informações para o cliente,
  15. configurei o acbrboleto para um cliente efetuar emissao de boletos com a carteira 18 porem o codigo do cedente que o banco passou é de 8 digitios com isso a geracao da linha digitavel nunca da, olhando o codigo da unit do banco do brasil percebi que ele nao aceita um codigo maior que 7 CodigoBarras := IntToStrZero(Banco.Numero, 3) +'9' + FatorVencimento + IntToStrZero(Round(ACBrTitulo.ValorDocumento * 100), 10) + IfThen((Length(AConvenio) = 7), '000000', '') + ANossoNumero + IfThen((Length(AConvenio) < 7), padR(OnlyNumber(Cedente.Agencia), 4, '0'), '') + IfThen((Length(AConvenio) < 7), IntToStrZero(StrToIntDef(OnlyNumber(Cedente.Conta),0),8), '') + ACBrTitulo.Carteira; como proceder nesse caso?
×
×
  • Create New...