Hi Folks,
entweder habe ich ein Brett vor dem Kopf, oder Notes dreht total durch. Gegeben sei der folgenden Code:
_userName := @Name([Abbreviate];@UserName);
_EHBs := @DbLookup("":"";"":"";"($lookupEHB)";_userName;"$docUID");
@If(@IsError(_EHBs);@Return("<tr><td class=\"ehb_overview_content\">Sie haben noch keinen Bogen ausgefüllt</td></tr>" + @NewLine);@True);
_numEHBs := @Elements(_EHBs);
_returnString := "";
@For(n := 1; n <= _numEHBs; n := n + 1;
@Prompt([Ok];"Test";"Schleife " + @Text(n));
_curEHB := @Subset(@Subset(_EHBs;n);-1);
_curSemesterType := @GetDocField(_curEHB;"_semesterType");
_curSemesterName := @If(_curSemesterType = "1";"Sommer";"Winter");
_curSemesterYear := @GetDocField(_curEHB;"_semesterYear");
_tmpReturnString := _returnString + "<tr><td class=\"ehb_overview_content\"><a class=\"ehb_overviewLink\" href=\"javascript:openDocument('" + _curEHB + "')\">" + _curSemesterName + " " + _curSemesterYear + "</a></td></tr>" + @NewLine;
_returnString := _tmpReturnString;
@Prompt([Ok];"Test";_returnString)
);
@Prompt([Ok];"Test";"Schleife Ende");
@Prompt([Ok];"Test";_returnString);
REM {@Return(_returnString)};
Man beachte, dass die @Prompt-Befehle Testzwecken dienen. Das ausgeremte @Return sollte eigentlich den Dienst tun. Wie man unschwer erkennen kann, soll das ganze später auf einer Webseite ausgegeben werden.
Angenommen in der Ansicht ($lookupEHB) befinden sich zwei Dokumente. So weit so schön, die Schleife läuft zwei mal durch. Aber: Das @Prompt([Ok];"Test";_returnString) gibt gar nix aus und Am Ende erzählt Notes was von "Document could not be found". Ich kann mir das nicht erklären. Kann das einer von euch erklären?
Viele Grüße
Harry