function SelectAll(theForm,theSelect,state){
   var selObject = document.forms[theForm].elements[theSelect];
   var selCount  = selObject.length;

   for (var i = 0; i < selCount; i++) {
      selObject.options[i].selected = state; }
   return true;
}

function ListPopUp(MyId,Table,IdFld,DescFld,Sidstr)
{
   var MyUrl = 'std/popuplist.php?table=' + Table +'&idfld=' + IdFld + '&descfld=' + DescFld + '&elementid=' + MyId + '&' + Sidstr;
   window.open (MyUrl, 'Lista','alwaysRaised=1, toolbar=0, scrollbars=0, location=0,statusbar=0, menubar=0, resizable=0, width=500,height=700');
}

function ListPopUpSelect(MyId,MyValue,MyText)
{
   window.opener.document.getElementById(MyId).value = MyValue;
   window.opener.document.getElementById(MyId + "_text").value = MyText;
   window.close();
}

function TogleLayer(MyLayer,Event)
{
   x = Event.clientX;
   y = Event.clientY;
   Layer = document.getElementById(MyLayer)
   Layer.style.top = y + 10;
   Layer.style.left = x + 10;
   if (Layer.style.visibility == 'visible'){
      Layer.style.visibility = 'hidden'
   }
   else{
      Layer.style.visibility = 'visible'
   }
}

function TogleLayerPos(MyLayer,x,y)
{
   Layer = document.getElementById(MyLayer)
   Layer.style.top = y;
   Layer.style.left = x;
   if (Layer.style.visibility == 'visible'){
      Layer.style.visibility = 'hidden'
   }
   else{
      Layer.style.visibility = 'visible'
   }
}

function IEFix(MyLayer)
{
   Layer = document.getElementById(MyLayer)
   Layer.style.zIndex = -1;
}

function MoveLayer(MyLayer,x,y)
{
   Layer = document.getElementById(MyLayer)
   Layer.style.top = y;
   Layer.style.left = x;
}

function HideLayer(MyLayer)
{
   document.getElementById(MyLayer).style.visibility='hidden';
}

function MM_findObj(n, d) { //v4.01
   var p,i,x;  
   if(!d) d=document; 
   if((p=n.indexOf("?"))>0&&parent.frames.length) {
      d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);
   }
   if(!(x=d[n])&&d.all) x=d.all[n]; 
   for (i=0;!x&&i<d.forms.length;i++) 
      x=d.forms[i][n];
   for(i=0;!x&&d.layers&&i<d.layers.length;i++) 
      x=MM_findObj(n,d.layers[i].document);
   if(!x && d.getElementById) 
      x=d.getElementById(n); 
   return x;
}

function MM_swapImage() { //v3.0
   var i,j=0,x,a=MM_swapImage.arguments; 
   document.MM_sr = new Array; 
   for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){
      document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];
      }
}

function VerifyAsg(tpago,mmax,fid)
{
   var xasg, MyForm, MyFld, fld, tasg = 0.0;
   
   xasg = document.getElementById('montoxasg');
   MyForm = document.getElementById('asgform');
   MyFld = document.getElementById(fid);
   if (((+MyFld.value) > mmax) || ((+MyFld.value) > (+xasg.value))){
      MyFld.value = 0;
      alert('Monto Incorrecto');
      return 0;
   }
   for(var i = 0; i < MyForm.length; i++){
      if (MyForm.elements[i].id.indexOf('emb_') != -1){
         tasg = tasg + (+MyForm.elements[i].value);
      }
   }
   if ((tpago - tasg) < 0){
      MyFld.value = 0;
      alert('Monto Incorrecto');
      return 0;
   }
   xasg.value = tpago - tasg;
}

function AsgMax(mmax,fid)
{
   var xasg, masg;
   
   xasg = document.getElementById('montoxasg');
   if (mmax > xasg.value)
      masg = xasg.value;
   else
      masg = mmax;
   MyFld = document.getElementById(fid);
   MyFld.value = masg;
   xasg.value = xasg.value - masg;
   return;   
}

function ChkAsg(tpago)
{
   var MyForm, tasg = 0.0;
   
   MyForm = document.getElementById('asgform');
   for(var i = 0; i < MyForm.length; i++){
      if (MyForm.elements[i].id.indexOf('emb_') != -1){
         tasg = tasg + (+MyForm.elements[i].value);
      }
   }
   if ((tasg - tpago) != 0){
      alert('Asignación Incorrecta');
      return false;
   }
   else
      return true;
}