[SOLVED] Javascript question ??

Okay, I hope this is an easy one for someone. I have been scouring the forum for an answer
and have not found one. I need to pass 4 parameters to an in line HTML form that will
populate an email form. I can only get the form to accept the first parameter(bcc).
I think that I don't have the code right in the Style Type to pass all of the parameters.
I have commented out some of my attempts that didn't work. Can someone please help ?
Thanks much


-* File acceptance_letter_manual_email.fex

DEFINE FILE MAALEMAIL_DATA
NEW_LINE/I3=
IF ARGLEN(2500, MAALEMAIL_DATA.SEG01.BCC, 'I5') GT 2450
THEN NEW_LINE + 1;
LINK_TEXT/A50V='CLICK HERE TO GENERATE EMAIL'|NEW_LINE;
from/A35V='KalamazooValleyCommunications';
subject/A50V='Welcome!  Important information you need to know.';
body/A2500V='This is a test';
END

  
TABLE FILE MAALEMAIL_DATA
SUM 
     MAALEMAIL_DATA.SEG01.LINK_TEXT AS ''
     MAALEMAIL_DATA.SEG01.BCC AS 'bcc'
     from 
     subject 
     body 
BY  MAALEMAIL_DATA.SEG01.NEW_LINE NOPRINT
ON TABLE SET PAGE-NUM OFF 
ON TABLE NOTOTAL
ON TABLE HOLD AS JAVATEMP FORMAT HTMTABLE
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
$
TYPE=REPORT,
     GRID=OFF,
$
TYPE=DATA,
     COLUMN=N2,
     COLOR='BLACK',
     JAVASCRIPT=showitem( bcc ), 
-*Attempts that didn't work ********************************************************
-*   JAVASCRIPT=showitem( bcc from subject body ), 
-*   JAVASCRIPT=showitem( bcc , from ,subject , body ),
-*   JAVASCRIPT=showitem( bcc \ from \ subject \ body ),
-*	 JAVASCRIPT=showitem( \ bcc \ ),   
-*	 JAVASCRIPT=showitem( \ from \ ),
-*	 JAVASCRIPT=showitem( \ subject \ ),
-*	 JAVASCRIPT=showitem( \ body    \ ),
-*******************************************************************************
$
ENDSTYLE
END
-RUN

-*-IF &LINES EQ 0 THEN GOTO NO_RECS
-*-ELSE GOTO KEEP_GOING;
 

-KEEP_GOING


-HTMLFORM BEGIN
<HTML>
<HEAD>
<SCRIPT LANGUAGE="JavaScript">
// This function will display the value in the text box
 
function doRegex(theType,theExp,theString,theReplace){if(theType=='m'){var re=new RegExp(theExp);var m=theString.match(re);if(m==null){return false}else{if(m[1]==null){return 1}else{return m[1]}}}if(theType=='s'){var re=new RegExp(theExp,"g");var res=theString.replace(re,theReplace);return(res);}alert('unknown regex type [m,s]: '+theType)}
 
function showitem(string1, string2, string3, string4) {
document.emailform.bcc.value = string1;
document.emailform.from.value = string2;
document.emailform.subject.value = string3;
document.emailform.body.value = string4;
document.emailform.submit();
}

 
function init(){
var thelinks=document.getElementsByTagName("a");
var theUltimateData = "";
 for (var i=0;i<thelinks.length;i++){
//   alert(thelinks[i].href );
   if(doRegex('m','^javascript:showitem',thelinks[i].href )) {
//   alert(thelinks[i].href );
 theData=doRegex('s','javascript:showitem\\(\'',thelinks[i].href,'');
//   alert(theData);
 theData=doRegex('s',',\'\\);',theData, '' );
 theUltimateData = theUltimateData + ', '+ theData; 
  }
  document.emailform.bcc.value = theUltimateData;
    }
 document.emailform.submit();
}
// End the hiding here

</SCRIPT>
</HEAD>
<BODY onload="init();">
<BODY onload="showitem(string1, string2, string3, string4);">
!IBI.FIL.JAVATEMP;
<HR>
<FORM NAME="emailform" method="post" action="https://www.kvcc.edu/form2mail_notemplate.php">
<INPUT TYPE="HIDDEN" NAME="bcc" value="">
<INPUT TYPE="HIDDEN" NAME="from" value="">
<INPUT TYPE="HIDDEN" NAME="subject" value="">
<INPUT TYPE="HIDDEN" NAME="body" value="">
<INPUT TYPE="HIDDEN" NAME="as" value="0" >
<INPUT TYPE="HIDDEN" NAME="to" value="{lou}">
 
 
<INPUT NAME="B1" TYPE=SUBMIT VALUE="HITME">
 
</FORM>
</BODY>
</HTML>
 
-HTMLFORM END

-GOTO FINISHED;


-NO_RECS

//Catches errors-if 'Send Email' button is pushed when there is no record(no email address to send to)
-HTMLFORM BEGIN
<HTML>
<HEAD>
<SCRIPT LANGUAGE="JavaScript">

function init(){
alert('There is no recipient email address.');
}


</SCRIPT>
</HEAD>
<BODY onload="init();">
!IBI.FIL.JAVATEMP;
<HR>

-HTMLFORM END

-FINISHED

This message has been edited. Last edited by: Kerry,

WebFOCUS Server 8.1.05
Windows 2008 Server
WebFOCUS AppStudio 8.1.05
Windows 7 Professional
IE 11 and Chrome Version 43.0.2357.124 m.
Mostly HTML, PDF, Excel, and AHTML

Posts: 272 | Location: Kalamazoo, Michigan | Registered: September 30, 2010

njsden

Virtuoso

posted