/***************************************************************************** * ITSCommonLibrary.js * ***************************************************************************** * Release 4.0 (Lotus Domino 5/6) * * Created by Dwight Egerton * * Last modified 22 January 2003 by Dwight Egerton * * * * Description: * * Code for common functions for all Web applications * * * ***************************************************************************** * IT Software Series * * (c)Copyright 2002, Xybanetx Consulting * ***************************************************************************** ***************************************************************************** * * *****************************************************************************/ function openWIN(linkURL,r,s,w,h,l,t){ if(l==null) l=(screen.width/2)-(w/2); if(t==null) t=(screen.height/2)-(h/2)-50; //if(win!='undefined') if(win&&!win.closed) win.close(); p='resizable=' +r+ ',scrollbars=' +s+ ',status=1,width=' +w+ ',height=' +h+ ',left=' +l+ ',top=' +t; return window.open(linkURL,'',p) } function setFOCUS(fld) { fld= eval("form." +fld); if(typeof(fld)!='undefined'){ if(!fld.isDisabled){ fld.focus(); if(fld.isTextEdit) fld.select(); } } } function submitFORM(rFlds,cFlds) { var txt=''; if(typeof(rFlds)!='undefined'){ for(x=0;x'; obj.writeIt(txt); } } function writeITEM(x){ txt=''; obj=eval('DDsp' +x+(0)+ 'Object'); fObj=eval('form.DFld' +x+(1)); if(typeof(fObj)!='undefined'){ fObj=fObj.value.split(';'); for(i=0;i
'; obj.writeIt(txt); } } function checkNUM(fld){ validCHR="0123456789."; chk=false; for(i=0;i