Jump to content

marcelosantos

Membros Pro
  • Posts

    67
  • Joined

  • Last visited

Everything posted by marcelosantos

  1. Italo obrigado desde já Você poderia me orientar em como é feito a checagem do ambiente de contingencia no componente? essa é a minha maior dúvida
  2. Olá Qual seria a melhor forma para detectar que o ambiente de produção do meu estado esta off-line e assim tentar enviar para o ambiente de Produção Contingência? Deveria fazer algo deste tipo? ACBrNfe.WebServices.StatusServico.Executar; e Depois verificar o resultado em uma dessas duas propriedades? ACBrNfe.nfe.WebServices.StatusServico.RetWS); ACBrNfe.nfe.WebServices.StatusServico.RetornoWS); Mais como eu verifico se o ambiente de Contingência está ativo para o meu estado?
  3. Olá, sou do interior de Pernambuco, e tenho clientes que são do interior do interior, onde a maior velocidade de conexão disponível é de 1 Mbps, compartilhado Recentemente migrei meu código fonte do Trunk 1 para o Trunk 2 e tive (tenho) um pequeno problema nesses clientes Peguei uma máquina formata com apenas o Windows 7 Professional instalado (sem as atualizações) mais quando enviava uma NFe recebia o seguinte erro: O sistema não pode encontrar o arquivo especificado, - URL:https://nfe.sefaz.pe.gov.br/nfe-service/servicesNfeAutorizacao?wsdl - SOAPAction:http:www.portalfiscal.inf.br/nfe/wsdl/NfeAutorizacao A nota estava na SEFAZ, mais eu percebia que o compontente não recebia corretamente a resposta do WEBService Fiquei até o fim do expediente no cliente tentando resolver e não consegui, na saída percebi que havia muitas atualizações do windows (137) para ser feitas, então deixei o computador ligado baixando, no outro dia, fiz todas as atualizações e para minha surpresa o erro não acontecia mais. Tenho certeza que o problema era (é) uma atualização do Windows, mais minha pergunta é qual? O motivo é que dependendo da situação (conexão com internet horrível) não posso passar 4 a 5 horas só para atualizar o windows 7, gostaria de saber qual é (quais são) as importantes para que eu baixe e guarde em um pen-drive, afim de poder instalar rapidamente, e ter o sistema funcionando. (Realizando é claro as atualizações em um momento mais oportuno). Outro detalhe é que eu não lembro deste erro quando usava Trunk 1 Obrigado desde já
  4. Obrigado aos que responderam, mais houve uma pequeno engano, talvez eu postei no tópico errado, porque estava passando pelo mesmo problema, vamos lá Encontrei os eventos no objetc Inspector, só que no SPEDFiscal e não SPEDContribuições que era o que eu estava implementando. Li o tópico do EMBarbosa, mais o mesmo também é SPEDFiscal e não SPEDContribuições. Então fica ai a dica Marcelo Santos
  5. Isaque e amigos como utilizo estas procedures? procedure TForm.BeforeWriteRegistroC481 (var ANullVL_BC_PIS, ANullALIQ_PIS, ANullQUANT_BC_PIS, ANullALIQ_PIS_QUANT, ANullVL_PIS: Boolean); begin ANullVL_BC_PIS:=False; ANullALIQ_PIS:=False; ANullQUANT_BC_PIS:=True; ANullALIQ_PIS_QUANT:=True; ANullVL_PIS:=False; end; procedure TForm.BeforeWriteRegistroC485 (var ANullVL_BC_PIS, ANullALIQ_PIS, ANullQUANT_BC_PIS, ANullALIQ_PIS_QUANT, ANullVL_PIS: Boolean); begin ANullVL_BC_PIS:=False; ANullALIQ_PIS:=False; ANullQUANT_BC_PIS:=True; ANullALIQ_PIS_QUANT:=True; ANullVL_PIS:=False; end; Onde no meu código chamo elas?
  6. Valeu Juliano, tenho acompanhado suas alterações, estão ótimas, aos poucos vamos deixar esse componente redondinho.
  7. Olá a todos Envio neste novas alterações, para o componente, agora com o bloco H (inventario) totalmente funcional. Agradecimento ao usuário Fabio Alves que foi quem iniciou o desenvolvimento do bloco H ACBrSEF2.rar
  8. Olá Juliomar Um pequeno problema, é que assim que iniciamos a linha E300, a linha E340 é criada, causando o seguinte problema: Mesmo que não escrevemos a linha E340 ela é impressa no arquivo, toda zerada Marcelo Santos
  9. Olá Neste segue nova atualização, neste foi implementado as linhas E330, E340*, E350, E360 *Julimar alterar a forma de criar esta linha, antes de subir esta versão ACBrSEF2.rar
  10. Olá Julimar envio neste a primeira modificação que fiz no componente ACBrSEF2: as modificações foram: LinhaE300 - modificada (datas estavam como integer) LinhaE305 - modificada (propriedades não estavam de acordo com o manual) LinhaE310 - adicionada Método para escrever linha E300 adicionado Método para escrever linha E305 adicionado Método para escrever linha E310 adicionado Assim que receber um aval de vocês, irei acrescentar as linhas E330, E340, E350 e E360 ACBrSEF2.rar
  11. Olá a todos Estou precisando adicionar ao SEF2 a linha E310, mais a mesma não esta disponível no ACBR. Gostaria de ajudar a implementar, mais não entendo bem como é que devo acrescentar isto. Alguém poderia dar uma força?, pois nunca fiz nenhuma alteração em nenhum componente do ACBR, e se eu fizer como consigo compartilhar com todos? se não compartilhar não vou poder atualizar o svn? pois vou perder as atualizações que fizer? Já sei que para o blocoE temos 2 units (ACBrSEF2_BlocoE.pas e ACBrSEF2_BlocoE_1.pas) na primeira eu crio as linhas com suas variaveis, (propriedades) na segunda eu implemento o função de escrita. Mais como informo ao componete que tem que escrever também esta linha? Estou certo, alguém poderia me orientar a fazer estes ajustes?
  12. Infelismente só com dados dos clientes os quais nao posso divugar. Deixa eu tentar te explicar, se voce tiver uma compra com um produto cujo cfop seja 1102, dai voce vai no manual do edoc e vai procurar o codigo para este cfop. Espero que entenda quais as informações que deve constar na linha 0400
  13. Amigo um exemplo da minha linha 0400 fica assim |0400|000001|Compra|EA10| |0400|000002|Venda|SP10| onde: 000001 - é o código - uso uma sequencia aqui - Compra - é a descrição - EA10 - vem tabela, então faço o seguente: pego os cfops e vejo na tabela qual a sua referencia (eA10, SP10) e incluo na linha, faço isso para todos os produtos, seja venda ou compra, e só escrevo aquele que não se repete. espero que te ajude com isso que escrevi
  14. Amigo este erro com perfil, é porque o sistema não consegue obter os dados da empresa em questão (Mercantil Santana), atualize a versão do SEF 2012, já esta na 1.0.8.xx (não me lembro o final) e acredito que você vai conseguir obter o perfil da referida empresa.
  15. Olá JulioMar e outros O erro que comentei acima ocorre no arquivo \ACBr\Fontes\ACBrSEF2\ACBrSEF2_BlocoE.pas, o que fiz para corrigir foi acrescentar nesta classe a uses Controls. e o arquivo compilou tranquilamente Há alguns erros nos arquivo de exemplo do SEF2, na maioria dos casos são erro de conversões de tipo. Mais comentando as variáveis que estão com esses erros o exemplo compila e roda de boa Não sei como funciona as alterações no SVN, mais quem puder colocar a uses Controls, no Arquivo já ajudaria bastante, principalmente para alguém que esta começando como eu
  16. Olá a Todos, este é meu segundo post. No banco de dados da aplicação a qual estou trabalhando os campos cnpj, telefone, etc, são do tipo strings, e os dados estão gravados assim CNPJ = xx.xxx.xxx/xxxx-xx, telefone (xx) xxxx-xxxx, ou seja esta com "parentes, hifem, ponto, etc). dessa forma os dados não atendem a regra do edoc (pis-cofins também) crei a seguinte função na minha aplicação Function limpaVariavel (sTexto: String):String; begin sTexto := StringReplace(sTexto, '.', '',[rfReplaceAll, rfIgnoreCase]); //remover . sTexto := StringReplace(sTexto, '-', '',[rfReplaceAll, rfIgnoreCase]); //remover - sTexto := StringReplace(sTexto, '/', '',[rfReplaceAll, rfIgnoreCase]); //remover / sTexto := StringReplace(sTexto, '(', '',[rfReplaceAll, rfIgnoreCase]); //remover ( sTexto := StringReplace(sTexto, ')', '',[rfReplaceAll, rfIgnoreCase]); //remover ) sTexto := StringReplace(sTexto, ' ', '',[rfReplaceAll, rfIgnoreCase]); // revomer ' ' Result := sTexto; end; Varrendo toda a string a procura desses caracteres, minha pergunta é, há alguam função em ACBR que resolva isto e já valide cpnj, telefone etc?
  17. Olá Pessoal, sou novato em ACBR, descobri por conta do E-doc estou com o svn na revision 5931, quando vou compilar o projeto exemplo do SEF2 (EDOC), esta dando erro em fDT_DOC : TDate; o erro é ACBrSEF2_BlocoE.pas(248): Undeclared identifier: 'TDate' Onde se encontra esta classe TDate? como resolvo esta dependencia?
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.