«as400»top
 Content-type: text/html
 Expires: 0
 X-XSS-Protection: 1;
 
 «!doctype html»
 «html»
 «head»«title»Sample subfile read-change«/title»
 «meta http-equiv="content-type" content="text/html; charset=iso-8859-1"/»
 
 «style type="text/css"»
    «!--
 body      {font-size: 12px; font-family: Arial,Helvetica,sans-serif,Verdana;}
 a         {font-weight: normal; font-size: 12px; font-family: Verdana,Arial,Helvetica,sans-serif; line-height: 18px;
            font-style: normal; background-color: #ffffff; color: #000000; text-decoration: none;}
 a:hover   {font-weight: bold; font-size: 12px; font-family: Verdana,Arial,Helvetica,sans-serif; line-height: 18px;
            font-style: normal; background-color: #16A22F; color: #ffffff; text-decoration: none;}
 .border4gold {padding-top: .04in;  padding-bottom: .04in; padding-right: .04in; padding-left: .04in;
               border-left: gold 2px solid; border-right: gold 2px solid; border-top: gold 2px solid;
               border-bottom: gold 2px solid; }
 p.title   {font-weight: bold; font-size: 22px; color: #003366; text-align: center; }
 td.small  {font-weight: normal; font-size: 9px; font-family: Verdana, Arial, Helvetica, sans-serif; }
 .buttons  {font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 10px; font-weight: bold;
            color: #003366; text-align: center; }
 .iform    {font-weight: normal; font-size: 11px; font-family: Courier;
            background-color: #faf890; }
    --»
 «/style»
 
 «/head»
 
 «body bgcolor="#ffffff" marginheight="2" marginwidth="2" topmargin="2" leftmargin="2"»
 
 «table cellspacing="0" cellpadding="0"»
 «tr»«td align=center»
         «table»
         «tr»«td align=center»
                 «a href="/cgidev2p/dspsrc.pgm?cgiinp01=cgidev2&cgiinp02=qddssrc&cgiinp03=iteminv"
                  target="_blank"»Display the DDS source of the Item Inventory file
                 «/td»«/tr»
         «tr»«td align=center»
                 «a href="/cgidev2p/dspsrc.pgm?cgiinp01=cgidev2&cgiinp02=demohtml&cgiinp03=readcsfl"
                  target="_blank"»Display the HTML source of this page
                 «/td»«/tr»
         «tr»«td align=center»
                 «a href="/cgidev2p/dspsrc.pgm?cgiinp01=cgidev2&cgiinp02=qrpglesrc&cgiinp03=readcsfl"
                  target="_blank"»Display the RPG source of this page
                 «/td»«/tr»
         «/table»
         «/td»«/tr»
 «tr»«td»
 
 «p» «/p»
 «p class=title»Sample subfile read-change«/p»
 
 «form name=form1 method=post»
 «input type=hidden name=request value=readc»
 «table»  «!--
 «tr»«td align=center colspan=4»
     «table class=border4gold»
     «tr»«td align=center»
          In this system, system value QDECFMT is "«b»/%qdecfmt%/«/b»" «br»
         which means«br»
         «i»/%qdecfmtx%/«/i»
         «/td»«/tr»
     «/table»
     «/td»«/tr»  --»
 «th align=left valign=bottom»Item«br»code«/th»
 «th align=left valign=bottom»Description«/th»
 «th align=left valign=bottom»Unit«br»price«/th»
 «th align=left valign=bottom»Quantity«/th»  «!--
 «tr»«td»«/td»«td»«/td»
     «td class=small»/%sample1%/«/td»
     «td class=small»/%sample2%/«/td»«/tr»   --»
 
 «as400»tabrow
 «tr»«td»«input type=hidden name=prvitmcod value="/%itmcod%/"»
         «input type=hidden name=prvitmdes value="/%itmdes%/"»
         «input type=hidden name=prvitmprc value="/%itmprc%/"»
         «input type=hidden name=prvitmqty value="/%itmqty%/"»
         «input class=iform type=text name=newitmcod size=5 maxlength=5 value="/%itmcod%/"»«/td»
     «td»«input class=iform type=text name=newitmdes size=30 maxlength=50 value="/%itmdes%/"»«/td»
     «td align=right»«input class=iform type=text name=newitmprc size=10 maxlength=10 value="/%itmprc%/"»«/td»
     «td align=right»«input class=iform type=text name=newitmqty size=9 maxlength=9 value="/%itmqty%/"»«/td»«/tr»
 «as400»newitem
 «tr»«td colspan=4»«b»New item:«/b»«/td»«/tr»
 «tr»«td»«input type=hidden name=prvitmcod»
         «input type=hidden name=prvitmdes»
         «input type=hidden name=prvitmprc»
         «input type=hidden name=prvitmqty»
         «input class=iform type=text name=newitmcod size=5 maxlength=5»«/td»
     «td»«input class=iform type=text name=newitmdes size=30 maxlength=50»«/td»
     «td align=right»«input class=iform type=text name=newitmprc size=10 maxlength=10»«/td»
     «td align=right»«input class=iform type=text name=newitmqty size=9 maxlength=9»«/td»«/tr»   «!--
 «tr»«td»«/td»«td»«/td»
     «td class=small»/%newsample1%/«/td»
     «td class=small»/%newsample2%/«/td»«/tr»  --»
 «tr»«td colspan=4 align=center»«br»
         «input type=submit class=buttons value="Send"»«/td»«/tr»
 «/table»
 
         «/td»«/tr»
 «/table»
 «/body»«/html»