Beiträge von snork

  • Environment als SELECT Kriterium

    Hi ...


    wenn ich eine Zahl als Environment Variable Speicher und dann via OpenView eine View öffne, die auf diese Environment Variable zugreift und ein entsprechendes SELECT Statement hat


    SELECT (Form = "frm_Run") & (TestID = @Environment("ShowTest"))


    dann geht die View einmal mit der gesetzten Zahl auf und dann immer wieder mit dieser. Er selectet dann immer wieder gleich, obwohl sich die Environment Variable ändert!


    ViewRefresh bringt nix!
    EnviVariable hab ich im PostOpen der View ausgeben lassen ... hier isse immer anders ... nur im Select Statemant anscheinend nich ...


    Was kann ich tun, damit der SELECT variable wird ?


    Danke mal

  • fortlaufende Nummer beim Anlegen

    in das Feld ins initialize event einen lotus script agenten schreiben


    hole alle dokumente mit dieser maske
    lese die feldnummer
    while not doc is nothing
    wenn größer then nummer = größte nummer
    wend


    neue nummer = größte nummer + 1


    uidoc.feldname.settext(neue nummer)


    :P

  • Serveragent will nicht laufen

    danke für die Antwort :)


    aber so ein Ärger


    jetzt hab ich aber einen ImportAgenten geschrieben, der XML Dateien aus dem Netz in eine Notes DB einliest und der soll Nachts immer laufen


    Wie soll ich den denn jetzt am besten ausführen?

  • Serveragent will nicht laufen

    Hi ... ich hab einen Agenten per Zeitplan starten wollen, dieser startet aber nicht. Im Log des Servers steht immer nur "operation not allowed in this session"


    welche operationen sind denn nicht erlaubt, wenn ich scheduled starte und wo kann ich das rausfinden?


    danke mal

  • bestimmten Kinderknoten finden

    Hi ...


    wenn ich so nen DOM Baum hab


    <Partner>
    <Name>
    <Vorname>
    ....
    </Partner>


    und will nun per LotusScript wissen, ob es den Knoten "Vorname" gibt


    muss ich dann immer in einer while schleife alle ChildNodes durchgehen und immer den NodeValue abfragen? oder geht das auch einfacher?

  • While Schleife ... Hab ich da einen BUG gefunden?

    auweh ... ich habs raus


    ich bin aber auch doof


    wisst ihr, man sollte mit dem ersten Kinderknoten anfangen und dann runterzählen und nicht zuerst runterzählen weil man sonst an der letzten Stelle einen ISNULL Knoten bekommt und der sorgt natürlich für einen Abbruch ...


    SORRY :P heut is nich mein Tag


    ich geh ma :pint:

  • While Schleife ... Hab ich da einen BUG gefunden?

    oh wie peinlich ... ihr habt ja recht ...


    mein Problem war:


    ich übergebe einen Knoten in einer While Schleife an eine Funktion
    CrawlPartner


    Wenn ich mir nun zB den PartnerNamen ausgeben lasse per Messagebox, wird die erste while schleife unterbrochen :-?
    und das gesamte sub beendet
    ------------------------------------------


    ...


    Case DOMNODETYPE_ELEMENT_NODE: 'Case: üblicher Element Knoten

    'Semiramis Knoten herausfiltern und Kinderknoten
    'an CrawlPartner übergeben

    Set semiramisNode = node
    If semiramisNode.LocalName = "semiramis" Then

    Set SemiramisChild = semiramisNode.FirstChild
    numSemimarisChildNodes = semiramisNode.NumberOfChildNodes
    While numSemimarisChildNodes > 0
    Set SemiramisChild = SemiramisChild.NextSibling
    numSemimarisChildNodes = numSemimarisChildNodes - 1


    'Hier übergebe ich die einzelnen PartnerKnoten
    Call CrawlPartner(SemiramisChild)





    Wend

    End If





    --------------------------------------------------------------
    Funktion CrawlPartner:


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


    Function CrawlPartner ( PartnerNode As notesdomnode)

    REM Läuft durch den übergebenen Partnerknoten
    REM und behandelt Ihn gemäß Anweisung

    Dim PartnerData As notesdomnode
    Dim numPartnerData As Integer

    If PartnerNode.LocalName = "Partner" Then 'Partnerknoten herausfiltern


    Set PartnerData = PartnerNode.FirstChild
    numPartnerData = PartnerNode.NumberOfChildNodes
    While numPartnerData > 0
    Set PartnerData = PartnerData.NextSibling
    numPartnerData = numPartnerData - 1
    Messagebox(PartnerData.LocalName)
    Wend



    End If

    End Function


    --------------------------------------------------------------
    ich hab also ne Messagebox in 2 While Schleifen
    lass ich sie drin, übergibt er nur einen Partner an Crawl Partner
    nehm ich sie raus, läuft er so oft in die CrawlPartner wie es Partner gibt - so sollte es sein.


    Wieso kann das an einer Messagebox liegen?


    Zusatzinfo:
    wenn ich die Zeile


    Set PartnerData = PartnerData.NextSibling


    rausnehme, springt er doch nicht raus! :-?

  • XML aus einem ERP System importieren

    so hat es dann am Ende auch funktioniert.


    Ich hab mir dieses StdBeispiel aus der Hilfe geschnappt und etwas umfunktioniert.


    dort wo vorher domParser.Output(" with Target "+piNode.Target+_ usw stand, schreib ich einfach meine Befehle rein zur Weiterverabrietung ... so schreibt er es dann nicht in ein externes Dokument sondern in saubere Strings mit denen ich schaffen kann ...




    :strike:

  • XML aus einem ERP System importieren

    das muss doch einfacher gehen, so bekomm ich das nie hin ...


    die ganze Technik is mir nicht geläufig ... :(


    ich brauch doch nur die Daten irgendwie in einem String damit ich sie verarbeiten kann ... geht das nicht leichter?


    Hilfe

  • XML aus einem ERP System importieren

    Hi ... ich brächte mal bitte einen kleinen Rat ...



    ich möchte XML importieren, sagen wir einen Kunden mit Name und Straße und dann den code noch in Lotus script bearbeiten


    <ERPSystem xmlns="irgendeineintrag" usw>
    <Kunde>
    <Name>Hund GmbH</Name>
    <Straße>Rudelweg 12</Straße>
    </Kunde>
    ...
    </ERPSystem>


    dann sollen diverse Prüfungen und Funktionen mit den Daten laufen und dann per db.CreateDocument erst ein Dokument erstellt ...


    Ist es jetzt sinnvoll den importer zu nutzen?


    Am liebsten wäre mir ein Import Zeile für Zeile, sodass ich dann per script weiterbearbeiten kann ...


    Open xml For Input As 1
    Do Until Eof(1)
    Line Input #1
    ...
    Befehle ...
    Loop


    was würdet Ihr machen? :-?


    Danke mal