SQL encryption

[dholtmann]

Das klingt vielversprechend,
aber selbst für eine SQL UDF funktioniert es bei mir leider nicht:

create or replace function mylib.uftest(pw char(8))
returns char(1)
language sql
modifies sql data
begin
declare isok char(1);
set encryption password = pw;
set isok = 'A';
return isok;
end

select a.*, mylib.uftest('testab') from myview a

Die Fehlermeldung bleibt identisch:

Ursache . . . . : Funktion DECRYPT_CHAR kann nicht ausgeführt werden;
Ursachencode 1. Ursachencodes und ihre Bedeutung:
1 -- Der Wert für ENCRYPTION PASSWORD ist nicht festgelegt.

[Fuerchau]

Da hast du mich missverstanden.
Ggf. gilt das Kennwort nur ab Aufrufebene. M.a.W, wenn die Aufrufebene verlassen wird, ist auch das Kennwort weg. Ggf. kannst du das mal verifizieren in dem dein RPG den Set encryption durchführt und QCMD aufruft. Dann mit STRSQL die View ansehen. Wenn STRSQL und QCMD und somit auch dein RPG dann verlassen wird könnte die View dann wieder verschlüsselt sein.
Somit könntest du vielleicht auch eine Tablefunction schreiben, die das Kennwort setzt und einen Cursor mit dem Decrypt zurückgibt.
Leider finde ich in der Doku nichts über die Gültigkeitsdauer des Set Encryption.

Ansonsten:
- du definierst eine SQL-Variable (create variable)
- Per Funktion/Aufruf o.ä. führst du "Set Variable = Password" aus
- die UDF hat einen Parameter, z.b. Varchar(256) und Return Varchar(256) führt den Set Encryption und den Decrypt aus: set encryption = Variable; return decrypt(Parameter);

Wenn die Variable nicht Global ist gilt sie nur für den Job.