Domino 9 und frühere Versionen > ND6: Entwicklung

Formular in dem mehrere Untersubstanzen via Script erstellt werden

(1/5) > >>

wolge:
Ich habe ein Formular in dem mehrere (unter)-Substanzen erfasst werden können. Dazu schrieb ein ehemaliger Kollege drei Scripts. Je einen für Add, Edit und Remove. Hierbei wird eine kleine Dialogbox geöffnet in der 4 Felder abgefüllt werden können. Mein Problem ist nun das eine Substanz bei der am Anfang noch nicht alle Felder abgefüllt wurden nicht mehr editiert werden kann. Scheinbar hat Notes ein Durcheinander unter den einzelnen Substanzen da diese nicht sauber getrennt werden.

Wie lässt sich dies lösen ohne bestehende Daten zu beinträchtigen?

Hier der Script der Add Funktion:

Sub Click(Source As Button)
   On Error Goto Errhandler
   
   Dim ss As New NotesSession
   Dim ws As New NotesUIWorkspace
   Dim db As NotesDatabase
   Dim uidoc As NotesUIDocument
   Dim doc As NotesDocument
   
   Set uidoc = ws.CurrentDocument
   Set doc = uidoc.Document
   
   ret = ws.DialogBox("frmContentDlg", True, True, False, True, False, False, "Substance Details")
   If ret = False Then Exit Sub
   
   doc.sEC_number = Evaluate({@Trim(sEC_number : "} & doc.dlgsEC_number(0) & {")}, doc)
   doc.sIUPAC = Evaluate({@Trim(sIUPAC : "} & doc.dlgsIUPAC(0) & {")}, doc)
   doc.sCAS_number = Evaluate({@Trim(sCAS_number : "} & doc.dlgsCAS_number(0) & {")}, doc)
   doc.Composition = Evaluate({@Trim(Composition : "} & doc.dlgComposition(0) & {")}, doc)
   
   If Isnumeric(doc.Volume(0)) Then
      calcVol = doc.Volume(0) / 100 * doc.dlgComposition(0)
      doc.sVolume = Evaluate({@Trim(sVolume : "} & Round(calcVol, 2) & {")}, doc)
   Else
      doc.sVolume = Evaluate({@Trim(sVolume : "0.00")}, doc)
   End If
   
   doc.dlgsEC_number = ""
   doc.dlgsIUPAC = ""
   doc.dlgsCAS_number = ""
   doc.dlgComposition = ""
   
   Exit Sub
   
Errhandler:
   Msgbox "Line " & Str(Erl) & " : Error " & Str(Err) & " - " & Error$
   End
   
End Sub

eknori:
Was verstehst du unter
--- Zitat ---eine Substanz
--- Ende Zitat ---
  ???

koehlerbv:
Doppelposting - und bei den Kollegen bereits beantwortet.

klaussal:

--- Zitat ---Was verstehst du unter...
--- Ende Zitat ---


--- Zitat ---Umgangssprachlich steht das Wort oft synonym für einen chemischen Stoff im allgemeinen, in einem engeren Sinn der Chemie wird die Bezeichnung Substanz auf Stoffe in fester Form (Feststoffe) beschränkt, im Gegensatz zu Flüssigkeiten und Gasen.

In der Medizin und Pharmazie wird der Begriff v. a. angewandt für

Strukturen und Gewebe benutzt, die einheitlich aussehen, wie substantia nigra, substantia grisea
Stoffe, die eine Wirkung ausüben, etwa psychotrope Substanz, pharmazeutische Substanz (Arzneimittel, Pharmakon), toxische Substanz (Gift)
Häufig wird der Begriff Substanz auch im Sinne von „wichtige Stoffe“ verwendet, z. B. „etwas geht an die Substanz“. Dies bedeutet, (im stofflichen/medizinischen Sinne) dass die Vorräte aufgebraucht sind und nun die Grundlagen angegangen werden. Im psychologischen Sinne „geht etwas an die Substanz“, wenn die persönlichen Schutzmechanismen (Abwehr, Verdrängung...) nicht mehr greifen.

--- Ende Zitat ---

wolge:

--- Zitat von: koehlerbv am 13.08.08 - 15:10:59 ---Doppelposting - und bei den Kollegen bereits beantwortet.

--- Ende Zitat ---
Sorry dachte ich erhalte so breitere Hilfe

Navigation

[0] Themen-Index

[#] Nächste Seite