---

Hallo Zusammmen,

ich habe folgendes Problem: Ich habe eine Quelle die Fahrzeuge an ein Puffer übergibt. Die Fahrzeuge sollen so lange in diesem Puffer verweilen, bis sich Aufträge in einer Tabelle befinden. Ich habe eine Auftragsliste erstellt und die werden zu einer bestimmten Zeit in die Tabelle übergeben. Ich habe mit einer Methode versucht die Fahrzeuge im Puffer warten zu lassen, allerdings Fahren diese immer sofort raus.
Ich habe das mal so versucht:

is
Wartezeit : time;
do
y := 1;
while Offene_Auftraege.leer loop
Wartezeit := (Auftragsliste[1,1] - Ereignisverwalter.Zeit);
wait Wartezeit;

if Offene_Auftraege.belegt then
       
        ....

Leider verlassen meine Fahrzeuge das Puffer nicht wie gewünscht.
Kann mir hier bitte jemand sagen wo mein Fehler liegt oder mir eine Hilfestellung geben?

Danke!!!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Sie können waituntil verwenden, um auf Aufträge zu warten, danach lassen Sie das Fahrzeug aus dem Puffer fahren. Als Ausgangssteuerung könnte das wie folgt aussehen:

Code:

---

waituntil Auftraege_tabelle.yDim>0 prio 1;--warten auf Einträge @.umlagern;--vom Puffer auf einen Weg

---

Sie sollten danach den Eintrag in der Auftragstabelle löschen.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Leider bekomme ich das so nicht hin. Irgendwo steckt noch ein Fehler. Ich habe das jetzt so:

waituntil Offene_Auftraege.yDim>0 prio 1

--Auftrag an Fahrzeug übergeben
@.Auftraege[1,1] := Offene_Auftraege[2,1];

Hier zeigt er mir einen Syntaxfehler bei <@> an.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

nach prio 1 fehlt ein Semikolon!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Noch immer verlassen die Fahrzeuge sofort das Puffer. HIer mal mein Quellcode der Ausgangssteuerung in gesamter Länge:

is
Bereit : time;
do
waituntil Offene_Auftraege.yDim>0 prio 1;

--Auftrag an Fahrzeug übergeben
@.Auftraege[1,1] := Offene_Auftraege[2,1];
@.Auftraege[1,2] := Offene_Auftraege[3,1];

--Auftragsname an Fahrzeug übergeben
@.Auftraege[2,1] := Offene_Auftraege[1,1];
@.Auftraege[2,2] := Offene_Auftraege[1,1];

--Auftrag aus Auftragsliste entfernen
Offene_Auftraege.EntferneZeile(1);

--Zielort dem Fahrzeug zuordnen
@.Zielort := @.Auftraege[1,1];
@.Auftraege.EntferneZeile(1);

end;

Finde leider den Fehler nicht! Oder könnte es an der Einstellung im Puffer liegen. Ich hab dort nichts verändert, bis auf beim Ausgang von Bug auf Heck gestellt.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Stellen Sie zurück auf Bug. Heck wird erst aufgerufen, wenn das Fahrzeug den Puffer bereits verlassen hat.
Am Ende der Methode muss dann @.umlagern stehen.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Super. Hat geklappt und vielen Dank!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Leider habe ich doch noch ein Problem. Und zwar gehen jetzt alle Fahrzeuge auf einmal raus. Sie warten zwar ab bis der erste Auftrag kommt aber dann kommen alle raus. Kann ich hier eine schleife einbauen, so dass die Fahrzeuge erst aus dem Puffer kommen sobald ein Auftrag da ist und zwar nacheinander?

Danke nochmal...

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Das sollte eigentlich die waituntil Methode regeln. Prüfen Sie, ob Einträge in der Tabelle offene_Aufträge sind!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP