|
Be sure to cast your variables correctly. SQL default types are not amenable to RPG variable types. Show us the definition of your DISPLAYVAL function.
create function displayval(i_fldid NUMERIC, i_key VARCHAR(5)) returns varchar(50) language sql deterministic not fenced begin declare result char(50); declare cur02 cursor for select DEF from WTTBLE where PTBLE = whichtbl(i_fldid) and PCODE = i_key and STBLE = ' ' and SCODE = ' '; fetch cur02 into result; close cur02; return result; end
create function whichtbl(i_fldid NUMERIC) returns varchar(3) language sql deterministic not fenced begin declare tbl char(11); declare tbl2 char(3); declare cur01 cursor for select HDG from wtfldd where dfid = i_fldid
; open cur01; fetch cur01 into tbl; close cur01; set tbl2 = tbl; return tbl2; end
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
midrange.com
