«as400»top **** START HTML
Content-type: text/html
Expires: Fri Jan 01 00:00:00 1999
X-XSS-Protection: 1;
«!doctype html»
«html»
«head»
«title»Our delivery times«/title»
«meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"»
«meta name="DOCUMENTCOUNTRYCODE" value="it"/»
«meta name="DOCUMENTLANGUAGECODE" value="EN"/»
«META NAME="ROBOTS" CONTENT="INDEX,NOFOLLOW"/»
«/head»
«body text="black" bgcolor="white" link="blue" vlink="blue" alink="blue"»
«as400»start
«table width="600" cellspacing="0" cellpadding="0"»
«tr»«td align=right»«font face="Helvetica,Helv,Arial,Sans-Serif"»
«a href="/cgidev2p/dspsrc.pgm?cgiinp01=cgidev2&cgiinp02=demohtml&cgiinp03=ctrdvy"
target="_blank"»Display
the HTML source of this page
«/font»
«/td»«/tr»
«tr»«td»«font face="Helvetica,Helv,Arial,Sans-Serif"»
«br»
«font color="blue"»
«h2»Ask for our delivery times«/h2»
«font size="-1"»
«form method=get action="/cgidev2p/ctrdvy.pgm"»
«input type=hidden name=request value=go»
Enter your name
«font face="courier" size="3"»
«input type=text name="yrname" size="15"
maxlength="100"»«/font»
and press
«input type=submit value=" Enter "»
«/form»
«/font»«/td»«/tr»
«/table»
«as400»go
«table width="600" cellspacing="0" cellpadding="0"»
«tr»«td align=right»«font face="Helvetica,Helv,Arial,Sans-Serif"»
«a href="/cgidev2p/dspsrc.pgm?cgiinp01=cgidev2&cgiinp02=demohtml&cgiinp03=ctrdvy"
target="_blank"»Display
the HTML source of this page
«/font»
«/td»«/tr»
«tr»«td align=right»«font face="Helvetica,Helv,Arial,Sans-Serif"»
«a href="/cgidev2p/dspsrc.pgm?cgiinp01=cgidev2&cgiinp02=qrpglesrc&cgiinp03=ctrdvy"
target="_blank"»Display
the RPG source of this program
«/font»
«/td»«/tr»
«tr»«td»«font face="Helvetica,Helv,Arial,Sans-Serif" color="blue"»
«h2»Our delivery times«/h2»
«/font»«/td»«/tr»
«tr»«td»«font face="Helvetica,Helv,Arial,Sans-Serif" size="-1"»
Hi «font color="red"»«b»/%YOURNAME%/«/b»«/font»!«br»
Here come our delivery times:«br»«br»
«/td»«/tr»
«/table»
«as400»none **** NO COUNTRIES
«font face="Helvetica,Helv,Arial,Sans-Serif" color="red"»
«b»No country available«/b»
«/font»
«as400»tabstr **** START TABLE
«table border=1»
«th»«/th»
«th align=left»«font face="Helvetica,Helv,Arial,Sans-Serif"»
«b»Country name«/b»«/font»«/th»
«th align=center»«font face="Helvetica,Helv,Arial,Sans-Serif"»
«b»Delivery time«br»(days)«/b»«/font»«/th»
«as400»tabrow **** TABLE ROW
«tr»«td align=right»«font face="Helvetica,Helv,Arial,Sans-Serif"»
/%SEQNO%/
«td»«font face="Helvetica,Helv,Arial,Sans-Serif"»
/%COUNTRY%/
«/font»«/td»
«td align=right»«font face="Helvetica,Helv,Arial,Sans-Serif"»
/%DELVDAYS%/
«/font»
«/td»«/tr»
«as400»tabend **** END TABLE
«tr»«td colspan=3 align=center bgcolor="#EFE4A7"»
«font face="Helvetica,Helv,Arial,Sans-Serif"»
«form name=form1 method=post action="/cgidev2p/ctrdvy.pgm"»
«input type=hidden name=request value=go»
«input type="hidden" name=yrname value="/%YOURNAME%/"»
«input type="hidden" name=linesinpage value="/%LINESINPAG%/"»
«br»
Position to
«font face=courier»
«input type="text" name=pos_to size=15 maxlength=15»
«/font»
«input type="submit" value=" Send "»
«/form»
«table width="100%"»
«tr»«td valign=top align=left»
«font face="Helvetica,Helv,Arial,Sans-Serif"»
«as400»pageup
«form name=form2 method=post action="/cgidev2p/ctrdvy.pgm"»
«input type=hidden name=request value=go»
«input type="hidden" name=yrname value="/%YOURNAME%/"»
«input type="hidden" name=lastcountry value="/%LASTCOUNTRY%/"»
«input type="hidden" name=lastseqno value="/%LASTSEQNO%/"»
«input type="hidden" name=linesinpage value="/%LINESINPAG%/"»
«input type="hidden" name=pageupdown value="pageup"»
«input type="submit" value=" Page up "»
«/form»
«as400»eopageup
«/td»
«td align=right»
«font face="Helvetica,Helv,Arial,Sans-Serif"»
«as400»pagedown
«form name=form3 method=post action="/cgidev2p/ctrdvy.pgm"»
«input type=hidden name=request value=go»
«input type="hidden" name=yrname value="/%YOURNAME%/"»
«input type="hidden" name=lastcountry value="/%LASTCOUNTRY%/"»
«input type="hidden" name=lastseqno value="/%LASTSEQNO%/"»
«input type="hidden" name=linesinpage value="/%LINESINPAG%/"»
«input type="hidden" name=pageupdown value="pagedown"»
«input type="submit" value=" Page down "»
«/form»
«as400»eopagedown
«/td»«/tr»
«/table»
«/font»
«/td»«/tr»
«/table»
«as400»runtime **** RESPONSE TIME
«table width="100%"»
«tr»«td align=right»
«font face="Arial" size="-1"»
/%RUNTIME%/ sec.s
«/td»«/tr»
«/table»
«as400»end **** END HTML
«/body»«/html»
|