Ir para conteúdo
  • Cadastre-se

Diego Foliene

Consultores
  • Total de ítens

    5.296
  • Registro em

  • Última visita

  • Days Won

    154

Tudo que Diego Foliene postou

  1. Diego Foliene

    Fim do SAT em São Paulo

    Para mais detalhes confira:
  2. Não, você não leu errado o título da notícia. A sefaz de São Paulo está dando adeus ao SAT! Foi publicado no dia 31/10/2024 a Portaria SRE 79, DE 31 DE OUTUBRO DE 2024 que modifica a Portaria CAT147/12(responsável pela definição do SAT), acrescentando na mesma os seguintes artigos: Efetivamente impedindo a ativação de novos equipamentos SAT para quem ainda não o tinha o aparelho e estipulando a data de 01/01/2026 para o fim do SAT como um todo. Mas se eu uso o SAT o que eu vou fazer agora? A NFC-e é o documento fiscal que deverá ser utilizado no lugar do CF-e. A muito tempo, esses documentos são "intercambiáveis", com o contribuinte podendo escolher se emite uma NFC-e ou um CF-e através do SAT para acobertar a mesma operação. Eu estou um pouquinho enferrujado, mas o SAT não era a contingência da NFC-e? Não mais! A Sefaz já havia publicado previamente uma portaria autorizando o uso da contingência off-line para NFC-e no estado. Veja mais aqui:
  3. Movi o seu tópico para a área aberta. Assim o alcance será maior, com todos os membros podendo interagir. Também vale tentar novamente o suporte da Gertec questionando como o processo deve ser feito agora que o Java2OP.exe está defasado. Qual é o procedimento que deve ser feito no lugar dele.
  4. Boa tarde! Sendo o certificado A1 e você não pretendendo instalar ele na máquina, por favor, faça um teste com a configuração OpenSSL. Conforme indicado no tópico abaixo:
  5. Boa tarde! Apenas complementando a resposta do meu amigo @Renato Rubinho. Da forma como ele orientou, você vai ter duas ocorrências da tag DI para o item 1, ficando assim em seu XML: <det nItem="1"> ... <DI> <nDI>24/2335541-5</nDI> <dDI>2024-10-24</dDI> <xLocDesemb>BETIM</xLocDesemb> <UFDesemb>MG</UFDesemb> <dDesemb>2024-10-24</dDesemb> <tpViaTransp>7</tpViaTransp> <tpIntermedio>1</tpIntermedio> <cExportador>001</cExportador> <adi> <nAdicao>1</nAdicao> <nSeqAdic>1</nSeqAdic> <cFabricante>001</cFabricante> </adi> </DI> <DI> <nDI>24/2335541-5</nDI> <dDI>2024-10-24</dDI> <xLocDesemb>BETIM</xLocDesemb> <UFDesemb>MG</UFDesemb> <dDesemb>2024-10-24</dDesemb> <tpViaTransp>7</tpViaTransp> <tpIntermedio>1</tpIntermedio> <cExportador>001</cExportador> <adi> <nAdicao>1</nAdicao> <nSeqAdic>2</nSeqAdic> <cFabricante>001</cFabricante> </adi> </DI> </det> Caso cada ocorrência da DI seja para cada item, ficando uma DI por item, altere a segunda ocorrência do campo DI em seu arquivo desta forma: [DI002001] nDi=24/2335541-5 dDi=24/10/2024 xLocDesemb=BETIM UFDesemb=MG dDesemb=24/10/2024 tpViaTransp=7 tpIntermedio=1 cExportador=001 [LADI002001001] nAdicao=1 Resultando em uma estrutura como está: <det nItem="1"> ... <DI> <nDI>24/2335541-5</nDI> <dDI>2024-10-24</dDI> <xLocDesemb>BETIM</xLocDesemb> <UFDesemb>MG</UFDesemb> <dDesemb>2024-10-24</dDesemb> <tpViaTransp>7</tpViaTransp> <tpIntermedio>1</tpIntermedio> <cExportador>001</cExportador> <adi> <nAdicao>1</nAdicao> <nSeqAdic>1</nSeqAdic> <cFabricante>001</cFabricante> </adi> </DI> </det> <det nItem="2"> ... <DI> <nDI>24/2335541-5</nDI> <dDI>2024-10-24</dDI> <xLocDesemb>BETIM</xLocDesemb> <UFDesemb>MG</UFDesemb> <dDesemb>2024-10-24</dDesemb> <tpViaTransp>7</tpViaTransp> <tpIntermedio>1</tpIntermedio> <cExportador>001</cExportador> <adi> <nAdicao>1</nAdicao> <nSeqAdic>2</nSeqAdic> <cFabricante>001</cFabricante> </adi> </DI> </det>
  6. Boa tarde! E o time da Gertec não forneceu mais informações de como o processo pode ser feito?
  7. Bom dia! Foi criada a #TK-6187 para análise do caso e parecer por parte da equipe de consultores. Qualquer novidade será divulgada neste tópico.
  8. Bom dia! Primeiro de tudo, mais uma vez muito obrigado pela contribuição! Toda e qualquer colaboração é e sempre será mais do que bem vinda. Eu fiz algumas modificações relacionadas a alterações que já estavam sendo trabalhadas e também alguns incrementos. Por exemplo, a criação do evento S-2555 ou a adição de algumas propriedades. Por favor, queira atualizar seus fontes, reinstalar o ACBr para realizar novos testes e reportar qualquer problema.
  9. evtCS (S-5011) Adiciona as classes TinfoEstabRef, TideEstabCollection, TideEstabCollectionItem, TbasesPisPasep e TbasesCp13. Exemplo de leitura: uses pcesS5011; //... var S5011: TS5011; evtCS: TEvtCS; i, j, k: integer; ideEstab: pcesS5011.TideEstabCollectionItem; ideLotacao: pcesS5011.TideLotacaoCollectionItem; basesRemun: pcesS5011.TbasesremunCollectionItem; LaliqRat: tpAliqRat; Lfap, LaliqRatAjust, LvrBcCp00, LvrBcCp15, LvrBcCp20, LvrBcCp25, LvrSuspBcCp00, LvrSuspBcCp15, LvrSuspBcCp20, LvrSuspBcCp25, LvrBCPisPasep, LVrBCPisPasepSusp: Double; begin evtCS := TS5011(ACBreSocial1.WebServices.ConsultaLote.RetConsultaLote[0].retEventos[0].tot[0].Evento).evtCS; for i:=0 to Pred(evtCS.infoCS.ideEstab.Count) do begin ideEstab := evtCS.infoCS.ideEstab[i]; LAliqRat := ideEstab.infoEstab.infoEstabRef.aliqRat; Lfap := ideEstab.infoEstab.infoEstabRef.fap; LAliqRatAjust := ideEstab.infoEstab.infoEstabRef.aliqRatAjust; for j:=0 to Pred(ideEstab.ideLotacao.Count) do begin ideLotacao := ideEstab.ideLotacao[j]; for k:=0 to Pred(ideLotacao.basesremun.Count) do begin basesRemun := ideLotacao.basesRemun[k]; LvrBcCp00 := basesRemun.basesCp13.vrBcCp00; LvrBcCp15 := basesRemun.basesCp13.vrBcCp15; LvrBcCp20 := basesRemun.basesCp13.vrBcCp20; LvrBcCp25 := basesRemun.basesCp13.vrBcCp25; LvrSuspBcCp00 := basesRemun.basesCp13.vrSuspBcCp00; LvrSuspBcCp15 := basesRemun.basesCp13.vrSuspBcCp15; LvrSuspBcCp20 := basesRemun.basesCp13.vrSuspBcCp20; LvrSuspBcCp25 := basesRemun.basesCp13.vrSuspBcCp25; end; end; LvrBcPisPasep := ideEstab.basesPisPasep.vrBcPisPasep; LvrBcPisPasepSusp := ideEstab.basesPisPasep.vrBcPisPasepSusp; end; end; Voltar ao inicio
  10. evtBasesFGTS (S-5003) Adiciona na classe TInfoFGTS a propriedade classTrib do tipo TpClassTrib. Exemplo de leitura: uses pcesS5003; //... var evtBasesFGTS: TevtBasesFGTS; LclassTrib: TpClassTrib; begin evtBasesFGTS := TS5003(ACBreSocial1.WebServices.ConsultaLote.RetConsultaLote[0].retEventos[0].tot[0].Evento).evtBasesFGTS; LclassTrib := evtBasesFGTS.infoFGTS.classTrib; end; Voltar ao inicio
  11. evtIrrfBenef (S-5002) Adiciona as novas classes TTotInfoIR, TconsolidApurMenCollection e TconsolidApurMenCollectionItem. Exemplo de leitura: uses pcesS5002; //... var evtIrrfBenef: TevtIrrfBenef; consolidApurMen: TconsolidApurMenCollectionItem; i: Integer; LCRMen, LdescRendimento: String; LvlrRendTrib, LvlrRendTrib13, LvlrPrevOficial, LvlrPrevOficial13, LvlrCRMen, LvlrCR13Men, LvlrParcIsenta65, LvlrParcIsenta65Dec, LvlrDiarias, LvlrAjudaCusto, LvlrIndResContrato, LvlrAbonoPec, LvlrRendMoleGrave, LvlrRendMoleGrave13, LvlrAuxMoradia, LvlrBolsaMedico, LvlrBolsaMedico13, LvlrJurosMora, LvlrIsenOutros: Double; begin evtIrrfBenef := TS5002(ACBreSocial1.WebServices.ConsultaLote.RetConsultaLote[0].retEventos[0].tot[0].Evento).EvtirrfBenef; for i:=0 to Pred(evtIrrfBenef.IdeTrabalhador.totInfoIR.consolidApurMen.Count) do begin consolidApurMen := evtIrrfBenef.IdeTrabalhador.totInfoIR.consolidApurMen[i]; LCRMen := consolidApurMen.CRMen; LvlrRendTrib := consolidApurMen.vlrRendTrib; LvlrRendTrib13 := consolidApurMen.vlrRendTrib13; LvlrPrevOficial := consolidApurMen.vlrPrevOficial; LvlrPrevOficial13 := consolidApurMen.vlrPrevOficial13; LvlrCRMen := consolidApurMen.vlrCRMen; LvlrCR13Men := consolidApurMen.vlrCR13Men; LvlrParcIsenta65 := consolidApurMen.vlrParcIsenta65; LvlrParcIsenta65Dec := consolidApurMen.vlrParcIsenta65Dec; LvlrDiarias := consolidApurMen.vlrDiarias; LvlrAjudaCusto := consolidApurMen.vlrAjudaCusto; LvlrIndResContrato := consolidApurMen.vlrIndResContrato; LvlrAbonoPec := consolidApurMen.vlrAbonoPec; LvlrRendMoleGrave := consolidApurMen.vlrRendMoleGrave; LvlrRendMoleGrave13 := consolidApurMen.vlrRendMoleGrave13; LvlrAuxMoradia := consolidApurMen.vlrAuxMoradia; LvlrBolsaMedico := consolidApurMen.vlrBolsaMedico; LvlrBolsaMedico13 := consolidApurMen.vlrBolsaMedico13; LvlrJurosMora := consolidApurMen.vlrJurosMora; LvlrIsenOutros := consolidApurMen.vlrIsenOutros; LdescRendimento := consolidApurMen.descRendimento; end; end; Voltar ao inicio
  12. evtBasesTrab (S-5001) Adiciona as novas classes TInfoPisPasep, TIdeEstabCollection, TIdeEstabCollectionItem, TInfoCategPisPasepCollection, TInfoCategPisPasepCollectionITem, TinfoBasePisPasepCollection e TinfoBasePisPasepCollectionItem. Exemplo de leitura: uses pcesS5001; //... var evtBasesTrab: TEvtBasesTrab; ideEstab: pcesS5001.TideEstabCollectionItem; infoCategPisPasep: TInfoCategPisPasepCollectionItem; infoBasePisPasep: TinfoBasePisPasepCollectionItem; i, j, k, LcodCateg, Lind13: integer; LTpInsc: tpTpInsc; LtpValorPisPasep: TtpValorPisPasep; LnrInsc, Lmatricula : String; LvalorPisPasep: Double; begin evtBasesTrab := TS5001(ACBreSocial1.WebServices.ConsultaLote.RetConsultaLote[0].retEventos[0].tot[0].Evento).EvtBasesTrab; for i:=0 to Pred(evtBasesTrab.infoPisPasep.ideEstab.Count) do begin ideEstab := evtBasesTrab.infoPisPasep.ideEstab[i]; LTpInsc := ideEstab.tpInsc; LnrInsc := ideEstab.nrInsc; for j:=0 to Pred(ideEstab.infoCategPisPasep.Count) do begin infoCategPisPasep := ideEstab.infoCategPisPasep[j]; Lmatricula := infoCategPisPasep.matricula; LcodCateg := infoCategPisPasep.codCateg; for k:=0 to Pred(infoCategPisPasep.infoBasePisPasep.Count) do begin infoBasePisPasep := infoCategPisPasep.InfoBasePisPasep[k]; LtpValorPisPasep := infoBasePisPasep.tpValorPisPasep; Lind13 := infoBasePisPasep.ind13; LvalorPisPasep := infoBasePisPasep.valorPisPasep; end; end; end; end; Voltar ao inicio
  13. evtExcProcTrab (S-3500) Adiciona na classe TideProcTrab a propriedade ideSeqProc. uses pcesS3500; //... var evtExcProcTrab: TevtExcProcTrab; begin evtExcProcTrab := ACBreSocial1.Eventos.NaoPeriodicos.S3500.New.EvtExcProcTrab; evtExcProcTrab.InfoExclusao.ideProcTrab.ideSeqProc := 1; //Preenchimento das demais informações do evento... end; Voltar ao inicio
  14. evtConsolidContProc (S-2555) Adiciona o novo evento na íntegra. Exemplo de preenchimento: uses pcesS2555; //... var evtConsolidContProc: TEvtConsolidContProc; begin evtConsolidContProc := ACBreSocial1.Eventos.NaoPeriodicos.S2555.New.evtConsolidContProc; evtConsolidContProc.ideEvento.ProcEmi := peAplicEmpregador; evtconsolidcontProc.ideEvento.VerProc := '1.0.0'; evtConsolidContProc.ideEmpregador.TpInsc := tiCNPJ; evtConsolidContProc.ideEmpregador.NrInsc := '12345678901234'; evtConsolidContProc.ideProc.nrProcTrab := '123456789012345'; evtConsolidContProc.ideProc.perApurPgto := '2024-10'; end; Voltar ao inicio
  15. evtContProc (S-2501) Adiciona na classe TideProc a propriedade ideSeqProc. Adiciona na classe TInfoCRIRRFCollectionItem a propriedade vrCR13. Adiciona a classe TrendIsen0561. Adiciona na classe TInfoIRCollectionItem as propriedades vrRendModeGrave13, vrRendIsen65Dec, vrJurosMora13, vrPrevOficial13 e rendIsen0561. Exemplo de preenchimento: uses pcesS2501; //... var evtContProc: TevtContProc; infoCRIRRF: pcesS2501.TInfoCRIRRFCollectionItem; infoIR: pcesS2501.TinfoIRCollectionItem; begin evtContProc := ACBreSocial1.Eventos.NaoPeriodicos.S2501.New.EvtContProc; evtContProc.ideProc.ideSeqProc := 1; infoCRIRRF := evtContProc.ideTrab.New.infoCRIRRF.New; infoCRIRRF.vrCR13 := 100; infoIR := infoCRIRRF.infoIR.New; infoIR.vrRendMoleGrave13 := 13; infoIR.vrRendIsen65Dec := 65; infoIR.vrJurosMora13 := 13; infoIR.vrPrevOficial13 := 13; infoIR.rendIsen0561.vlrDiarias := 100; infoIR.rendIsen0561.vlrAjudaCusto := 100; infoIR.rendIsen0561.vlrIndResContrato := 100; infoIR.rendIsen0561.vlrAbonoPec := 100; infoIR.rendIsen0561.vlrAuxMoradia := 100; //Preenchimento das demais informações... end; Voltar ao inicio
  16. evtProcTrab (S-2500) Adiciona na classe TIdeResp as propriedades dtAdmRespDir e matRespDir. Adiciona na classe IdePeriodoCollectionItem uma propriedade infoInterm do tipo TinfoIntermCollectionItem. Exemplo de preenchimento: uses pcesS2500; //... var evtProcTrab: TevtProcTrab; infoInterm: TInfoIntermCollectionItem; begin evtProcTrab := ACBreSocial1.Eventos.NaoPeriodicos.S2500.New.EvtProcTrab; evtProcTrab.ideEmpregador.ideResp.dtAdmRespDir := Now; evtProcTrab.ideEmpregador.ideResp.matRespDir := '12345678'; infoInterm := evtProcTrab.ideTrab.infoContr.New.ideEstab.infoVlr.idePeriodo.New.infoInterm.New; infoInterm.dia := 30; infoInterm.hrsTrab := '0800'; //Preenchimento das demais informações... end; Voltar ao inicio
  17. evtTSVTermino (S-2399) Adiciona a classe TdescFolha. Exemplo de preencimento: uses pcesS2399; //... var evtTSVTermino: TevtTSVTermino; descFolha: TdescFolha; begin evtTSVTermino := ACBreSocial1.Eventos.NaoPeriodicos.S2399.New.EvtTSVTermino; descFolha := evtTSVTermino.InfoTSVTermino.verbasResc.dmDev.New.ideEstabLot.New.detVerbas.New.descFolha; descFolha.tpDesc := tpdeConsignado; descFolha.instFinanc := '033'; descFolha.nrDoc := '12345678'; descFolha.observacao := 'Teste'; end; Voltar ao inicio
  18. evtDeslig (S-2299) Adiciona na classe TInfoInterCollectionItem a propriedade hrsTrab. Adiciona a classe TdescFolha. Exemplo de preenchimento: uses pcesS2299; //... var evtDeslig: TevtDeslig; descFolha: TdescFolha; begin evtDeslig := ACBreSocial1.Eventos.NaoPeriodicos.S2299.New.evtDeslig; evtDeslig.InfoDeslig.infoInterm.New.hrsTrab := '0800'; descFolha := evtDeslig.InfoDeslig.VerbasResc.dmDev.New.infoPerApur.ideEstabLot.New.detVerbas.New.descFolha; descFolha.tpDesc := tpdeConsignado; descFolha.instFinanc := '033'; descFolha.nrDoc := '12345678'; descFolha.observacao := 'Teste'; //Preenchimento das demais informações... end; Voltar ao inicio
  19. evtPgtos (S-1210) Adiciona na classe TinfoIRComplem uma propriedade perAnt do tipo TperAnt. Adiciona na classe TprevidComplCollectionItem as propriedades vlrDedPC13 e vlrPatrocFunp13. O elemento InfoIRComplem agora é uma collection. Exemplo de preenchimento: uses pcesS1210; //... var evtPgtos: TevtPgtos; perAnt: TperAnt; InfoIRComplem: TinfoIRComplemCollectionItem; previdCompl: pcesS1210.TprevidComplCollectionItem; begin evtPgtos := ACBreSocial1.Eventos.Periodicos.S1210.New.evtPgtos; InfoIRComplem := evtPgtos.IdeBenef.infoIRComplem.New; perAnt := InfoIRComplem.perAnt; perAnt.perRefAjuste := '102024'; perAnt.nrRec1210Orig := '123456'; previdCompl := InfoIRComplem.infoIRCR.New.previdCompl.New; previdCompl.vlrDedPC13 := 100; previdCompl.vlrPatrocFunp13 := 100; //Preenche as demais informações do evento... end; Voltar ao inicio
  20. evtBenPrRP (S-1207) Adiciona a classe TdescFolha. Exemplo de preenchimento: uses pcesS1207; //... var evtBenPrRP: TevtBenPrRP; descFolha: Tdescfolha; begin evtBenPrRP := ACBreSocial1.Eventos.Periodicos.S1207.New.evtBenPrRP; descFolha := evtBenPrRP.dmDev.New.infoPerApur.ideEstab.New.itensRemun.New.descFolha; descFolha.tpDesc := tpdeConsignado; descFolha.instFinanc := '033'; descFolha.nrDoc := '12345678'; descFolha.observacao := 'Teste'; //Preenchimento das demais informações do evento... end; Voltar ao início
  21. evtRMnRPPS (S-1202) Adiciona a classe TdescFolha. Exemplo de preenchimento: uses pcesS1202; //... var evtRmnRPPRS: TEvtRmnRPPS; descFolha: TdescFolha; begin evtRmnRPPRS := ACBreSocial1.Eventos.Periodicos.S1202.New.evtRmnRPPS; descFolha := evtRmnRPPRS.dmDev.New.infoPerApur.ideEstab.New.remunPerApur.New.itensRemun.New.descFolha; descFolha.tpDesc := tpdeConsignado; descFolha.instFinanc := '033'; descFolha.nrDoc := '12345678'; descFolha.observacao := 'Teste'; //Preenche demais informações do evento... end; Voltar ao início
  22. evtRemun (S-1200) Adiciona na classe TinfoIntermCollectionItem a propriedade hrsTrab. Adiciona a classe TdescFolha. Exemplo de preenchimento: uses pcesS1200; //... var evtRemun: TEvtRemun; descFolha: TdescFolha; begin evtRemun := ACBreSocial1.Eventos.Periodicos.S1200.New.evtRemun; descFolha := evtRemun.dmDev.New.infoPerApur.ideEstabLot.New.remunPerApur.New.itensRemun.New.descFolha; descFolha.tpDesc := tpdeConsignado; descFolha.instFinanc := '033'; descFolha.nrDoc := '12345678'; descFolha.observacao := 'Teste'; evtRemun.ideTrabalhador.infoInterm.New.hrsTrab := '0800'; //Preenchimento das demais informações do evento... end; Voltar ao inicio
  23. evtTabRubrica (S-1010) Adiciona na classe TDadosRubrica a propriedade codIncPisPasep. Adiciona as classes TIdeProcessoPisPasepCollection e TIdeProcessoPisPasepCollectionItem. Exemplo de preenchimento: uses pcesS1010; \\... var evtTabRubrica: TEvtTabRubrica; IdeProcessoPisPasep: TIdeProcessoPisPasepCollectionItem; begin evtTabRubrica := ACBreSocial.Eventos.Tabelas.S1010.New.EvtTabRubrica; evtTabRubrica.InfoRubrica.DadosRubrica.codIncPisPasep := ciPISPASEPNaoeBasedeCalculodo; ideProcessoPisPasep := evtTabRubrica.InfoRubrica.DadosRubrica.IdeProcessoPisPasep.New; ideProcessoPisPasep.nrProc := '12345678'; ideProcessoPisPasep.codSusp := '01014'; //Preenche os demais dados do evento... end; Voltar ao inicio
  24. evtInfoEmpregador (S-1000) Adiciona na classe TinfoCadastro a propriedade indTribFolhaPisPasep. Exemplo de preenchimento: uses pcesS1000; \\... var evtInfoEmpregador: TevtInfoEmpregador; begin evtInfoEmpregador := ACBreSocial.Eventos.Iniciais.S1000.New.evtInfoEmpregador; evtInfoEmpregador.infoEmpregador.infoCadastro.indTribFolhaPisPasep := snfNao; //Preenche os demais dados do evento... end; Voltar ao início
×
×
  • 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.