Aurino
-
Total de ítens
166 -
Registro em
-
Última visita
-
Days Won
1
1 Seguidor
Últimos Visitantes
2.886 visualizações
Aurino's Achievements
-
Compreendo a preocupação, mas a sugestão de modelo de impressão , atende as demandas de clientes , contadores, e fornecedores, que requerem o valor do IPI Devolução, nos casos das empresas emissoras serem do regime fiscal simples nacional, mostrando o valor total de forma mais clara, visto que tal valor já estaria nas informações adicionais da nota fiscal, no rotapé do danfe. Então , em caso de devolução de compra que seja mencionado o IPI Devol, poderá ser usado tal impressão como modelo de visualização da informação em questão. Ressaltando o mesmo para os casos dos campos FCP, FCP ST e FCP Ret. -
Exato, cada campo tem seu respectivo lugar .. ou seja , vIPI e vIPIDevol , mostrando no Danfe os dois campos ...
-
"Segue a contribuição para os modelos de DANFE nos formatos retrato e paisagem, incluindo totalizadores adicionais. No modelo paisagem, foram adicionados os valores de IPI normal e de devolução, além das alíquotas de ICMS, ICMS ST e IPI por produto." Fiz ajustes para melhorar a clareza e fluidez. Abaixo modelo das imagens conforme o modelo de impressão usado no Fast Report; DANFePaisagem_v2.fr3 DANFeRetrato_v2.fr3 DANFePaisagem_v2.fr3 DANFeRetrato_v2.fr3
- 6 replies
-
- 2
-
-
- nfe
- fastreport
- (e 9 mais)
-
Aurino changed their profile photo
-
não sei se foi resolvido mas segue sugestão para funcionar com a balança testada via emulador.. nas primeiras linhas do procedure ACBrBAL1LePeso, adicionei as 3 linhas abaixo.... procedure TForm1.ACBrBAL1LePeso(Peso: Double; Resposta: String); var valid : integer; begin {tratamento para balToledo9091_8530_8540 } if Trunc( StrToInt( trim(ACBrBAL1.UltimaResposta)) ) <> 0 then Peso := StrToInt( trim(ACBrBAL1.UltimaResposta)) ; sttPeso.Caption := formatFloat('##0.000', Peso ); sttResposta.Caption := Converte( Resposta ) ; if Peso > 0 then Memo1.Lines.Text := 'Leitura OK !' else begin valid := Trunc(ACBrBAL1.UltimoPesoLido); case valid of 0 : Memo1.Lines.Text := 'TimeOut !'+sLineBreak+ 'Coloque o produto sobre a Balança!' ; -1 : Memo1.Lines.Text := 'Peso Instavel ! ' +sLineBreak+ 'Tente Nova Leitura' ; -2 : Memo1.Lines.Text := 'Peso Negativo !' ; -10 : Memo1.Lines.Text := 'Sobrepeso !' ; end; end ; end;
-
é opensource.
-
ajuste da data da situacao especial, para deixar = 0; ACBrConsultaCNPJ.pas
-
Bom dia, quero compartilhar uma pequena alteração referente a situação do CNPJ para casos com situação especial. Em anexo o arquivo ACBrConsultaCNPJ.pas com o ajuste testado no lazarus e delphi; exemplo, ao consultar o CNPJ o 45.170.289/0001-25 - DARUMA TELECOMUNICACOES E INFORMATICA S/A SITUAÇÃO CADASTRAL ATIVA SITUAÇÃO ESPECIAL FALIDO exemplo de uso: exemplo 1: if ACBrConsultaCNPJ1.SituacaoEspecial <> '********' then EditSituacao.Text :=ACBrConsultaCNPJ1.SituacaoEspecial else EditSituacao.Text := ACBrConsultaCNPJ1.Situacao ; adicionado a unit: descricao da situacao especial data da situacao especial exemplo 2: EditSituacao.Text := ACBrConsultaCNPJ1.Situacao; EditSituacaoEspecial.Text := ACBrConsultaCNPJ1.SituacaoEspecial ; ACBrConsultaCNPJ.pas
-
API de consulta pelo EAN Consulta CNPJ: http://www.dataload.com.br:8000/api/cnpj/00000000000000 Obter imagem pelo codigo de barras: http://www.eanpictures.com.br:9000/api/gtin/2170620308508 Obter descricao ncm pelo codigo de barras : http://www.eanpictures.com.br:9000/api/desc200/7894900093049 Link do grupo no whatsapp: https://chat.whatsapp.com/LS8DWYNrjwf8pqU52WPtVf Tem DEMO de uso da API. http://www.eanpictures.com.br/ http://www.dataload.com.br/
-
nfce NFC-e em modo sincrono - Pegar retornos
Aurino replied to Tatianepx's tópico in NFC-e - Nota Fiscal do Consumidor Eletrônica
fica sugestão que captura automaticamente, pelo tipo de envio; var vsincrono : Boolean; vcsat : integer; vxmotivo : string ; begin vsincrono := StrToBool(IfThen(ACBrNFe1.NotasFiscais.Count > 1, 'True', 'false')); ACBrNFe1.Enviar(1, True, vsincrono); vcsat := IfThen(vsincrono = true, acbrnfe1.WebServices.Enviar.cStat, acbrnfe1.WebServices.retorno.cStat); vxmotivo := IfThen(vsincrono = true, acbrnfe1.WebServices.Enviar.xMotivo, acbrnfe1.WebServices.retorno.xMotivo); //ifthen uses math end; -
Performance na NFCe em contigência
Aurino replied to nildglan's tópico in NFC-e - Nota Fiscal do Consumidor Eletrônica
tente usar timeout de 15000 como padrão, e caso não obtenha o retorno, emita a contingencia com numero sequencial atual + 1, previsto pelo manual da contingencia 2.0. Segue esse manual passo a passo, que conseguirar tratar as questões da emissão e controle das numerações e procedimentos a serem adotados quanto a questão fiscal. -
Desculpe pela demora mas resolvido. Obrigado pelo ajuste.
-
Boa noite, irei atualizar e testar. reportarei o resultado. obrigado.
-
Esta como citado.. Pagamento Instantâneo (PIX) porém ficar com erro de impressão no danfe.... como mostrado na imagem.
-
Bom dia NFe com PIX no FortesReport esta cortando/cobrindo o valor pago na forma de pagamento. Para corrigir temporariamente, tive que alterar na unit pcnConversao o texto Pagamento Instantâneo (PIX) para PIX conforme mostrado abaixo. Há algum ajuste no danfe FortesReport para não sair cortado ou fica a minha sugestão de refatoração do texto da descrição da forma de pagamento referente ao PIX.
-
Boa noite. NFe com PIX no FortesReport esta cortando/Cobrindo o valor pago na forma de pagamento. Para corrigir temporariamente, tive que alterar na unit pcnConversao o texto Pagamento Instantâneo (PIX) para PIX conforme mostrado abaixo. Há algum ajuste no danfe FortesReport para não sair cortado ou fica a minha sugestão de refatoração do texto da descrição da forma de pagamento referente ao PIX.
