dreamsoft_PR

tem esse procedure TDFeHttpWinHttp.Execute; begin inherited; // Enviando, dispara exceptions no caso de erro // try //<<<<<<< .mine anulei esse try // Enviando, dispara exceptions no caso de erro // FWinHTTPReqResp.Execute(ConteudoXML, Resp); // DEBUG // //Resp.SaveToFile('c:\temp\ReqResp.xml'); Resp.Position := 0; Result := String( ReadStrFromStream(Resp, Resp.Size) ); // Verifica se o ResultCode é: 200 OK; 201 Created; 202 Accepted // https://www.w3.org/Protocols/rfc2616/rfc2616-sec10.html if not (FWinHTTPReqResp.HTTPResultCode in [200, 201, 202]) then raise EACBrDFeException.Create(Result); except On E: Exception do begin raise EACBrDFeException.CreateDef( Format( cACBrDFeSSLEnviarException, [InternalErrorCode, HTTPResultCode, AURL] ) + sLineBreak + E.Message ) ; end; end; /// .r18406 try // Enviando, dispara exceptions no caso de erro // FWinHTTPReqResp.Execute(ConteudoXML, Resp); // DEBUG // //Resp.SaveToFile('c:\temp\ReqResp.xml'); Resp.Position := 0; Result := String( ReadStrFromStream(Resp, Resp.Size) ); // Verifica se o ResultCode é: 200 OK; 201 Created; 202 Accepted // https://www.w3.org/Protocols/rfc2616/rfc2616-sec10.html if not (FWinHTTPReqResp.HTTPResultCode in [200, 201, 202]) then raise EACBrDFeException.Create(''); except On E: Exception do begin raise EACBrDFeException.CreateDef( Format( cACBrDFeSSLEnviarException, [InternalErrorCode, HTTPResultCode, AURL] ) + sLineBreak + E.Message ) ; end; end; ======= FWinHTTPReqResp.Execute(DataResp); HeaderResp.Text := FWinHTTPReqResp.HeaderResp.Text; ///.r21492 finally FpHTTPResultCode := FWinHTTPReqResp.HttpResultCode; FpInternalErrorCode := FWinHTTPReqResp.InternalErrorCode; end; // DEBUG // //DataResp.SaveToFile('c:\temp\ReqResp.xml'); end; exclui tambem a pasta mas o erro continua agora deu isso: Compiling package C:\Componentes Delphi10\ACBR\Pacotes\Delphi\ACBrDFe\ACBr_DFeComum.dpk "C:\Program Files (x86)\Embarcadero\Studio\17.0\bin\dcc32.exe" "C:\Componentes Delphi10\ACBR\Pacotes\Delphi\ACBrDFe\ACBr_DFeComum.dpk" Embarcadero Delphi for Win32 compiler version 30.0 Copyright (c) 1983,2015 Embarcadero Technologies, Inc. C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(98) Error: E2003 Undeclared identifier: 'ConteudoXML' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(98) Error: E2003 Undeclared identifier: 'Resp' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(102) Error: E2066 Missing operator or semicolon C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(103) Error: E2003 Undeclared identifier: 'Result' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(103) Error: E2029 ')' expected but identifier 'Size' found C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(107) Error: E2066 Missing operator or semicolon C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(114) Error: E2003 Undeclared identifier: 'AURL' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(121) Error: E2250 There is no overloaded version of 'Execute' that can be called with these arguments C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(125) Error: E2066 Missing operator or semicolon C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(126) Error: E2029 ')' expected but identifier 'Size' found C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(130) Error: E2066 Missing operator or semicolon C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(133) Error: E2029 'END' expected but 'EXCEPT' found C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(135) Error: E2029 ';' expected but 'BEGIN' found C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(137) Error: E2003 Undeclared identifier: 'InternalErrorCode' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(137) Error: E2003 Undeclared identifier: 'HTTPResultCode' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(137) Error: E2003 Undeclared identifier: 'AURL' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(138) Error: E2003 Undeclared identifier: 'E' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(139) Error: E2029 '.' expected but ';' found C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(52) Error: E2065 Unsatisfied forward or external declaration: 'TDFeHttpWinHttp.ConfigConnection' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(53) Error: E2065 Unsatisfied forward or external declaration: 'TDFeHttpWinHttp.GetLastErrorDesc' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(60) Error: E2065 Unsatisfied forward or external declaration: 'TDFeHttpWinHttp.Abortar' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeSSL.pas(2786) Fatal: F2063 Could not compile used unit 'ACBrDFeHttpWinApi.pas' Compilation failure Erro ao compilar o pacote "ACBr_DFeComum.dpk". Abortando... Ocorreram erros na compilação dos pacotes.

