datilas

você pode preencher o form de cadastro assim: seuform := Tseufrom.Create(Self); Try seufrom.iCodigoProduto := 0; seufrom.editNomeProduto.Text := seuXML.NomeProduto; seufrom.editNCM.Text := seuXML.NCM; seufrom.editCEST.Text := seuXML.CEST; ... seufrom.ShowModal; If seufrom.iCodigoProduto > 0 Then Begin FDMemTable1.Edit; FDMemTable1.FieldByName('seucampo').AsInteger := seufrom.iCodigoProduto; FDMemTable1.Post; End; Finally FreeAndNil(seufrom); End;

você poderia criar uma variável (iCodigoProduto) no public do form de cadastro de produto e então: No botão salvar do seu cadastro popular a variável iCodigoProduto com o código do produto cadastrado seuform := Tseufrom.Create(Self); Try seufrom.iCodigoProduto := 0; seufrom.ShowModal; If seufrom.iCodigoProduto > 0 Then Begin FDMemTable1.Edit; FDMemTable1.FieldByName('seucampo').AsInteger := seufrom.iCodigoProduto; FDMemTable1.Post; End; Finally FreeAndNil(seufrom); End; lembrando que existe varias formas de se fazer isso, essa é apenas uma ideia

ja tentou postar no git do fortes? https://github.com/fortesinformatica/fortesreport-ce/pulls

muito obrigado.

o acbr esta gerando alerta na tag cilin quando não deveria gerar pois o campo esta com tamanho minimo de 04 caracteres quando no manual o tamanho minimo é 01 carácter segue a unit corrigida: pcnNFeW.pas

coloque um componente RLExpressionParser no formulario, não tem configuração é só soltar no formulario

desculpe a insistência mas olhei todos os demos e não vi nada parecido, só pra explicar o relatório esta funcionando. eu preciso fazer duas vias na mesma folha

como eu faria isso? pois eu tenho: 01 query para os dados do emitente (apenas um registro) header 01 query para os dados do destinatário e Vendedor (apenas um registro) header 01 query para os itens da venda (varios registros) subdetail 01 query para os dados de pagamento (varios registros) subdetail sumary com os totais. tem algum demo para eu tentar entender? masterdata é um componente?

não tem como duplicar, pois é um pedido de venda, tem header, subdetail, sumary ...

eu tenho um cliente que usava impressora matricial com papel meia folha, agora ele trocou para uma impressoras laser e ele precisa imprimir 2 vias na mesma folha alguém já fez isso com o fortes report?

o componente apenas salva os eventos em disco, nesse caso ele não preenche a propriedade ACBrNFE1.Eventos... só uma correção: FRM_Data.ACBrNFe.Consultar(Copy(vChaveAcessoCC, 4, Length(vChaveAcessoCC)),True);

o próprio componente se encarrega de extrair e salvar no disco conforme a configuração em: ACBrNFE1.Configuracoes.Arquivos....

ACBrNFE1.Consultar(chaveNFe,True{extrair eventos});

eu uso e recomendo. muito bom.

seria muito bom se você puder compartilhar com a comunidade.

os conversores online não funcionam? pergunto isso porque nunca precisei. https://permita.me/?q=jpg+to+pcx+monochrome

na nota tecnica 2016.002 v1.61 é um puco diferente mas não soma o difal

essa é a regra de validação qualquer coisa fora disso vai gerar rejeição o difal é destacado apenas nos itens, e não é impresso na danfe.

https://www.restdw.com.br/ tem componentes que se comportam como query fica muito facil migrar ou começar do zero, basicamente vc faz select no cliente que faz todo trabalho com json

tenta no onkeypress do dbgrid If Key = #13 Then Begin if dbgrid.SelectedIndex = 10 Then // ou dbgrid.SelectedIndex = dbgrid.Columns.Count dbgrid.SelectedIndex := 1 Else dbgrid.SelectedIndex := dbgrid.SelectedIndex + 1; End; é só adaptar a sua necessidade.

muito obrigado.

mas como eu preencho esses parametros, e como eu pego o resultado pois isso é uma procedure.

como eu faço para a url para onde uma nota,evento,inutilização entes de fazer o envio propriamente dito. por exemplo, gostaria de pegar a url: https://nfe.sefaz.mt.gov.br/nfews/v2/services/NfeAutorizacao4?wsdl antes de enviar a nota, mas como são muito serviços e uf's gostaria de saber como eu pego essa url antes de enviar?

me desculpe o transtorno, eu vi que em uma classe minha muito antiga estava carregando o aLote com a tag Ide.dEmi sem formatação. muito obrigado pela ajuda.

testando aki percebi que na unit ACBrDFeWebService.pas na linha 445: Prefixo := GerarPrefixoArquivo; esta retornando a tag Ide.dEmi da nfe 19\05\20 15:14:09 então alterei para: Prefixo := FormatDateTime('yyyymmddhhnnss',Now);//GerarPrefixoArquivo; ai funcionou. o estranho é que a função: GerarPrefixoArquivo faz exatamente a mesma coisa: function TDFeWebService.GerarPrefixoArquivo: String; begin Result := FormatDateTime('yyyymmddhhnnss', Now); end; alguem sabe porque essa magica acontece?