Diskussion:CAS-Nummer

message: Handelsnamen haben i. d. R. keine eigene CAS-Registry-Nummer. Die angegebene CAS-RN 171599-83-0 ist die von Sildenafilcitrat, dem Salz aus Sildenafil (CAS-RN 139755-83-2) und Zitronensäure (CAS-RN 77-92-9). Sildenafilcitrat ist der eigentliche Wirkstoff in Viagra®, welches selbst eine Medikamentenzubereitung ist, die außer dem Wirkstoff noch galenische Hilfsstoffe enthält ( wie z. B. Bindemittel o. ä.), die nicht durch diese CAS-RN codiert sind.
--Dschanz 16:43, 9. Apr 2006 (CEST)
thread_title:  CAS-Nummer von Viagra? 

message: (*Prüft ob ein Integer #...#### oder ein String "#...#-##-#" das Kriterium \
für eine korrekte CAS-Registernummer erfüllt*)
CASRegistryNumberQ[RN_]:=
    Module[{Z,R,B=False},
      Switch[RN,_Integer,Z=IntegerDigits[RN];
        If[Length[Z]>4,R=Last[Z];Z=Reverse[Drop[Z,-1]];
          B=(Mod[Sum[i*Zi,{i,1,Length[Z]}],10]\[Equal]R)],_String,
        B=StringMatchQ[RN,
            StringExpression[DigitCharacter..,DigitCharacter,"-",
              DigitCharacter,DigitCharacter,"-",DigitCharacter]];
        If[B,Z=IntegerDigits[ToExpression[StringDrop[RN,{-5,-2,3}]]];
          R=Last[Z];Z=Reverse[Drop[Z,-1]];
          B=(Mod[Sum[i*Zi,{i,1,Length[Z]}],10]\[Equal]R)]];B];      
RN1="1316-78-5";
RN2=30986119;
RN3="331356-73-1";
CASRegistryNumberQ["9002-13-5"]
True
CASRegistryNumberQ[331356731^10]
True
:::Hätte nicht gedacht, dass man ein so einfaches Problem so kompliziert lösen kann..:-D 217.224.164.85 20:42, 6. Jul 2006 (CEST)
replies: text: Diese Version funktioniert wegen Verwendung von StringExpression nur mit Mathematica-Versionen ab 5.1. 84.154.213.184 16:16, 7. Jul 2006 (CEST)
thread_title: Mathematica-Funktion zur Prüfung von CAS-Nummern

message: Die Aussage im Artikel: "Für jeden bekannten chemischen Stoff (auch Biosequenzen, Legierungen, Polymere) existiert eine eindeutige CAS-Nummer." scheint nicht unbedingt richtig zu sein. Die CAS-Nummer von butyl 2-chloro-4-fluorophenoxyacetate, (kurz LNF), SMILES String C1(=CC=C(C(=C1)Cl)OCC(=O)OCCCC)F, einem militärisch verwendeten Entlaubungsmittel (CW; defoliant), ist beispielsweise nicht bekannt. 217.224.154.14 20:00, 13. Sep 2006 (CEST)
thread_title: CAS-Nummern von "kritischen" Stoffen

message: Anfang 2007 waren über 30 Millionen Substanzen registriert. Zusammen mit über 58 Millionen Sequenzen, Legierungen und Polymeren waren somit über 78 Millionen Nummern vergeben. Da liegt wohl ein (Rechen-?)Fehler vor. Ohne Schkenntnis will ich das aber nicht korrigieren. -- Hyperdieter 23:59, 15. Mai 2007 (CEST)
thread_title:  Anzahl der registrierten Substanzen: 30+58=78??? 

message: Der folgende Satz macht nicht soviel Sinn:
Beispielsweise lässt sich Aceton auch durch Dimethylketon oder 2-Propanon richtig bezeichnen - die CAS-Nummer ermöglicht hingegen eine eindeutige Identifizierung.
Jede der Benennungen ist auch eindeutig. Würde den Satz komplett löschen, da das Beispiel hier keinen informativen Mehrwehrt bietet.
--Firsthuman 20:21, 24. Okt. 2007 (CEST)
thread_title:  Satz unnötig 