fiz isso limpou mas deu o mesmo erro Embarcadero Delphi for Win32 compiler version 30.0 Copyright (c) 1983,2015 Embarcadero Technologies, Inc. C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(95) Error: E2029 Statement expected but '<' found C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(96) Error: E2125 EXCEPT or FINALLY expected C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(96) Error: E2029 ';' expected but 'TRY' found C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(114) Error: E2003 Undeclared identifier: 'InternalErrorCode' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(114) Error: E2003 Undeclared identifier: 'HTTPResultCode' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(114) Error: E2003 Undeclared identifier: 'AURL' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(115) Error: E2003 Undeclared identifier: 'E' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(116) Error: E2029 '.' expected but ';' found C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(52) Error: E2065 Unsatisfied forward or external declaration: 'TDFeHttpWinHttp.ConfigConnection' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(53) Error: E2065 Unsatisfied forward or external declaration: 'TDFeHttpWinHttp.GetLastErrorDesc' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(60) Error: E2065 Unsatisfied forward or external declaration: 'TDFeHttpWinHttp.Abortar' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeSSL.pas(2786) Fatal: F2063 Could not compile used unit 'ACBrDFeHttpWinApi.pas' Compilation failure Erro ao compilar o pacote "ACBr_DFeComum.dpk". Abortando... Ocorreram erros na compilação dos pacotes.

OI o meu da um erro isso no log : C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(95) Error: E2029 Statement expected but '<' found C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(96) Error: E2125 EXCEPT or FINALLY expected C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(96) Error: E2029 ';' expected but 'TRY' found C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(114) Error: E2003 Undeclared identifier: 'InternalErrorCode' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(114) Error: E2003 Undeclared identifier: 'HTTPResultCode' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(114) Error: E2003 Undeclared identifier: 'AURL' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(115) Error: E2003 Undeclared identifier: 'E' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(116) Error: E2029 '.' expected but ';' found C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(52) Error: E2065 Unsatisfied forward or external declaration: 'TDFeHttpWinHttp.ConfigConnection' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(53) Error: E2065 Unsatisfied forward or external declaration: 'TDFeHttpWinHttp.GetLastErrorDesc' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeHttpWinApi.pas(60) Error: E2065 Unsatisfied forward or external declaration: 'TDFeHttpWinHttp.Abortar' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrDFeSSL.pas(2786) Fatal: F2063 Could not compile used unit 'ACBrDFeHttpWinApi.pas' Compilation failure Erro ao compilar o pacote "ACBr_DFeComum.dpk".

vou procurar ler isso

ela acabou de me passar um modelo vou anexar aqui pra vcs verem Modelo Inventário.csv

valeu pessoal muito obrigado a todos!

certo vou passar pra ela pra ver mais pelo jeito ela nao sabe como ela disse, me respondeu assim: SPED é Perfil A

ela me passou isso agora diz que é "SPED é Perfil A"

lascou porque nao ela sabe , dizendo ela é do EStado de AL, que agora quer simples nacional mande o SPED

esse fiscal eu abri tem todos esses Registros Blocos, qual sei o que contador disse que tem mandar, ja o que mesmo so me disse isso: "erar o SPED Fiscal- ICMS"

nao sei se sabe, olha o que me falaram o contador Toda empresa independente da tributação pode gerar o SPED Fiscal- ICMS . Tenho empresa do Simples Nacional que já apresento o SPED Fiscal desde 2018. O layout para gerar o SPED-ICMS ele verificar no site da SEFAZ- AL (pessoal de sistema sabe como fazer). no exemplo de vcs tem varias pasta qual seria contabil Fcont Fiscal piscofins

