LANSA for the WEB HTML for Function SET171B

LANSA

LANSA for the WEB HTML for Function SET171B
<!-- Process : SET_171 Web Calendars -->
<!-- Function : SET171B Web Calendar, Start and End Date -->
<!-- Page : 001 -->

<!-- Generated by - LANSA -->
<!-- Created by user - SETUSER -->
<!-- Time and Date - 135031050500 -->

<!-- RDML function sequence number - 0023 -->

<!-- This is a *WEBEVENT function -->

<HTML>

<HEAD>
<RDML MERGE="&STYLE">
<TITLE><RDML MERGE="&FUNCTION"> </TITLE>
</HEAD>

<RDML MERGE="&SCRIPT">

<RDML COMPONENT="S_171BCALENDAR">

<BODY BGCOLOR="<RDML MERGE="*LW3CLNTCOLOR">" BACKGROUND="<RDML MERGE="*LW3CLNTBKGND">" <RDML COMPONENT="FORMINIT">>

<FORM METHOD="POST" NAME="LANSA" ACTION="/<RDML MERGE="&CGI">/LANSAWEB?WEBEVENT+<RDML MERGE="&SESSPL">">

<RDML MERGE="&HIDDEN">

<RDML COMPONENT="STDHEADER">

<DIV align="center"> <FONT FACE="Arial" COLOR="DARKBLUE"><H1>Web Calendar returning Start and End Date</H1></FONT></DIV>

<RDML MERGE="&MESSAGES">

<DIV ALIGN="CENTER">

<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=3>
<TR>
<TD><RDML COMPONENT="S_171BDESC"></TD>
</TR>

<TR>
<TD><IMG SRC="<RDML MERGE ="*LW3SETSPACER">" BORDER=0 width="10" height="15"></TD>
</TR>
<TR>
<TD><TABLE BORDER=0 CELLPADDING=0 CELLSPACING=3>

<TR>
<TD>Start Date</TD>
<TD><IMG SRC="<RDML MERGE ="*LW3SETSPACER">" BORDER=0 width="10" height="2"></TD>
<TD><INPUT NAME="SSTARTDATE" TYPE="TEXT" MAXLENGTH="008" <RDML MERGE="STARTDATE" EDITCODEI="Y">></TD>
</TR>

<TR>
<TD>End Date</TD>
<TD><IMG SRC="<RDML MERGE ="*LW3SETSPACER">" BORDER=0 width="10" height="2"></TD>
<TD><INPUT NAME="STERMDATE" TYPE="TEXT" MAXLENGTH="008" VALUE=""></TD>
</TR>
<TR>
<TD><IMG SRC="<RDML MERGE ="*LW3SETSPACER">" BORDER=0 width="10" height="2"></TD>
</TR>
<TR>
<TD><A HREF="JavaScript:createCalendar(160,170,443,351,4, 'SSTARTDATE',4, 'STERMDATE')"><IMG SRC="<RDML MERGE ="*LW3SETCALENDAR">" ALT="Select a Start and End Date." BORDER=0></A></TD>
</TR>
</TD>
</TABLE>
</TABLE>
</DIV>

<BR>

<RDML COMPONENT="STDFOOTER">

</FORM>
</BODY>

</HTML>