« Good web Skeleton - handles body onload | 3 ways to invoke DEBUG for LANSA for the Web »

All Web Components together

<!– ################################################### –>
<!– ### !@BEGIN Page Component PAG_MNUSKLLAYOUT  ### –>
<!– ################################################### –>
<!– ################################################### –>
<!– ### !@BEGIN Field Component  &FLD_DCTHDRCMP      ### –>
<!– ################################################### –>
<RDML COMPONENT=”&FLD_DCTHDRCMP”>
<!– ################################################### –>
<!– ### !@END   Field Component  &FLD_DCTHDRCMP      ### –>
<!– ################################################### –>
<!– ############################################ –>
<!– ### !@BEGIN   RDML MERGE=”&MESSAGES” ### –>
<!– ############################################ –>
<RDML MERGE=”&MESSAGES”>
<!– ############################################ –>
<!– ### !@END      RDML MERGE=”&MESSAGES” ### –>
<!– ############################################ –>

<!– ################################################### –>
<!– ### !@BEGIN Field Component  &FLD_DCTPAGCMP      ### –>
<!– ################################################### –>
<RDML COMPONENT=”&FLD_DCTPAGCMP”>
<!– ################################################### –>
<!– ### !@END   Field Component  &FLD_DCTPAGCMP      ### –>
<!– ################################################### –>
   
<!– ################################################### –>
<!– ### !@BEGIN Field Component  &FLD_DCTHRFCMP      ### –>
<!– ################################################### –>
<RDML COMPONENT=”&FLD_DCTHRFCMP”>
<!– ################################################### –>
<!– ### !@END   Field Component  &FLD_DCTHRFCMP      ### –>
<!– ################################################### –>

<!– ################################################### –>
<!– ### !@BEGIN Field Component  &FLD_DCTFTRCMP      ### –>
<!– ################################################### –>
<RDML COMPONENT=”&FLD_DCTFTRCMP”>
<!– ################################################### –>
<!– ### !@END   Field Component  &FLD_DCTFTRCMP      ### –>
<!– ################################################### –>

<!– ################################################### –>
<!– ### !@END   Page Component PAG_MNUSKLLAYOUT  ### –>
<!– ################################################### –>
++++++++++++++++++
<!– ################################################# –>
<!– ### !@BEGIN Page Component PAG_MNUSKLHEAD  ### –>
<!– ################################################# –>
<!– Pull in Function specific needs to be put in <head>  –>
<!– ################################################# –>
<!– ### !@BEGIN Field Component &FLD_DCTHEDCMP  ### –>
<!– ################################################# –>
    <RDML COMPONENT=”&FLD_DCTHEDCMP”">
<!– ################################################# –>
<!– ### !@END     Field Component &FLD_DCTHEDCMP  ### –>
<!– ################################################# –>
<SCRIPT LANGUAGE=”JavaScript”> <!–

// Start of Change:  2008.06.04 - MAM - Allow for debug by prompt

