SetFont('Arial','',8) SetDrawColor(128,128,128) SetFillColor(255,255,255) Cell(80,4,'Inventurliste',1,0,'L',0) Cell(20,4,'{app.datum}',1,0,'L',0) Cell(20,4,'Seite '.$this->PageNo(),1,0,'L',0) Cell(70,4,'{firma}',1,0,'L',0) Ln() Ln() SetDrawColor(128,128,128) SetFillColor(204,204,204) Cell(25,5,'Artikel-Nr',1,0,'L',1) Cell(60,5,'Bezeichnung/Text',1,0,'L',1) Cell(20,5,'Sollbestand',1,0,'R',1) Cell(20,5,'Istbestand',1,0,'R',1) Cell(20,5,'von Datum',1,0,'C',1) Cell(20,5,'Abweichung',1,0,'R',1) Cell(25,5,'Lagerwert',1,0,'C',1) Ln() SetFont('Arial','',8) SetDrawColor(128,128,128) SetFillColor(255,255,255) Cell(80,4,'Inventurliste',1,0,'L',0) Cell(20,4,'{app.datum}',1,0,'L',0) Cell(20,4,'Seite '.$this->PageNo(),1,0,'L',0) Cell(63,4,'{firma}',1,0,'L',0) Ln() Ln() SetDrawColor(128,128,128) SetFillColor(204,204,204) Cell(25,5,'Artikel-Nr',1,0,'L',1) Cell(60,5,'Bezeichnung/Text',1,0,'L',1) Cell(20,5,'Sollbestand',1,0,'R',1) Cell(20,5,'Istbestand',1,0,'R',1) Cell(20,5,'von Datum',1,0,'C',1) Cell(20,5,'Abweichung',1,0,'R',1) Cell(25,5,'Lagerwert',1,0,'C',1) Ln() Cell(25,5,'Übertrag',1,0,'L',1) Cell(60,5,'',1,0,'L',1) Cell(20,5,'',1,0,'R',1) Cell(20,5,'',1,0,'R',1) Cell(20,5,'',1,0,'C',1) Cell(20,5,'',1,0,'R',1) Cell(25,5,$this->GetVar("zsumme1","wrg"),1,0,'R',1) Ln() SetFillColor(204,204,204) Cell(25,5,'Übertrag',1,0,'L',1) Cell(60,5,'',1,0,'L',1) Cell(20,5,'',1,0,'R',1) Cell(20,5,'',1,0,'R',1) Cell(20,5,'',1,0,'C',1) Cell(20,5,'',1,0,'R',1) Cell(25,5,$this->GetVar("zsumme1","wrg"),1,0,'R',1) SetFillColor(204,204,204) Cell(25,5,'Summen',1,0,'L',1) Cell(60,5,'',1,0,'L',1) Cell(20,5,'',1,0,'R',1) Cell(20,5,'',1,0,'R',1) Cell(20,5,'',1,0,'C',1) Cell(20,5,'',1,0,'R',1) Cell(25,5,$this->GetVar("zsumme1","wrg"),1,0,'R',1) SetDrawColor(128,128,128) Cell(25,5,'{a.produktid}',1,0,'L',0) CellMax(60,5,'{bezeichnung} {a.bezeichnung}',1,0,'L',0) Cell(20,5,'{abestand:num}',1,0,'R',0) Cell(20,5,'{ibestand:num}',1,0,'R',0) Cell(20,5,'{adatum:datum}',1,0,'C',0) SaveVar("idiff",{ibestand:num}-{abestand:num},0) Cell(20,5,$this->GetVar("idiff","num"),1,0,'R',0) SaveVar("wert",{abestand:num}*{b.iek:num},0) SaveVar("zsumme1",{abestand:num}*{b.iek:num},1) Cell(25,5,$this->GetVar("wert","wrg"),1,0,'R',0) SaveVar("anzitem",1,1) Ln()