Hallo Forum, hallo Simulator,
ich habe mal wieder was gefunden, wo ich allein nicht weiterkomme:
Ich erstelle Maschinenkörper mittels einer Lieferliste. Dem MK werden verschieden Attribute mitgegeben. Die Attribute erzeuge ich mittels folgender Methode. Alles funktioniert wunderbar, nur das Attribut "verzögerung" wird nicht erzeugt! Warum denn nicht?
Vielen Dank für eure Hilfe
Gruß
DIDI
is
tabout,tabin:object;
i,j:integer;
eigenschaften : table[string,integer,string,boolean,time];
do
tabout := parameter;
tabin := t_maschinenkoerper;
i:=1;
j:=1;
repeat
if tabout[3,i]/="" then--wenn kein Leertakt
tabin[1,j] := schichtk_lager.terminiere(tabout[1,i],13*60*60,"rückwärts") - ereignisverwalter.datum;
--erste Spalte = Lieferzeitpunkt (time) = Lieferdatum (datetime)-Simulationstart(datetime)
tabin[2,j] := tabout[3,i]+tabout[4,i];
--zweite Spalte = Be-Name (Maschinenkörper)
eigenschaften.create;
tabin[5,j] := eigenschaften;
tabin[5,j].setzename("eigenschaften");
eigenschaften[1,1]:= "index";
eigenschaften[2,1]:= 1;
eigenschaften[1,2]:= "nummer";
eigenschaften[3,2]:= tabout["nummer",i];
eigenschaften[1,3]:= "verzoegerung";
eigenschaften[5,3]:= tabout["verzögerung",i];
eigenschaften[1,4]:= "grund";
eigenschaften[3,4]:= tabout["grund",i];
if tabout[3,i]="maschinenkörper1" then
eigenschaften[1,5]:= "option1";
eigenschaften[4,5]:= tabout["option1",i];
eigenschaften[1,6]:= "option2";
eigenschaften[4,6]:= tabout["option2",i];
else
…usw…
end;
j:=j+1;
end;
i:=i+1;
until i>tabout.ydim;
end;
Format und benutzerdefinierter Spaltenindex von der Tabout Tabelle "parameter" habe ich überprüft, daran kann es nicht liegen, da ich keine Unterschied zu den anderen Attributen sehe stehe ich vor einem Rätsel...
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP