﻿//JScript File
var _sede_activa="";
var _lastEffect="";
var oSelectedImage;
var bPoped=false;
var iSeq = 0;
var iTimeOut = 0;
var keyStr = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=";
var LastDiv;
var LastClick = "";
var LastDivFloat = "";
var ID_RECORD_SELECTED = 0;
var BROWSER_ROW_SELECTED;
var LastBorderColorObj;
var iLastDynsSelected = -1;
var ifirstTurnoSel = 0;
var _wH=0;
var _wW=0;
var _divW=0;
var _divH=0;
var _maxH=0;
var _maxW=0;
var contW=0;
var contH=0;     
var contL=0;
var contT=0;     
var offsetX=0;
var offsetY=0;
var iOpacity=1;
var imagenPACSActual=0;
var bPlayingPACS=false;
var idTimerPACS;
var iLastImagenPACS=0;
var _lastDivPACS="";
var _lastStudyUID="";
var _lastSerieUID="";
var bResize=false;
var _modo_agenda_activo="";

function wheel(event)
{
	try
	{
	   var delta=0;
	   if(!event){event=window.event};
	   if(event.wheelDelta){delta=(event.wheelDelta/120);if(window.opera){delta=-delta;}}
       else if(event.detail){delta=(-event.detail/3);}
	   if(delta){funcWheel(delta);if(event.preventDefault){event.preventDefault();}event.returnValue=false;}
	}catch(rex){}
}
if(window.addEventListener){window.addEventListener('DOMMouseScroll',wheel,false);}else{window.onmousewheel=document.onmousewheel=wheel;}

function SetRelativePositions(_id_div){_wH=($(window).height()*1);_wW=($(window).width()*1);_divW=$('#'+_id_div).css('width').replace('px','')*1;_divH=$('#'+_id_div).css('height').replace('px','')*1;}
function preventEnterDefault(_selector){$(_selector).keydown(function(e){if(e.which==13){e.preventDefault();}});}
function getWaiter(simage){return "<table style='width:100%;height:100%;'><tr><td align='center' valign='middle'><img src='" + simage + "' border='0'></td></tr></table>";} 
function AjaxExec(surl,sdata){return $.ajax({type:'POST',async:false,url:surl,data:sdata}).responseText;}
function AjaxSimpleSync(starget,surl,sdata){$(starget).html($.ajax({type:'POST',async:false,url:surl,data:sdata}).responseText);}
function AjaxSimpleASync(iwait,starget,surl,sdata){if(iwait!=''){$(starget).html(getWaiter(iwait));}$.ajax({type:'POST',async:true,url:surl,data:sdata,success:function(data){$(starget).html(data);}});}
function AjaxImgASync(iwait,starget,surl,sdata){if(iwait!=''){$(starget).attr("src",iwait);}$.ajax({type:'POST',async:true,url:surl,data:sdata,success:function(data){$(starget).attr("src",data);}});}
function VerOrdenPago(_id_op){SubmitToURL('___proc_liquidaciones.aspx?id_op='+_id_op,'_self');}
function ToggleTD(sTd){$('td[id*='+sTd+']').toggle();}
function pdfLiquidacionPreviaOrdenPago()
{
   $('.hdbl').hide();
   ToolbarDoReport('../___windows_loader_file_contents.aspx?orientacion=1&tipo=grilla','_blank');
   $('.hdbl').show('fade');
}

function pdfOrdenPago(){$('.hdbl').hide();ToolbarDoReport('../___windows_loader_file_contents.aspx?orientacion=1&tipo=grilla','_blank');$('.hdbl').show('fade');}
function strLeft(str,n){if(n<=0){return "";}else if(n>String(str).length){return str;}else{return String(str).substring(0,n);}} 
function strRight(str,n){if(n<=0){return "";}else if (n>String(str).length){return str;}else{var iLen=String(str).length;return String(str).substring(iLen, iLen - n);}}
function SetInner(sObj,sInner){sInner=replaceChars(sInner,"_"," ");attach(sObj).innerHTML = sInner;}
function WindowsOpenDialog(sUrl,iHeight,iWidth){var WinSettings="center:yes;resizable:no;dialogHeight:"+iHeight+"px;dialogWidth:"+iWidth+"px;";var MyArgs=window.showModalDialog(sUrl,MyArgs,WinSettings);return MyArgs;}
function FullExpandObject(sTarget,iOffLeft,iOffTop){try{var iWH=GetBodyHeight()-(iOffTop*1);var iWW=GetBodyWidth()-(iOffLeft*1);attach(sTarget).style.width=iWW+'px';}catch(err){}}   
function compareOptionText(a,b){return a.text!=b.text?a.text<b.text?-1:1:0;}
function SyncScroll(_source,_target){var osource = attach(_source);var otarget = attach(_target);otarget.scrollTop = osource.scrollTop;}
function FullWidthObject(sTarget,iOffLeft){try{var iWW=GetBodyWidth()-(iOffLeft*1);attach(sTarget).style.width=iWW+'px';}catch(err){}}   
function FullHeightObject(sTarget,iOffTop){try{var iWH=GetBodyHeight()-(iOffTop*1);attach(sTarget).style.height=iWH + 'px';}catch(err){}}   
function WindowsOpenDialog_MAXIMIZED(sUrl){var iw=screen.width-100;var ih=screen.height-100;var WinSettings="center:yes;resizable:no;dialogHeight:"+ih+"px;dialogWidth:"+iw+"px;";var MyArgs=window.showModalDialog(sUrl,MyArgs,WinSettings);return MyArgs;}
function Browser_AfterRowActivate(id_selected){try{ID_RECORD_SELECTED=id_selected;}catch(err){ID_RECORD_SELECTED=0;}}
function ToolbarDoReport(sUrl,sFrame){var oHtml=attach('html_print');var vret=window.document.body.innerHTML;oHtml.value="<html><head><title>Impresión</title></head>"+vret+"</html>";SubmitToURL(sUrl,sFrame);}
function set_opacity(div, value){div.style.opacity=value;div.style.MozOpacity=value;div.style.KhtmlOpacity=value;div.style.filter='alpha(opacity='+value*100+')';div.style.zoom=1;} 
function OpenAutoTurno(_id_agenda_libre){var fflt=attach('fecha_filtro').value;WindowsOpenDialog('___windows_validate.aspx?fecha_turno='+fflt+'&proc=TURNO_DIRECTO&sobre_turno=S&id_agenda_libre='+_id_agenda_libre,'600','800');}
function OpenSelPaciente(){return WindowsOpenDialog('___windows_validate.aspx?proc=TURNO_DIRECTO&tipo=PACIENTE','600','800');}
function ToggleDiv(oDiv){var oD1=attach(oDiv);var bVisible=(oD1.style.display=='block');if(!bVisible){DisplayBlock(oDiv);}else{DisplayNone(oDiv);}}
function myHandler(id){var oEditor=iged_getById(id);var oHtml1=attach(id+'_HTMLBridge');if(oHtml1){oHtml1.value=oEditor.getText();}}
function EvalSN(oObj){var ValidChars="SNsn";var Char;for(i=0;i<oObj.value.length;i++){Char=oObj.value.charAt(i);if(ValidChars.indexOf(Char)==-1){alert('Debe ingresar S o N!');oObj.value='N';}}}
function EvalObjNumeric(oObj){if(!IsNumeric(oObj.value)){alert('El valor no es un número!');oObj.value="0";}}
function SetDataInto(sSource,sTarget){attach(sTarget).value+=attach(sSource).value;}
function ResetComboFromValue(sObj,sValue){var oCbo=attach(sObj);for (i=(oCbo.length-1);i>=0;i--){if(oCbo.options[i].value==sValue){oCbo.remove(i);return;}}}
function saveScrollCoordinates(){try{attach("scrollx").value = f_scrollLeft();attach("scrolly").value = f_scrollTop();}catch(err){}} 
function EvalMedicoEnTurno(oObj,sTr){if (oObj.value!="0"){DisplayBlock(sTr);}else{DisplayNone(sTr);}}
function ClearPop(sPop){DisplayNone(sPop);bPoped=false;}
function CloseObj(sObj){try {var oObj=attach(id);oObj.style.display = "none;";}catch(err){}}
function OpenObj(sObj){try {var oObj=attach(id);oObj.style.display = "block;";}catch(err){}}
function DisplayNone(sObj){try {cerrar(sObj,1);}catch(err){}}
function DisplayBlock(sObj){try{ver(sObj,50);}catch(err){}}
function showWait(sObj){try{resizeDIV(sObj);DisplayBlock(sObj);ZTop(sObj);}catch(err){}}
function WebHtmlEditor_KeyPress(oEditor,keyCode,oEvent){window.setTimeout('myHandler("'+oEditor.ID+'")',100);}
function ReloadObject(sObj){attach(sObj).src=oObj.src;}
function ReloadIFrame(sObj){var _reload=attach(sObj).contentDocument.location.href;_reload.replace("=true","=");attach(sObj).contentDocument.location=_reload;}
function shiftTo(obj,x,y){obj.style.pixelLeft=x;obj.style.pixelTop=y;}
function ZTop(id){try{attach(id).style.zIndex='999';}catch(err){}}
function show_obj(id){try{DisplayBlock(id);}catch(err){}}
function hide_obj(id){try{DisplayNone(id);}catch(err){}}
function SetObjChecked(id,bCheck){attach(id).checked=bCheck;}
function SetObjValue(id,sValue){attach(id).value=sValue;}
function ver(sPop,segundos){transicion.call(attach(sPop),0,1,segundos);} 
function cerrar(sPop,segundos){transicion.call(attach(sPop),1,0,segundos);} 
function SetImageInto(sSource,sTarget){attach(sTarget).src=sSource;}
function SetImage(sSource){WindowsOpenDialog('___windows_validate.aspx?proc=VER_IMAGEN&p1='+sSource,'600','800');}
function Disable_BeforePaste_Event(){event.returnValue=false;}
function Disable_Paste_Event(){event.returnValue=false;}
function GetBodyHeight(){return window.document.body.clientHeight;}
function GetBodyWidth(){return window.document.body.clientWidth;}
function attach(id){var obj=null;try{obj=window.document.all?window.document.all[id]:window.document.getElementById(id);}catch(err){obj=null;}return obj}

function Browser_SelectedRow(_id)
   {
      BROWSER_ROW_SELECTED=_id;
   }
   
function GetStatusDia(sColor,sObj,_id,_dia)
   {  
      try
         {
            var sObj=('#img'+sObj);
            var sparam="case=get_estado_dia&data="+_dia+"&recordpk="+_id+"&color="+sColor;
            AjaxImgASync('../media/wait/21.gif',sObj,'___ajax_eval.aspx',sparam);
//            $(sObj).attr("src",AjaxExec('___ajax_eval.aspx',sparam));
         }catch(err){}
   }

function CollapseMenu(id_funcion_parent,sMas,sMenos)
   {  
      try
         {
            var sDiv=('div'+id_funcion_parent);
            var sObj=('#'+sDiv);
            CollapseDivImg(sDiv,sMas,sMenos);
            var bVisible=($(sObj).css('display')=='block');
            if (bVisible){$(sObj).html('');}else{AjaxSimpleASync('media/wait/2.gif',sObj,'___ajax_eval_intranet.aspx','case=item_menu&data='+id_funcion_parent);}
            sObj=('#tot'+id_funcion_parent);
            AjaxSimpleASync('',sObj,'___ajax_eval_intranet.aspx','case=total_item_menu&data='+id_funcion_parent);
         }catch(err){}
   }

function disableForm(theform) 
   {
     if (document.all || document.getElementById) 
       {
	    for (i = 0; i < theform.length; i++) 
	       {
	          try
	          {
	             var formElement = theform.elements[i];
		         if (true) {formElement.disabled = true;}
              }
              catch(err){}
	       }
       }
   }

function DisplayToggler(sName,sImg1,sImg2)
   {
      try
          {
              var oobj = attach(sName);   
              var oimg1 = attach(sImg1);   
              var oimg2 = attach(sImg2);   
              if (oobj.style.display=='none')
                 {
                    oobj.style.display='block';
                    oimg1.style.display='none';
                    oimg2.style.display='block';
                 }
              else
                 {
                    oobj.style.display='none';
                    oimg1.style.display='none';
                    oimg2.style.display='block';
                 }
           }catch(rex){}
   }

function ValidateNumericRange(oVal,_min,_max)
   {
   if(oVal.value!=undefined)
      {   
       if (oVal.value!="")
       {
           if (oVal.value!="-")
              {
                 if (isNaN(oVal.value))  
                    {
                       alert(oVal.value + " no es un valor numérico");
                       oVal.value="";
                    }
                 else
                    {
                       var iVal=(oVal.value*1);
                       if (isNaN(_min)) { _min=0; }
                       if (isNaN(_min)) { _max=0; }
                       var iMin=(_min*1);
                       var iMax=(_max*1);
                       if (iMin==iMax) 
                          {
                             oVal.value=iMin;
                             alert("Los valor mínimos y máximos son iguales");
                          }
                      else
                         {
                            if (iVal>_max) 
                               {
                                  alert("El valor excede el límite superior de control (" + iMax + ")");
                                  oVal.value="";
                               } 
                            else
                               {
                                  if (iVal<_min) 
                                     {
                                        alert("El valor está por debajo del límite inferior de control (" + iMin + ")");
                                        oVal.value="";
                                     }
                               }
                         }
                    }
              }
       }
      }
   }

function ValidateNumericRangeConfirm(oVal,_min,_max)
   {
       if (oVal.value!="")
       {
           if (oVal.value!="-")
              {
                 if (isNaN(oVal.value))  
                    {
                       alert(oVal.value + " no es un valor numérico");
                       oVal.value="";
                    }
                 else
                    {
                       var iVal=(oVal.value*1);
                       if (isNaN(_min)) { _min=0; }
                       if (isNaN(_min)) { _max=0; }
                       var iMin=(_min*1);
                       var iMax=(_max*1);
                       if (iMin==iMax) 
                          {
                             oVal.value=iMin;
                             alert("Los valor mínimos y máximos son iguales");
                          }
                      else
                         {
                            if (iVal>_max){alert("El valor excede el límite superior de control (" + iMax + ")")}else{if (iVal<_min){if(!confirm("El valor está por debajo del límite inferior de control (" + iMin + "). Confirma?")){oVal.value="";}}}
                         }
                    }
              }
       }
   }

function EvalDrop(sSearch,sDrop,sCbo,sSelField)
 {
    var oDrop=attach(sDrop);
    var oCbo=attach(sCbo);
    var oSearch=attach(sSearch);
    var _ret = "<TABLE CELLPADDING='2' WIDTH='300'>";
    var _temp = "";
    for (i = 0; i < oCbo.length; i++) 
      {
         _temp=oCbo.options[i].text;
         if (_temp.indexOf(oSearch.value)!=-1) {_ret+="<tr id='tr_" + i + "' onmouseover=javascript:ColorObj('tr_" + i + "','#6495ed') onmouseleave=javascript:ColorObj('tr_" + i + "','white')><td><a href=javascript:SetDropValue('" + sSearch + "','" + i + "','" + sDrop + "','" + sCbo + "','" + sSelField + "')>" + _temp + "</a></td></tr>";}
      }
    _ret += "</TABLE>";
    oDrop.innerHTML=_ret;
    var ix=findPosX(oSearch);
    var iy=findPosY(oSearch);
    shiftTo(oDrop,ix,iy+20);
    DisplayBlock(sDrop);  
 }

function SetDropValue(sSearch,iSelValue,sDrop,sCbo,sSelField)
   {
      var oSelField=attach(sSelField);
      var oCbo=attach(sCbo);
      var oSearch=attach(sSearch);
      oSelField.value=oCbo.options[iSelValue].value;
      oSearch.value=oCbo.options[iSelValue].text;
      DisplayNone(sDrop);  
   }

function findPosX(obj)
  {
    var curleft = 0;
    if(obj.offsetParent)
        while(1)
        {
          curleft += obj.offsetLeft;
          if(!obj.offsetParent)
            break;
          obj = obj.offsetParent;
        }
    else if(obj.x)
        curleft += obj.x;
    return curleft;
  }

function findPosY(obj)
  {
    var curtop = 0;
    if(obj.offsetParent)
        while(1)
        {
          curtop += obj.offsetTop;
          if(!obj.offsetParent)
            break;
          obj = obj.offsetParent;
        }
    else if(obj.y)
        curtop += obj.y;
    return curtop;
  }

function IsNumeric(sText)
  {
   var ValidChars="0123456789.-";
   var IsNumber=true;
   var Char;
   for (i=0;i<sText.length&&IsNumber==true;i++) 
      { 
         Char=sText.charAt(i); 
         if(ValidChars.indexOf(Char)==-1){IsNumber=false;}
      }
   return IsNumber;
  }

function EnterPressed(fnc)
{
   var characterCode;
   var ev = event;
   characterCode = ev.keyCode;
   if (characterCode == 13)
   {
      ev.returnValue=false;
      ev.cancelBubble = true;
      eval(fnc);
   }  
}

function ColorBorderObject(oObj,sColor)
{
    try {LastBorderColorObj.style.borderColor="white";} catch(err) {}       
    try {oObj.style.borderColor=sColor;} catch(err) {}       
    try {LastBorderColorObj=oObj;} catch(err) {}
}

function ToggleDropVisible(id)
  {
     var xtemp_Obj;
     xtemp_Obj=attach(id);
     xtemp_Obj.zIndex=-1000;
     if (xtemp_Obj.style.display=="block") 
        {
           DisplayNone(id);
        }
     else 
        {
           shiftTo(xtemp_Obj,window.event.clientX,window.event.clientY+30);
           DisplayBlock(id);
        }
  }

function ToggleRightIframeVisible(id,sUrl,sFrame)
  {
     var xtemp_Obj;
     xtemp_Obj=attach(id);
     xtemp_Obj.zIndex=-1000;
     if (xtemp_Obj.style.dislay=="block") 
        {
           DisplayNone(id);
           SubmitToURL("about:blank",sFrame);
        }
     else 
        {
           shiftTo(xtemp_Obj,window.event.clientX+32,window.event.clientY);
           SubmitToURL(sUrl,sFrame);
           DisplayBlock(id);
        }
  }

function ToggleCheckByID(sid)
  {
      var collAll=window.document.getElementsByTagName('input');
	  for (i=1;i<collAll.length;i++){if (collAll.item(i).type=='checkbox'){if (collAll.item(i).id==sid){collAll.item(i).checked=(collAll.item(i).checked==false);}}}
  }

function SetValFromObj(sFrom,sTo)
   {
      var oFrom=attach(sFrom);
      var collAll=window.document.getElementsByTagName('input');
	  for (i=1;i<collAll.length;i++) {if (collAll.item(i).type=='text'){if (collAll.item(i).id==sTo){collAll.item(i).value = oFrom.value;}}}
   }

function setHeight(sID)
   {
      try
      {
         var theHeight=document['body'].offsetHeight;
         var oObj=parent.document.attach(sID);
         oObj.height=theHeight;
      }
      catch(err) {}
   }

function calcHeight(sID)
   {
     try
     {
        var oFrame=attach(sID);
        var iH=oFrame.contentWindow.document.body.scrollHeight;
        var iW=oFrame.contentWindow.document.body.scrollWidth;
        if (sID=='ifdivadd_pac')
           {
              iH='620px';
              attach(sID).height=iH;
           }
        else
           {   
              if (iH<=100)
                 {
                    attach(sID).height=(iH + 150) + 'px';
                 }
              else
                 {
                    attach(sID).height=(iH + 25) + 'px';
                 }   
           }
     }
     catch(err){}
   }

function setKeySeekValue(keycode,oThis,_id_field,_desc_field,_seek_field,tr_seek)
 {
    var o1 = attach(_id_field);
    var o2 = attach(_desc_field);
    var o3 = attach(_seek_field);
    if (keycode*1==13)
       {
          try {o1.value=oThis.value;} catch(err){};
          try {o2.value=oThis.options[oThis.selectedIndex].text;} catch(err){};
          try {o3.value=oThis.options[oThis.selectedIndex].text;} catch(err){};
          DisplayNone(tr_seek);
          try {o3.setFocus();} catch(err){};
       }
    else
       {
          try {o1.value='';} catch(err){};
          try {o2.value='';} catch(err){};
       }   
    return (keycode*1)
 } 

function setClickSeekValue(oThis,_id_field,_desc_field,_seek_field,tr_seek)
 {
    var sTexto = oThis.options[oThis.selectedIndex].text;
    var o1 = attach(_id_field);
    var o2 = attach(_desc_field);
    var o3 = attach(_seek_field);
    o1.value=oThis.value;
    o2.value=sTexto;
    o3.value=sTexto;
    if (sTexto.indexOf("[VAL]")>-1)
       {
          var xval = sTexto.split("[VAL]");
          try{attach("item_importe").value=xval[1];}catch(er){}
       }   
    if (sTexto.indexOf("[VALMOD]")>-1)
       {
          var xval = sTexto.split("[VALMOD]");
          var xpart = xval[1];
          if (xpart.indexOf("[INEX]")>-1)
             {
                xval = xpart.split("[INEX]");
                try{attach("mod_importe").value=xval[0];}catch(er){}
                try{attach("mod_inclusiones_generales").value+=xval[1];}catch(er){}
                try{attach("mod_exclusiones_generales").value+=xval[2];}catch(er){}
             }
          else
             {
                try{attach("mod_importe").value=xval[1];}catch(er){}
             }   
       }   
    if (sTexto.indexOf("[PMD]")>0) 
       {
          DisplayNone("additional_ayudante1");
          DisplayNone("additional_ayudante2");
          DisplayNone("additional_ayudante3");
          DisplayBlock("additional_selector");
          DisplayBlock("additional_anestesista");
          var xdata = sTexto.split("[PMD]");
          switch (xdata[1])
            {
               case "0":
                  DisplayNone("additional_ayudante1");
                  DisplayNone("additional_ayudante2");
                  DisplayNone("additional_ayudante3");
                  break;
               case "1":
                  DisplayBlock("additional_ayudante1");
                  DisplayNone("additional_ayudante2");
                  DisplayNone("additional_ayudante3");
                  break;
               case "2":
                  DisplayBlock("additional_ayudante1");
                  DisplayBlock("additional_ayudante2");
                  DisplayNone("additional_ayudante3");
                  break;
               case "3":
                  DisplayBlock("additional_ayudante1");
                  DisplayBlock("additional_ayudante2");
                  DisplayBlock("additional_ayudante3");
                  break;
            }   
       }
    else 
       {
          DisplayNone("additional_selector");
          DisplayNone("additional_ayudante1");
          DisplayNone("additional_ayudante2");
          DisplayNone("additional_ayudante3");
       }
    DisplayNone(tr_seek);
    try{o3.setFocus();}catch(err){}
 }

function seek_form(keycode,_url,_target,tr_seek,iDelay)
 {
    if (iTimeOut!=0){window.clearTimeout(iTimeOut);}
    if (keycode*1==40)
    {
       window.frames[_target].document.forms['form1'].elements['seek_list'].focus();
    }
    else
    {
       if (!window.event.shiftKey & !window.event.ctrlKey & !window.event.altKey)
       {
           if (keycode*1!=9 & keycode*1!=37 & keycode*1!=38 & keycode*1!=39 & keycode*1!=40 & keycode*1!=17 & keycode*1!=80)
           {
               //evaluar mas fino la cantidad de caracteres ty el tipo de caracteres
               var _last_url=window.document.form1.action;
               var _last_target=window.document.form1.target;
               iTimeOut=window.setTimeout('SubmitToURL("' + _url + '","' + _target + '");DisplayBlock("' + tr_seek + '");window.document.form1.action="' + _last_url + '";window.document.form1.target="' + _last_target + '";',iDelay); 
           }
       }
    }   
 }

function ColorObj(id,vColor)
   {
      var temp_Obj = attach(id);
      try
         {
         if (LastClick!="") {LastClick.style.backgroundColor=LastColor;}
         LastClick=temp_Obj;
         LastColor = temp_Obj.style.backgroundColor;
         temp_Obj.style.backgroundColor = vColor;
         }catch(err){}
   }

function CollapseDiv(oDiv)
   {  
      try
         {
            var oD1=attach(oDiv);
            var bVisible=(oD1.style.display=='block');
            if (!bVisible)
               {
                  var oD2=attach(LastDiv);
                  DisplayNone(LastDiv);
                  DisplayBlock(oDiv);
               }
            else{DisplayNone(oDiv);}
            LastDiv=oDiv;
          }
          catch(err){}
   }

function CollapseDivFloat(oDiv)
   {  
      try
         {
              var oD1=attach(oDiv);
              var bVisible=(oD1.style.display=='block');
              if (!bVisible)
                 {
                    var oD2=attach(LastDivFloat);
                    DisplayNone(LastDivFloat);
                    DisplayBlock(oDiv);
                 }
              else{DisplayNone(oDiv);}
              LastDivFloat=oDiv;
          }
          catch(err){}
   }

function ToggleDivImg(oDiv,sMas,sMenos)
   {  
      var oD1=attach(oDiv);
      var bVisible=(oD1.style.display=='block');
      var oImg=attach('img'+oDiv);
      if (!bVisible)
         {
            DisplayBlock(oDiv);
            oImg.src=sMenos;
         }
      else
         {
            DisplayNone(oDiv);
            oImg.src=sMas;
         }
   }

function ToggleTRImg(oThis,sObj,sMas,sMenos)
   {  
      var bVisible=(attach(sObj).style.display=='block');
      if (!bVisible)
         {
            DisplayBlock(sObj);
            oThis.src=sMenos;
         }
      else
         {
            DisplayNone(sObj);
            oThis.src=sMas;
         }
   }

function CollapseDivImgDelayedMultiOpen(oDiv,sMas,sMenos,sUrl,sFrame)
   {  
      try
         {
          var oD1=attach(oDiv);
          var oFrame=attach(sFrame);
          var oImg=attach('img'+oDiv);
          var bVisible=(oD1.style.display=='block');
          if (!bVisible)
             {
                oFrame.src=sUrl;
                DisplayBlock(oDiv);
                oImg.src=sMenos;
             }
          else
             {
                DisplayNone(oDiv);
                oFrame.src='../transparente.htm';
                oImg.src=sMas;
             }
         }
      catch(err){}
   }
   
function CollapseDivImgDelayed(oDiv,sMas,sMenos,sUrl,sFrame)
   {  
      try
         {
          var oD1=attach(oDiv);
          var oFrame=attach(sFrame);
          var oImg=attach('img'+oDiv);
          var bVisible=(oD1.style.display=='block');
          if (!bVisible)
             {
                var oD2=attach(LastDiv);
                DisplayNone(LastDiv);
                var oLastImg=attach('img'+LastDiv);
                oLastImg.src=sMas;
                oFrame.src=sUrl;
                DisplayBlock(oDiv);
                oImg.src=sMenos;
             }
          else
             {
                DisplayNone(oDiv);
                oFrame.src='../transparente.htm';
                oImg.src=sMas;
             }
          LastDiv=oDiv;
         }
      catch(err){}
   }

function CollapseDivImg(oDiv,sMas,sMenos)
   {  
      try
         {
          var oD1=attach(oDiv);
          var bVisible=($('#' + oDiv).css('display')!='none');
          var oImg=attach('img'+oDiv);
          if (!bVisible)
             {
                try
                {
                   var oD2=attach(LastDiv);
                   DisplayNone(LastDiv);
                   var oLastImg=attach('img'+LastDiv);
                   oLastImg.src=sMas;
                }catch(err){}
                DisplayBlock(oDiv);
                oImg.src=sMenos;
             }
          else
             {
                DisplayNone(oDiv,10);
                oImg.src=sMas;
             }
          LastDiv=oDiv;
         }catch(err){}
   }

function CollapseDivImgFloat(oDiv,sMas,sMenos)
   {  
      var oD1=attach(oDiv);
      var bVisible=(oD1.style.display=='block');
      var oImg=attach('img'+oDiv);
      if (!bVisible)
         {
            var oD2=attach(LastDivFloat);
            DisplayNone(LastDivFloat);
            var oLastImg=attach('img'+LastDivFloat);
            try {oLastImg.src=sMas;}catch(er){}
            DisplayBlock(oDiv);
            try {oImg.src=sMenos;}catch(er){}
         }
      else
         {
            DisplayNone(oDiv);
            try {oImg.src=sMenos;}catch(er){}
         }
      LastDivFloat=oDiv;
   }

function SubmitToURL(sUrl,sFrame)
   {
       //try{resizeDIV('div_wait');DisplayBlock('div_wait');attach('div_wait').style.zIndex='999';}catch(err){}
       try {saveScrollCoordinates();}catch(er){};
       var _backURL = window.document.form1.action;
       var _backTARGET = window.document.form1.target;
       window.document.form1.action=sUrl;
       window.document.form1.target=sFrame;
       window.document.form1.submit();
       window.document.form1.action=_backURL;
       window.document.form1.target=_backTARGET;
   }

function NavigateWithOutConfirmation(sUrl)
   {
       try {saveScrollCoordinates();}catch(er){};
       var _backURL = window.document.form1.action;
       var _backTARGET = window.document.form1.target;
       window.document.form1.action=sUrl;
       window.document.form1.target='_self';
       window.document.form1.submit();
       window.document.form1.action=_backURL;
       window.document.form1.target=_backTARGET;
   }

