git-svn-id: http://locode01.ad.dom/svn/WEBMIP/trunk@50874 248e525c-4dfb-0310-94bc-949c084e9493

This commit is contained in:
andrew.gilmore
2012-03-19 11:57:19 +00:00
parent 2a0f4900c3
commit 0e9ca75d77
1587 changed files with 500863 additions and 0 deletions

View File

@@ -0,0 +1,44 @@
create or replace package body efnow190$js$cnrl is
--------------------------------------------------------------------------------
-- Name: efnow190$js$cnrl.CreateListJavaScript
--
-- Description:
--
-- Parameters:
--
--------------------------------------------------------------------------------
procedure CreateListJavaScript (
RL_BODY_ATTRIBUTES in varchar2)
is
begin
if not caco_security.security_check('efnow190$cnrl') then
return;
end if;
htp.p(WSGJSL.OpenScript);
htp.p('var FormType = "List";');
if to_char(efnow190$cort.CURR_VAL.CNRT_ID) is not null then
htp.p( 'var P_CNRT_ID = new Array();' );
htp.p( 'P_CNRT_ID[0] = "' || WSGL.EscapeURLParam(to_char(efnow190$cort.CURR_VAL.CNRT_ID)) || '";' );
end if;
htp.p( 'var P_8 = new Array();' );
htp.p( 'P_8[0] = "' || WSGL.EscapeURLParam(nvl(to_char(efnow190$cort.CURR_VAL.CNRT_ID), '')) || '";' );
if (to_char(efnow190$cort.CURR_VAL.CNRT_ID) is not null ) then
htp.p( 'var CNRL_CHK_VALUE = new Array();' );
htp.p( 'CNRL_CHK_VALUE[0] = ' || to_char(WSGL.Checksum(''|| to_char(efnow190$cort.CURR_VAL.CNRT_ID)|| to_char(efnow190$cort.CURR_VAL.CNRT_ID))) || ';' );
end if;
htp.p( 'var P_13 = new Array();' );
htp.p(WSGJSL.CloseScript);
exception
when others then
WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'#Log Messages#3565#',
RL_BODY_ATTRIBUTES, 'efnow190$js$cnrl.CreateListJavaScript');
end;
end;
/