function  fntblputhtm1( mtxnam1ref, mtxval1ref, cellfdref , reglfdref ) { var mtxnam1loc = fntrmall(mtxnam1ref); var mtxnam1len = mtxnam1loc.length; var mtxnam1vly = (mtxnam1len > 0 ); var mtxtes1vly = vln; mtxtes1vly = (mtxtes1vly && mtxnam1vly);
var mtxnam1frs =''; var rownmx =mtxval1ref.length; var rowuno =0; var rowlas =rownmx -1; var rowntl =rowlas -rowuno +1; var coluno =0; var collas =0; var colntl =1; var colnmx =1; var matlen =0; var rowidx = -1; var colidx = -1;
var cellfdloc = ''; if (cellfdref ) { cellfdloc = fntrmrig(cellfdref ); } var reglfdloc = ''; if (reglfdref ) { reglfdloc = fntrmrig(reglfdref ); } var celmatstr; var celstrloc; var regstrloc; var regstrlocbuf; var rowid_loc; var fn_out1loc;
colnmx = fnmtxdetcolnmx1(vln, mtxnam1loc, mtxval1ref ); collas = colnmx -1; fn_out1loc = ''; var tblid_loc =  ''; mtxnam1frs += fnmtxputnam1('lb1tbl02.js','fntblputhtm1', tblid_loc, mtxnam1ref, mtxval1ref, rowuno, rowlas, coluno, collas );
if (mtxtes1vly) { fnmsg1(vly, mtxnam1frs ); } fn_out1loc += mtxnam1frs; fn_out1loc +=lfdflostr; for (rowidx =rowuno; (rowidx < rownmx ); rowidx++ ) { regstrloc = ''; regstrlocbuf = ''; if (mtxtes1vly) { regstrlocbuf += '[row:' +rowidx +'={'; }
if (mtxtes1vly) { fnmsg1(vly, 'fntblputhtm1' + ':row:' +'[nmx=' +rownmx +';idx=' +rowidx +'];col:' +'[nmx=' +colnmx +';uno=' +coluno +';las=' +collas +'].' ); } for (colidx = coluno; (colidx < (collas +1 ) ); colidx++ ) { if (colnmx > 0 ) {
celmatstr = fnmtxcelgetval1(mtxval1ref, rowidx,colidx, colnmx ); } else { celmatstr = mtxval1ref[rowidx]; } if (mtxtes1vly) { fnmsg1(vly, 'fntblputhtm1' +'[row=' +rowidx +']' +'[col=' +colidx +'];celmat={' +celmatstr +'}.' ); } if (vln) {
celstrloc = fnstrans2htm1(celmatstr ); } else { celstrloc = celmatstr; } if (cellfdloc.length > 0 ) { celstrloc = ' ' +celstrloc; if ((cellfdloc ==',') && (colidx ==(colnmx -1) ) && (rowidx ==(rownmx -1) ) && (vly)) { celstrloc +=' '; } else {
celstrloc +=cellfdloc; } celstrloc +=lfdflostr; } regstrloc += celstrloc; regstrlocbuf += celstrloc; } if (mtxtes1vly) { regstrlocbuf += '}]'; } if (reglfdloc.length > 0 ) { regstrloc += reglfdloc; regstrlocbuf += reglfdloc; } if (mtxtes1vly) {
fnmsg1(vly, regstrlocbuf ); } regstrloc +=lfdflostr; fn_out1loc +=regstrloc; } fn_out1loc +=lfdflostr; if (mtxtes1vly) { fnmsg1(vly, fn_out1loc ); } return fn_out1loc; } function  fnmtxputhtm1( mtxnam1ref, mtxval1ref, tblclsref, tblstlref ) {
var mtxnam1loc = fntrmall(mtxnam1ref ); var mtxnam1len = mtxnam1loc.length; var rownmx =mtxval1ref.length; var rowuno =0; var rowlas =rownmx -1; var rowntl =rowlas -rowuno +1; var rowidx; var coluno =0; var collas =0; var colnmx =1; var colidx;
var rowid_loc = ''; var rowmatloc; var rowmattyp = ''; var rowtypchk = ''; var rowmatvly =vln; var celmatloc; var celmatstr; var fn_out1loc; var regstrloc; colnmx = fnmtxdetcolnmx1(vln, mtxnam1loc, mtxval1ref ); collas = colnmx -1;
fn_out1loc = ''; var tblid_loc =  ''; fn_out1loc += fnmtxputnam1('lb1tbl02.js','fnmtxputhtm1', tblid_loc, mtxnam1loc, mtxval1ref, rowuno, rowlas, coluno, collas ); var tblclsloc = ''; var tblclslen = 0; if (tblclsref ) {
tblclsloc = fntrmall(tblclsref ); tblclslen = tblclsloc.length; } var tblwidloc =  0; var tblwidstr = ''; var tblbrwloc =  0; var tblcpdloc =  0; var tblstlloc = ''; var tblstllen = 0; if (tblstlref ) { tblstlloc = fntrmall(tblstlref );
tblstllen = tblstlloc.length; if (tblstllen < 1 ) { tblstlloc += ' border= '      +'"1px"'; tblstlloc += ' bordercolor= ' +'"#cccccc"'; tblstlloc += ' cellpadding= ' +'"0px"'; } }
fn_out1loc += fnhtmtbl_tagtbl1(tblid_loc,tblclsloc, tblwidstr,tblbrwloc,tblcpdloc, tblstlloc ); fn_out1loc +='<tbody>'; fn_out1loc +=lfdflostr; fn_out1loc +=lfdflostr; for (rowidx =rowuno; (rowidx < rownmx ); rowidx++ ) { regstrloc = '<tr>';
for (colidx =coluno; (colidx < (collas+1) ); colidx++ ) { celmatstr =fnmtxcelgetval1(mtxval1ref, rowidx,colidx, colnmx ); if (vly) { regstrloc += '<td>'; regstrloc += celmatstr; regstrloc += '</td>'; regstrloc += lfdflostr; } }
regstrloc += '</tr>'; regstrloc +=lfdflostr; regstrloc +=lfdflostr; fn_out1loc +=regstrloc; } fn_out1loc += '</tbody>'; fn_out1loc +=lfdflostr; fn_out1loc +=lfdflostr; fn_out1loc += '</table>'; fn_out1loc +=lfdflostr; fn_out1loc +=lfdflostr;
return fn_out1loc; } function  fnmtxputhtm2( mtxnam1ref, mtxval1ref, rowuno, rowlas, coluno, collas, colnmx, tblclsref, tblstlref, td1stlref ) { var mtxnam1loc = fntrmall(mtxnam1ref); var mtxnam1len = mtxnam1loc.length;
var rownmx =mtxval1ref.length; var rowntl =rowlas -rowuno +1; var rowidx; var colidx; var td1bgnstr =''; var td1finstr =''; var td1bgnstr ='<td>'; if (td1stlref.length > 0 ) { td1bgnstr ='<td style="' +td1stlref +'">'; } td1finstr ='</td>';
var celmatstr; var regstrloc; var fn_out1loc =''; var tblid_loc = ''; var tblid_loc = 'table-id'; fn_out1loc += fnmtxputnam1('lb1tbl02.js','fnmtxputhtm2', tblid_loc, mtxnam1loc, mtxval1ref, rowuno, rowlas, coluno, collas ); var tblclsloc = '';
var tblclslen = 0; if (tblclsref ) { tblclsloc = fntrmall(tblclsref); tblclslen = tblclsloc.length; } var tblwidloc =  0; var tblwidstr = ''; var tblbrwloc =  0; var tblcpdloc =  0; var tblstlloc = ''; var tblstllen = 0; if (tblstlref ) {
tblstlloc = fntrmall(tblstlref ); tblstllen = tblstlloc.length; if (tblstllen < 1 ) { if (vln) { tblstlloc += ' border='       +'"1px"'; tblstlloc += ' bordercolor='  +'"#000000"'; tblstlloc += ' cellpadding='  +'"0px"'; } if (vly) {
tblstlloc += ' table-layout:fixed;'
tblstlloc += ' border-collapse:collapse;'; } if (vln) { tblstlloc += ' width:'                 +tblwidloc +'px; border-width:'          +tblbrwloc +'px; border-color:'          +tblbrcloc +'; border-style:'          +tblbrsloc +';'
+' background-color:'      +tblbgcloc +'; padding:'               +tblpdgloc +'px;'; } } } fn_out1loc += fnhtmtbl_tagtbl1(tblid_loc,tblclsloc, tblwidstr,tblbrwloc,tblcpdloc, tblstlloc ); fn_out1loc +='<tbody>'; fn_out1loc +=lfdflostr;
fn_out1loc +=lfdflostr; for (rowidx =rowuno; (rowidx < rownmx ); rowidx++ ) { regstrloc ='<tr>'; for (colidx =coluno; (colidx < (collas+1) ); colidx++ ) { celmatstr = fnmtxcelgetval1(mtxval1ref, rowidx,colidx, colnmx ); if (vly) {
if (celmatstr.substr(0,3) != '<td' ) { regstrloc += td1bgnstr; } regstrloc += lfdflostr; regstrloc += ' '; regstrloc += celmatstr; if (celmatstr.substr(0,3) != '<td' ) { regstrloc += td1finstr; } regstrloc += lfdflostr; } } regstrloc +='</tr>';
regstrloc +=lfdflostr; regstrloc +=lfdflostr; fn_out1loc +=regstrloc; } fn_out1loc +='</tbody>'; fn_out1loc +=lfdflostr; fn_out1loc +=lfdflostr; fn_out1loc +='</table>'; fn_out1loc +=lfdflostr; fn_out1loc +=lfdflostr; return fn_out1loc; }
function  fnmtxputhtm3( mtxnam1ref, mtxval1ref, rowuno, rowlas, coluno, collas, colnmx, tblid_ref, tblclsref, tblwidref, tblbrwref, tblcpdref, tblstlref  ) { var mtxnam1loc = fntrmall(mtxnam1ref); var mtxnam1len = mtxnam1loc.length;
var rownmx =mtxval1ref.length; var rowntl =rowlas -rowuno +1; var rowidx; var colidx; var celmatstr; var regstrloc; var fn_out1loc; fn_out1loc ='';
fn_out1loc += fnmtxputnam1('lb1tbl02.','fnmtxputhtm3', tblid_ref, mtxnam1ref, mtxval1ref, rowuno, rowlas, coluno, collas ); var tblwidstr = tblwidref +'px';
fn_out1loc += fnhtmtbl_tagtbl1(tblid_ref,tblclsref, tblwidstr,tblbrwref,tblcpdref, tblstlref ); fn_out1loc +='<tbody>'; fn_out1loc +=lfdflostr; fn_out1loc +=lfdflostr; for (rowidx =rowuno; (rowidx < (rowlas+1) ); rowidx++ ) { regstrloc ='<tr>';
for (colidx =coluno; (colidx < (collas+1) ); colidx++ ) { celmatstr = fnmtxcelgetval1(mtxval1ref, rowidx,colidx, colnmx ); if (!fnvalmatver(celmatstr,fnvaltypstr1(celmatstr) ) ) { celmatstr ='&nbsp;'; } if (vly) { regstrloc += '<td>';
regstrloc += celmatstr; regstrloc += '</td>'; } } regstrloc +='</tr>'; regstrloc +=lfdflostr; regstrloc +=lfdflostr; fn_out1loc +=regstrloc; } fn_out1loc +='</tbody>'; fn_out1loc +=lfdflostr; fn_out1loc +=lfdflostr; fn_out1loc +='</table>';
fn_out1loc +=lfdflostr; fn_out1loc +=lfdflostr; return fn_out1loc; } function  fnimg1puttblhtm1( tagimgpthref, tagimgfliref, tagimgaltref, tagimgwidref, tagimghgtref, tagimgsclref, tagimgcmtref ) { var fn_out1loc =''; var rowuno = 0;
var rowlas = 0; var rownmx = 1; var coluno = 0; var collas = 0; var colnmx = 1; var tagimgsrcloc = ''; var tagimgaltloc = ''; var tagimgwidloc = ''; var tagimghgtloc = ''; var tagimgstlloc = ''; var tagimgstlloc = '';
var tagimgpthloc =tagimgpthref; var tagimgfliloc =tagimgfliref; var tagimgsrcloc = tagimgpthloc +tagimgfliloc; var tagimgaltloc =tagimgaltref; var tagimgwidloc =tagimgwidref; var tagimghgtloc =tagimghgtref; var tagimgsclloc =tagimgsclref;
var tagimgalhloc ='center'; var celimgmghloc ='0'; var celimgmgvloc ='0'; var celimgbrsloc ='none'; var celimgbrwloc ='0'; var celimgbrcloc ='none'; var tblwidloc = 650; var tblbrwloc = 1; var tblbrsloc = 'solid'; var tblbrcloc = '#000000'
var tblbgcloc = '#cccccc'; var tblpdgloc = 0; var celbgcloc = tblbgcloc; var celfszloc = 12; var celpdgloc = 12; var tblclsloc =''; tblclsloc ='table-class'; var tblstlloc =''; if (vly) { tblstlloc =' table-layout:'          +'fixed'    +';'
+' width:'                 +tblwidloc  +'px;' +lfdflostr +' border-width:'          +tblbrwloc  +'px; border-style:'          +tblbrsloc  +'; border-color:'          +tblbrcloc  +'; border-collapse:'       +'collapse' +';'; }
var celbgcloc = tblbgcloc; var celstlloc =''; if (vly) { celstlloc =' background-color:'      +celbgcloc  +'; font-size:'             +celfszloc  +'px; padding:'               +celpdgloc  +'px;'; } var tagimghtmloc = ''; tagimghtmloc =
fnimg1puttaghtm1( tagimgsrcloc, tagimgaltloc, tagimgwidloc, tagimghgtloc, tagimgsclloc, tagimgalhloc, celimgmghloc, celimgmgvloc, celimgbrsloc, celimgbrwloc, celimgbrcloc ); var tagimgcmtloc = ''; tagimgcmtloc = fntrmall(tagimgcmtref );
var mtximg1loc = []; mtximg1loc.push(tagimghtmloc ); if (tagimgcmtloc.length > 0 ) { mtximg1loc.push(tagimgcmtloc ); } rownmx = mtximg1loc.length; rowlas = rownmx -1; fn_out1loc = fnmtxputhtm2( fnstrputcnd1(vln, 'mtximg1loc' ), mtximg1loc,
rowuno, rowlas, coluno, collas, colnmx, tblclsloc, tblstlloc, celstlloc ); return fn_out1loc; } function  fnimg1puttblhtm2( tagimg1pthref, tagimg1fliref, tagimg1altref, tagimg1widref, tagimg1hgtref, tagimg1sclref, tagimg1cmtref, tagimg2pthref,
tagimg2fliref, tagimg2altref, tagimg2widref, tagimg2hgtref, tagimg2sclref, tagimg2cmtref ) { var fn_out1loc =''; var rowuno = 0; var rowlas = 0; var rownmx = 1; var coluno = 0; var collas = 0; var colnmx = 1; if (tagimg2fliref ) { colnmx = 2; }
var tblwidloc = 0; var tblbrwloc = 0; var tblbrsloc = ''; var tblbrcloc = ''; var tblbgcloc = ''; var tblpdgloc = 0; if (vly) { if (colnmx == 1 ) { tblwidloc = 325; } else if (colnmx == 2 ) { tblwidloc = 650; } tblbrwloc = 0; tblbrsloc = 'none';
tblbrcloc = 'none'; tblbgcloc = 'transparent'; } else { tblwidloc = 850; tblbrwloc = 1; tblbrsloc = 'solid'; tblbrcloc = '#000000'
tblbgcloc = '#cccccc'; } var tblclsloc =''; tblclsloc = 'table-class'; var tblstlloc =''; if (vly) { tblstlloc =' table-layout:'          +'fixed'    +'; width:'                 +tblwidloc  +'px;' +lfdflostr
+' border-width:'          +tblbrwloc  +'px; border-style:'          +tblbrsloc  +'; border-color:'          +tblbrcloc  +'; border-collapse:'       +'collapse' +';'; } var celstlloc =''; var celimgstlloc =''; var celcmtstlloc ='';
var celimgmghloc ='0'; var celimgmgvloc ='0'; var celimgbrsloc ='none'; var celimgbrwloc ='0'; var celimgbrcloc ='none'; var celimgbgcloc = tblbgcloc; var celimgalhloc ='left'; var celimgalvloc ='bottom'; var celimgpdgloc = 12;
var celimgfszloc = 12; if (vly) { celimgstlloc =' background-color:'      +celimgbgcloc  +'; padding:'               +celimgpdgloc  +'px; text-align:'            +celimgalhloc  +'; vertical-align:'        +celimgalvloc  +';';
celimgstlloc =' style="' +celimgstlloc +'"'; } var celcmtbgcloc = tblbgcloc; var celcmtalhloc = 'left'; var celcmtalvloc = 'top'; var celcmtpdgloc = 12; var celcmtfszloc = 12; if (vly) { celcmtstlloc =''
+' background-color:'      +celcmtbgcloc  +'; padding:'               +celcmtpdgloc  +'px; text-align:'            +celcmtalhloc  +'; vertical-align:'        +celcmtalvloc  +'; font-size:'             +celcmtfszloc  +'px;';
celcmtstlloc = ' style="' +celcmtstlloc +'"'; } var tagimgstlloc = ''; var tagimg_alhloc =''; var tagimg_alvloc =''; tagimg_alhloc ='right'; tagimg_alvloc ='bottom'; var colimg_loc = []; var rowimg_loc = []; var rowcmt_loc = [];
var mtximg_loc = []; var tagimg_htmloc = ''; var tagimg_pthloc =''; var tagimg_fliloc =''; var tagimg_srcloc =''; var tagimg_cmtloc = ''; var colidx = -1; while (colidx < (colnmx -1 ) ) { colidx += 1; if (colidx == 0 ) {
tagimg_pthloc = tagimg1pthref; tagimg_fliloc = fntrmall(tagimg1fliref ); tagimg_srcloc = tagimg_pthloc +tagimg_fliloc; tagimg_htmloc = fnimg1puttaghtm3( tagimg_srcloc, tagimg1altref, tagimg1widref, tagimg1hgtref, tagimg1sclref, tagimg_alhloc,
tagimg_alvloc ); tagimg_cmtloc = tagimg1cmtref; if (tagimg2fliref ) { tagimg_pthloc = tagimg2pthref; tagimg_fliloc = fntrmall(tagimg2fliref ); if (tagimg_fliloc.length > 0 ) { collas += 1; colnmx += 1; } } } else if (colidx > 0 ) {
tagimg_srcloc = tagimg_pthloc +tagimg_fliloc; tagimg_htmloc = fnimg1puttaghtm3( tagimg_srcloc, tagimg2altref, tagimg2widref, tagimg2hgtref, tagimg2sclref, tagimg_alhloc, tagimg_alvloc ); tagimg_cmtloc = tagimg2cmtref; }
if (celimgstlloc.length > 0 ) { tagimg_htmloc = '<td' +celimgstlloc +'>' +lfdflostr +tagimg_htmloc +lfdflostr +'</td>'; } rowimg_loc.push(tagimg_htmloc ); rowcmt_loc.push(' '           ); tagimg_cmtloc = fntrmlef(tagimg_cmtloc )
if (tagimg_cmtloc.length > 0 ) { if (celcmtstlloc.length > 0 ) { tagimg_cmtloc = '<td' +celcmtstlloc +'>' +lfdflostr +tagimg_cmtloc +lfdflostr +'</td>'; } rowcmt_loc[colidx ] = tagimg_cmtloc +lfdflostr; } } var mtximg_loc = [];
var mtxcmt_loc = []; var rowidx = -1; while (rowidx < (rownmx -1 ) ) { rowidx += 1; if (colnmx == 1 ) { mtximg_loc[rowidx +0] = rowimg_loc[0]; mtximg_loc[rowidx +1] = rowcmt_loc[0]; } else if (colnmx > 1 ) { mtximg_loc[rowidx +0] = [];
mtximg_loc[rowidx +1] = []; mtximg_loc[rowidx +0] = rowimg_loc; mtximg_loc[rowidx +1] = rowcmt_loc; } } rownmx = mtximg_loc.length; rowlas = rownmx -1; fn_out1loc = fnmtxputhtm2( fnstrputcnd1(vln, 'mtximg_loc' ), mtximg_loc, rowuno, rowlas,
coluno, collas, colnmx, tblclsloc, tblstlloc, celimgstlloc ); return fn_out1loc; } function fnimg1puttaghtm3( tagimgsrcref, tagimgaltref, tagimgwidref, tagimghgtref, tagimgsclref, tagimgalhref, tagimgalvref ) { var fn_out1loc = '';
var tagimgalhloc =tagimgalhref; var tagimgalvloc =tagimgalvref; var tagimgsltloc =''; tagimgstlloc ='text-align:'      +tagimgalhref +';vertical-align:'  +tagimgalvref +';'; var tagimgwidloc =tagimgwidref; var tagimghgtloc =tagimghgtref;
var tagimgsclloc =tagimgsclref; if (tagimgsclloc) { if (tagimgsclloc > 0.0 ) { tagimgwidloc =tagimgsclloc *tagimgwidloc; tagimghgtloc =tagimgsclloc *tagimghgtloc; tagimgwidloc =Math.round(tagimgwidloc *100) /100;
tagimghgtloc =Math.round(tagimghgtloc *100) /100; } } fn_out1loc = '<img src="'         +tagimgsrcref +'"' +lfdflostr +' alt="'         +tagimgaltref +'"' +lfdflostr +' width="'       +tagimgwidloc +'px" height="'      +tagimghgtloc +'px" />'
+lfdflostr; if (vln) { fn_out1loc = '<div width="'       +'100%'       +'"' +lfdflostr +' align="'       +tagimgalhloc +'" valign="'      +tagimgalvloc +'"' +lfdflostr +' style="'       +tagimgstlloc +'" />' +lfdflostr +fn_out1loc +'</div>'
+lfdflostr; } return fn_out1loc; }

