Hot News:

Unser Angebot:

  Foren auf CAD.de (alle Foren)
  TM - Plant Simulation
  Lager umlagern

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
Autor Thema:  Lager umlagern (2982 mal gelesen)
Kellrkind
Mitglied


Sehen Sie sich das Profil von Kellrkind an!   Senden Sie eine Private Message an Kellrkind  Schreiben Sie einen Gästebucheintrag für Kellrkind

Beiträge: 2
Registriert: 17.10.2011

erstellt am: 17. Okt. 2011 19:52    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities


Notfallambulanz.zip

 
Hey Leute 
erstmal hallo an alle, bin der neue 

Habe folgendes Problem und hoffe einer von euch kann mir weiterhelfen.

Wir müssen das Szenario einer Notfallambulanz nachbilden, Patienten (Kinder + Erwachsene) mit Krankheiten (allergie, knochenbruch,...) die von Ärzten behandelt werden.


Ich leide unter folgendem Problem:

Wir lagern die Kinder und Erwachsenen mit einer Methode ins Lager ein:

-- Kinder und Erwachsene trennen

-- Durch eine If-Schleife werden K und E getrennt im nächsten Wartezimmer (Lager) eingelagert
-- um eine spätere Selektierung zu vermeiden
if @.Name = "Kind"
 
then if wartezimmer_Diagnose[1,1].belegt = false

then rezeption.inhalt.umlagern(wartezimmer_Diagnose.pe(1,1));
 
  else if wartezimmer_Diagnose[2,1].belegt = false
  then @.umlagern(wartezimmer_Diagnose.pe(2,1));
 
else if wartezimmer_Diagnose[3,1].belegt = false
then @.umlagern(wartezimmer_Diagnose.pe(3,1));

else if wartezimmer_Diagnose[4,1].belegt = false
then @.umlagern(wartezimmer_Diagnose.pe(4,1));
else @.umlagern(Puffer1);

end;
end;
end;
  end;

else


  if wartezimmer_Diagnose[1,2].belegt = false
  then @.umlagern(wartezimmer_Diagnose.pe(1,2));
 
  else if wartezimmer_Diagnose[2,2].belegt = false
  then @.umlagern(wartezimmer_Diagnose.pe(2,2));
 
else if wartezimmer_Diagnose[3,2].belegt = false
then @.umlagern(wartezimmer_Diagnose.pe(3,2));

else if wartezimmer_Diagnose[4,2].belegt = false
then @.umlagern(wartezimmer_Diagnose.pe(4,2));
else @.umlagern(Puffer1);
end;
end;
end;
  end;
end;    

---------------------------------------------------------------------

Passt soweit alles, aber i-wie liest es mir jedesmal nen void raus, bzw lager nichts um wenn ich abfrage ob eine der obrigen Stellen belegt ist:

if wartezimmer_Diagnose.AnzahlBEs > 0
  then
  if wartezimmer_Diagnose[1,1].inhalt.Krankheit = "Allergie"
then Ärztezimmer.Be(1).umlagern(Diagnose)

else if wartezimmer_Diagnose[2,1].inhalt.Krankheit = "Allergie"
then Ärztezimmer.Be(1).umlagern(Diagnose)

else if wartezimmer_Diagnose[3,1].inhalt.Krankheit = "Allergie"
then Ärztezimmer.Be(1).umlagern(Diagnose)

else if wartezimmer_Diagnose[4,1].inhalt.Krankheit = "Allergie"
then Ärztezimmer.Be(1).umlagern(Diagnose)

else if wartezimmer_Diagnose.pe(1,2).inhalt.Krankheit = "Allergie"
then Ärztezimmer.Be(1).umlagern(Diagnose)

else if wartezimmer_Diagnose.pe(2,2).inhalt.Krankheit = "Allergie"
then Ärztezimmer.Be(1).umlagern(Diagnose)

else if wartezimmer_Diagnose.pe(3,2).inhalt.Krankheit = "Allergie"
then Ärztezimmer.Be(1).umlagern(Diagnose)

else if wartezimmer_Diagnose.pe(4,2).inhalt.Krankheit = "Allergie"
then Ärztezimmer.Be(1).umlagern(Diagnose)

else Ärztezimmer.Be(1).umlagern(Diagnose)
end;
end;
end;
end;
end;
end;
end;
end;
  end;
---------------------------------------------------------------------

Sogar bei der .voll = true then ...inhalt.umlagern(Diagnose) Geschichte passiert nix. Als ob an den Stellen nichts wäre!

Wenn ich z.B. Wartezimmer_Diagnose[1,1].belegt = true then Ärztezimmer.inhalt.umlagern(Diagnose) abfrage passiert nichts.

Zur Übersicht hab ich ne Zip.Datei im Anhang gstellt in der das Modell liegt.

Hoffe jemand blickt bei meiner Beschreibung durch und kann mir weiterhelfen 

danke schonmal im Vorraus 
Grüße Martin

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

planty
Mitglied
Dipl.-Ing.


Sehen Sie sich das Profil von planty an!   Senden Sie eine Private Message an planty  Schreiben Sie einen Gästebucheintrag für planty

Beiträge: 139
Registriert: 18.09.2006

erstellt am: 18. Okt. 2011 11:56    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Kellrkind 10 Unities + Antwort hilfreich

Hi,

streich das... was ich geschrieben habe ist mist... :-/

P.

------------------
Two hours of trial and error can save ten minutes of manual reading!

[Diese Nachricht wurde von planty am 18. Okt. 2011 editiert.]

[Diese Nachricht wurde von planty am 18. Okt. 2011 editiert.]

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

Bon Simul
Mitglied
Simulant


Sehen Sie sich das Profil von Bon Simul an!   Senden Sie eine Private Message an Bon Simul  Schreiben Sie einen Gästebucheintrag für Bon Simul

Beiträge: 1250
Registriert: 08.08.2011

Plant Simulation 10.1, 11 ff Professional

erstellt am: 23. Okt. 2011 22:11    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Kellrkind 10 Unities + Antwort hilfreich

Sie müssten eine Abfrage "vorschalten", ob die betreffenden Plätze im Wartezimmer belegt sind. Wenn Sie einen Platz [x,y].inhalt abfragen der leer ist, dann erhalten Sie "ein void kann keine Methode inhalt empfangen".

Code:

if wartezimmer_Diagnose.AnzahlBEs > 0  then
  if wartezimmer_Diagnose[1,1].belegt then
    if wartezimmer_Diagnose[1,1].inhalt.Krankheit = "Allergie" then
        Ärztezimmer.Be(1).umlagern(Diagnose);
    end;
  elseif wartezimmer_Diagnose[2,1].belegt then
    if wartezimmer_Diagnose[2,1].inhalt.Krankheit = "Allergie" then
        Ärztezimmer.Be(1).umlagern(Diagnose);
    end;
  ...usw.


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

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz