Re: Relationen & mod - baseportal Forum - Web-Anwendungen einfach, schnell, leistungsfähig!
baseportal
English - Deutsch "Es gibt keine dummen Fragen - jeder hat einmal angefangen"

 baseportal-ForumDie aktuellsten 10, 30, 50, 100 Einträge anzeigen.  

 
 Ausgewählter Eintrag: Zur Liste 
    Beitrag von nezpercez (499 Beiträge) am Dienstag, 10.Januar.2006, 20:27.
    Re: Relationen & mod

      Ich würde das ganz anders lösen:

      <perl>
      get "Id==*", "Weinkeller";
      while(get_next("Weinkeller"))
      

      $Korkenzustand="ex";
      $out="rüüülps"
      

      {
      if ($Flaschentyp eq "Magnum")
      {
      out <<Korken;
      }
      

      if (Korken eq $Korkenzustand)
      {
      out <<Wein;
      out <<schnalz;
      out <<$out
      }
      else
      out <<"seufz";
      }
      </perl>
       
      Die Flaschenform an sich wäre mir nicht so wichtig...
      


    Antworten

 Alle Einträge zum Thema: Zur Liste 
    Beitrag von Peter Heck (12 Beiträge) am Dienstag, 3.Januar.2006, 16:39. WWW: www.peter-heck.de
    Relationen & mod

      Hallo und ein frohes neues Jahr!

      Ich benötige einen kleinen Tipp:

      Ich möchte bei einer vorhandenen Datenbank einige bestehende Felder durch Relationen ersetzen.

      Hierfür habe ich in der Datenbank "Weinkeller" neben dem vorhandenen Feld "Flaschentyp" ein neues Relationsfeld mit Namen "Flaschenform" erstellt. Dieses soll später das Feld Flaschentyp ersetzen und zeigt auf eine Tabelle "Flaschen" und dort auf das Feld "Form".

      Jetzt kann ich in den jeweiligen Datensätzen das entsprechende Optionsfeld auswählen - soweit so gut.

      Um jetzt aber nicht alle Datensätze von Hand zu ändern, erstellte ich eine Abfrage und versuche damit das Feld entsprechend zu setzen - es klappt nur nicht :-)

      Nachdem ich die Abfrage starte, sehe ich nur die Sanduhr und es kommt nicht zum Ende.

      Was mache ich falsch?

      Hier der Code:

      <perl>
      get "Id==*", "Weinkeller";
      while(get_next("Weinkeller"))
      {
      if ($Flaschentyp eq "Magnum"){
      mod "Id==$Id", ["Flaschenform", "Magnum"], "Weinkeller";
      }
      }
      </perl>
      


      Eine Probeweises ersetzen des "mod" Befehls durch:

      out "$Name ==> $Flaschentyp ==> $Flaschenform<br>"; 
      

      zeigt mir, dass die Abfrage prinzipiell funktioniert.

      Output:
      Bandol A.C. ==> Magnum ==> Magnum
      Prestige de Hautes Garrigues ==> Magnum ==>
      Les Terrasses ==> Magnum ==>
      Cuvee Fontanilles ==> Magnum ==>
      Alba de Breton Reserva ==> Magnum ==>
      Cuvee Prestige ==> Magnum ==>
      Cupa Numismae ==> Magnum ==>
      Tirant ==> Magnum ==>
      Grande Reserve ==> Magnum ==>

      Ciao Peter

     Antworten

    Beitrag von Sander (8133 Beiträge) am Dienstag, 3.Januar.2006, 16:44.
    Re: Relationen & mod

      ein mod auf die gleiche db wie beim get ohne ergebnishash funktioniert leider nicht (warum auch immer...)
      in deinem fall gehts kurz und schmerzlos so:
      mod "Flaschentyp==Magnum", ["Flaschenform", "Magnum"], "Weinkeller";
      

      für andere aufgaben bei get und mod mußt du so arbeiten

      get "Id==*", "Weinkeller","erg";
      while(get_next("erg"))
      {
      if ($Flaschentyp eq "Magnum"){
      mod "Id==$Id", ["Flaschenform", "Magnum"], "Weinkeller";
      }
      }
      

     Antworten

    Beitrag von Peter Heck (12 Beiträge) am Dienstag, 3.Januar.2006, 18:51. WWW: www.peter-heck.de
    Re: Relationen & mod

      Hallo Sander,

      Super - danke, das mit dem ergebnishash hat funktioniert - wieder was dazu gelernt :-)

      Ciao
         Peter
      

     Antworten

    Beitrag von nezpercez (499 Beiträge) am Dienstag, 10.Januar.2006, 20:27.
    Re: Relationen & mod

      Ich würde das ganz anders lösen:

      <perl>
      get "Id==*", "Weinkeller";
      while(get_next("Weinkeller"))
      

      $Korkenzustand="ex";
      $out="rüüülps"
      

      {
      if ($Flaschentyp eq "Magnum")
      {
      out <<Korken;
      }
      

      if (Korken eq $Korkenzustand)
      {
      out <<Wein;
      out <<schnalz;
      out <<$out
      }
      else
      out <<"seufz";
      }
      </perl>
       
      Die Flaschenform an sich wäre mir nicht so wichtig...
      

     Antworten


     
 Liste der Einträge von 20701 bis 20851:Einklappen Zur Eingabe 
Neueste Einträge << 10 | 9 | 8 | 7 | 6 | 5 | 4 | 3 | 2 | Neuere Einträge < Zur Eingabe  > Ältere Einträge | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 >> Älteste Einträge


Zurück zur Homepage

© baseportal.de. Alle Rechte vorbehalten. Nutzungsbedingungen



powered in 0.05s by baseportal.de
Erstellen Sie Ihre eigene Web-Datenbank - kostenlos!