LANSA for the WEB HTML for Function SET171A

LANSA

LANSA for the WEB HTML for Function SET171A


<!-- Process : SET_171 Web Calendar -->
<!-- Function : SET171A Web Calendar -->
<!-- Page : 001 -->

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

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

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

<HTML>

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

</HEAD>

<RDML MERGE="&SCRIPT">

<RDML COMPONENT="S_171ACALENDAR">

<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</H1></FONT></DIV>

<RDML MERGE="&MESSAGES">

<DIV ALIGN="CENTER">
<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=3>
<TR>
<TD><RDML COMPONENT="S_171ADESC"></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>Date in format <B>ddmmyy</B></TD>
<TD><IMG SRC="<RDML MERGE ="*LW3SETSPACER">" BORDER=0 width="10" height="2"></TD>
<TD><INPUT NAME="SDDMMYY" TYPE="TEXT" MAXLENGTH="008" <RDML MERGE="DDMMYY " EDITCODEI="Y"> onFocus="SetNameLocation('SDDMMYY ',03,18)"></TD>
<TD><IMG SRC="<RDML MERGE ="*LW3SETSPACER">" BORDER=0 width="10" height="2"></TD>
<TD><A HREF="JavaScript:createCalendar(160,170,443,351,4,'SDDMMYY')"><IMG SRC="<RDML MERGE="*LW3SETCALENDAR">" BORDER=0></A></TD>
</TR>

<TR>
<TD>Date in format <B>ddmmyyyy</B></TD>
<TD><IMG SRC="<RDML MERGE ="*LW3SETSPACER">" BORDER=0 width="10" height="2"></TD>
<TD><INPUT NAME="SDDMMYYYY" TYPE="TEXT" MAXLENGTH="010" <RDML MERGE="DDMMYYYY " EDITWORDI="' / / ' "> onFocus="SetNameLocation('SDDMMYYYY ',04,18)"></TD>
<TD><IMG SRC="<RDML MERGE ="*LW3SETSPACER">" BORDER=0 width="10" height="2"></TD>
<TD><A HREF="JavaScript:createCalendar(160,170,443,351,3, 'SDDMMYYYY')"><IMG SRC="<RDML MERGE ="*LW3SETCALENDAR">" ALT="Click here to open calendar and select a Date." BORDER=0></A></TD>
</TR>
</TR>
</TD>
</TABLE>
</TABLE>
</DIV>

<BR>

<RDML COMPONENT="STDFOOTER">

</FORM>
</BODY>

</HTML>