Olá, preciso de uma orientação quem puder me dar uma dica. Preciso fazer um sped para um cliente de Alagoas que agora será obrigatório para Simples também , sei que tem componente da ACBR (vi na pasta acbrsped contabil, ou seria Fiscal ou Fiscal importar?) no exemplo tem Registros Bloco 0 Registros Bloco I Registros Bloco J nao entendo disso, qual que faço para mandar para o contador ele quer entrada, saída, valor de compras

oi alguem aqui ja fez rodar sistema em delphi em OS ?

Olá uma duvida alguem aqui ja fez programa feito em delphi rodar em linux

ha certo obrigado

OI podem me tirar uma duvida, esse cliente é do estado de Tocantis , ja tenho cliente la que gera pelo meu sistema, esse erro ate aonde sei é que o contador tem liberar na sefaz correto? é que contador alega que ja liberou ja esta na 17 Nº. Minha duvida: Então eu tenho que fazer algo no site da sefaz (homologação ) ou cadastrar no site deles , para o contador vincular o meu sistema

obrigado .. instalei duas verões da vcredist_x86 e vcredist_64 deu certo

Esta dando esse erro ja coloquei o arquivo , mas ai quando executo da outro eu achei a dll 120 na pasta de vcs... da um erro essa outra achei na net mas depois da isso

bom dia pessoal, deu certo... ajustei o nome razão social , endereço e etc tudo como o contador colocou na sefaz.. voltei a atualizar as dll, verefiquei o csc e passou . obrigado me desculpem tantas postagens

o contador deletou e ja está no id 3 , mandou a foto coloquei igual

me desculpe entao... entendi errado

obrigado... nao era bem isso ... mas ok... no estava encontrando o código de gerar o código também , mas conforme citaram acima não era necessário o código.. so que ainda o erro persiste . me desculpem então o mal entendido se houve

ja coloco assim: ACBrNFe1.Configuracoes.Geral.IdCSC :=FPiloto.cdsEmpresaIDCSC.AsString; ACBrNFe1.Configuracoes.Geral.CSC :=FPiloto.cdsEmpresaCSC.AsString; no estado da BA ja GERA o meu sistema NORMAL so PE que da erro, pediu tecnico responsavel , eu ja coloquei tambem.. ACBrNFe1.NotasFiscais[0].NFe.infRespTec.CNPJ:= 'coloquei aqui meu cnpj'; ACBrNFe1.NotasFiscais[0].NFe.infRespTec.xContato:= 'meu nome'; ACBrNFe1.NotasFiscais[0].NFe.infRespTec.email:= 'email'; ACBrNFe1.NotasFiscais[0].NFe.infRespTec.FONE:= 'telefone'; ACBrNFe1.NotasFiscais[0].NFe.infRespTec.idCSRT := 0; ACBrNFe1.NotasFiscais[0].NFe.infRespTec.hashCSRT := ''; GOSTARIA de saber encarecidamente se alguém ja gera no estado do PE , se precisar GERAR o idCSRT do programador!? ja esta todo rodando na BA , a questao do é em PE , alguem poderia me ajudar para ver o que houve, se é algo que precise eu atualizar, eu atualizei hoje os componentes tambem, na hora de receber o retorno que da esse erro Código de Hash no QR-Code difere do calculado

o modelo eu ja coloco ACBrNFe1.Configuracoes.Geral.ModeloDF :=moNFce; ACBrNFe1.Configuracoes.Geral.VersaoDF :=ve400; ACBrNFe1.Configuracoes.Geral.FormaEmissao :=teNormal; ACBrNFe1.Configuracoes.Geral.VersaoQRCode:= veqr200; nao entendi porque me chama disso! a duvida que comentei era outra coisa a questao que da calcudo errado no estado de PE alguem sabe se o estado de PE tem se increver na SEFAZ? mandie ja uns emails para refaz que me respondeu ja citado acima

nao entendi... sobre o modelo eu coloquei .. so nao coloquei o codigo todo , nao foi isso que comentei... sobre o NFE , nao tenho preguiçao nao ... obrigado! nao era isso nao.. isso ja tem no sistema sinceramente nao entendi pra me disse isso!! a duvida nao era essa a questao de Modelo