Bom dia!
O @Italo Giurizzato Junior disponibilizou ontem no programa exemplo do componente na procedure AlimentarComponente um exemplo de preenchimento do SegmentoJ52.
Você pode fazer assim.
with Lote.New do
begin
[...]
with SegmentoJ.New do
begin
[...]
with SegmentoJ52.New do
begin
CodMovimento := imInclusaoRegistroDetalheLiberado;
with Pagador do
begin
with Inscricao do
begin
Tipo := tiCNPJ;
Numero := '12345678000123';
end;
Nome := 'Nome do Pagador';
end;
with Beneficiario do
begin
with Inscricao do
begin
Tipo := tiCNPJ;
Numero := '12345678000123';
end;
Nome := 'Nome do Beneficiario';
end;
with SacadorAvalista do
begin
with Inscricao do
begin
Tipo := tiCNPJ;
Numero := '12345678000123';
end;
Nome := 'Nome do Sacador/Avalista';
end;
Chave := '';
TXID := '';
end;
end;
end;
Claro que para um entendimento maior, peço por favor, que atualize seus fontes e estude o programa exemplo.
