Ir para conteúdo
  • Cadastre-se

colmanetti

Membros Pro
  • Total de ítens

    114
  • Registro em

  • Última visita

Tudo que colmanetti postou

  1. BLOCO P Corrigido Unit´s ACBrECFBloco_P.pas e ACBrECFBloco_P_Class.pas e validado no PVA. ACBrECFBloco_P.pas ACBrECFBloco_P_Class.pas
  2. PRIMEIRO: Parabéns pela mudança do Trunk2 ficou muito bom. Quando Crio o Bloco P mostra acess violation em: RegistroP030New = Erro acess violation. Onde estou fazendo algo de errado? Se puderem me ajudar agradeço. ======================================================== debugando Na Unit:ACBrECFBloco_P_Class.pas FRegistroP001.RegistroP030 ==== nil {deve ser por isto o access violation} Linha 200: se mudar não dá o erro: function TBloco_P.RegistroP030New: TRegistroP030; begin //Result := FRegistroP001.RegistroP030.New; Result := RegistroP030.New; {Ezequiel alterou esta linha não existia} end; ========================================================== Abaixo Meu Código a Sequencia de Criação do Bloco P TP200,TP030,TP300 = Dataset´s ========================================================== with ACBrSPEDECF1.Bloco_P do begin with RegistroP001New do begin IND_DAD:=idComDados; if TP200.IsEmpty then begin IND_DAD:=idSemDados; exit; end; end; TP030.First; while not TP030.Eof do begin with RegistroP030New do <=========ERRO AQUI========= begin DT_INI:=TP030DT_INI.AsDateTime; DT_FIN:=TP030DT_FIM.AsDateTime; PER_APUR:=TP030PER_APUR.AsString; TP200.First; while not TP200.Eof do begin with RegistroP200New do begin CODIGO :=TP200CODIGO.AsString; DESCRICAO:=TP200DESCRICAO.AsString; VALOR :=TP200VALOR.AsCurrency; end;
  3. Na unit ACBrGNREWebServices.pas na linha 658 está causando erro. {$IFDEF SoapHTTP} Stream := TMemoryStream.Create; StrStream := TStringStream.Create(''); try ReqResp.Execute(Acao.Text, Stream); // Dispara exceptions no caso de erro StrStream.CopyFrom(Stream, 0); FRetornoWS := TiraAcentos(ParseText(StrStream.DataString, True)); finally StrStream.Free; Stream.Free; end; {$ELSE} ReqResp.Data := Acao.Text; FRetornoWS := ReqResp.Execute; {$ENDIF} FRetWS := SeparaDados( FRetornoWS, 'processarResponse'); //StrStream.Free; *********LINHA COM ERRO
  4. ao meu ver deve ter o mesmo nome o xml e o PDF e assim mesmo não está ocorrendo. exemplo XML=351304094197130001695500200000000910000000901101103-procEventoNFe.xml o PDF não tem o mesmo nome e esta somando o TipoEvento no inicio e final do nome. como está a linha 294: NomeArq := TACBrNFe(ACBrNFe).EventoNFe.Evento[0].InfEvento.TipoEvento; NomeArq := NomeArq + TACBrNFe(ACBrNFe).EventoNFe.Evento[0].InfEvento.chNFe; dmDanfe.frxPDFExport.FileName := PathWithDelim(Self.PathPDF) + NomeArq + 'evento.pdf';
  5. Italo, Consegui criar um outro componente copia do NFSE. Para o PROVEDOR SMARAPD Estou gerando o XML ja com assinatura e pronto para envio. Tenho 2 duvidas: 1- O provedor pode ser tratado como os outros que são gerados com case é possível integrar tudo em componente unico, após eu testar e funcionar? 2- Para envio onde fica (qual unit) a URL de envio, resposta... etc. dos webservices? obrigado, Ezequiel
  6. O Provedor é SmarAPD http://www.sertaozinho.sp.gov.br/2010/index.php/conteudo/visualizar/links-dos-servicos
  7. colmanetti

    Provedor NOVO

    Tenho que implementar um provedor NOVO, quais units tenho que criar. Se tiver um esqueleto para eu trabalhar vai ficar mais facil. Ja implementei uma prefeitura de Ribeirao Preto/SP que ja existe funciona bem. Mas a outra de Sertaozinho/SP não tem o provedor. Obrigado.
  8. Italo, Tentei deixar de informar e foi com a opção default=1 a nota validou normal, mas saiu impresso 1 e deve ser 0(zero). Obrigado,
  9. sm, localizei no codigo, mas a validação ocorre no schemas antes de enviar a NF. e não valida se for 0(zero).
  10. Bom dia. No manual de Integração Mostra: Código de identificação do regime especial de tributação 1 – Microempresa municipal 2 - Estimativa 3 – Sociedade de profissionais 4 – Cooperativa 5 - Microempresário Individual (MEI) 6 - Microempresário e Empresa de Pequeno Porte (ME EPP) MAS no site da Prefeitura de Ribeirao Preto-SP tem a opção 0(zero)=Nenhuma para o Regime Especial de Tributação. O Contador da Empresa afirma que deve ser 0(zero) é o correto. Se passo com a opção zero para gerar a NFE mostra a mensagem de valor invalido. como devo proceder? Obrigado.
  11. Ok. Obrigado.
  12. Sim eu vi. Estou usando a versão 2.00 do PVA.
  13. Erro no Validador em todas linhas do bloco F Em anexo o arquivo gerado Obrigado, ACBrSPEDPisCofins.txt
  14. colmanetti

    Validar Bloco F

    Bloco F mostra mensagem de Erro na Estrutura. Aguem conseguiu validar este Bloco, o PVA já reconhece este bloco? Obrigado,
×
×
  • 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.

The popup will be closed in 10 segundos...