Moin, ich habe fünf Bilder die nacheinander gefühlt werden. Wenn das erste ein Bild hat dann wird es im zweiten gespeichert usw. .Aber wenn ich drei Bilder nacheinader drucke dann wird immer gesagt, dass die PDF nicht gelesen werden kann, es ist immer das dritte Bild. Woran kann es liegen? 

Der Code:let t := this;
function drucken(t1 : text) do
let a := 0;
let b := "";
let c := number(item(split(Oberbegriff, "_"), 1));
let d := item(split(Oberbegriff, "_"), 0);
let e := "LS-" + d;
for x in select Projekte do
let b := number(item(split(x.t1, "_"), 1));
if b > a then a := b end
end;
a := a + 1;
if a < 10 then
b := e
else
if a > 999 then
b := e
else
if 1000 > a and a > 99 then
b := e
else
if 100 > a and a > 9 then b := e end
end
end
end;
b
end;
if LS_1 = null then
let at := drucken('Lieferschein.Nr');
'Lieferschein.Nr' := at;
let name := 'Projekt-Oberbegriff' + Nr + ".pdf";
Lieferschein := importFile(this, printAndSaveRecord(this, "Lieferschein-Projekt"), name);
LS_1 := true
else
if LS_2 = null then
let at := drucken('Lieferschein.Nr2');
'Lieferschein.Nr2' := at + "_2";
let name := 'Projekt-Oberbegriff' + Nr + "-2" + ".pdf";
Lieferschein_2 := importFile(this, printAndSaveRecord(this, "Lieferschein-Projekt2"), name);
LS_2 := true
else
if LS_3 = null then
let at := drucken('Lieferschein.Nr3');
'Lieferschein.Nr3' := at + "_3";
let name := 'Projekt-Oberbegriff' + Nr + "-3" + ".pdf";
Lieferschein_3 := importFile(this, printAndSaveRecord(this, "Lieferschein-Projekt3"), name);
LS_3 := true
else
if LS_4 = null then
let at := drucken('Lieferschein.Nr4');
'Lieferschein.Nr4' := at + "_4";
let name := 'Projekt-Oberbegriff' + Nr + "-4" + ".pdf";
Lieferschein_4 := importFile(this, printAndSaveRecord(this, "Lieferschein-Projekt4"), name);
LS_4 := true
else
if LS_5 = null then
let at := drucken('Lieferschein.Nr5');
'Lieferschein.Nr5' := at + "_5";
let name := 'Projekt-Oberbegriff' + Nr + "-5" + ".pdf";
Lieferschein_5 := importFile(this, printAndSaveRecord(this, "Lieferschein-Projekt5"), name);
LS_5 := true
end
end
end
end
end;
for x in select Lieferschein_Material where Projekte = t and Freigabe = true do
x.Projekt_Material.('Lieferschein gedruckt?' := true);
x.('LS-gedruckt' := true)
end