function NavigateWithConfirmation(sUrl)
   {
       try {saveScrollCoordinates();}catch(er){};
       var _backURL = window.document.form1.action;
       var _backTARGET = window.document.form1.target;
       window.document.form1.action=sUrl;
       window.document.form1.target='_self';
       if (confirm('Confirma la operación?')) {window.document.form1.submit();}
       window.document.form1.action=_backURL;
       window.document.form1.target=_backTARGET;
   }

function ToolbarDo(sEvent,sUrl,sFrame)
   { 
      var bEvalId = false;
      var bSubmit = true;
      switch (sEvent)
         {
            case 'new':
               ID_RECORD_SELECTED=0;
               bEvalId=false;
               break;
            case 'edit':
               bEvalId=true;
               break;
            case 'delete':
               bEvalId=true;
               break;
         }
       if (bEvalId==true)
          {
             if ((ID_RECORD_SELECTED*1)==0)
                {
                  bSubmit=false;
                  alert('No hay registro seleccionado!');
                }    
             if ((ID_RECORD_SELECTED*1)<0)
                {
                  ID_RECORD_SELECTED=(ID_RECORD_SELECTED*-1);
                  //bSubmit=false;
                  //alert('El registro está dehabilitado por restricciones del sistema');
                }   
          }
        var itd=0;
        
        if($("#control_entidad").val()=="medico_mandante" && sEvent=="delete")
           {
             $('#'+BROWSER_ROW_SELECTED+ ' TD').each(
                function()
                   {
                      itd+=1;
                      if(bSubmit)
                         {
                            if(itd==6){bSubmit=($(this).html()*1==0);}
                            if(itd==7){bSubmit=($(this).html()*1==0);}
                         }
                   }
             )
             if(!bSubmit){alert('No puede realizarse la acción, porque hay datos históricos asociados');}
           }  
          
       if (bSubmit) 
          {
             try{resizeDIV('div_wait');DisplayBlock('div_wait');attach('div_wait').style.zIndex='999';}catch(err){}
             sUrl=sUrl.replace("<ID_RECORD>",ID_RECORD_SELECTED);
             var _backURL = window.document.form1.action;
             var _backTARGET = window.document.form1.target;
             document.form1.target=sFrame;
             document.form1.action=sUrl;
             document.form1.submit();
             document.form1.action=_backURL;
             document.form1.target=_backTARGET;
          }   
   }
  
function ToolbarDoCustom(sEvent,sUrl,sFrame)
   { 
      var bEvalId=true;
      var bSubmit=true;
       if ((ID_RECORD_SELECTED*1)>=0)
          {
              if (bEvalId){if ((ID_RECORD_SELECTED*1)==0){bSubmit=false;alert('No hay registro seleccionado!');}}
              if (bSubmit) 
                 {
                    try{resizeDIV('div_wait');DisplayBlock('div_wait');attach('div_wait').style.zIndex='999';}catch(err){}
                    sUrl=sUrl.replace("<ID_RECORD>",ID_RECORD_SELECTED);
                    var _backURL = window.document.form1.action;
                    var _backTARGET = window.document.form1.target;
                    document.form1.target=sFrame;
                    document.form1.action=sUrl;
                    document.form1.submit();
                    document.form1.action=_backURL;
                    document.form1.target=_backTARGET;
                 }   
          }
       else{alert('El registro está dehabilitado por restricciones del sistema');}   
   }

function FillFiller(sContainer,sControl,sCheck)
{
   var oCbo=attach(sControl);
   var sVal=oCbo.value;
   var sText='';
   var i=0;
   var _inner_DIV='';
   var cboFiller=oCbo.id;
   if(sVal!='0')
      {
        sText=oCbo.options[oCbo.selectedIndex].text;
        for (i = oCbo.length - 1; i>=0; i--) {if (oCbo.options[i].selected){oCbo.remove(i);}}
        _inner_DIV = "<a href='javascript:DeleteFiller(" + sVal + ",\"" + sText + "\",\"" + cboFiller + "\")';>[Borrar]</a>";
        _inner_DIV = _inner_DIV + "<input style='disabled:true;' type='checkbox' checked id='" + sCheck + "' name='" + sCheck + "' value='" + sVal + "'>" + sText;  
        var newdiv = window.document.createElement('div');
        newdiv.setAttribute('id','div_' + sVal);
        newdiv.innerHTML = _inner_DIV;
        var oParent = attach(sContainer);
        oParent.appendChild(newdiv);
      } 
}

function FillFillerMulti(sContainer,sControl,sCheck)
{
   var oCbo=attach(sControl);
   var sVal=oCbo.value;
   var sText='';
   var i=0;
   var _inner_DIV='';
   var cboFiller=oCbo.id;
   if(sVal!='0')
      {
        sText=oCbo.options[oCbo.selectedIndex].text;
        for (i = oCbo.length - 1; i>=0; i--) {if (oCbo.options[i].selected) {oCbo.remove(i);}}
        _inner_DIV = "<a href='javascript:DeleteFillerMulti(" + sVal + ",\"" + sText + "\",\"" + cboFiller + "\")';>[Borrar]</a>";
        _inner_DIV = _inner_DIV + "<input style='disabled:true;' type='checkbox' checked id='" + sCheck + "' name='" + sCheck + "' value='" + sVal + "'>" + sText;  
        var newdiv = window.document.createElement('div');
        newdiv.setAttribute('id','div_' + sVal);
        newdiv.innerHTML = _inner_DIV;
        var oParent = attach(sContainer);
        oParent.appendChild(newdiv);
      } 
   var oformClick=attach('formClick');
   var oformOperation=attach('formOperation');
}

function DeleteFiller(sVal,sText,sControl)
{
   var oCbo=attach(sControl);
   var oDiv=attach('div_'+sVal);
   var parent=window.document.getElementsByTagName('form')[0];
   var old=(oDiv.parentNode).removeChild(oDiv);
   var elOptNew=window.document.createElement('option');
   elOptNew.text=sText;
   elOptNew.value=sVal;
   try{oCbo.add(elOptNew,null);}catch(ex){oCbo.add(elOptNew);}
}

function DeleteFillerMulti(sVal,sText,sControl)
{
   var oCbo=attach(sControl);
   var oDiv=attach('div_'+sVal);
   var parent=window.document.getElementsByTagName('form')[0];
   var old=(oDiv.parentNode).removeChild(oDiv);
   var elOptNew=window.document.createElement('option');
   elOptNew.text=sText;
   elOptNew.value=sVal;
   try{oCbo.add(elOptNew, null);}catch(ex){oCbo.add(elOptNew);}
}

function ToggleMenuL(sFrame,sImg)
 {
    var iRetL=window.top.ColapseFrameL(sFrame);    
    var oImg=top.frames['frame_intranet'].document.images[sImg];
    if (iRetL==1) 
       {
          try {oImg.src=replaceChars(oImg.src,'_menos','_mas');} catch(ex) {}
       } 
    else 
       {
          try {oImg.src=replaceChars(oImg.src,'_mas','_menos');} catch(ex) {}
       }  
 }

function ToggleMenuR(sFrame){var iRetR=window.top.ColapseFrameR(sFrame);}

function replaceChars(entry,busca,pone) 
  {
     out = busca; // replace this
     add = pone; // with this
     temp = "" + entry; // temporary holder
     while (temp.indexOf(out)>-1) 
        {
           pos= temp.indexOf(out);
           temp = "" + (temp.substring(0, pos) + add + 
           temp.substring((pos + out.length), temp.length));
        }
     return temp;
  }

function encode64(input) {
   var output = "";
   var chr1, chr2, chr3;
   var enc1, enc2, enc3, enc4;
   var i = 0;
   do {
      chr1 = input.charCodeAt(i++);
      chr2 = input.charCodeAt(i++);
      chr3 = input.charCodeAt(i++);
      enc1 = chr1 >> 2;
      enc2 = ((chr1 & 3) << 4) | (chr2 >> 4);
      enc3 = ((chr2 & 15) << 2) | (chr3 >> 6);
      enc4 = chr3 & 63;
      if (isNaN(chr2)) {
         enc3 = enc4 = 64;
      } else if (isNaN(chr3)) {
         enc4 = 64;
      }
      output = output + keyStr.charAt(enc1) + keyStr.charAt(enc2) + keyStr.charAt(enc3) + keyStr.charAt(enc4);
   } while (i < input.length);
   
   return output;
}

function decode64(input) {
   var output = "";
   var chr1, chr2, chr3;
   var enc1, enc2, enc3, enc4;
   var i = 0;
   // remove all characters that are not A-Z, a-z, 0-9, +, /, or =
   input = input.replace(/[^A-Za-z0-9\+\/\=]/g, "");
   do {
      enc1 = keyStr.indexOf(input.charAt(i++));
      enc2 = keyStr.indexOf(input.charAt(i++));
      enc3 = keyStr.indexOf(input.charAt(i++));
      enc4 = keyStr.indexOf(input.charAt(i++));
      chr1 = (enc1 << 2) | (enc2 >> 4);
      chr2 = ((enc2 & 15) << 4) | (enc3 >> 2);
      chr3 = ((enc3 & 3) << 6) | enc4;
      output = output + String.fromCharCode(chr1);
      if (enc3 != 64) {
         output = output + String.fromCharCode(chr2);
      }
      if (enc4 != 64) {
         output = output + String.fromCharCode(chr3);
      }
   } while (i < input.length);

   return output;
}

function SetQuickDesc(oObj,sVal,sDesc,bInto)
{
     try
        {
           if (bInto==true)
              {
                 if (oObj.value.length==0 || oObj.value == sDesc)
                    {
                       oObj.value=sVal;
                       oObj.style.fontStyle='normal';
                       oObj.style.color='navy';
                    }   
              }
           else
              {
                if (oObj.value.length==0)
                   {
                      oObj.value=sVal;
                      oObj.style.fontStyle='italic';
                      oObj.style.color='silver';
                   }
              }   
        }
     catch(err) {}
}

function resizeDIV(sObj)
    { 
       try
       {
           var htmlheight=f_clientHeight()-5;//document.body.parentNode.clientHeight-25; 
           var htmlwidth=f_clientWidth()-5;//document.body.parentNode.clientWidth-25; 
           var frame = attach(sObj);
           frame.style.height = htmlheight + "px"; 
           frame.style.width = htmlwidth + "px"; 
           //frame.style.left = f_scrollTop() + "px"; 
           frame.style.top = f_scrollTop() + "px"; 
        } catch(err){}      
    } 

function f_clientWidth() 
{
	return f_filterResults (
		window.innerWidth ? window.innerWidth : 0,
		window.document.documentElement ? window.document.documentElement.clientWidth : 0,
		window.document.body ? window.document.body.clientWidth : 0
	);
}

function f_clientHeight() 
{
	return f_filterResults (
		window.innerHeight ? window.innerHeight : 0,
		window.document.documentElement ? window.document.documentElement.clientHeight : 0,
		window.document.body ? window.document.body.clientHeight : 0
	);
}

function f_scrollLeft() 
{
	return f_filterResults (
		window.pageXOffset ? window.pageXOffset : 0,
		window.document.documentElement ? window.document.documentElement.scrollLeft : 0,
		window.document.body ? window.document.body.scrollLeft : 0
	);
}

function f_scrollTop() 
{
	return f_filterResults (
		window.pageYOffset ? window.pageYOffset : 0,
		window.document.documentElement ? window.document.documentElement.scrollTop : 0,
		window.document.body ? window.document.body.scrollTop : 0
	);
}

function f_filterResults(n_win, n_docel, n_body) 
{
	var n_result = n_win ? n_win : 0;
	if (n_docel && (!n_result || (n_result > n_docel)))
		n_result = n_docel;
	return n_body && (!n_result || (n_result > n_body)) ? n_body : n_result;
}

function SetCustomUser()
{
    try
    {
        var ocbo = attach('id_usuario_custom').value;
        var oImgCustom = attach('imgCustom');
        if (ocbo==''){ocbo='0'};
        if (ocbo!='0')
        {
            oImgCustom.src='../media/imagenes/usuarios/' + ocbo + '.jpg';
        }
        else
        {
            oImgCustom.src='../media/imagenes/usuarios/default.jpg';
        }
    } catch(err){}
}

function sortOptions(list) 
   {
      var items = list.options.length;
      var tmpArray = new Array(items);
      for ( i=0; i<items; i++ )
         {
            tmpArray[i] = new Option(list.options[i].text,list.options[i].value);
            tmpArray.sort(compareOptionText);
         }
      for ( i=0; i<items; i++ )
         {
            list.options[i] = new Option(tmpArray[i].text,tmpArray[i].value);
         }
   }

MaskInput = function(f, m)
{
    function mask(e){
        var patterns = {"1": /[A-Z]/i, "2": /[0-9]/, "4": /[\xC0-\xFF]/i, "8": /./ },
            rules = { "a": 3, "A": 7, "9": 2, "C":5, "c": 1, "*": 8};
        function accept(c, rule){
            for(var i = 1, r = rules[rule] || 0; i <= r; i<<=1)
                if(r & i && patterns[i].test(c))
                    break;
                return i <= r || c == rule;
        }
        var k, mC, r, c = String.fromCharCode(k = e.key), l = f.value.length;
        (!k || k == 8 ? 1 : (r = /^(.)\^(.*)$/.exec(m)) && (r[0] = r[2].indexOf(c) + 1) + 1 ?
            r[1] == "O" ? r[0] : r[1] == "E" ? !r[0] : accept(c, r[1]) || r[0]
            : (l = (f.value += m.substr(l, (r = /[A|9|C|\*]/i.exec(m.substr(l))) ?
            r.index : l)).length) < m.length && accept(c, m.charAt(l))) || e.preventDefault();
    }
    for(var i in !/^(.)\^(.*)$/.test(m) && (f.maxLength = m.length), {keypress: 0, keyup: 1})
        removeEvent(f, i);
    for(var i in !/^(.)\^(.*)$/.test(m) && (f.maxLength = m.length), {keypress: 0, keyup: 1})
        addEvent(f, i, mask);
}

addEvent = function(o, ev, f, s)
{
    var r = o[r = "_" + (ev = "on" + ev)] = o[r] || (o[ev] ? [[o[ev], o]] : []), a, c, d;
    r[r.length] = [f, s || o], o[ev] = function(ev){
        try{
            (ev = ev || event).preventDefault || (ev.preventDefault = function(){ev.returnValue = false;});
            ev.stopPropagation || (ev.stopPropagation = function(){ev.cancelBubble = true;});
            ev.target || (ev.target = ev.srcElement || null);
            ev.key = (ev.which + 1 || ev.keyCode + 1) - 1 || 0;
        }catch(f){}
        for(d = 1, f = r.length; f; r[--f] && (a = r[f][0], o = r[f][1], a.call ? c = a.call(o, ev) : (o._ = a, c = o._(ev), o._ = null), d &= c !== false));
        return ev = null, !!d;
    }
};

removeEvent = function(o, ev, f, s)
{
    for(var i = (ev = o["_on" + ev] || []).length; i;)
        if(e[--i] && ev[i][0] == f && (s || o) == ev[i][1])
            return delete ev[i];
    return false;
}

function OpenConsultaCobertura()
   {
      var oid_agenda = attach('id_agenda_libre');
      var oid_OS = attach('id_obra_social_consulta');
      var oid_plan = attach('id_plan_cobertura_consulta');
      if (oid_agenda.value!="0" && oid_OS.value!="0")
      {
         var _url="___proc_emitir_turno.aspx?modo=consulta&AL=" + oid_agenda.value + "&OS=" + oid_OS.value + "&PL=" + oid_plan.value;
         WindowsOpenDialog(_url,'600','800');
      }
      else
      {
         alert("Debe seleccionar agenda y obra social, para efectuar la consulta");
      }
   }
   
function setCheckedValue(radioObj, newValue) 
{
	if(!radioObj)
		return;
	var radioLength = radioObj.length;
	if(radioLength == undefined) {
		radioObj.checked = (radioObj.value == newValue.toString());
		return;
	}
	for(var i = 0; i < radioLength; i++) {
		radioObj[i].checked = false;
		if(radioObj[i].value == newValue.toString()) {
			radioObj[i].checked = true;
		}
	}
}
   
function SelAgendaHIS(othis,iIndex)
{
   //attach('cbo_id_agenda_libre')[iIndex].value=othis.value;
   if (othis.value!="0")
   {
      attach('img_status')[iIndex].src='../media/imagenes/legal.png';
      attach('btnOK')[iIndex].style.display='block';
   }
   else
   {
      attach('img_status')[iIndex].src='../media/imagenes/proc.png';
      attach('btnOK')[iIndex].style.display='none';
   }
}

function LiberarParaOrdenPago(_id_mccp)
{
   var sObj='#td_' + _id_mccp;
   var sParam='case=liberar_mccp&recordPK=' + _id_mccp;
   AjaxSimpleASync('../media/wait/2.gif',sObj,'___ajax_eval.aspx',sParam);
}

function CancelacionLiberarParaOrdenPago(_id_mccp)
{
   var sObj='#td_' + _id_mccp;
   var sParam='case=cancelacion_liberar_mccp&recordPK=' + _id_mccp;
   AjaxSimpleASync('../media/wait/2.gif',sObj,'___ajax_eval.aspx',sParam);
}

function PasswordLevel(objC, info, btn)
{
   var s1="ABCDEFGHIJKLMNOPQRSTUVWXYZ";
   var s2="abcdefghiklmnopqrstuvwxyz";
   var s3="0123456789";
   var sEval='';
   var b1=false;
   var b2=false;
   var b3=false;
   var b4=false;
   var iLevel=1;
   var clave=objC.value;
   for (var i=0;i<clave.length;i++) 
   {
      sEval=clave.substring(i, i+1);
      if (s1.indexOf(sEval)>-1) {b1=true};
	  if (s2.indexOf(sEval)>-1) {b2=true};
	  if (s3.indexOf(sEval)>-1) {b3=true};
	  b4=(clave.length>=8);
   }
   if (b1==true && b2==false && b3==false && b4==false) {iLevel=1}
   if (b1==false && b2==true && b3==false && b4==false) {iLevel=1};
   if (b1==false && b2==false && b3==true && b4==false) {iLevel=1};
   if (b1==true && b2==true && b3==false && b4==false) {iLevel=2};
   if (b1==false && b2==true && b3==true && b4==false) {iLevel=2};
   if (b1==true && b2==false && b3==true && b4==false) {iLevel=2};
   if (b1==true && b2==true && b3==true && b4==true) {iLevel=3;sColor='red'};
   switch (iLevel)
   {
      case 1:
         DisplayNone(btn);
         sColor='red';
         sLetras='white';
         sMsg='clave inválida'
         break;
      case 2:
         DisplayNone(btn);
         sColor='yellow';
         sLetras='navy';
         sMsg='clave inválida'
         break;
      case 3:
         DisplayBlock(btn);
         sColor='green';
         sLetras='white';
         sMsg='clave válida'
         break;
   } 
   var objI=attach(info);
   objI.value=sMsg;
   objI.style.color=sLetras;
   objI.style.backgroundColor=sColor;
   return iLevel;
}

var transicion=function(inicio,fin,segundos)
{ 
    var _this=this; 
    this.test=0; 
    if(_this.intervalo)clearInterval(_this.intervalo); 
    if(this.val && Math.abs(fin-_this.val)<0.01)return; 
    this.val=!this.val?inicio<1?inicio+.0001:inicio:this.val; 
    set_opacity(this, this.val); 
    this.pasos=(fin-inicio)/10; 
    this.pausa=segundos*1; 
    this.intervalo=setInterval( 
    function()
    { 
        if(_this.test>80||Math.abs(fin-_this.val)<0.20){clearInterval(_this.intervalo);} 
        _this.test++; 
        _this.val=_this.val+_this.pasos; 
        if(_this.val<=0.25)  
           {
              _this.style.display='none'; 
              set_opacity(_this,0); 
           }
        else 
           {
              _this.style.display='block';
              if (_this.test>80){set_opacity(_this,100);}else{set_opacity(_this,_this.val);}
           }
    },this.pausa); 
} 

function redondea(sVal, nDec)
   { 
    var n=parseFloat(sVal); 
    var s; 
    n=Math.round(n*Math.pow(10,nDec))/Math.pow(10,nDec); 
    s=String(n)+"."+String(Math.pow(10,nDec)).substr(1); 
    s=s.substr(0,s.indexOf(".")+nDec+1); 
    if(strRight(s,1)=="."){s=s.slice(0,-1)+"0";}
    return s; 
   } 

function SetPacienteAutoAction(iTipo)
{  
   switch (iTipo)
      {
         case 1:
            SubmitToURL('___proc_turnos.aspx?modal=S&first=N&selected=FORM','modal');
            break;
         case 2:
            SubmitToURL('___windows_validate.aspx?proc=TURNO_DIRECTO_PROC&tipo=PACIENTE','modal');
            break;
         case 3:
            iTipo=iTipo;
            break;
      }     
}

function ResetCondicionFiscalABMFacientes(sObj,iSkip)
{
   var oCbo = attach(sObj);
    for (i=(oCbo.length-1); i >=0; i--) 
      {
         if (oCbo.options[i].value!=iSkip && oCbo.options[i].value!="4" && oCbo.options[i].value!="13")
         {
            oCbo.remove(i);
         }
         else
         {
            if (oCbo.options[i].value=="4"){oCbo.options[i].text="Gravado";}
            if (oCbo.options[i].value=="13"){oCbo.options[i].text="Exento";}
         }
      }
}

function SetFacturaTerceros(oThis)
{
    if (oThis.checked)
    {
    
       try{DisplayNone('trFacturaEmpresa');}catch(er){}
       try{DisplayBlock('trFacturaProfesional');}catch(er){}
       try{attach('id_empresa_generadora').disabled=true;}catch(er){}
       try{attach('id_factura_profesional').disabled=false;}catch(er){}
    }
    else
    {
       try{DisplayNone('trFacturaProfesional');}catch(er){}
       try{DisplayBlock('trFacturaEmpresa');}catch(er){}
       try{attach('id_empresa_generadora').disabled=false;}catch(er){}
       try{attach('id_factura_profesional').value='0';}catch(er){}
       try{attach('id_factura_profesional').disabled=true;}catch(er){}
    }   
}

function CerrarAmbulatorio()
{
   $(".hdbl").hide();
   $(".detalleitems").hide();
   var oxx = attach('nro_bono_seek');
   var o1 = attach('id_obra_social');
   var o2 = attach('id_factura_profesional');
   var o3 = attach('id_empresa_generadora');
   var o4 = attach('factura_profesional');
   var o5 = attach('fecha_hasta');
   //var o6 = attach('nro_bono');
   var o7 = attach('fecha_desde_bono');
   var o8 = attach('fecha_hasta_bono');
   
   var vxx = oxx.value;
   var v1 = (o1.value * 1);
   var v2 = (o2.value * 1);
   var v3 = (o3.value * 1);
   var v4 = o4.checked;
   var v5 = o5.value;
   //var v6 = o6.value;
   var v7 = o7.value;
   var v8 = o8.value;
   if (vxx=='')
   {
    if (v5=='' && v5!='0' && v7=='' && v7!='0' && v8=='' && v8!='0')
    {
       if (v4)
       {
           if (v2==0 || v5==''){alert('Faltan datos requeridos para procesar la carga.\nVerifique los siguientes datos.\n - Fechas desde y hasta de los bonos.\n - Fecha límite de los consumos\n - Profesional');}else{SubmitToURL('___proc_cierre_consumos.aspx?exec=B','frame_body');}
       }
       else
       {
           if (v1==0 || v3==0 || v5==''){alert('Faltan datos requeridos para procesar la carga.\nVerifique los siguientes datos.\n - Fechas desde y hasta de los bonos.\n - Fecha límite de los consumos\n - Obra social\n - Empresas');}else{SubmitToURL('___proc_cierre_consumos.aspx?exec=B','frame_body');}   
       }       
    }   
    else
    {
       SubmitToURL('___proc_cierre_consumos.aspx?exec=B','frame_body');    
    }
  }
  else
  {
     if (confirm('Se Realizará la búsqueda de los bonos coincidentes con el nº ' + vxx + '\nConfirma?'))
        {
           o1.value=0;
           o2.value=0;
           o4.checked=false;
           o7.value='';
           o8.value='';
           SubmitToURL('___proc_cierre_consumos.aspx?exec=B','frame_body');
        }
  }  
}

function SetValueToClose()
{
    var sDetalle='';
    var sValorDevuelto='';
    var _id_empresa_generadora=attach('id_empresa_generadora');
    var _id_deposito_origen=attach('id_deposito_origen');
    var _id_obra_social=attach('id_obra_social');
    var _id_plan_cobertura=attach('id_plan_cobertura');
    var _id_mcc=attach('id_MCC');
    var _id_tev=attach('id_TEV');
    var _id_med=attach('id_MED');
    var _bFTer=attach('factura_profesional').checked;
    var _iFTer=attach('id_factura_profesional').value;
    var bOk=false;
    if (!_bFTer)
       {
          sDetalle+=_id_empresa_generadora.options[_id_empresa_generadora.selectedIndex].text+' a ';
          sDetalle+=_id_obra_social.options[_id_obra_social.selectedIndex].text+' - ';
          sDetalle+=_id_plan_cobertura.options[_id_plan_cobertura.selectedIndex].text;
          bOk=true;
       }
    else{if(_iFTer!='0'){sDetalle+='Factura tercero';bOk=true;}else{bOk=false;}}
    var iE=_id_empresa_generadora.options[_id_empresa_generadora.selectedIndex].value;
    var iOS=_id_obra_social.options[_id_obra_social.selectedIndex].value;
    var iPC=_id_plan_cobertura.options[_id_plan_cobertura.selectedIndex].value;
    var iMCC=_id_mcc.value;
    var iTEV=_id_tev.options[_id_tev.selectedIndex].value;
    var sAy1=attach('Ay1').value;
    var sAy2=attach('Ay2').value;
    var sAy3=attach('Ay3').value;
    var sAn=attach('An').value;
    var iMED=_id_med.value;
    var pH=attach('porc_honorarios').value;
    var pG=attach('porc_gastos').value;
    var iDep=_id_deposito_origen.options[_id_deposito_origen.selectedIndex].value;
    sValorDevuelto=sDetalle+'|'+iE+'|'+iOS+'|'+iPC+'|'+iMCC+'|'+iTEV+'|'+sAy1+'|'+sAy2+'|'+sAy3+'|'+iMED+'|'+sAn+'|'+pH+'|'+pG+'|'+iDep+'|'+_bFTer+'|'+_iFTer;
    if (bOk)
       {    
          window.returnValue=sValorDevuelto;
          self.close();
       }
    else
       {
          alert('Debe seleccionar profesional a cargo de la facturación');
       }   
}

function SetMULTIQUIZ(stotal,scompleto)
{
    var sret=WindowsOpenDialog('___windows_validate.aspx?proc=' + scompleto + '&quiz='+attach(scompleto).value,'600','800');
    var vvals=sret.split('|');
    attach(stotal).innerHTML='<h1>'+vvals[0]+'</h1>';
    attach(scompleto).value=sret;
}

function CambiarPrecioFacturaAmbulatorio()
{
    var vRet=WindowsOpenDialog('___windows_validate.aspx?proc=IMPORTE_FACTURA&p1='+attach('valor').value,'300','500');
    if(vRet!='0' && vRet!='' && vRet!=undefined)
    {
       attach('valor').value=vRet;
       SoloRecalcularIVA_Ambulatorio('id_tipo_condicion_fiscal');
    }
}

function isDate(dateStr) 
  {
     var datePat = /^(\d{1,2})(\/|-)(\d{1,2})(\/|-)(\d{4})$/;
     var matchArray = dateStr.match(datePat); // is the format ok?
     if (matchArray == null) {return false};
     day = matchArray[1];
     month = matchArray[3]; // p@rse date into variables
     year = matchArray[5];
     if (day < 1 || day > 31) {return false};
     if (month < 1 || month > 12) {return false};
     if ((month==4 || month==6 || month==9 || month==11) && day==31) {return false};
     if (month == 2)
        { // check for february 29th
           var isleap = (year % 4 == 0 && (year % 100 != 0 || year % 400 == 0));
           if (day > 29 || (day==29 && !isleap)) {return false};
        }
     return true; // date is valid
  }

function EditarBono(_id_interaccion,_id_agenda_libre_item,_tipo)
   {
      var sUrl ='___proc_consumos.aspx?modal=S&tipo=' + _tipo + '&recordPK=' + _id_interaccion + '&formOperation=edit';
      var iRet=WindowsOpenDialog(sUrl,'600','800');
      if(iRet=="1")
      {
         var sObj='#td_' + _id_agenda_libre_item;
         var sParam='case=detalle_bono&data=' + _id_agenda_libre_item;
         AjaxSimpleASync('../media/wait/2.gif',sObj,'___ajax_eval.aspx',sParam);
      }
      SubmitToURL(window.document.location.href,'_self');
   }

function EditarBonoAX(_id_interaccion,_id_agenda_libre_item,_tipo, bRefresh)
   {
      var sUrl ='___proc_consumos.aspx?modal=S&tipo=' + _tipo + '&recordPK=' + _id_interaccion + '&formOperation=edit';
      var iRet=WindowsOpenDialog(sUrl,'600','800');
      if (bRefresh)
      {
          if(iRet=="1")
          {
             var sObj='#td_' + _id_agenda_libre_item;
             var sParam='case=detalle_bono&data=' + _id_agenda_libre_item;
             AjaxSimpleASync('../media/wait/2.gif',sObj,'___ajax_eval.aspx',sParam);
          }
          AjaxSimpleASync('../media/wait/2.gif','#td_' + _id_agenda_libre_item,'___ajax_eval.aspx','case=detalle_bono&data=' + _id_agenda_libre_item);
      }
   }

function VerBonoAX(_id_interaccion,_id_agenda_libre_item,_tipo)
   {
      var sUrl ='___proc_consumos.aspx?modal=S&tipo=' + _tipo + '&recordPK=' + _id_interaccion + '&formOperation=readonly';
      var iRet=WindowsOpenDialog(sUrl,'600','800');
      TotalizarMCCSeparado();
   }

function EditarInteraccion(_id_interaccion, _id_agenda_libre_item)
   {
      var sUrl='___abm_interaccion.aspx?modal=S&formClick=&entidad=interaccion&recordPK=' + _id_interaccion + '&formOperation=edit';
      var iRet=WindowsOpenDialog_MAXIMIZED(sUrl);
      if(iRet=="1")
      {
         var sObj='#tr_' + _id_interaccion;
         var sParam='case=eval_cierre_interaccion&data=' + _id_interaccion;
         if (AjaxExec('___ajax_eval.aspx',sParam)!=""){$(sObj).hide();}
      }
   }

function CrearInteraccion(_tipo)
   {
      var sUrl='___abm_interaccion.aspx?modal=S&formClick=&entidad=interaccion&recordPK=0&formOperation=new&tipo='+_tipo;
      var iRet=WindowsOpenDialog_MAXIMIZED(sUrl);
   }

function CambiarTipoInformeMedico(_tipo_informe,_id_interaccion,oObj)
   {
      iRet=WindowsOpenDialog('___windows_validate.aspx?proc=TIPO_INTERACCIONES_SELECTOR&p1=' + _tipo_informe,'600','800');
      if (iRet!=undefined)
         {
             var sObj='#tr_' + _id_interaccion;
             var sParam=('case=cambio_informe&recordPK=' + _id_interaccion + '&data=' + iRet);
             sTipoInteraccion=AjaxExec('___ajax_eval.aspx',sParam);
             oObj.value=sTipoInteraccion;
         }
   }
   
function ImputarFacturaCompleta(_id_factura, _total_imputable)
   {
      var sObj='#td_' + _id_factura;
      var sBtn='#btn_' + _id_factura;
      var sBtnSaldo='#btnsaldo_' + _id_factura;
      
      var _total=0;
      try{_total=_total_imputable.replace(',','.')*1;}catch(rex){_total=_total_imputable*1;}
      var _saldo_lote=$('#spanImportePendiente').html()*1;
      if(_saldo_lote>=_total)
         { 
            var sParam='case=total_factura_imputable&data=' + _id_factura + "&total_imputable=" + _total_imputable;
            $(sBtn).hide("slow");
            $(sBtnSaldo).hide("slow");
            $(sObj).html(AjaxExec('___ajax_eval.aspx',sParam));
            //AjaxSimpleASync('../media/wait/2.gif',sObj,'___ajax_eval.aspx',sParam);
            $('#hDebitos').html('');
            $('#tblDebitos').html('');
            $('#tblTotales').html('');
         }
      else
         {
            alert('El saldo del lote (' + _saldo_lote + ') no alcanza para imputar el saldo completo de la factura ('+_total+')');
         }   
   }

function RevertirDebito(_id_mcc,_id_factura)
   {
      if(confirm("Realmente desea revertir el débito marcado?"))
         {
            var sParam='case=revertir_debito&data=' + _id_mcc;
            AjaxExec('___ajax_eval.aspx',sParam);
            VerDetalleFacturaImputable(_id_factura);
         }   
   }

function ImprimirDebito(_id_mcc)
   {
      //alert('Comprobante!');
      SubmitToURL('../___windows_loader_file_contents.aspx?tipo=debito_profesional&recordPK='+_id_mcc,'_blank');
   }
   
function VerDetalleFacturaImputable(_id_factura)
   {
      var sObj='#td_' + _id_factura;
      var sBtn='#btn_' + _id_factura;
      var sBtnSaldo='#btnsaldo_' + _id_factura;
      var sParam='case=detalle_factura_imputable&data=' + _id_factura;
      $(sObj).html(AjaxExec('___ajax_eval.aspx',sParam));
      sObj='#tddeb_' + _id_factura;
      sParam='case=detalle_factura_debitos&data=' + _id_factura;
      $(sObj).html(AjaxExec('___ajax_eval.aspx',sParam));
      try{$(sBtn).hide("slow")}catch(exr){};
      try{$(sBtnSaldo).hide("slow")}catch(exr){};
   }

function TotalizarImputacionDetallada(idFactura)
   {
      var TotalFacturado=0;
      var TotalDebitado=0;
      var TotalImputable=0;
      var TotalDiferencia=0;
      $("#tblImputables td[id*=tdFacturado_]").each(function(){TotalFacturado+=$(this).html().replace('$ ','').replace(',','.')*1;});
      $("#tblDebitos td[id*=tdDebito_]").each(function(){TotalDebitado+=$(this).html().replace('$ ','').replace(',','.')*1;});
      $("#tblImputables td[id*=td_]").each(function()
         {
            var sVal=$(this).html();
            if(sVal.indexOf('IMG')==-1){TotalImputable+=sVal.replace('$ ','').replace(',','.')*1;}
         }
      );
      if(isNaN(TotalFacturado)){TotalFacturado=0;}
      if(isNaN(TotalDebitado)){TotalDebitado=0;}
      if(isNaN(TotalImputable)){TotalImputable=0;}
      TotalDiferencia=(TotalFacturado-TotalImputable);
      TotalFacturado=Math.round(TotalFacturado*100)/100;
      TotalDebitado=Math.round(TotalDebitado*100)/100;
      TotalImputable=Math.round(TotalImputable*100)/100;
      TotalDiferencia=Math.round(TotalDiferencia*100)/100;
      $('#total_facturado').html('$ '+TotalFacturado);
      $('#total_debitos').html('$ '+TotalDebitado);
      $('#total_imputable').html('$ '+TotalImputable);
      $('#total_diferencia').html('$ '+TotalDiferencia);
      $('#img_imputarTodo').live('click',function(){ImputarFacturaCompleta(idFactura,TotalImputable);});
   }                    

function LiberarLoteImportes(_id_recibo,_id_factura)
   {
      if(confirm('Realmente desea liberar el importe del recibo asociado a la factura de referencia?'))
      {
          var sParam='case=liberar_lote_importe&id_factura=' + _id_factura + '&id_recibo=' + _id_recibo;
          AjaxExec('___ajax_eval.aspx',sParam);
          attach("id_empresa_generadora").disabled=false;
          attach("id_obra_social").disabled=false;
          attach("id_paciente").disabled=false;
          attach("id_usuario_medico").disabled=false;
          attach('tbl').disabled=false;
          BuscarImputaciones();
      }
   }
   
function SelectLoteImportes(_id_recibo,_id_factura)
   {
      var _detalle=$('#td1_' + _id_factura + '_' + _id_recibo).html();
      var _fecha=$('#td2_' + _id_factura + '_' + _id_recibo).html();
      var _importe=$('#td3_' + _id_factura + '_' + _id_recibo).html();
      var _factura=$('#td4_' + _id_factura + '_' + _id_recibo).html();
      var _liberar=$('#td5_' + _id_factura + '_' + _id_recibo).html();
      var _saldo_imputable=$('#tdSaldoImputable_' + _id_factura).html();
      _importe=(_importe.replace(',','.')*1);
      try{_saldo_imputable=(_saldo_imputable.replace(',','.')*1);}catch(rex){_saldo_imputable=0;}
      if(_saldo_imputable>_importe){$('#tdbtnSaldo_' + _id_factura).html('No puede imputar el saldo completo');}
      $('#spanDetalleRecibo').html('Recibo: ' + _detalle + ' - ' + _fecha + ' Comprobante: ' + _factura + ' - <b>Saldo imputable del lote seleccionado (SIN IMPUESTOS):</b>');
      $('#spanImportePendiente').html(_importe).css('font-size','14px').css('font-weight','bold').css('color','red');
      $('#id_recibo_seleccionado').val(_id_recibo);
      $('#importe_pendiente').val(_importe);
      $('#divImportes').hide("slow");
      $('#divLimites').show("slow");
      $('#divFacturas :input').show("fast");
      $('#trFacturas_'+_id_factura).show();
   }

function ProcesarImporteTotalImputable(_id_factura_item,_saldo_imputable, _id_mcc, _imputar, _total_imputable, _id_factura)
   {
      $("table img").hide();
      $('#btnCambiarLote').hide();
      $('#tbl_saldo_completo').hide();
      var _id_recibo=$('#id_recibo_seleccionado').val();
      var sParam='case=procesar_imputacion&data=' + _id_recibo + '&recordPK=' + _id_mcc + "&importe_mcc=" + _imputar + "&id_factura_item=" + _id_factura_item + "&id_factura=" + _id_factura;
      //$("#form1").attr("disabled", "disabled"); 
      var vret=AjaxExec('___ajax_eval.aspx',sParam);
      if (vret!="")
      {
         var vData=vret.split('|');
         if((vData[1]*1)<0){vData[1]="0.00";}
         $('#importe_pendiente').val(vData[1]);
         $('#spanImportePendiente').html(vData[1]).css('font-size','14px').css('font-weight','bold').css('color','red');
      }
      $("table img").show();
      $('#btnCambiarLote').show();
      alert('Imputación realizada!\n Seleccione otro lote de importes a cuenta para continuar.');
      $('#btnCambiarLote').click();
      //$("#form1").attr("disabled","");
      //$('#td_' + _id_factura).hide("slow");
      //$('#tr_' + _id_factura).hide("slow");
   }   

function ProcesarImporteImputable(_id_factura,_id_factura_item,_saldo_imputable, _id_mcc)
   {
      //if (ValidarImporteImputable(_id_factura_item,_saldo_imputable))
      //   {
            var sImputa='txt_' + _id_factura_item;
            var _imputar=$('#' + sImputa).val();
            var vRet='';
            if (_imputar==''){_imputar='0';}
            _imputar=(_imputar*1);
            if (_imputar<0)
               {
                  alert('El importe a imputar debe ser mayor o igual a 0 (cero).');
               }
            else
               {
                  var bGo=true;
                  if (_imputar==0)
                  {
                     vRet=WindowsOpenDialog('___windows_validate.aspx?proc=MOTIVO_DEBITO','500','600');
                     if(vRet!='0' && vRet!='' && vRet!=undefined){bGo=true;}else{bGo=false;}
                  }
                  if (bGo)
                  {
                      $('#btnCambiarLote').hide();
                      $("table img").hide();
                      var sObjImputado='#txt_' + _id_factura_item; //
                      var sObjSaldoImputable='#td_' + _id_factura_item;
                      var sObjSaldoIVA='#td_IVA_' + _id_factura_item;
                      var sObjIMG='#td_img_' + _id_factura_item;
                      var _id_recibo = $('#id_recibo_seleccionado').val();
                      var sParam='case=procesar_imputacion&id_motivo=' + vRet + '&data=' + _id_recibo + '&recordPK=' + _id_mcc + "&importe_mcc=" + _imputar + "&id_factura_item=" + _id_factura_item + "&id_factura=" + _id_factura;
                      var vret=AjaxExec('___ajax_eval.aspx',sParam);
                      if (vret!="")
                      {
                         var vData=vret.split('|');
                         vData[0]=vData[0].replace(',','.');
                         vData[3]=vData[3].replace(',','.');
                         vData[4]=vData[4].replace(',','.');
                         $(sObjIMG).html("<img src='../media/imagenes/save.gif' style='cursor:hand;' onclick=javascript:ProcesarImporteImputable('" + _id_factura + "','" + _id_factura_item + "','" + vData[0] + "','" + _id_mcc + "')>");
                         try{if(vData[0]*1<=0){vData[0]="0";}}catch(rex){}
                         $(sObjSaldoImputable).text('$ ' + vData[0]);
                         $(sObjImputado).val('0');
                         $('#importe_pendiente').val(vData[1]);
                         $('#spanImportePendiente').html(vData[1]).css('font-size','14px').css('font-weight','bold').css('color','red');
                         if (vData[0]=='0.00' || vData[0]=='0') {$('#tr_' + _id_factura_item).hide('slow');}
                         var _saldoIva=($(sObjSaldoIVA).html()*1)-(vData[2]*-1);
              	         _saldoIva=Math.round(_saldoIva*100)/100;
                         $(sObjSaldoIVA).html(_saldoIva);
                         $("#tdSaldoImputable_"+_id_factura).html(vData[3]);
                         $("#tdDebitos_"+_id_factura).html(vData[4]);
                         var sObj='#tddeb_' + _id_factura;
                         sParam='case=detalle_factura_debitos&data=' + _id_factura;
                         $('#btnCambiarLote').show();
                         $("table img").show();
                         AjaxSimpleASync('../media/wait/2.gif',sObj,'___ajax_eval.aspx',sParam);
                      }
                      $('#btnCambiarLote').show();
                      $("table img").show();
                  }
               }  
         //}
   }   
   
function ValidarImporteImputable(_id_factura_item,_saldo_imputable)   
   {
      var _pendiente=$('#importe_pendiente').val();
      _pendiente=_pendiente.replace(',','.');
      if (_pendiente==''){_pendiente='0';}
      _pendiente=(_pendiente*1);

      var sImputa='txt_' + _id_factura_item;
      var _imputar=$('#' + sImputa).val();
      if (_imputar==''){_imputar='0';}
      _imputar=(_imputar*1);

      if (_saldo_imputable==''){_saldo_imputable='0';}
      _saldo_imputable=(_saldo_imputable*1);
      
      if(!IsNumeric(attach(sImputa).value))
         {
            alert('El valor no es un número!');
            $('#' + sImputa).val('0');
            return false;
         }
      else
         {
             if (_imputar>_pendiente)
             {
                alert('El valor a imputar supera el saldo disponible en el lote de importes seleccionado.  Disponible: $ ' + _pendiente + ' Imputable: $ ' + _saldo_imputable);
                $('#txt_' + _id_factura_item).val('0');
                return false;
             }
             if (_imputar>_saldo_imputable)
             {
                alert('El valor a imputar supera el saldo imputable en el ítem de la factura.  Disponible: $ ' + _pendiente + ' Imputable: $ ' + _saldo_imputable);
                $('#txt_' + _id_factura_item).val('0');
                return false;
             }   
          return true;
         }
   }
   
function ValidarItemImporteRedistribuir(oThis)
   {
      if(!IsNumeric(oThis.value))
         {
            alert('El valor no es un número!');
            oThis.value=0;
            return false;
         }
      else
         {
            var _total=$('#frozen_total').val()*1;
            var _asignado=0;
            var _saldo=0;
            $(".clImporte").each(function(){var _val=$(this).val()*1;_asignado+=_val;});
             _asignado=Math.round(_asignado*100)/100;
             _total=Math.round(_total*100)/100;
             _saldo=(_total-_asignado);
             _saldo=Math.round(_saldo*100)/100;
             if (_saldo>=0 && _saldo<=_total)
             {
                $('#total_factura').html(_saldo);
             }
             else
             {
                oThis.value=0;
                ValidarItemImporteRedistribuir(oThis);
             }
             if(_saldo==0){$('#btnOK').show();}else{$('#btnOK').hide();}
             return true;
         }
   }

function TotalizarLineaRefacturacion(id_factura,id_mcc,oThis,iMin,iMax)
   {
      try
         {
            ValidateNumericRange(oThis,iMin,iMax);
            var _alicuota_iva=(attach('alicuota_iva').value.replace(',','.')*1);
            var _bruto=(oThis.value*1);
            var _iva=(_bruto*(_alicuota_iva/100));
            var _neto=(_bruto+_iva);
            var _perdida=(iMax-_bruto);
            _iva=Math.round(_iva*100)/100;  
            _neto=Math.round(_neto*100)/100;  
            _perdida=Math.round(_perdida*100)/100;  
            try{attach('iva_' + id_mcc).value=_iva}catch(rex){};
            $('#td_iva_' + id_mcc).html('$ ' + _iva);
            $('#td_total_' + id_mcc).html('$ ' + _neto);
            $('#td_perdida_' + id_mcc).html('$ ' + _perdida);
            try{TotalizarAGenerarNC(id_factura);}catch(rex){};
         }catch(rex){};
   }
 
 function TotalizarAGenerarNC(_id_factura)
    {
      var st1=0;
      var st2=0;
      var st3=0;
      var st4=0;
      $('#id_factura_refacturar').val(_id_factura);

      $("#tbl_" + _id_factura + " td[id*=td2_]").each(function()
      {
         var _sidchk=$(this).attr("id").replace("td2_","chk_");
         if(attach(_sidchk).checked){st1+=$(this).html().replace('$ ','').replace(',','.')*1;}
      });
      
      $("#tbl_" + _id_factura + " input[id*=refacturar_]").each(function()
      {
         var _sidchk=$(this).attr("id").replace("refacturar_","chk_");
         if(attach(_sidchk).checked){st2+=$(this).val().replace(',','.')*1;}
      });

      $("#tbl_" + _id_factura + " input[id*=saldo_]").each(function()
      {
         var _sidchk=$(this).attr("id").replace("refacturar_","chk_");
         if(attach(_sidchk).checked){st3+=$(this).val().replace(',','.')*1;}
      });

      $("#tbl_" + _id_factura + " td[id*=td_perdida_]").each(function()
      {
         var _sidchk=$(this).attr("id").replace("td_perdida_","chk_");
         var _sidperdida=$(this).attr("id").replace("td_perdida_","perdida_");
         if(attach(_sidchk).checked)
         {
            var _i4=$(this).html().replace('$ ','').replace(',','.')*1;
            attach(_sidperdida).value=_i4;
            st4+=_i4;
         }
      });
      
      st1=Math.round(st1*100)/100;  
      st2=Math.round(st2*100)/100;  
      st3=Math.round(st3*100)/100;  
      st4=Math.round(st4*100)/100;  
      
      $('#tdTotal2_' + _id_factura).html('$ ' + st1); // sub total nc
      $('#tdTotal3_' + _id_factura).html('$ ' + st2); // sub total a refacturar
      $('#tdTotal4_' + _id_factura).html('-'); // sub total iva
      $('#tdTotal_perdida_' + _id_factura).html('$ ' + st4); // sub total a perdida
      var _t1=0;
      var _t2=0;
      var _t3=0;
      $("#ListaItemsParaArmarNC td[id*=tdTotal2_]").each(function(){_t1+=$(this).html().replace('$ ','').replace(',','.')*1;});
      $("#ListaItemsParaArmarNC td[id*=tdTotal3_]").each(function(){_t2+=$(this).html().replace('$ ','').replace(',','.')*1;});
      $("#ListaItemsParaArmarNC td[id*=tdTotal_perdida_]").each(function(){_t3+=$(this).html().replace('$ ','').replace(',','.')*1;});

      _t1=Math.round(_t1*100)/100;  
      _t2=Math.round(_t2*100)/100;  
      _t3=Math.round(_t3*100)/100;  
      
      $('#totalNC').html('$ ' + _t1);
      $('#totalREFACTURAR').html('$ ' + _t2);
      $('#totalPERDIDA').html('$ ' + _t3);
    }
 
 function PasarAInternacion(id_item,id_paciente,id_interaccion,iTer)
   {
      var sParam='case=pasar_a_internacion&recordPK=' + id_interaccion + '&id_paciente=' + id_paciente + '&id_item=' + id_item;
      var vret=AjaxExec('___ajax_eval.aspx',sParam);
      if (vret==""){DelGeneralLine(iTer,'tditeminteraccion');}else{alert('No se puedo pasar el consumo al registro de internación');}
   }
   
 function BuscarLiquidaciones(sModo)
   {
      var bEmpresa=true;//$('#id_empresa_generadora').val()!='0';
      var bMedico=$('#id_usuario_medico').val()!='0';
      var bSede=$('#id_sucursal').val()!='0';
      //var bDesde=isDate($('#fecha_desde').val());
      var bHasta=isDate($('#fecha_hasta').val());
      
      if(bEmpresa&&bHasta&&(bMedico||bSede))
         {
            attach('tbl').disabled=false;
            SubmitToURL('___proc_liquidaciones.aspx?exec=S&modo='+sModo,'frame_body');
         }
      else
         {
            alert('Faltan datos requeridos para procesar la búsqueda.\nVerifique los siguientes datos.\n - Empresa generadora\n - Profesional tercero a liquidar o Sede\n - Fecha desde\n - Fecha hasta');
         }   
   }

 function BuscarImputaciones()
   {
      attach('tbl').disabled=false;
      if($('#id_obra_social').val()!='0'){SubmitToURL('___proc_IMPUTAR.aspx?exec=S','frame_body');}else{alert('Faltan datos requeridos para procesar la búsqueda.\nVerifique los siguientes datos.\n - Obra social');}   
   }   

function RedistribuirImportes(_id_recibo,_recibo,_importe)
   {
      attach("id_empresa_generadora").disabled=false;
      attach("id_obra_social").disabled=false;
      attach("id_paciente").disabled=false;
      attach("id_usuario_medico").disabled=false;
      attach('tbl').disabled=false;
      var iRet=WindowsOpenDialog('___windows_validate.aspx?proc=REDISTRIBUIR_IMPORTES&p1='+_id_recibo+'&tipo=' + _recibo + '&importe=' + _importe,'600','800');
      if (iRet==1){BuscarImputaciones();}
   }

function EditarImporteMCCP(_id_mccp)
   {
      attach('tbl').disabled=false;
      var iRet=WindowsOpenDialog('___windows_validate.aspx?proc=IMPORTE_ITEM_MCCP&p1='+_id_mccp,'200','450');
      if (iRet==1){SubmitToURL('___proc_liquidaciones.aspx?exec=S','frame_body');}
   }

function AgregarMCCP(_id_mccp)
   {
      attach('tbl').disabled=false;
      var iRet=WindowsOpenDialog('___windows_validate.aspx?proc=ITEM_MCCP_MANUAL&p1='+_id_mccp,'300','600');
      if (iRet==1){SubmitToURL('___proc_liquidaciones.aspx?exec=S','frame_body');}
   }   

function CerrarConsumos()
   {
      if(attach('fecha_hasta').value!='')
         {
            SubmitToURL('___proc_cierre_consumos.aspx?exec=S','frame_body');
         }
      else
         {
            alert('La fecha límite de consumos es obligatoria!');
         }
   }   

function BuscarFechasCierresImpositivos()
   {
      var sParam='case=fechas_cierres_impositivos&id_empresa_generadora=' + attach('id_empresa_generadora').value + '&anio=' + attach('anio').value;
      AjaxSimpleASync('../media/wait/2.gif','#divLista','___ajax_eval.aspx',sParam);
   }   
  
function ListarItemsParaArmarNC(_idDiv,_id_obra_social,_id_paciente,_id_usuario_medico)
   {
      var _id_empresa_generadora=attach('id_empresa_generadora').value;
      var _id_tipo_condicion_fiscal=attach('id_tipo_condicion_fiscal').value;
      var _sucursal=attach('sucursal').value;
      var _letra=attach('letra').value;
      var _numero=attach('numero').value;
      
      if (_id_empresa_generadora=="0" || _id_tipo_condicion_fiscal=="0" || _sucursal=="" || _letra=="" || _numero=="")
      {
         alert('Faltan datos requeridos para la búsqueda.\nVerifique los siguientes datos.\n - Empresa\n - Condición fiscal\n - Punto de venta\n - Letra\n - Número');
      }
      else
      {
          attach('id_empresa_generadora').disabled=true;
          attach('id_tipo_condicion_fiscal').disabled=true;
          attach('sucursal').disabled=true;
          var sParam='case=items_facturas_armar_nc&id_empresa_generadora=' + _id_empresa_generadora + '&sucursal=' + _sucursal + '&letra=' + _letra + '&numero=' + _numero + '&id_tipo_condicion_fiscal=' + _id_tipo_condicion_fiscal + '&id_obra_social=' + _id_obra_social + "&id_paciente="+_id_paciente +"&id_usuario_medico="+_id_usuario_medico;
          var vret=AjaxExec('___ajax_eval.aspx',sParam);
          var Pshtml=$('#'+_idDiv).html();
          $('#'+_idDiv).html(Pshtml+vret);
      }    
   }

   function ResolverMCCaProcesar()
      {
         var _id_mcc_a_procesar="";
         $("#id_empresa_generadora").attr("disable",false);
         $("#sucursal").attr("disable",false);
         $("#ListaItemsParaArmarNC input:checkbox[id*=chk_]").each(function(){if(attach($(this).attr("id")).checked){_id_mcc_a_procesar+=$(this).attr("id").replace("chk_","")+",";}});attach('id_mcc_procesados').value=_id_mcc_a_procesar;
      }
   
   function FACABMRecalcular()
      {
         var oCbo = attach('id_tipo_condicion_fiscal');
         var sText=oCbo.options[oCbo.selectedIndex].text;
         attach('alicuota_iva').value=sText.split('|')[1];
         RecalcularFactura('importe_bruto','alicuota_iva','importe_iva','importe_neto','alicuota_iibb','percepcion_iibb');
      }

   function SetResCta(imodo)
      {
         $('#trAddSeek1').hide();
         $('#trAddSeek2').hide();
         $('#trAddSeek3').hide();
         $('#trAddSeek'+imodo).show();
         attach("modo_rescuenta").value=imodo;
         switch(imodo)
            {
               case 1:
                  attach("id_factura_profesional").value='0'
                  attach("id_paciente").value=''
                  break;
               case 2:
                  attach("id_obra_social").value='0'
                  attach("id_paciente").value=''
                  break;
               case 3:
                  attach("id_factura_profesional").value='0'
                  attach("id_obra_social").value='0'
                  break;
            }
      }
  
  function ConsolidarItemMasIVA(_id_factura_item)
      {
         var iImporte=$('#td_'+_id_factura_item).html()*1;
         var iIva=$('#td_IVA_'+_id_factura_item).html()*1;
         var iTotal=Math.round((iImporte+iIva)*100)/100;
         $('#td_'+_id_factura_item).html('$ '+iTotal);
         $('#txt_'+_id_factura_item).val(iTotal);
         var _reemp=$('#tr_'+_id_factura_item).html();
         _reemp=_reemp.replace(iImporte.toString(),iTotal.toString());
         $('#tr_'+_id_factura_item).html(_reemp);
      }

  function CierreCajas()
      {
         var o1 = attach('fecha_desde');
         var o2 = attach('fecha_hasta');
         if (o1.value=='' || o2.value=='') 
            {
               alert('Faltan datos requeridos para procesar la consulta.\nVerifique los siguientes datos.\n - Fecha desde\n - Fecha hasta');
               return false;
            }
         else
            {   
               SubmitToURL('___proc_cierre_cajas.aspx?exec=S','frame_body');
            }
      }      

  function TotalizarImportesBonos(sId,sTotal)
      {
         try
         {
            sTotal=sTotal.replace(',','.');
            var _total=redondea(($('#'+sId).html().replace('$ ','')*1)+(sTotal*1),2);
            $('#'+sId).html("$ " + _total);
         }catch(rex){}
      }

  function VerPracticasTurno(sObj,_iIdTurno)
     {
        var sParam='case=practicas_turno&recordPK=' + _iIdTurno;
        AjaxSimpleASync('../media/wait/2.gif',sObj,'___ajax_eval.aspx',sParam);
     }   

  function InformarAutorizacionesAdmision(_nro_afiliado,_id_agenda_libre_item)
     {
        var bData=false;
        $("body input[id*=cod_manual]").each(function(){if(!bData){bData=($(this).val()!="");}});
        if(bData)
           {
              $('input:radio', parent.document.body).filter('[value="S"]').attr('checked', true); 
              $("#trAutorizaciones", parent.document.body).hide(); 
              SubmitToURL('___proc_validar_online.aspx?modo=modo_manual&nro_afiliado=' + _nro_afiliado + '&id=' + _id_agenda_libre_item,'frame_validar_online');
           }
        else
           {
              alert('Debe ingresar algún código de autorización');
           }      
     }

function TotalizarMCCSeparado()
   {
      try
      {
          var _abiertos=0;
          var _cerrados=0;
          var _total=0;
          $("#tblMCC td[id*=td1_]").each(function()
          {
             var _sid=$(this).attr("id").replace("td1_","");
             var _importe=$("#td2_"+_sid).html().replace(",",".")*1;
             if($(this).html().indexOf("Cerrar")>-1)
                {
                   _abiertos+=_importe;
                }
             else
                {
                   _cerrados+=_importe;
                }   
          });
          _total=_abiertos+_cerrados;
          _abiertos=Math.round(_abiertos*100)/100;  
          _cerrados=Math.round(_cerrados*100)/100;  
          _total=Math.round(_total*100)/100;  
          $("#total_importe_abierto").html("$ " + _abiertos);
          $("#total_importe_cerrado").html("$ " + _cerrados);
          $("#total_importe").html("$ " + _total);
       }catch(rex){}
   }

function BuscarPrecio()
   {
      var _id_empresa_generadora=$('#id_empresa_generadora').val();
      var _id_obra_social=$('#id_obra_social').val();
      var _id_plan_cobertura=$('#id_plan_cobertura').val();
      var _codigo_desde=$('#codigo_desde').val();
      var _codigo_hasta=$('#codigo_hasta').val();
      var _descripcion=$('#descripcion').val();
      _descripcion=_descripcion.replace(" ","_");
      var sParam='case=buscar_precios&id_empresa_generadora=' + _id_empresa_generadora + '&id_obra_social=' + _id_obra_social + '&id_plan_cobertura=' + _id_plan_cobertura + '&codigo_desde=' + _codigo_desde + '&codigo_hasta=' + _codigo_hasta + '&descripcion=' + _descripcion;
      var vret=AjaxExec('___ajax_eval.aspx',sParam);
      var Pshtml=$('#divRes').html();
      $('#divRes').html(Pshtml+vret);
   }   

function ValidarPorcentaje(id_contrato)
   {
      var bFecha=isDate($('#fecha_vigencia').val());
      if(bFecha)
         {
            SubmitToURL('___windows_validate.aspx?proc=VALIDATE_PORCENTAJE_ITEMS_CONTRATO_PROC&p1='+id_contrato,'frame_validate_save');
         }
      else
         {
            alert('Debe carga una fecha de vigencia');
         }   
   }

function AplicarPorcentaje(_id_contrato)
   {
      var _id_empresa_generadora=$('#id_empresa_generadora').val();
      var _id_obra_social=$('#id_obra_social').val();
      var _id_plan_cobertura=$('#id_plan_cobertura').val();
      var vret=WindowsOpenDialog('___windows_validate.aspx?tipo_aplicacion=' + _tipo_aplicacion + '&proc=VALIDATE_PORCENTAJE_ITEMS_CONTRATO&p1='+_id_contrato+'&id_empresa_generadora=' + _id_empresa_generadora + '&id_obra_social=' + _id_obra_social + '&id_plan_cobertura=' + _id_plan_cobertura,'300','800');
      if(vret==1){$('#divRes').html('');}
   }

function ProcesarPorRango()
   {
      var _id_empresa_generadora=$('#id_empresa_generadora').val();
      var _id_obra_social=$('#id_obra_social').val();
      var _id_plan_cobertura=$('#id_plan_cobertura').val();
      var vret=WindowsOpenDialog('___windows_validate.aspx?proc=VALIDATE_RANGO_ITEMS_CONTRATO&p1=0&id_empresa_generadora=' + _id_empresa_generadora + '&id_obra_social=' + _id_obra_social + '&id_plan_cobertura=' + _id_plan_cobertura,'300','800');
      if(vret==1){$('#divRes').html('');}
   }   

function SimularAjustePrecios(oObj)
   {
        var _porc=$('#porc_ajuste').val()*1;
        var _t1=0;
        var _t2=0;
        var _t3=0;
        var _t4=0;
        var _ta1=0;
        var _ta2=0;
        var _ta3=0;
        var _ta4=0;
        $("td[id*=precio1_]").each(function()
        {
           var _sid=$(this).attr("id").replace("precio1_","");
           var _p1=$('#precio1_' + _sid).html()*1;
           var _p2=$('#precio2_' + _sid).html()*1;
           var _p3=$('#precio3_' + _sid).html()*1;
           var _p4=$('#precio4_' + _sid).html()*1;
           var _pa1=_p1*(1+(_porc/100));
           var _pa2=_p2*(1+(_porc/100));
           var _pa3=_p3*(1+(_porc/100));
           var _pa4=_p4*(1+(_porc/100));
           _t1+=_p1*1;
           _t2+=_p2*1;
           _t3+=_p3*1;
           _t4+=_p4*1;
           $('#precioAjustado1_' + _sid).html(redondea(_pa1,2));
           $('#precioAjustado2_' + _sid).html(redondea(_pa2,2));
           $('#precioAjustado3_' + _sid).html(redondea(_pa3,2));
           $('#precioAjustado4_' + _sid).html(redondea(_pa4,2));
           _ta1+=_pa1*1;
           _ta2+=_pa2*1;
           _ta3+=_pa3*1;
           _ta4+=_pa4*1;
           $('#precio1_' + _sid).html(redondea(_p1,2));
           $('#precio2_' + _sid).html(redondea(_p2,2));
           $('#precio3_' + _sid).html(redondea(_p3,2));
           $('#precio4_' + _sid).html(redondea(_p4,2));
        });
        $('#total1').html(redondea(_t1,2));
        $('#total2').html(redondea(_t2,2));
        $('#total3').html(redondea(_t3,2));
        $('#total4').html(redondea(_t4,2));
        $('#totalajustado1').html(redondea(_ta1,2));
        $('#totalajustado2').html(redondea(_ta2,2));
        $('#totalajustado3').html(redondea(_ta3,2));
        $('#totalajustado4').html(redondea(_ta4,2));
   }

function RecepcionarPaciente(iModo,id_reg)
   {
      var _id_medico=$('#id_medico_turno').val();
      var _id_medico_mandante=$('#id_medico_mandante').val();
      if(_id_medico!="0")
         {
            AjaxExec('___ajax_eval.aspx','case=medico_al_turno&data='+id_reg+'&id_usuario_medico='+_id_medico+'&id_medico_mandante='+_id_medico_mandante);
            switch(iModo)
               {
                  case "0":
                     if(attach('rdAutorizaciones')[0].checked){ival=1;}else{ival=0;};window.returnValue=ival;self.close();
                     break;
                  case "1":
                     if(attach('rdAutorizaciones')[0].checked){ival=100;}else{ival=99;};window.returnValue=ival;self.close();
                     break;
               }
         }
      else
         {
            alert('Debe seleccionar médico responsable de la atención');
         }   
   }

function ConfirmaRenumeracion(mvarP1,_numero_factura)
   {
      if (_numero_factura!='')
         {
            if(confirm('La factura que está intentando renumerar tiene asignado el Nº' + _numero_factura + '.\nConfirma el cambio de numero?'))
               {
                  SubmitToURL('___windows_validate.aspx?proc=RENUMERAR_FACTURA_PROC&p1=' + mvarP1,'modal');
               }
         }
      else
         {
            SubmitToURL('___windows_validate.aspx?proc=RENUMERAR_FACTURA_PROC&p1=' + mvarP1,'modal');
         }
   }

function VerPACSSeries(sid,StudyInstanceUID)
   {
      if($('#td_brow_'+sid).html()!='')
         {
            $('#imgFolder_'+sid).attr('src','../media/imagenes/folder.png');
            $('#td_brow_'+sid).html('');
            $('#tdDetalle').html('<br/>');
            $('#tdDetalle2').html('<br/>');
         }
      else
         {
            var _detalle=($('#td1_'+sid).html() + ' ' + $('#td2_'+sid).html() + ' ' + $('#td3_'+sid).html() + ' ' + $('#td4_'+sid).html());
            $('#tdDetalle').html(_detalle);
            $('#imgFolder_'+sid).attr('src','../media/imagenes/folder_open.png');
            var sObj=('#td_brow_'+sid);
            var sparam='case=pacs_series&studyInstanceUID='+StudyInstanceUID;
            AjaxSimpleASync('../media/wait/2.gif',sObj,'___ajax_eval.aspx',sparam);
         } 
   }

function ResizePACSView(){if(bResize && _lastSerieUID!=""){bResize=true;ShowPacsViewer(_lastDivPACS,_lastStudyUID,_lastSerieUID);}}

function ShowPacsViewer(sid,_id_div,StudyInstanceUID,SeriesInstanceUID)
   {
       var _detalle=($('#tds2_'+sid).html() + ' ' + $('#tds4_'+sid).html() + ' ' + $('#tds5_'+sid).html() + ' ' + $('#tds6_'+sid).html());
       $('#tdDetalle2').html(_detalle);
       _lastDivPACS=_id_div;
       _lastStudyUID=StudyInstanceUID;
       _lastSerieUID=SeriesInstanceUID;
       $('#tbl_practicas').fadeOut();
       SetRelativePositions(_id_div);
       _maxH=(_wH-95);
       _maxW=(_wW-1);
       $('#'+_id_div).css('height',(_maxH+'px')).css('width',(_maxW+'px'));
       $('#'+_id_div).css({'background-color':'white','border':'solid 0px yellow','position':'absolute','overflow':'hidden','left':'0px','top':'95px'});
       var sObj=("#"+_id_div);
       var sparam="case=pacs_viewer&studyInstanceUID=" + StudyInstanceUID + "&seriesInstanceUID=" + SeriesInstanceUID;
       AjaxSimpleASync('../media/wait/20.gif',sObj,'___ajax_eval.aspx',sparam);
       $("#"+_id_div).fadeIn();
       bResize=false;
   }

function SetPACSViewerPos()
   {
      //$('body').die();
      $('#divListaImagenes img').die();
      $('#imgFull').die();
      $('#tbl').hide();
      $('#tblToolbar').fadeIn(150);
      var _h=(_maxH-5);
      var _w=_maxW;
      //if(_maxW>1024){_w=1024;}else{_w=_maxW;}
      $('#divListaImagenes').css({'position':'absolute','overflow-X':'auto','overflow-Y':'hidden','width':_w+'px','height':'105px','border':'solid 0px white'});
      $('#divImagenFull').css({'position':'absolute','border':'solid 0px white','overflow':'hidden','left':'0px','top':'0px','width':_w+'px','height':_maxH+'px'});
      contW=$('#divImagenFull').css('width').replace('px','')*1;
      contH=$('#divImagenFull').css('height').replace('px','')*1;     
      contL=$('#divImagenFull').css('left').replace('px','')*1;
      contT=$('#divImagenFull').css('top').replace('px','')*1;  
      _w=(_w-25);
      $('#divListaImagenes img').live('click',function(){SelectPACSImage($(this));});
      $('#imgFull').live('dblclick',function(){DoPACSDblClick();});
      $('#imgFull').live('mousemove',function(event){DoPACSMouseMove();});
      $('#imgFull').live('click',function(event){draggedObj=null;});

//      $('#imgFull').live('pinchopen',function(){DoPACSZoom(1.15);});
//      $('#imgFull').live('pinchclose',function(){DoPACSZoom(0.85);});
//      $('#imgFull').live('taptwo',function(){DoPACSAjustar();});
//      $('#imgFull').live('swipeup',function(){DoPACSPrevImage();});
//      $('#imgFull').live('swipeleft',function(){DoPACSPrevImage();});
//      $('#imgFull').live('swipedown',function(){DoPACSNextImage();});
//      $('#imgFull').live('swiperight',function(){DoPACSNextImage();});
      
      $('#divL').css({'position':'absolute','left':'0px','top':'0px','width':'25px','background-color':'ivory','height':'86px'});
      $('#divR').css({'position':'absolute','left':_w+'px','top':'0px','width':'25px','background-color':'ivory','height':'86px'});
      //$(window).resize(function(){setInterval("ResizePACSView()",250);});
   }

function SelectPACSImage(oObj)
   {
      iOpacity=1;
      draggedObj=null;
      oSelectedImage=oObj;
      imagenPACSActual=oSelectedImage.parent().attr("id").split("_")[1]*1;
      $('#divListaImagenes img').css({'border':'solid 2px white'})
      oObj.css({'border':'solid 2px red'})
      $('#imgFull').attr('src',oObj.attr('src'));
      $('#status').html('Imagen: ' + oSelectedImage.attr('title'));
      //$('#ajustar').click();
   }

function DoPACSNextImage(){imagenPACSActual+=1;if($('#tdImag_'+imagenPACSActual).html()==null){imagenPACSActual=1;}$('#tdImag_'+imagenPACSActual+' > img').click();}
function DoPACSPrevImage(){DoPACSPause();imagenPACSActual-=1;if($('#tdImag_'+imagenPACSActual).html()==null){imagenPACSActual=iLastImagenPACS;}$('#tdImag_'+imagenPACSActual+' > img').click();}
function DoPACSPlay(){bPlayingPACS=true;$('#play').hide();$('#pause').fadeIn(150);idTimerPACS=setInterval("DoPACSNextImage()",300);}
function DoPACSPause(){clearInterval(idTimerPACS);bPlayingPACS=false;$('#pause').hide();$('#play').fadeIn(150);}
function DoPACSDblClick(){if(window.event.ctrlKey){iOpacity=1;$('#imgFull').fadeTo(10,iOpacity);}else{if(window.event.altKey){DoPACSZoom(0.85);}else{DoPACSZoom(1.15);}}}
function ClosePACSViewer(){$('#tdDetalle2').html('<br/>');_lastDivPACS="";_lastStudyUID="";_lastSerieUID="";$('#tblToolbar').hide();$('#tbl').fadeIn(150);$('#divViewer').hide();$('#tbl_practicas').fadeIn(150);}
function DoPACSWhell(sFlag){DoPACSBrillo(sFlag);}

function SetWADOImage(sid,studyInstanceUID,seriesInstanceUID,SOPInstanceUID)
   {
      var sObj=("#"+sid);
      var sparam="case=wado_img&studyInstanceUID=" + studyInstanceUID + "&seriesInstanceUID=" + seriesInstanceUID + "&SOPInstanceUID=" + SOPInstanceUID;
      AjaxSimpleASync('../media/wait/10.gif',sObj,'___ajax_eval.aspx',sparam);
      if($(window).width()<$('#divListaImagenes').width()){$('#divL').show();$('#divR').show();}
   }

