Ir para conteúdo
  • Cadastre-se

piubello

Membros
  • Total de ítens

    12
  • Registro em

  • Última visita

Últimos Visitantes

738 visualizações

piubello's Achievements

Apprentice

Apprentice (3/14)

  • First Post
  • Collaborator Rare
  • Conversation Starter
  • Week One Done
  • One Month Later

Recent Badges

3

Reputação

  1. Boa tarde! Fiz desta forma: procedure TNFeW.GerarCobrFat; begin if (trim(nfe.Cobr.Fat.nFat) <> '') or (nfe.Cobr.Fat.vOrig > 0) or (nfe.Cobr.Fat.vDesc > 0) or (nfe.Cobr.Fat.vLiq > 0) then begin Gerador.wGrupo('fat', 'Y02'); Gerador.wCampo(tcStr, 'Y03', 'nFat ', 01, 60, 0, nfe.Cobr.Fat.nFat, DSC_NFAT); Gerador.wCampo(tcDe2, 'Y04', 'vOrig ', 01, 15, 0, nfe.Cobr.Fat.vOrig, DSC_VORIG); if NFe.Ide.tpAmb = taHomologacao then begin Gerador.wCampo(tcDe2, 'Y05', 'vDesc ', 01, 15, 1, nfe.Cobr.Fat.vDesc, DSC_VDESC); end else begin Gerador.wCampo(tcDe2, 'Y05', 'vDesc ', 01, 15, 0, nfe.Cobr.Fat.vDesc, DSC_VDESC); end; Gerador.wCampo(tcDe2, 'Y06', 'vLiq ', 01, 15, 0, nfe.Cobr.Fat.vLiq, DSC_VLIQ); Gerador.wGrupo('/fat'); end; end; Assim funcionou corretamente. pcnNFeW.pas
  2. Sou desenvolvedor e recebemos esse comunicado de um de nossos clientes. Creio que seja apenas alterar o arquivo Fiorilli.ini para ajustar para o novo endereço. Mas como somente a partir do dia 13/03 poderá ser usada a nova URL, então não enviarei o arquivo já ajustado. Segue conteúdo do e-mail: Assunto: Prefeitura Municipal de ASSIS: Comunicado Técnico - Nota Fiscal de Serviços Eletrônica Data: Mon, 5 Mar 2018 16:01:43 -0300 De: Tecnologia PMA <[email protected]> Para: [email protected] Na terça-feira, 13 de março de 2018, a partir das 8 horas, a URL do WEBSERVICE da NFS-E (Nota Fiscal de Serviços Eletrônica) da Prefeitura de Assis passará a responder exclusivamente no endereço https://nfsews.assis.sp.gov.br/IssWeb-ejb/IssWebWS/IssWebWS?wsdl O endereço (URL) atualmente utilizado deixará de responder a partir desta data. Para tanto, é necessário que os emissores de NFS-E, que se utilizam de software/sistemas de terceiros, comuniquem este fato ao seus desenvolvedores para que os mesmos façam a devida adequação. Essa nova URL do WEBSERVICE somente deverá ser utilizada a partir de 13 de março. Antes dessa data não deve ser utilizada. O acesso direto ao sistema ISSWEB, que gera a NFS-E, também será alterada para https://nfse.assis.sp.gov.br. Em caso de dúvidas, o contato do Departamento de Tecnologia e Governo Eletrônico é (18) 3321-5070 ramal 227 ou [email protected]
  3. Sim, funcionou perfeitamente.
  4. Sim, eu fiz a mudança apenas para a cidade de Bariri.
  5. Boa tarde! Tive alguma dificuldade com o WebService para emissão das Notas de Serviço para Bairi-SP que usam o Layout Fiorilli. Dentro do arquivo fiorilli.ini que veio com a última atualização da Trunk2, a porta do serviço está 8080 e o correto é 5661. Fiz a correção do arquivo e estou encaminhando para analise e atualização do repositório. Pasta trunk2\Exemplos\ACBrDFe\ACBrNFSe\ArqINI Fiorilli.ini
  6. Boa tarde! Muito obrigado pela ajuda. Estava passando o código, mas um código fonte escrito por um programador desleixado estava limpando. Com isso, aproveitei e fiz uma revisão geral na minha rotina.
  7. Boa tarde! Estamos enviando a unit ajustada para sua apreciação e possível incorporação ao diretório SVN. Unit: ACBrBancoSantander.pas Procedure: GerarRegistroTransacao400 - Linha 755 Alterado De wLinha:= wLinha + #13#10 + '2' + space(16) + PadLeft(Cedente.CodigoTransmissao,20,'0') + Space(10) + '01' + PadRight(Mensagem,50) + Space(283) + 'I' + Copy( Cedente.Conta, length( Cedente.Conta ),1 ) + Cedente.ContaDigito + Space(6) + Protesto + ' ' + IntToStrZero( aRemessa.Count + I + 2 , 6 ); Para: // Alteração para adequação do Layout de Remessa Santander CNAB 400 // Página 9 - 386 394 X(009) Brancos wLinha:= wLinha + #13#10 + '2' + space(16) + PadLeft(Cedente.CodigoTransmissao,20,'0') + Space(10) + '01' + PadRight(Mensagem,50) + Space(283) + 'I' + Copy( Cedente.Conta, length( Cedente.Conta ),1 ) + Cedente.ContaDigito + // Jaqueline - 23/06/2017 // Alteração para adequação do Layout de Remessa Santander CNAB 400 // Página 9 - 386 394 X(009) Brancos //Space(6) + Protesto + ' ' + Space(9) + IntToStrZero( aRemessa.Count + I + 2 , 6 ); Cobrança Santander CNAB 400.pdf ACBrBancoSantander.pas
  8. Bom dia! Estou implementando na minha aplicação a emissão de NFSe para Assis-SP. Utilizo a ACBr para fazer a transmissão. O provedor lá é Fiorilli e estou com um problema na validação do XML que é feita pelo ACBr antes mesmo de tentar enviar para o webservice. Identifiquei que no XML que é passado para a função ValidarLote que fica na unit ACBrNFSeNotasFiscais que é gerada uma tag vazia "<CodigoMunicipio/>" dentro da tag "<Servico>". Na hora de passar os dados do item de serviço para a ACBr, não encontrei uma propriedade para informar o Código do Município. Será que estou fazendo algo errado? Poderiam me ajudar? xml_assis.xml
  9. Acho que só faltou dizer as quantidades de dígitos de cada um deles: cUF - 2 dígitos;AAMM – 4 dígitos;CNPJ – 14 dígitos;mod – 2 dígitos;nserieSAT – 9 dígitos;nCF – 6 dígitos;cNF – 6 dígitos;cDV – 1 dígito;
  10. Olá! Também estou com o mesmo problema. O que poderia fazer para ajustar?
  11. Olá pessoal! Alguma novidade quanto à disponibilização dos componentes do SPED-ECF?
  12. Na function TBloco_0.WriteRegistro0000 que fica na unit ACBrECDBloco_0_Class está retornando desse forma: Result := LFill('0000') + LFill('LECD') + LFill(DT_INI) + LFill(DT_FIN) + LFill(NOME) + LFill(CNPJ) + LFill(UF) + LFill(IE) + LFill(COD_MUN, 7) + LFill(IM) + LFill(IND_SIT_ESP, 1) + Delimitador + #13#10; E dessa forma o campo IND_SIT_ESP se estiver em branco, ele vai para o Sped como '0'. Este campo deve deve receber o valor de 0 até 4 apenas se houve uma situação especial, caso contrário, deverá ficar "vazio"n conforme exemplificado na página 33 do manual do sped (http://www1.receita.fazenda.gov.br/sistemas/sped-contabil/download/Manual_de_Orientacao_da_ECD.pdf). Ajustei o código para atender a regra e o código ficou assim: Result := LFill('0000') + LFill('LECD') + LFill(DT_INI) + LFill(DT_FIN) + LFill(NOME) + LFill(CNPJ) + LFill(UF) + LFill(IE) + LFill(COD_MUN, 7) + LFill(IM) + IND_SIT_ESP + Delimitador + #13#10; Espero com isso, ajudar mais pessoas.
×
×
  • 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...