eduardoengcosta
Membros-
Total de ítens
16 -
Registro em
-
Última visita
Últimos Visitantes
587 visualizações
eduardoengcosta's Achievements
-
eduardoengcosta started following DANFE NFC-e sem informação de Horário
-
DANFE NFC-e sem informação de Horário
um tópico no fórum postou eduardoengcosta NFC-e - Nota Fiscal do Consumidor Eletrônica
Boa tarde a todos. Recentemente notei que a DANFE da NFC-e com QR-Code lateral deixou de conter a informação da Hora da emissão. Verifiquei que houve uma modificação realizada no arquivo ACBrDANFCeFortesFr.pas (revisão 31591 - substituição da função DateTimeToStr() pela função FormatDateBr() ), que tenha motivado esta questão. O tópico relacionado a esta questão se encontra abaixo. Anexei os respectivos prints e o ajuste efetuado no arquivo mencionado. Desde já, Muito Obrigado. ACBrDANFCeFortesFr.pas -
Registro C181 - Campos deveriam estar vazio e estão 0
eduardoengcosta replied to eduardoengcosta's tópico in ACBrSPEDFiscal
Desculpe Juliomar, postando novamente o arquivo. ACBrEFDBloco_C_Class.pas -
Registro C181 - Campos deveriam estar vazio e estão 0
um tópico no fórum postou eduardoengcosta ACBrSPEDFiscal
Boa tarde Quando não é passado nada para a o campo VL_UNIT_ICMS_ST_CONV_COMPL o mesmo retorna o valor "0,00". Segundo o guia prático da EFD e não pode ser "0" e sim vazio. Fiz a modificação a seguir. procedure TBloco_C.WriteRegistroC181(RegC100: TRegistroC100; RegC170: TRegistroC170); var intFor: integer; begin if Assigned( RegC170.RegistroC181 ) then begin if RegC170.RegistroC181.Count > 0 then begin if (RegC100.IND_OPER = tpSaidaPrestacao) or (FBloco_0.Registro0000.IND_PERFIL in [pfPerfilC]) then Check(False, 'O RegistroC181, não deve ser gerado em movimentações de saída ou %s, conforme ATO COTEPE 09/08', ['PerfilC']); end; for intFor := 0 to RegC170.RegistroC181.Count - 1 do begin with RegC170.RegistroC181.Items[intFor] do begin Add( LFill('C181') + LFill( COD_MOT_REST_COMPL ) + LFill( QUANT_CONV,0,6 ) + LFill( UNID) + LFill( COD_MOD_SAIDA) + LFill( SERIE_SAIDA) + LFill( ECF_FAB_SAIDA) + LFill( NUM_DOC_SAIDA) + LFill( CHV_DFE_SAIDA) + LFill( DT_DOC_SAIDA, 'ddmmyyyy' ) + LFill( NUM_ITEM_SAIDA) + DFill( VL_UNIT_CONV_SAIDA,0,True ) + DFill( VL_UNIT_ICMS_OP_ESTOQUE_CONV_SAIDA,0,True ) + DFill( VL_UNIT_ICMS_ST_ESTOQUE_CONV_SAIDA,0,True ) + DFill( VL_UNIT_FCP_ICMS_ST_ESTOQUE_CONV_SAIDA,0,True ) + DFill( VL_UNIT_ICMS_NA_OPERACAO_CONV_SAIDA,0,True ) + DFill( VL_UNIT_ICMS_OP_CONV_SAIDA,0,True ) + DFill( VL_UNIT_ICMS_ST_CONV_REST,0,True ) + DFill( VL_UNIT_FCP_ST_CONV_REST,0,True ) + DFill( VL_UNIT_ICMS_ST_CONV_COMPL,0,True ) + DFill( VL_UNIT_FCP_ST_CONV_COMPL,0,True )); end; RegistroC990.QTD_LIN_C := RegistroC990.QTD_LIN_C + 1; end; /// Variavél para armazenar a quantidade de registro do tipo. FRegistroC181Count := FRegistroC181Count + RegC170.RegistroC181.Count; end; ACBrEFDBloco_C_Class.pas -
Bom dia a todos. Foi publicado ontem 11/02/2021. Alteração no prazo de implantação Homologação: 01/11/2021 - Publicação: 30/11/2021 NT2020.007_v1.10 - Evento_Ator_NFe_Transportador.pdf
-
Registro C185 sem totalização no registro 9900
um tópico no fórum postou eduardoengcosta ACBrSPEDFiscal
Bom dia O Registro C185 está faltando a totalização no registro 9900. Está faltando o código na unit ACBrSpedFiscal: if Bloco_C.RegistroC185Count > 0 then begin with New do begin REG_BLC := 'C185'; QTD_REG_BLC := Bloco_C.RegistroC185Count; end; end; ACBrSpedFiscal.pas -
eduardoengcosta started following Felipe E. Resende Mesquita
-
Emissão de NFe ( Produtor Rural ) - Pessoa Física
eduardoengcosta replied to Grupo FS's tópico in ACBrNFe
Boa Tarde, Alguma solução para o problema citado? -
Me desculpe, não foi a minha intenção. Mas alguém poderia me ajudar nesta situação?
-
-
Encontrei um erro em: procedure Tcomb.Assign(Source: TPersistent); begin if Source is Tcomb then begin cProdANP := Tcomb(Source).cProdANP; descANP := Tcomb(Source).descANP; pMixGN := Tcomb(Source).pMixGN; CODIF := Tcomb(Source).CODIF; qTemp := Tcomb(Source).qTemp; UFcons := Tcomb(Source).UFcons; CIDE.Assign(Tcomb(Source).CIDE); ICMS.Assign(Tcomb(Source).ICMS); ICMSInter.Assign(Tcomb(Source).ICMSInter); ICMSCons.Assign(Tcomb(Source).ICMSCons); encerrante.Assign(Tcomb(Source).encerrante); end else inherited; end; não tinha a linha descANP := Tcomb(Source).descANP; Poderiam verificar se já foi corrigido? pcnNFe.pas
-
Erro na Unit pcnNfe - Rastreabilidade
eduardoengcosta replied to eduardoengcosta's tópico in ACBrNFe
Obrigado amigo!