HTML for SET007A (SET007A001)

LANSA

HTML for SET007A (SET007A001)
<!-- Process : SET_007 WEB samples and examples -->
<!-- Function : SET007A Data Apportionment -->
<!-- Page : 001 -->

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

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

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

<HTML>

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

<RDML MERGE="&SCRIPT">

<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">

<INPUT NAME="ASTDRENTRY" TYPE="HIDDEN" SIZE="001" MAXLENGTH="001" VALUE="<RDML MERGE="STDRENTRY ">">
<INPUT NAME="PMAXCHAR " TYPE="HIDDEN" SIZE="005" MAXLENGTH="005" VALUE="<RDML MERGE="MAXCHAR ">">

<RDML COMPONENT="STDHEADER">

<CENTER><FONT FACE="Arial" COLOR="DARKBLUE"><H1>Data Apportionment</H1></FONT></CENTER>

<RDML MERGE="&MESSAGES">

<FONT SIZE="BASEFONT">
<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=3>
<TBODY>
<TR>
<TD COLSPAN="2"><RDML COMPONENT="S_007DESC"></TD>
</TR>
<TR>
<TD><STRONG>Originator</STRONG></TD>
<TD><INPUT NAME="LS_EMORG " TYPE="TEXT" SIZE="030" MAXLENGTH="040" VALUE="<RDML MERGE="S_EMORG ">" onFocus="SetNameLocation('LS_EMORG ',03,18)"></TD>
</TR>

<TR>
<TD><STRONG>Recipient</STRONG></TD>
<TD><INPUT NAME="LS_EMRCP " TYPE="TEXT" SIZE="030" MAXLENGTH="040" VALUE="<RDML MERGE="S_EMRCP ">" onFocus="SetNameLocation('LS_EMRCP ',04,18)"></TD>
</TR>

<TR>
<TD><STRONG>Subject</STRONG></TD>
<TD><INPUT NAME="LS_EMSBJ " TYPE="TEXT" SIZE="030" MAXLENGTH="040" VALUE="<RDML MERGE="S_EMSBJ ">" onFocus="SetNameLocation('LS_EMSBJ ',05,18)"></TD>
</TR>

<TR>
<TD><STRONG>Text</STRONG></TD>
<TD><RDML COMPONENT="S_007TX " MODE="I"></TD>
</TR>

<TR>
<TD></TD>
<TD><RDML COMPONENT="S_007SNDE "></TD>
</TR>

</TBODY>
</TABLE>
</FONT>

<BR>


<RDML MERGE="&BUTTONS">

</FORM>
</BODY>

</HTML>