Beiträge von Julgo

  • Array splitten

    hallo,


    ich muss einen Array splitten, er baut sich wie folgt auf:


    For c = Lbound(ServResArr) To Ubound(ServResArr)
    Matkltext = Split(ServResArr(c), "|")
    Next c


    Der Array ServResArr besteht nur aus String, Matkltext ist auch als String deklariert. Der Array baut sich zeilenweise nach dem Schema
    "1234 : Material | 1234" auf, gesplitter werden soll also an der Pipe. C dient als Zähler und ist int.


    Kann mir jemand sagen warum ich immer einen Type Mismatch bekomme?

  • Liste nach Wert durchsuchen und passenden Value ausgeben

    Hallo zusammen,
    ich habe zwei Felder aus einem Dokument in die Liste "mattexts" eingelesen. Die Liste bau sich so auf:


    (tag) (value)
    15463 Produkt1
    63383 Produkt2
    77548 Produkt3


    usw...


    Nun möchte ich gern überprüfen, ob ein Feld aus einem anderen Dokument dass ich eingelesen habe, einem der Tags aus meiner obigen List gleicht und falls ja, den zugehörigen Value ausgeben.


    Mit welcher Funktion kann ich dies erreichen? Habe schon mit IsElement herumgetestet, jedoch kein brauchbares Ergebnis erhalten.

  • DBLookup in Lotusscript

    Bei meiner Internetrecherche werde ich leider nicht schlau is dieser Funktion, da ein DBLookup meist mit Evaluate vollzogen wird. Im Designer finde ich in der Hilfe nur GetDocumentByKey -Beispiele, bei denen auf die Current Database zugegriffen wird, meine benötige Datenbank liegt jedoch nicht in der selben.

  • DBLookup in Lotusscript

    Hallo zusammen,


    ich soll einen DBLookup Befehl in LotusScript umschreiben, hatte schon eine funktionierende Lösung in der ich Evaluate nutze, soll es jedoch nun auf einem anderen Weg, also mit den LotusScript-eigenen Möglichkeiten machen.


    Habe so angefangen:


    Call s.SetEnvironmentVar(Server, "ELS_DefServ")
    Call s.SetEnvironmentVar(Data, "ELS_DefData")


    Was ist nun der nächste Schritt? Gibt es eine Möglichkeit diese Zeile:



    Server := @Environment("ELS_DefServ");
    Data := @Environment("ELS_DefData");
    @DbLookup(""; Server : Data; "SCF"; @Environment("PSS_Language") + "SAPMaterialGroup"; 2)



    Mit GetDocumentByKey oder ähnlichem zu realisieren?

  • Mehrzeiliges Feld einlesen und splitten

    Test gerade mit den Arrays herum, aber es will nicht klappen. Kann mir jemand sagen warum nichts in den textstring (der dann den Inhalt des Arrays enthalten soll) geschrieben wird?


    Code
    Dim mattexts(0) As String 	
Dim textstring As String 	
mattexts(0) = "doc.vaPPMATKL_Text" 				 				


Dim c As Integer 
For c = Lbound(mattexts) To Ubound(mattexts) 	
If Cstr(doc.GetItemValue(mattexts(c))(0)) <> "" Then					 						textstring  = textstring +  Cstr(doc.GetItemValue(mattexts(c))(0)) 					End If 				Next c

  • Mehrzeiliges Feld einlesen und splitten

    Hallo,
    für eine Tabelle muss ein Feld mit mehrzeiligen Inhalt eingelesen werden, beispielhaft so dargestellt:


    Abc Test | 1234
    Abd Test2 | 31234
    Abe Test3 | 14234


    Das Feld soll am Pipesymbol gesplittet werden und dann Zeile für Zeile in eine Tabelle geschrieben werden, ich benötige für die Tabelle jedoch nur die Daten auf der rechten Seite der Pipe.


    Code
    Dim textlist List As String


textlist = doc.vaPPMATKL_Text ' ich versuche das Feld aus dem Dokument in eine Liste einzulesen, Fehler "Type Mismatch"	


Forall items In doc.vaPPMATKL_Text 
SplitOutput =  Split(items,"|")			 							End For


    Kann mir jemand weiterhelfen?
    (Die Struktur der Tabelle steht im Übrigen schon soweit, es geht nur um das korrekte einlesen)

  • Sonderzeichen werden nicht korrekt dargestellt

    Hallo zusammen,


    ich habe ein kleines Problem. In der Betreffzeile einer E-Mail stehen bei einem Agenten den ich geschrieben habe unter Umständen sonderzeichen, die Betreffzeile wird flexibel aus den Datenbanktiteln bezogen. Sonderzeichen werden jedoch nicht korrekt dargestellt, sondern durch andere Zeichen wie Anführungsstriche ersetzt. Liegt das Problem im Headeraufbau?


    Code
    Dim overviewheader As NotesMIMEHeader [...]


Set overviewheader = overviewbody.CreateHeader("Subject")
subject = Cstr(db.Title + "äö") +|: | + Cstr(Year(Today)) + |/| + Cstr(CalculateWeekNo(Today)) + | PP Promo Overview|
Call overviewheader.SetHeaderVal(subject)


    Verwendet wird UTF-8.

  • Tabellen trennen?

    Sorry für die späte Rückmeldungs und danke für die Hilfe soweit ;)
    Es hat sich ergeben, dass ein Tabellenzuschluss an der richtigen Stelle Wunder bewirken kann.

  • Tabellen trennen?

    Beim momentanen Output wird die zweite Tabelle korrekt angezeigt, die erste wird jedoch nach der ersten Zeile geschlossen und die Daten in Fließtext dargestellt. Wenn ich die erste Tabelle ganz am Ende erst schließe, wird die zweite komplett in eine Zelle der ersten geschrieben. Die TDs und TRs sollten soweit stimmen. Problem ist also, das der String der ersten entweder zu früh geschlossen wird oder der der zweiten in die erste Tabelle transferiert wird.

  • Tabellen trennen?

    Erst einmal ein herzliches Hallo von mir, bin neu hier =)


    ich habe zwei Tabellen, welche jeweils in temporäre Strings eingelesen und dann getrennt ausgegeben werden sollen, jedoch wird die zweite Tabelle in der ersten verschachtelt. Wie kann ich das umgehen?
    (Deklarationen etc. kürze ich mal raus)