Veröffentlichen einer UDF

kann ein Installation-SysAdm eine UDF unter dem Schema "SYSFUN" anlegen?
Wenn ich eine Collection fest in die CURRENT PACKAGE PATH aufnehme, hat das laufzeitmässig Auswirkungen auf alle anderen laufenden Programme? CurPPath wird ja vorrangig behandelt; ein Package hat dann also einen Suchpfad mehr (als über den Plan vorgegeben).

Danke
Alexander

Hi Experten,

meine UDF läuft unter QMF … zumindest ein bisschen 🙁

Jetzt habe ich folgendes Phänomen:
ich setze unter QMF eine Katalog-Query ab; Ergebnis kommt und ich kann auch mit PF8 bis ans Ende der Ergebnisliste blättern.
Setze ich die Query mit einem ORDER BY ab, bekomme ich einen SQL-Code aus der UDF. (Fehler ist nachvollziehbar und an sich auch behoben, AAAABER ….)

warum bekomme ich den Fehler nur mit ORDER BY?

Jetzt wollte ich das Verhalten mal mit dem DSNTEP2 nachstellen, da bekomme ich die Funktion aber nicht ans laufen… Ich habe die Load-Lib in der STEPLIB und das Package unter DSNTEP2 gebunden.
Was fehlt? Was ist falsch?

Danke …
Alexander

Hallo Ulrich,

es ist eine (eigentlich 2) external skalar , die unter/in einem WLM läuft. Die F bekommen einen bis zu 20 Stellen langen String übergeben. Die eine rechnet den nur in einen Dec-Wert um (Rückgabe allerdings X(20), die andere ruft "die eine" auf und macht aus dem Dec-Wert einen Timestamp (Rückgabe X(26)).

Der Fehler war, dass ich blind auf die berechneten Stunden des TS noch die Timezone addiert habe, was natürlich zu einem -181 führt, wenn es plötzlich 25Uhr irgendwas ist. Aber der Fehler ist nicht mein Problem…

Problem #1 ist eben, dass QMF den Fehler nicht bringt, wenn ich in der Ergebnismenge mit PF8 bis ans Ende blätter. Mit einem OrderBy bekomme ich den Fehler -181 aus der Funktion hochgegeben.

Problem #2 ist, dass ich bei einem Aufruf der Funktion (z.B. Sel X2TS(‚FFFF‘) From sysdummy) einen Fehler bekomme:
CEE3250C The system or user abend S013  R=00000018 was issued.                
From compile unit DSNTEP2 at entry point READRTN compile unit offset +00002DC2 at entry offset +000002A2 at address 0F354EDA.

Die Funktionen beinhalten DB2, haben also entsprechende Packages (in Q.* für QMF und DSNTEP2.* für DSNTEP2). Die Loads liegen in einer Lib, die vom WLM gezogen werden kann. Für den TEP2 hab ich diese als zusätzliche Steplib eingebunden.

Danke für die Mühe
Alexander

fangen wir mit Problem #2 an: Problem #2 *überdengrundausschweig*

zu #1 …
ist QMF auf dem Grossrechner. Mir ist jetzt noch folgendes aufgefallen:
Query unter QMF mit OrderBy… es kommt die Meldung "QUERY MESSAGES: External function X2TS has returned an error." Mit PF1 bekomme ich die Zusatzinformationen (SQLSTATE und das, was ich mir für genau diesen Fall in UDF-DIAG-TEXT zusammengestringed habe. Alles Prima …

Query unter QMF ohne OrderBy… Wenn du da im Report mit PF8 blätterst, bekommst Du doch jedesmal unten die Meldung " OK, FORWARD performed. Please proceed.". Die kommt 9mal beim 10ten mal kommt nix und beim 11ten mal "OK, FORWARD performed. Please proceed." und dann "You are at the boundary of the panel."
Wenn ich nach diesem 10ten mal PF1 drücke, bekomme ich die Zusatzinformationen zu dem Abbruch in der Function. Allerdings (merkwürdigerweise) nur den SQLSTATE und das allgemeine Geschwätz 😉 vom QMF. Im UDF-DIAG-TEXT steht aber jetzt nur der Name der Funktion … Ich habe das nicht dareinprogrammiert  😕 !!

Zum Vergleich die Query im DSNTEP2 mal mit und mal ohne Order By; mit kommt keine Ergebniszeile und saubere Fehlermeldung mit meinem SQLSTATE und meinem UDF-DIAG-TEXT. Ohne OrderBy kommen 159 Datensätze. Nach 150 Zeilen kommt eine saubere Fehlermeldung mit meinem SQLSTATE und meinem UDF-DIAG-TEXT. Also auch Prima. Dann kommen noch weitere 9 Sätze …

Fazit: Offensichtlich hat QMF ein Problem mit dem Errorhandling, wenn irgendwann beim Nachlesen ein Fehler auftritt. Kennt das Verhalten jemand?

Danke (auch für den IEC141I-Zaunpfahl@Ulrich) & Grüsse
Alexander