felipeiw

Kiko outro detalhe o cliente da nota é do PR e é um consumidor final não contribuinte, será q tem diferença no calculo da difal em relação a um cliente final contribuinte de icms ? Abs e obrigado

Kiko bom dia e obrigado PR é feito a base por dentro, então pegamos 912,00 / 0,82 = 1.112.20 Abs

ola pessoal obrigado

Pessoal estou com esse problema, estranho que os cálculos batem com o que o contador faz, usando tanto o econet, iob, nota pro Paraná saindo de SP. Parece q li a tempo atras que a partir de 01/01/2023 a sefaz não iria mais validar o valor do Difal, os amigos conseguem ver algum erro nos cálculos ? meu xml

Obrigado Juliomar

Juliomar boa tarde então até o momento boleto com pix , somente Banco do Brasil ? Abs

Otimo Juliomar, essa seria mh segunda opção, então vou nela mesmo, muito obrigado !

Pessoal existe alguma maneira de baixar o xml da nfce, perdemos alguns xmls, e precisava baixar, num cliente de MG.

Rapaz e agora pra conseguir essa chave do primeiro envio ?

Pessoal esses dias a sefaz de MG estava parada, emitimos algumas notas em contingencia, porem quando vou pesquisar essas chaves tanto na sefaz de MG quanto no ambiente nacional, diz q não existe, se tentamos enviar novamente da erro de duplicidade. Alguem sabe me dizer a causa disso, ou como resolvo ? Obrigado

Pessoal consegui usando o seguinte codigo: var Input,Output: TStringStream; begin if (Length1(foto) = 0) then begin IMGFoto.Picture := nil; Exit; end; Input := TStringStream.Create(foto); Output := TStringStream.Create; try Input.Position := 0; TNetEncoding.Base64.Decode(Input,Output); Output.Position := 0; IMGFoto.Picture.LoadFromStream(Output); finally Input.Free; Output.Free; end; crédito a esse video:

Ola Juliomar desculpe, não entendi. a variável xfotvol é uma string que estou enviando pelo json e gravando na tabela FB num campo blob.

Ola Juliomar esta assim: iVBORw0KGgoAAAANSUhEUgAA talvez eu esteja gerando errado no app ? Esse codigo que estou gerando no app, a foto é tirada pelo celular. StreamIn := QConsulta.CreateBlobStream(QConsulta.FieldByName('FOTVOL'),bmRead); StreamOut := TStringStream.Create; TNetEncoding.Base64.Encode(StreamIn, StreamOut); StreamOut.Position := 0; xfotvol := StreamOut.DataString; StreamIn.DisposeOf; StreamOut.DisposeOf;

boa noite pessoal tenho em uma tabela FB um campo blob, nele estou salvando uma foto que recebo por json em formato base64, se eu pego essa string, e colo por exemplo num site que converte base64 para imagem, a foto aparece, porem nao estou conseguindo visualizar essa foto no componente timage. estou tentando usar esse código abaixo, o erro ocorre na linha: BMPImage.LoadFromStream(BlobStream), com o erro bitmap image is not valid var BlobStream : TStream; BMPImage : TBitMap; begin if CdsNotasLidasFOT001.BlobSize <> 0 then begin BlobStream:= CdsNotasLidas.CreateBlobStream(CdsNotasLidasFOT001,bmRead); BMPImage := TBitMap.Create; try BMPImage.LoadFromStream(BlobStream); Image1.Picture.Assign(BMPImage); finally BlobStream.Free; BMPImage.Free; end; end else Image1.Picture:=nil; end;

Muito obrigado Juliomar, esclarecido amigo. Abs

Pessoal estou precisando preencher a tag vICMSUFDest com valor zero, é uma situação de venda pro Estado de PE, e isso foi passado pro meu cliente pelo posto fiscal, enfim, porém passando os campos das tags ICMSUFDest, com zero, não aparece no xml, fazendo alguns testes, apareceu caso eu preencha as tags pICMSInter e pICMSInterPart, algum amigo sabe me dizer se consigo com que apareça a tag vICMSUFDest = 0.00, de outra maneira ? Abs e obrigado

pessoal um exemplo do que preciso: SELECT A.NUMDOC, SUM(B.QNTPRO * PREPRO) AS PRETOT FROM PEDIDOS1 A, PEDIDOS2 B WHERE A.NUMDOC = B.NUMDOC AND A.NUMDOC >= 13646 AND PRETOT > 10000 GROUP BY A.NUMDOC nessa consulta simples, vai retonar os pedidos numero e o preço total, como faço pra listar somente os pedidos com preço total por ex maior que 10000 ? Abs e obrigado

Pessoal instalei mysql no meu computador, porém quando tento acessar usando o FDConnection ou mesmo o SQLConnection retornar o seguinte erro: Client does not support authentication protocol requested by server: consider uprading MySQL client Algum amigo, saberia me dizer como fazer essa conexão ? Obrigado

deu certo, obrigado !

pessoal acabei de atualizar o acbr e num projeto começou a apresentar o seguinte erro: Incompatible types: TpcnTpEvento and Ttpevento, na linha do tpEvento := teCancelamento ACBrNFe.EventoNFe.Evento.Clear; with ACBrNFe.EventoNFe.Evento.New do begin infEvento.chNFe := DM1Notas.CdsNotas1NFECHA.Value; infEvento.CNPJ := DMC.QEmpresasCGCEMP.Value; infEvento.dhEvento := Now; infEvento.tpEvento := teCancelamento; infEvento.detEvento.xJust := xmotcan; infEvento.detEvento.nProt := DM1Notas.CdsNotas1NFEPRO.Value; end;

Valeu obrigado pela resposta.

pessoal to lendo um pedido, via api usando o RESTRequest4Delphi, consegui importa-lo num campo memo, e ate numa memtable, porem nesse json o pedido tem varios niveis, por exemplo, dados do cliente, depois os produtos, depois ainda a condição de pagamento. No memtable, vieram apenas os campos do cabeçado do json, existe alguma forma de jogar cada nivel em um memtable ? Como os amigos essa leitura dos dados ? Abs e obrigado

pessoal pra imprimir no campo informações complementares eu uso um memo, vou alimentando as informacoes, e pra quebrar linha uso o #13, porem quando envio a nota, na prefeitura fica da seguinte maneira a palavra vencimento deveria ser a primeira linha, depois a data e valor na segunda linha, tem alguma maneira de quebrar essa linha ? obrigado

pessoal estava testando o acbrmail, porem a imagem jpg nao fica visivel no email, estava testando recebendo na UOL, aparece em branco, porem acabei de testar recebendo no hotmail e a imagem jpg apareceu, porque será que na UOL nao aparece, estou configurando dessa maneira:

pessoal, por favor, como eu poderia fazer para enviar, por exemplo um folder com uma promoção, isso no corpo do email ? Obrigado