git-svn-id: http://locode01.ad.dom/svn/WEBMIP/trunk@50874 248e525c-4dfb-0310-94bc-949c084e9493
This commit is contained in:
44
Data/BulkLoad/EFT/Nominations/plsql/efnow190$js$cnrl.bdy
Normal file
44
Data/BulkLoad/EFT/Nominations/plsql/efnow190$js$cnrl.bdy
Normal 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;
|
||||
/
|
||||
|
||||
Reference in New Issue
Block a user