message: Folgende PASCAL-Funktion erzeugt eine gemäss der CAS-Nr. Konvention formatierte Ausgabe in sFormatCAS aus der Benutzereingabe sBenutzerCAS, die mit oder ohne Bindestriche geschrieben sein darf.
Getestet mit FPC (Freepascal-Compiler Ver 2.2.2) und Lazarus-IDE.
TYPE
  TCASResultat = (casOK, casLeer, casStrichE, casNumE, casLaengeE, casPruefE);
CONST arrCASErrorTxt : Array [TCASResultat] OF String
                     = ('OK', 'Leerer Eintrag',
                        'CAS-Nr muss aus 3 Zahlenpaketen durch Striche getrennt bestehen',
                        'CAS-Nr darf nur aus Ziffern und Bindestrichen bestehen',
                        'CAS-Nr muss aus mindestens 4 Ziffern bestehen',
                        'CAS-Nr Prüfsumme stimmt nicht');
Function TForm1.PruefeUndErzeugeCASNr (sBenutzerCAS : String; VAR sFormatCAS : String) : TCASResultat;
CONST CAS_LAENGE = 6; { Blocklänge des ersten Ziffernblocks, hier 6, kann auch 7 sein }
VAR s1, s2, s3 : String;
    n1, n2, n3 : LongInt;
Function PruefSummeOK (Const s1, s2, s3 : String): Boolean;
VAR s12,
    sZ     : String;
    i      : Integer;
    nSumme,
    nZ     : LongInt;
Begin
  s12 := s1+s2;
  nSumme := 0;
  FOR i := Length (s12) DOWNTO 1 DO
   Begin
     sZ := Copy (s12, i, 1);
     nZ := StrToInt (sZ);
     nSumme := nSumme + (nZ * i);
   End; { For }
  Result := nSumme MOD 10 = StrToInt (s3);
End; { PruefSummeOK, Nested Function }
Begin { PruefeUndErzeugeCASNr }
  sBenutzerCAS := Trim (sBenutzerCAS);
  IF sBenutzerCAS = ''
    THEN Result := casLeer { If ein Leerstring, der ist OK, CAS-Nr ist nicht immer bekannt, darf leerbleiben }
    ELSE Begin
           IF Pos ('-', sBenutzerCAS) >= 1
             THEN Begin
                    IF WordCount (sBenutzerCAS, ['-']) = 3
                      THEN Begin
                             s1 := ExtractWord (1, sBenutzerCAS, ['-']);
                             s2 := ExtractWord (2, sBenutzerCAS, ['-']);
                             s3 := ExtractWord (3, sBenutzerCAS, ['-']);
                             IF TryStrToInt (s1, n1) AND TryStrToInt (s2, n2) AND TryStrToInt (s3, n3)
                               THEN Begin
                                      IF PruefSummeOK (s1, s2, s3)
                                        THEN Begin
                                               Result := casOK;
                                               sFormatCAS := AddChar ('0', s1, CAS_LAENGE) + '-' + AddChar ('0', s2, 2) + '-' + s3;
                                             End { If 3 Zahlen-Blöcke erfüllen Prüfsummen-Kriterium }
                                        ELSE Result := casPruefE; { If Else, Prüfsumme stimmt nicht }
                                    End { IF CAS-Nr in 3 Zahlen-Blöcke zerlegbar, wirklich Zahlen }
                               ELSE  Result := casNumE; { If Else, CAS-Nr bestand nicht (nur) aus Ziffern }
                           End { If CAS-Nr besteht aus 3 Zahlen-Paketen xxxxxxx-xx-x }
                      ELSE Result := casStrichE; { If Else, also CAS-Nr besteht nicht aus 3 Zahlen-Pakete xxxxxxx-xx-x }
                  End { If es sind schon -Striche- vorhanden }
             ELSE Begin
                    IF TryStrToInt (sBenutzerCAS, n1)
                      THEN Begin
                             IF Length (sBenutzerCAS) >= 4 { mindestens mal abcd => a-bc-d }
                               THEN Begin
                                      s3 := RightStr (sBenutzerCAS, 1); { Die Prüfsumme }
                                      s2 := MidStr (sBenutzerCAS, Length (sBenutzerCAS) - 2, 2); { Paket Nr 2 }
                                      s1 := Copy (sBenutzerCAS, 1, Length (sBenutzerCAS) -3); { Paket Nr 1 }
                                      IF PruefSummeOK (s1, s2, s3)
                                        THEN Begin
                                               Result := casOK;
                                               sFormatCAS := AddChar ('0', s1, CAS_LAENGE) + '-' + AddChar ('0', s2, 2) + '-' + s3;
                                             End { If 3 Zahlen-Blöcke erfüllen Prüfsummen-Kriterium }
                                        ELSE Result := casPruefE; { If Else, Prüfsumme stimmt nicht }
                                    End { If CAS-Nr lang genug }
                               ELSE Result := casLaengeE; { If Else CAS-Nr ist zu kurz }
                           End { IF CAS-Nr ist numerisch }
                      ELSE Result := casNumE; { If Else, CAS-Nr ist nicht numerisch }
                  End; { If Else, also waren keine -Striche- vorhanden }
         End; { If Else, also kein Leerstring }
