create or replace package body efnow210$js$smess is -------------------------------------------------------------------------------- -- Name: efnow210$js$smess.CreateViewJavaScript -- -- Description: -- -- Parameters: -- -------------------------------------------------------------------------------- procedure CreateViewJavaScript( VF_ROWS_UPDATED in integer, VF_ROWS_DELETED in integer, VF_ROWS_ERROR in integer, VF_BODY_ATTRIBUTES in varchar2, RL_REQUERY_BUT_ACTION in varchar2, LOV_FRAME in varchar2) is begin if not caco_security.security_check('efnow210$smess') then return; end if; htp.p(WSGJSL.OpenScript); htp.p('var index = 0;'); htp.p( 'var DataChangeErrors = false;' ); htp.p( 'var DataChange = false;' ); htp.p( 'var P_16 = new Array();' ); htp.p( 'P_16[0] = "' || WSGL.EscapeURLParam(to_char(efnow210$smess.CURR_VAL.INT_ID)) || '";' ); htp.p(WSGJSL.RtnCheckModified); htp.p(WSGJSL.RtnRevertForm); htp.p(WSGJSL.OpenEvent('SMESS','OnLoad')); htp.p(' if ( FormType != "PostDelete") { form_num=0; do { elem_num=0; len = document.forms[form_num].elements.length; if (len > 0) { while (elem_num < len && document.forms[form_num].elements[elem_num].type != "text" && document.forms[form_num].elements[elem_num].type != "textarea") { elem_num++; } if (elem_num < len) { document.forms[form_num].elements[elem_num].focus(); break; } } form_num++; } while ( form_num < document.forms.length ); } '); htp.p(WSGJSL.CloseEvent); htp.p(WSGJSL.OpenEvent('btnVFU','OnClick')); htp.p(WSGJSL.StandardSubmit(false)); htp.p(WSGJSL.CloseEvent); htp.p(WSGJSL.OpenEvent('btnVFD','OnClick')); htp.p(WSGJSL.VerifyDelete(WSGL.MsgGetText(118, WSGLM.DSP118_CONFIRM_DELETE))); htp.p(WSGJSL.CloseEvent); htp.p(WSGJSL.OpenEvent('btnVFR','OnClick')); htp.p(WSGJSL.StandardSubmit(false)); htp.p(WSGJSL.CloseEvent); htp.p(WSGJSL.OpenEvent('AI_BACK','OnClick')); htp.p( ' // AI_BACK_OnClick // // history.go(-1);'); htp.p(WSGJSL.CloseEvent); htp.p(WSGJSL.CloseScript); exception when others then WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'#Send Interruption Message#3820#', VF_BODY_ATTRIBUTES, 'efnow210$js$smess.CreateViewJavaScript'); end; -------------------------------------------------------------------------------- -- Name: efnow210$js$smess.CreateListJavaScript -- -- Description: -- -- Parameters: -- -------------------------------------------------------------------------------- procedure CreateListJavaScript ( RL_BODY_ATTRIBUTES in varchar2) is begin if not caco_security.security_check('efnow210$smess') then return; end if; htp.p(WSGJSL.OpenScript); htp.p('var FormType = "List";'); htp.p( 'var P_16 = new Array();' ); htp.p(WSGJSL.CloseScript); exception when others then WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'#Send Interruption Message#3820#', RL_BODY_ATTRIBUTES, 'efnow210$js$smess.CreateListJavaScript'); end; end; /