Ir para conteúdo
  • Cadastre-se

Diego

Membros
  • Total de ítens

    17
  • Registro em

  • Última visita

Posts postados por Diego

  1. ola, eu de fato não li muito o manual, pra fazer o programa aqui da emrpesa eu sigo as instruções do contador e só olho o manual em algumas duvidas de como tratar campos, eu fiz desta forma que falei e o xml emitido foi validado pelo validador da receita, deve ser alguma caracteristica da minha empresa que exija desta forma ou achei um bug do validador .

    mas mandei uma nota pra ele pra revisar esta questão assim que obtiver resposta eu repasso

  2. ola, de acordo com oque falei com o contador da emrpesa vi que basciamente todos campos "imposto"_quant e aliq_"imposto"_quant se forem zero eles devem ser gravados como vazio e não "0,00"

    achei esta ocorrencia em varios locais nos fontes

    no ACBrEPCBloco_1_Class registro 1300 e 1700 o ind_nat_ret(linha 629 e 847) esta sendo gravando errado, falta o parametro ",2" pois ele deve ter 2 casas

  3. realmente foi bem vago meu post

    o erro esta no campo IND_PROC o case estava incorreto

    procedure TBloco_F.WriteRegistroF129(RegF120: TRegistroF120) ;
    
      var
    
        intFor      : integer;
    
        strIND_PROC : AnsiString;
    
    begin
    
      if Assigned(RegF120.RegistroF129) then
    
      begin
    
        for intFor := 0 to RegF120.RegistroF129.Count - 1 do
    
        begin
    
          with RegF120.RegistroF129.Items[intFor] do
    
          begin
    
            case IND_PROC of
    
              opJusticaFederal : strIND_PROC := '1';
    
              opSecexRFB       : strIND_PROC := '3';
    
              opOutros         : strIND_PROC := '9';
    
              opNenhum         : strIND_PROC := '';
    
            end;
    
    
            Add( LFill('F129')   +
    
                 LFill(NUM_PROC) +
    
                 LFill(strIND_PROC) ) ;
    
          end;
    
    
          RegistroF990.QTD_LIN_F := RegistroF990.QTD_LIN_F + 1;
    
        end;
    
        /// Variavél para armazenar a quantidade de registro do tipo.
    
        FRegistroF129Count := FRegistroF129Count + RegF120.RegistroF129.Count;
    
      end;
    
    end;

  4. quando uso o registro0150new retorna a mensagem "List Index out of bound (-1)"

    uso da forma

    
    while not cds.eof do
    
    begin
    
      with registro0150new do
    
      begin
    
        #campos
    
      end;
    
    cds.next;
    
    end;
    
    

    os dados estão chegando corretamente nele cheguei a tentar passar da cds pra variaveis temporarias e não resolveu, eu uso o acbr do repositorio e atualizo semanalmente, cheguei a tentar atualizar agora mas o erro persistiu

    o 0150 seria filho do 0140? se sim como ficaria caso de um participante tipo pessoa fisica?

  5. Ola, fiz oque vc sugeriu e funcionou, porem agora estou com problema ao executar o programa aparec a mensagem campo "danfe.nfecancelada" não existe ja tirei o componente do form e coloquei um novo porem o erro persiste

    tentei olhar agora o demo da nfe2 para ver se acho oque tenho que modificar porem não concgo compilar o exemplo da erro em mais d uma parte ele não acha alguns elementos em :

    NotasFiscais, WebServices, Ide, Emit

    vou desinstalar todo acbr e reinstalar

  6. desinstalei o acbrnfe e depois instalei o acbrnfe2 tentei com e sem adicionar o vclimg

    a instalação funcionou sem problema mas quando vou abrir um form que ja usava o acbrnfe da o seguinte erro:

    Cannot load package "acbrnfedanfervcodebase", it contains unit "rvcsrpt", which is also contained in package "rave90vcl150"

    eu preciso tmbm do rave

    obs: sou iniciante em delphi daria pra simplesmente comentar o uses no acbrnfe2 ou seria algo mais complicado ?

×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.