End; { PruefeUndErzeugeCASNr }
Hätte nicht gedacht, dass man ein so einfaches Problem... mit sooo viel Code so benutzerfreundlich lösen kann ;-)
25.2.2009 Volker W.
:da du ja offensichtlich gebeten werden willst: präsentiere doch bitte deine kurze Lösung. -- 79.219.59.44 08:38, 20. Apr. 2009 (CEST)
thread_title:  PASCAL-Funktion zur Prüfsummen-Berechnung und formatierten Ausgabe einer CAS-Nr 

message: Mir ist bei der Suche nach Butan-2-ol folgendes aufgefallen:
Butan-2-ol - 78-92-2
(R)-butan-2-ol - 14898-79-4
(S)-butan-2-ol - 4221-99-2
(±)-butan-2-ol - 15892-23-6
Somit gibt es nicht nur eine CAS-RN für die Einzelnen Isomere, sondern auch für Gemische (Racemat und undefiniertes Enantiomerenverhältnis). Der Satz
Für jeden bekannten chemischen Stoff (auch Biosequenzen, Legierungen, Polymere) existiert eine eindeutige CAS-Nummer.
sollte vielleicht dahingehend ergänzt werden dass auch Gemische, auch teilweise undefinierter Zusammensetzung, eine CAS-RN haben. Eine Folge daraus ist, dass man zwar für jedes Stoff/Gemisch eine CAS-Nummer finden kann, allerdings nicht umgekehrt!!! Eine CAS Nummer definiert nicht jeden Stoff exakt.
Gruß Simon (nicht signierter Beitrag von 130.83.209.183 (Diskussion | Beiträge) 18:50, 12. Jul 2009 (CEST)
thread_title:  Eindeutigkeit von CAS-Nummern 

message: ist es überhaubt erlaubt CAS Nummern zu veröffentlichen? Ich habe gelesen dass Datenbanken urheberrechtlich geschütz seien, und selbst eine Teilveröffentlichung ohne Einverständnis nicht zuölässig ist. Zudem die CAS-RN Datenbank sowieso kostenpflichtig ist. Kann jemand mit Rechtskenntnis hier mal was zu sagen?
sk (nicht signierter Beitrag von Simon.kokolakis (Diskussion | Beiträge) 19:03, 28. Jul 2009 (CEST)
replies: text: Ist kein Problem, siehe hier und hier. Viele Grüße --Orci Disk 19:43, 28. Jul. 2009 (CEST)
thread_title:  Datenbankrecht und CAS Nummern 

message: Haben die Nummern eine bestimmte Systematik oder wird einfach nur hochgezählt? Wer hat die CAS-Nummern für die Stoffe vergeben/beantragt, die bei Einführung der CAS-Nummern schon bekannt waren, insbesondere so Trivialitäten wie Wasser, Ethanol, Eisen, usw... --RokerHRO 18:38, 25. Okt. 2009 (CET)
thread_title:  Systematik der Nummern? 

message: Die Formel die im Artikel steht ist ganz toll. Das Beispiel ist (für Mathematiker) sicher leicht zu rechnen. Kann man auch ein Beispiel für Otto Normalverbraucher in der Form 1-2+3*4/5=1,4 aufschreiben? Sonst versteht das nämlich kaum ein Mensch. --80.142.205.161 23:04, 14. Feb. 2010 (CET)
replies: text: Was genau verstehst du nicht? Wird das Summenzeichen und Modulo heute nicht mehr in der Schule gelehrt? Die Ziffern werden, von rechts beginnend, mit ihrer Stellennummer multipliziert, diese Produkte aufsummiert und das Ergebnis modulo 10 gerechnet. --RokerHRO 12:12, 15. Feb. 2010 (CET)
replies: text: Das haut beim genannten Beispiel Aspirin (50-78-2) aber nicht hin, die Summe wäre 64 (1 mal 2 plus 2 mal 8 plus 3 mal 7 plus 4 mal 0 plus 5 mal 5) und ist 6 mal durch 10 teilbar, Rest bleibt aber 4 und nicht 2! Wo ist da der Fehler? --92.74.25.238 00:44, 10. Apr. 2010 (CEST)
replies: text: Man darf die Prüfziffer nicht in die Berechnung nehmen.  Viele Grüße --Orci Disk 01:21, 10. Apr. 2010 (CEST)
replies: text: Danke, die richtige Rechnung würde also lauten 1 mal 8 plus 2 mal 7 plus 3 mal 0 plus 4 mal 5, das Ergebnis dividiert durch 10 und als Rest bleibt somit tatsächlich 2! (nicht signierter Beitrag von 109.250.187.25 (Diskussion | Beiträge) 14:30, 10. Apr. 2010 (CEST)

text:  Nee, modulo niemals beigebracht bekommen in der Schule, das Summenzeichen gab es erst an der Uni, in einer grausamen, berüchtigten Mathematik-/Statistik-Vorlesung für Psychologen. (Das zugehörige Abitur/die zugehörige Oberstufe war [bis ]1984.) --94.221.90.61 09:15, 27. Jan. 2015 (CET)
thread_title:  Prüfung von CAS-Nummern 

message: Im Moment steht dort eine Änderung zur Sichtung, bei der das Wort "höchstwahrscheinlich" eingefügt wurde ("Eine CAS-Nummer ist höchstwahrscheinlich korrekt, wenn..."). Ich bin der Meinung, dass diese Änderung rückgängig gemacht werden sollte, da die Prüfziffer immer nach der im Artikel angegeben Formel berechnet wird (nachzulesen auf der CAS-Webseite, siehe Artikel). Dadurch wird die Aussage, dass die CAS Nummer mit der berechneten Prüfziffer -nur- "höchstwahrscheinlich" richtig ist, falsch. --UntilWhen 14:13, 25. Jan. 2012 (CET)
replies: text: Habe es revertiert. Ansonsten bräuchte es ein Gegenbeispiel, bei dem es nicht stimmt. Viele Grüße --Orci Disk 15:09, 25. Jan. 2012 (CET)
replies: text: Ich hatte die Änderung auch gesehen und habe die Vermutung, dass es darum ging, auszudrücken, dass eine Nummer zwar valide ist, wenn die Prüfziffer stimmt - was aber nicht gleichbedeutend damit ist, dass der Bezug zur zugehörigen Substanz ebenfalls korrekt ist. Eine passende Formulierung in dieser Richtung könnte natürlich wieder eingefügt werden.--Mabschaaf 16:26, 25. Jan. 2012 (CET)
thread_title:  Nicht gesichtete Änderung im Abschnitt Prüfung von CAS-Nummern 

message: Laut Artikel besteht die CAS-Nummer aus drei Teile, einem siebenstelligen, einem zweistelligen und der Prüfziffer. Die Nummer wird dabei einfach hochgezählt. Aber wozu dient dann die Aufteilung in einen siebenstelligen und zweistelligen Teil? Oder steckt da doch noch eine Systematik drin?Gruß Ingo --95.90.249.146 19:58, 10. Nov. 2013 (CET)
replies: text: So, ich gebe mir die Antwort mal selbst :-)Ich bin bei CAS mal vorstellig geworden und die Antwort "has no inherent meaning." bekommen. Warum aber diese Trennung in drei Teile erfolgt, das hat man mir auch nicht sagen können.Gruß Ingo --Istiller (Diskussion) 19:48, 12. Nov. 2013 (CET)
thread_title:  Aufbau der CAS-Nummer