Access Barcode Data from Dynamically Loaded Report

robert83

Dear Support,

Got here ReportBuilder 20.03 Build 182 .

I do the printing like this :

ReportBuilder.ppPrint.Template.FileName:=ReportPath+'Standard\D3_ABLIEFERNACHWEIS.rtm';
ReportBuilder.ppPrint.Template.LoadFromFile;
ReportBuilder.ppPrint.Parameters.Items['HeadID'].Value:=DataLief.qryHeadLieferscheinID.Value;
ReportBuilder.ppPrint.Parameters.Items['TripID'].Value:=DataLief.qryPrintID.Value;
ReportBuilder.ppPrint.Parameters.Items['Gestell'].Value:='%';
ReportBuilder.ppPrint.ShowPrintDialog:=false;
ReportBuilder.ppPrint.PrinterSetup.PrinterName:=SelectedPrinter;
ReportBuilder.ppPrint.DeviceType:= dtPrinter;
ReportBuilder.ppPrint.Print;

I would like to access a Variable from this Report after it is printed , is that possible ?

procedure ReportBeforePrint;
var SortOrder : integer;
begin

bcD3.Visible:=true;

SortOrder := HEAD['SortOrder'];

if copy(Report.Parameters['Gestell'],1,1) <> '%' then SortOrder:=50+SortOrder;

bcD3.Data:='753636'+PadLeft(HEAD['SAP'], 8, '0')+HEAD['Liefertag']+HEAD['TOUR_ID']+PadLeft(IntToStr(SortOrder),2,'0');

subSignature.Visible:=true;

end;

The variable is bcD3 , I would like to get the DATA part .

Thank you

nicocizik

Hi Robert,

Are you assigning the bcD3.Data in RAP code? If so, try creating another report parameter (named BCData perhaps) and assign its value to the BarCode data. It can then be retrieved and used elsewhere in your application.

bcD3.Data:='753636'+PadLeft(HEAD['SAP'], 8, '0')+HEAD['Liefertag']+HEAD['TOUR_ID']+PadLeft(IntToStr(SortOrder),2,'0');

Report.Parameters['BCData'] := bcD3.Data;

robert83

Hello Nicocizik !

This is what I did Thank you!