function mmHandleEvent(Proc,Func)
{
  var dbugDEV = prompt( “Enter Device Name for Debug Else leave blank”  );
  if(dbugDEV!=”" )  document.LANSA.action+=”+BDEBUG+”+dbugDEV+”+%20″;
    document.LANSA._PROCESS.value=Proc;
    document.LANSA._FUNCTION.value=Func;
    document.LANSA.submit();
}
function go(url)
{
     if (document.images)
 {
 alert(’test1′)
  location.replace(url);
 }
     else
 {
          location.href = url;
 }
}

function HandleEvent(Proc,Func)
{

   document.LANSA._PROCESS.value=Proc;
   document.LANSA._FUNCTION.value=Func;
   document.LANSA.submit();
}
// –> </SCRIPT>
<!– ################################################# –>
<!– ### !@END   Page Component PAG_MNUSKLHEAD  ### –>
<!– ################################################# –>
+++++++++++++++
Mnusklbdyonload

<RDML COMPONENT=”&FLD_DCTONLCMP”>

<!– ############################################## –>
<!– ### !@BEGIN Page Component PAG_MNUHED     ### –>
<!– ############################################## –>
<style type=”text/css”>@import url(/images/migmnuproc/migmnuproc.css);</style>
<style type=”text/css”>
.submenu{display: none;}
</style>
<style type=”text/css”> @import url(/images/migmnuproc/dropdown.css); </style>
<script type=”text/JavaScript” src=”/images/HomeValue.js”></script>
<script type=”text/JavaScript” src=”/images/BVSexpress.js”></script>
<script type=”text/JavaScript”>
<!–
function HandleSplEvtLossRun(Proc,Func,Parm)
{
   document.LANSA.AMPROD.value=” “;
   document.LANSA._PROCESS.value=Proc;
   document.LANSA._FUNCTION.value=Func;
   document.LANSA.action+=”+FUNCPARMS+Z1ASELECT(A0010):”+Parm;
   document.LANSA.submit();
}

function HandleCCP(Proc,Func,Parm)
{
   document.LANSA._PROCESS.value=Proc;
   document.LANSA._FUNCTION.value=Func;
   document.LANSA.action+=”+FUNCPARMS+Z1ASPLFLG(A0060):”+Parm;
   document.LANSA.submit();
}

function HandleSplEvent(Proc,Func,Parm3)
{

   document.LANSA.action+=”+FUNCPARMS+MPROD(A0030):”+Parm3;
   document.LANSA.AMPROD.value=Parm3;
   document.LANSA._PROCESS.value=Proc;
   document.LANSA._FUNCTION.value=Func;
   document.LANSA.submit();
}
function prelaunchHV()
 {
 name = “<RDML MERGE=”AGYNAM   “>”;
 badchar = “‘”
 newname = name.replace(badchar, “”);
 launchHomeValue(’<RDML MERGE=”MUSRID   “>’,”,newname,’QLAFKIUDJ%7DLWI%60VGMDJPV’,'demo.isohomevalue.com’,”,’<RDML MERGE=”MLOGSESID”>’)
 //launchHomeValue(’<RDML MERGE=”MUSRID   “>’,”,newname,’QLAFKIUDJ%7DLWI%60VGMDJPV’,'homevalue.qa.air-worldwide.com’,”,’L080A6D0428B9D9C48D5D12072004151532′)
 } 
function openWindow(url)
 {
 var baseurl = “http://www.merchantsgroup.com”
 var page = baseurl + url
 var opt = “width=770,height=560,top=20,left=20,scrollbars=yes,resizable=yes,menubar=no,toolbar=yes,status=yes,location=yes”
 var win
 window.open(page,”Title”,opt)
 }
function HandleSpecialEvt2(Proc,Func,Parm)
{
   document.LANSA.AMPROD.value=” “;
   document.LANSA._PROCESS.value=Proc;
   document.LANSA._FUNCTION.value=Func;
   document.LANSA.action+=”+FUNCPARMS+Z1ACOMFLG(A0010):”+Parm;
   document.LANSA.submit();
}
function HandleSplEvtLossRun(Proc,Func,Parm)
{
   document.LANSA.AMPROD.value=” “;
   document.LANSA._PROCESS.value=Proc;
   document.LANSA._FUNCTION.value=Func;
   document.LANSA.action+=”+FUNCPARMS+Z1ASELECT(A0010):”+Parm;
   document.LANSA.submit();
}
//–>
</script>
<!– ############################################## –>
<!– ### !@END    Page Component PAG_MNUHED     ### –>
<!– ############################################## –>

+++++

<!– ############################################## –>
<!– ### !@BEGIN Page Component PAG_MNUHDR     ### –>
<!– ############################################## –>
<!– ############################################## –>
<!– ### !@END    Page Component PAG_MNUHDR     ### –>
<!– ############################################## –>

This entry was posted on 24. July 2008 at 23:16 and is filed under Uncategorized. You can follow any responses to this entry through the RSS 2.0 feed. You can leave a response or trackback from your own site.

Leave a Reply

You must be logged in to post a comment.