function PACSTools(oThis)
   {
      $('#imgFull').css({'cursor':'default'});
      $('#divToolbar').fadeTo(150,0.90);
      $('#divToolbar img').fadeTo(150,0.65);
      if(bPlayingPACS){$('#play').hide();}else{$('#pause').hide();};
      $('#'+oThis.id).fadeTo(150,1);
      _lastEffect=oThis.id;
      var _msg="";
      switch(_lastEffect)
         {
            case "restaurar":
               DoPACSBrillo("zero");
               //SelectPACSImage(oSelectedImage);
               DoPACSAjustar();
               _msg='Se ha vuelto a cargar la imagen original';
               break;
            case "zoomplus":
               $('#imgFull').css({'cursor':'crosshair'});
               _msg='Doble click para aumentar';
               break;
            case "zoomminus":
               $('#imgFull').css({'cursor':'crosshair'});
               _msg='Presione la tecla Alt y doble click para reducir';
               break;
            case "mover":
               $('#imgFull').css({'cursor':'default'});
               _msg='Presione la tecla Ctrl y mueva la imagen con el mouse';
               break;
            case "brillomas":
               DoPACSBrillo("down");
               _msg='Se ha incrementado el brillo de la imagen';
               break;
            case "brillomenos":
               DoPACSBrillo("up");
               _msg='Se ha bajado el brillo de la imagen';
               break;
            case "play":
               DoPACSPlay();
               _msg='Mostrando secuencia automática';
               break;
            case "pause":
               DoPACSPause();
               _msg='Secuencia automática detenida';
               break;
            case "ajustar":
               DoPACSAjustar();
               if(!bPlayingPACS){_msg='Se ha ajustado la imagen';}
               break;
            case "verlista":
               $('#verlista').hide();
               $('#ocultarlista').fadeIn(150);
               $('#divListaImagenes').show("slow");
               _msg='Las imágenes de la serie se han desplegado';
               break;
            case "ocultarlista":
               $('#ocultarlista').hide();
               $('#verlista').fadeIn(150);
               $('#divListaImagenes').hide("slow");
               _msg='Se han ocultado las imágenes de la serie';
               break;
         }
      $('#status').html("<i style='color:blue'>"+_msg+"</i>");
   }

function DoPACSAjustar()
   {
       if(oSelectedImage)
          {
             $('#imgFull').hide();
             var imgW=oSelectedImage.css('width').replace('px','')*1;
             var imgH=oSelectedImage.css('height').replace('px','')*1;     
             var contW=$('#divImagenFull').css('width').replace('px','')*1;
             var contH=$('#divImagenFull').css('height').replace('px','')*1;     
             var contL=$('#divImagenFull').css('left').replace('px','')*1;
             var contT=$('#divImagenFull').css('top').replace('px','')*1;     
             if(imgW<imgH){$('#imgFull').css('height','').css('width',contW+'px');}
             if(imgW>=imgH){$('#imgFull').css('width','').css('height',contH+'px');}
             $('#imgFull').css({'position':'absolute','left':'0px','top':'0px'});
             _msg='Se ha ajustado la imagen al area visible';
             $('#imgFull').show();
          }
   }
   
function DoPACSZoom(iPorc)
   {
      var _x=window.event.clientX;
      var _y=window.event.clientY;
      var imgW=$('#imgFull').css('width').replace('px','')*1;
      var imgH=$('#imgFull').css('height').replace('px','')*1;
      var new_imgW=imgW*iPorc;
      var new_imgH=imgH*iPorc;
      var _left=$('#imgFull').css('left').replace('px','')*1;
      var _top=$('#imgFull').css('top').replace('px','')*1;
      if(_x<(imgW/2)){_left-=(new_imgW-imgW);}else{_left+=(new_imgW-imgW);}
      if(_y<(imgH/2)){_top-=(_top=new_imgH-imgH);}else{_top+=(new_imgH-imgH);}
      //limite negativo
      var _limitW=((imgW-contW)*-1);
      var _limitH=((imgH-contH)*-1)
      if(_left<_limitW){_left=_limitW;}
      if(_top<_limitH){_top=_limitH;}
      //Limite positivo
      if(_left>0){_left=0;}
      if(_top>0){_top=0;}
      $('#imgFull').css('left',_left+'px').css('top',_top+'px');
      $('#imgFull').css('width',new_imgW+'px');
      $('#imgFull').css('height',new_imgH+'px');
   }   
   
function DoPACSMouseMove()
   {
        if(window.event.ctrlKey)
          {
             if(!iOffSetFlag){iOffSetFlag=true;offsetX=window.event.offsetX;offsetY=window.event.offsetY;}
             $('#imgFull').css({'cursor':'move'});
             var _x=(window.event.clientX-offsetX);
             var _y=(window.event.clientY-offsetY);
             var imgW=$('#imgFull').css('width').replace('px','')*1;
             var imgH=$('#imgFull').css('height').replace('px','')*1;
             //limite negativo
             var _limitW=((imgW-contW)*-1);
             var _limitH=((imgH-contH)*-1);
             if(_x<_limitW){_x=_limitW;}
             if(_y<_limitH){_y=_limitH;}
             //Limite positivo
             if(_x>0){_x=0;}
             if(_y>0){_y=0;}
             $('#imgFull').css('left',_x+'px').css('top',_y+'px');
          }
        else
          {
             $('#imgFull').css({'cursor':'default'});
             iOffSetFlag=false;
          }
   } 

function DoPACSBrillo(sFlag)
   {
      switch(sFlag)
         {  
            case "zero":
               iOpacity=1;
               break;
            case "down":
               iOpacity-=0.10;
               if(iOpacity<0){iOpacity=0.05;}
               break;
            case "up":
               iOpacity+=0.10;
               if(iOpacity>1){iOpacity=1;}
               break;
         }
     $('#imgFull').fadeTo(10,iOpacity);
   }

function CambiaMesEnTurno(sDia)
   {
       //Cambiar Calendario de acuerdo al mes seleccionado
//       var _id_agenda_libre=$('#id_agenda_libre').val();
//       $('#selected_date').val(sDia);
//       var sParam='function=get_calendar_turno_by_agenda&id_agenda_libre='+_id_agenda_libre+'&dia='+sDia;
//       $('#tdDetalleCalendario').html(AjaxExec('___ajax_turnos.ashx',sParam));
       SetAgendaTurno(_modo_agenda_activo,sDia);
       CambiaDiaEnTurno("",sDia);
   }

function CambiaDiaEnTurno(sidtd,sDia)
   {
      var _id_agenda_libre=$('#id_agenda_libre').val();
      if(sidtd!="")  
      {
         $("td[id*=tdDia_]").css('border','solid 3px white');
         $('#'+sidtd).css('border','solid 3px cyan');
      }
      $("#selected_date").val(sDia);
      var sParam='function=get_turnos_by_dia_agenda&id_agenda_libre='+_id_agenda_libre+'&dia='+sDia;
      AjaxSimpleASync('../media/wait/2.gif','#tdDetalleTurnos','___ajax_turnos.ashx',sParam);
      var sParam='function=get_turnos_by_dia_agenda_recepcion&id_sucursal='+$('#id_sucursal').val()+'&id_servicio='+$('#id_servicio_recepcion').val()+'&id_paciente='+$('#id_paciente_recepcion').val()+'&id_agenda_libre='+_id_agenda_libre+'&dia='+sDia+'&modo='+_modo_agenda_activo;
      AjaxSimpleASync('../media/wait/2.gif','#tdDetalleTurnos_Recepcion','___ajax_turnos.ashx',sParam);
   }

function SetAgendaTurno(_modo,sDia)
   {
     var _id_agenda_libre=$('#id_agenda_libre').val();
     if(_id_agenda_libre=="0")
        {
           $('#tblDetalle').fadeOut("slow");
        }
     else
        {
           _modo_agenda_activo=_modo;
           //Cambiar Calendario de acuerdo a la agenda
           var sParam='function=get_calendar_turno_by_agenda&id_agenda_libre='+_id_agenda_libre+'&dia='+sDia;
           $('#tdDetalleCalendario').html(AjaxExec('___ajax_turnos.ashx',sParam));
           if($("#selected_date").val()!=''){sDia=$("#selected_date").val();CambiaDiaEnTurno("",sDia);}
           //Cambiar detalle del profesional de acuerdo a la agenda
           var sParam='function=get_datos_medico_turno_by_agenda&id_agenda_libre='+_id_agenda_libre;
           AjaxSimpleASync('../media/wait/2.gif','#tdDetalleProfesional','___ajax_turnos.ashx',sParam);
           $('#tblDetalle').fadeIn("slow");
        }   
   }
   
function AdministracionDeTurnos(sTarget)
   {
      var sObj='#' + sTarget;
      var sParam='function=get_administrar_turnos';
      AjaxSimpleASync('../media/wait/2.gif',sObj,'___ajax_turnos.ashx',sParam);
   }

function CambiaPacienteEnTurno()
   {
      var _id_paciente=$('#user_id_paciente').val();
      var sParam='function=get_presupuestos_by_paciente&id_paciente='+_id_paciente;
      AjaxSimpleASync('../media/wait/2.gif','#tdPresupuesto','___ajax_turnos.ashx',sParam);
      var sParam='function=get_otra_data_turno_by_paciente&id_paciente='+_id_paciente;
      var _ret=AjaxExec('___ajax_turnos.ashx',sParam);
      var vData=_ret.split('|');
      if(vData[0]==''){vData[0]='0';}
      if(vData[1]==''){vData[1]='0';}
      $('#id_obra_social').val(vData[0]);
      SetChildCombo(vData[0],'id_plan_cobertura');
      $('#id_plan_cobertura').val(vData[1]);
      $('#nro_afiliado').val(vData[2]);
   }

function ToggleBotonesTurno(sId,idx)
   {
      $('#tblBotones td[id*=tdbtn]').css('background-color','white');
      $('#'+sId).css('background-color','whitesmoke');
      $('#tblConsultar').hide();
      $('#tblDetalle').hide();
      switch(idx)
         {
            case 1:
               $('#tblBotonesRecepcion td[id*=tdRcp]').hide();
               $('#tdRcp2').show();
               $('#td_derecha_recepcion').hide();
               $('#td_derecha').show();
               $('#tblDetalle').show();
               $('#tblFiltrosConsultar').hide();
               $('#tblCabecera').show();
               break;
            case 2:
               $('#tblBotonesRecepcion td[id*=tdRcp]').show();
               $('#td_derecha').hide();
               $('#td_derecha_recepcion').show();
               $('#tblDetalle').show();
               $('#tblFiltrosConsultar').hide();
               $('#tblCabecera').show();
               break;
            case 3:
               $('#tblBotonesRecepcion td[id*=tdRcp]').show();
               $('#td_derecha').hide();
               $('#td_derecha_recepcion').show();
               $('#tblDetalle').show();
               $('#tblFiltrosConsultar').hide();
               $('#tblCabecera').show();
               break;
            case 4:
               $('#tblBotonesRecepcion td[id*=tdRcp]').show();
               $('#td_derecha').hide();
               $('#td_derecha_recepcion').hide();
               $('#tblConsultar').show();
               $('#tblCabecera').hide();
               $('#tblFiltrosConsultar').show();
               break;
         }
   }   

function ToggleBotonesRecepcion(iBtn)
   {
      var _titulo='';
      $('#tblBotonesRecepcion td[id*=tdRcp]').css('background-color','white');
      $('#tblBotonesRecepcion input').css('background-color','white');
      $('#id_servicio_recepcion').hide();
      $('#id_agenda_libre').hide();
      $('#id_paciente_recepcion').hide();
      $('#id_quirofano_recepcion').hide();
      switch(iBtn)
         {
            case "1": // servicio
                $('#id_servicio_recepcion').show();
               break;
            case "2": // agenda
               $('#id_agenda_libre').show();
               break;
            case "3": // paciente
               $('#id_paciente_recepcion').show();
               break;
            case "4": // quirofano
               break;
         }
      $('#tdRcp'+iBtn).css('background-color','navy');
      $('#tdRcp'+iBtn+ ' input').css('background-color','whitesmoke');
      $('#tblModosRecepcion').show();
   }

function DetalleAnaliticoPaciente(id_mcc,_target)
   {  
      try
         {
            var sObj=('#'+_target);
            var sParam='case=analitico_paciente&data='+id_mcc;
            AjaxSimpleASync('../media/wait/2.gif',sObj,'___ajax_eval.aspx',sParam);
         }catch(err){}
   }

function VerPrecioPrePaga(_target,_item,_id_paciente,_ver)
   {
      if (_ver=="S")
      {
          try
             {
                var _id_empresa_generadora=$('#id_empresa_generadora').val();
                var _id_obra_social=$('#id_obra_social').val();
                var _id_plan_cobertura=$('#id_plan_cobertura').val();
                var sObj=('#'+_target);
                var sParam='case=precio_consumo&id_obra_social='+_id_obra_social+'&id_plan_cobertura='+_id_plan_cobertura+'&id_item='+_item+'&id_empresa_generadora='+_id_empresa_generadora+'&id_paciente='+_id_paciente;
                AjaxSimpleASync('../media/wait/2.gif',sObj,'___ajax_eval.aspx',sParam);
             }catch(err){}
      }
   }

function SetSede(_sede)
   {
      _sede_activa=_sede;
      $('.btnSedes').css('border','solid 1px silver').css('background-color','white');
      $('#'+_sede).css('border','solid 2px red').css('background-color','ivory');
      $('.class_8').hide();
      $('.class_10').hide();
      $('.class_11').hide();
      switch (_sede_activa)
      {
         case "CEX":
            $('.class_11').show();
            break;
         case "CSF":
            $('.class_8').show();
            break;
         case "LIBERTADOR":
            $('.class_10').show();
            break;
      }
   }

function SetAnioMes(_val)
   {
      var _class="";
      switch (_sede_activa)
      {
         case "CEX":
            _class='tr.class_11 td:first-child';
            break;
         case "CSF":
            _class='tr.class_8 td:first-child';
            break;
         case "LIBERTADOR":
            _class='tr.class_10 td:first-child';
            break;
      }
      if(_val.length==7){$(_class).each(function(){if($(this).html()!=_val & $(this).parent().attr('id').indexOf('trtg')!=-1){$(this).parent().hide();}})}
      if(_val.length<7){$(_class).each(function(){$(this).parent().show();})}
   }

function BuscarPrivadosPrimera()
   {
      var _desde=$('#fecha_desde').val();
      var _hasta=$('#fecha_hasta').val();
      var _id_sucursal=$('#id_sucursal').val();
      var bDesde=isDate(_desde);
      var bHasta=isDate(_hasta);
      if(bDesde & bHasta)
         {
            var vret=confirm('Desea generar listado en formato Excel?');
            var vExcel="";
            if(vret){vExcel="S";}
            SubmitToURL("../___windows_loader_file_contents.aspx?tipo=privados_primera&excel="+vExcel+"&desde="+_desde+"&hasta="+_hasta+"&id_sucursal="+_id_sucursal,"_blank"); 
         }
      else 
         {
            alert('Faltan datos requeridos para procesar la operación.\nVerifique los siguientes datos.\n - Fecha desde\n - Fecha hasta');
         } 
   }

function ProcesarKairos(_index,_target,_file)
{
   AjaxSimpleASync('../media/wait/2.gif',_target,'___ajax_eval.aspx','case=procesa_archivo_kairos&recordPK='+_index+'&data='+_file);
}
