Painel de líderes

vejo o exemplo de alguns topicos que receberam destaque, o dos valores aproximados dos tributos, depois que o topico atingiu 3 paginas as pessoas pararam de lê-lo e só perguntavam as mesmas coisas de tempos em tempos (isso quando nao se abria outros topicos para o mesmo assunto) e ai uma coisa foi puxando a outra e quando se via, nao estava mais no assunto do titulo. O que ajudaria é quem cria os topicos colocar titulos menos genericos, e todos se aterem a ele

Boa tade Plínio, Usando as suas palavras, estou estudando as suas "gambiarras". Acredito que existe uma maneira mais simples de implementar.

O processo de geração está correto. Infelizmente não tem o que fazer, tem que continuar consultando o lote até que o servidor da prefeitura processe e retorne a nota.

REGISTRO 0015: DADOS DO CONTRIBUINTE SUBSTITUTO - Eu nunca usei. REGISTRO 0150: TABELA DE CADASTRO DO PARTICIPANTE - Falando grosseiramente, é o cadastro de Clientes e Fornecedores, de forma suscinta, é o emitente de uma nf destinada a empresa, e/ou o destinatário de uma nf emitida pela empresa. REGISTRO 0206: CÓDIGO DE PRODUTO CONFORME TABELA PUBLICADA PELA ANP (COMBUSTÍVEIS) - São produtos que fazem parte da família dos combustiveis e lubrificantes, existe uma tabela classificando isso, é só perguntar pro mestre GOOGLE que ele te localiza fácil fácil. REGISTRO 0220: FATORES DE CONVERSÃO DE UNIDADES - Um produto que é comprado em fardo de unidades, "CERVEJA LATA" por exemplo, a unidade de medida é fardo, na NF de compra vem descrito x fardos, e são vendidos em unidades ( acho que é assim ). REGISTRO 0300: CADASTRO DE BENS OU COMPONENTES DO ATIVO IMOBILIZADO - Não uso, então não saberia te dar maiores detalhes.

Caro ricardo_casc, Consegui resolver da seguinte maneira. Atribui ao parâmetro UsarThread = FALSE e fiz o tratamento do erro desta forma: try bEmailEnviado := True; ACBrNFe1.NotasFiscais.Items[0].EnviarEmail(...); except bEmailEnviado := False; end; Referente a alterar os fontes para não mostrar os raise's não acho interessante, pois quando eu atualizar o componente o que eu alterei será perdido. Agradeço pelas informações, pois através delas consegui chegar à resolução do problema.

Peço desculpas pela demora. Os arquivos estão no meu local aonde trabalho. Acho que agora foi! ACBrNFSeConfiguracoes.pas ACBrNFSeNotasFiscais.pas ACBrNFSeWebServices.pas ACBrProvedorISSDigital.pas pnfsConversao.pas pnfsNFSeG.pas pnfsNFSeW.pas

Vou ver se consigo estes enderecos.

Boa tarde Amigo, como na conversa anterior estou implementando a NFSe Paulistana no Acbr, já estou realizando o envio de Lote e tratando os erros retornados, tudo dentro do padrão Acbr. Como todos sabem existe uma TAG <Assinatura> na NFSe Paulistana que o Delphi não assina correto, ou seja muitos programadores usaram DLL feita em C#, visitei diversos fóruns solicitando a DLL para fazer a tal assinatura, mais nunca ninguém me ajudou. Então tive que aprender C# na raça, e então desenvolvi a tão sonhada DLL que faz a assinatura. Quando toda a rotina estiver implementada foi enviar os fontes para os moderadores verificar e subir. A DLL com o tbl esta em anexo, vou mostrar também como realizar a assinatura : Dentro da Unit AcbrNFSeUtil adicione a função : class function NotaUtil.AssinaturaProdam( Assinatura, NumSerial : String ) : String; var Store : IStore3; Certs : ICertificates2; Certs2 : ICertificates2; Cert : ICertificate2; AssinarRPSSP : TAssinaturaRPS; begin Result := ''; Store := CoStore.Create; Store.Open(CAPICOM_CURRENT_USER_STORE, CAPICOM_STORE_NAME, CAPICOM_STORE_OPEN_MAXIMUM_ALLOWED); Certs := Store.Certificates as ICertificates2; Certs2 := Certs.Select('Certificado(s) Digital(is) disponível(is)', 'Selecione o Certificado Digital para uso no aplicativo', false); if not(Certs2.Count = 0) then begin Cert := IInterface(Certs2.Item[1]) as ICertificate2; AssinarRPSSP := TAssinaturaRPS.Create(nil); Assinatura := AssinarRPSSP.AssinarRPS(Assinatura,UpperCase(Cert.SerialNumber)); Assinatura := StringReplace( Assinatura, #10, '', [rfReplaceAll] ); Assinatura := StringReplace( Assinatura, #13, '', [rfReplaceAll] ); Result := Assinatura; //FDataVenc := Cert.ValidToDate; //FInformacao := Cert.SubjectName end; end; Na pasta do executável você coloca a DLL e registra com o regasm.exe : pelo prompt do DOS (como administrador) execute : "RegAsm AssinaturaRPS_SP.DLL" Para importar o arquivo AssinaturaRPS_SP.tbl faça o seguinte : No Delphi vai em : Project -> Import Type Library -> Add ( AssinaturaRPS_SP.tbl ) Não se esqueça de adicionar a unit "AssinaturaRPS_SP_TLB" em USES. Abraços. AssinaturaRPS_Sp.rar