SUBROUTINE INSERTITEM
INCLUDE #RW.INCLUDE.DEFS FROM /SYSFILES/REALWEB,BP
EQU LF TO CHAR(10)
CALL RW_START_HTML_PAGE("INSERTITEM", "", "", "", "")
CALL RW_START_HTML_FORM("HELLO", "FORM1", "")
CALL RW_INSERT_ITEM("REALWEB-ITEMS", "verify.js", RWD_JAVASCRIPT)
CALL RW_START_PARA("", "")
CALL RW_PUT("Name: ")
CALL RW_EDIT_BOX("NAME", 30, "")
CALL RW_END_PARA
CALL RW_START_PARA("", "")
CALL RW_PUT("Age: ")
CALL RW_EDIT_BOX("AGE", 10, "")
CALL RW_END_PARA
CALL RW_START_PARA("", "")
CALL RW_SUBMIT_BUTTON("Submit", 'onClick="return verify();"')
CALL RW_END_PARA
CALL RW_END_FORM
CALL RW_END_PAGE
RETURN
HTML
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<HTML>
<HEAD>
<META NAME="Generator" CONTENT="Reality">
<TITLE>INSERTITEM</TITLE>
<SCRIPT LANGUAGE="JavaScript" TYPE="text/javascript">
function verify() {
/* NAME Editbox: check not empty, and that only contains letters,
spaces and hyphens. Strip off leading and trailing spaces.
AGE Editbox: check contains only digits with no leading zero. */
var msg = "";
var pattern;
// Check for empty fields.
if (document.FORM1.NAME.value == "")
msg += "The Name field is empty.\n";
if (document.FORM1.AGE.value == "")
msg += "The Age field is empty.\n";
if (msg == "") {
// Check that the Name is valid.
pattern = /^[\- a-z]+$/i;
if (!pattern.test(document.FORM1.NAME.value))
msg += "Name is invalid.\n";
// Check that the Age is valid.
pattern = /^[1-9]\d{0,2}$/i;
if (!pattern.test(document.FORM1.AGE.value))
msg += "Age is invalid.\n";
}
if (msg != "") {
alert(msg);
return false;
}
else
return true;
}
</SCRIPT>
</HEAD>
<BODY>
<FORM ACTION="HELLO" NAME="FORM1" METHOD="POST">
<P>
Name:
<INPUT NAME="NAME" SIZE="30" TYPE="TEXT">
</P>
<P>
Age:
<INPUT NAME="AGE" SIZE="10" TYPE="TEXT">
</P>
<P>
<INPUT TYPE="submit" onClick="return verify();" VALUE="Submit">
</P>
</FORM>
</BODY>
</HTML>
NEC welcomes your feedback on our documentation.
If you have any comments about the current Reality Help, or want something to be added in a future revision, please contact your NEC Helpdesk.
If your comment relates to this particular Help topic, remember to include the following information:
|
Product:
|
RealityVersion 15.6
|
|
Help revision:
|
Revision 0
|
|
Help topic:
|
INSERTITEM Example (RealWeb)
|
|
File name:
|
INSERTITEM2.htm
|