<?php
	// --------------------------------------------
	// SMI
	// --------------------------------------------
	
	function handleaction_mod_smi(&$resultInfo)
	{
		$resultado=false;
		
		if(  isset($_REQUEST["ac"])  &&
			!empty($_REQUEST["ac"])  &&
			!is_null($_REQUEST["ac"])
		)
		{
			switch( $_REQUEST["ac"] )
			{
				//Logear cliente
				case "lcus":
				{
					$resultado = loginCustomerSMI($resultInfo);
					
				}
				break;
				
				//Registar cliente
				case "rc":
				{
					$resultado = registrarNuevoCliente($resultInfo);
				}
				break;
				
				//Enviar por email contacto recibido
				case "scnt":
				{
					//$resultado = enviarEmailContactoRecibido($resultInfo);
					$resultado = sendComentario($resultInfo);
				}
				break;
				
				case "pt":
				{
					//Turnos del Profesional
					$resultado = getLstTurnosTelemedicina($resultInfo);
				}
				break;

				case "gvs":
				{
					$resultado = getSessionVideo($resultInfo);
				}
				break;
				
				case "evs":
				{
					$resultado = endSessionVideo($resultInfo);
				}
				break;
				
				
				//Enviar credenciales por email
				case "scucrem":
				{
					$resultado = enviarEmailCredencialesProfesionales($resultInfo);
				}
				break;
				
				//Enviar credenciales por email, masivo
				case "scucremmv":
				{
					$resultado = enviarEmailCredencialesProfesionalesMasivo($resultInfo);
				}
				break;
				
				//Activar/Desactivar Profesional
				case "blcpr":
				{
					$resultado = cambiarEstadoBloqueoProfesional($resultInfo);
				}
				break;
				
				//Activar/Desactivar un tipo de atencion del Profesional
				case "uptat":
				{
					$resultado = cambiarTipoAtencionProfesional($resultInfo);
				}
				break;
				
				//Retornar los ultimos N-accesos
				case "gpna":
				{
					$resultado = getLastNProfAccess($resultInfo);
				}
				break;
				
				
				//Retornar lor turnos del cliente
				case "ecdamg":
				{
					$resultado = sendCustomerCuponAmigo($resultInfo);
				}
				break;
				
				//Retornar lor turnos del cliente
				case "gcdt":
				{
					$resultado = getcustomerDates($resultInfo);
				}
				break;
				
				//Retornar los pagos del cliente
				case "gctpy":
				{
					$resultado = getcustomerPayments($resultInfo);
				}
				break;
				
				//Retornar los ultimos N-accesos
				case "gcna":
				{
					$resultado = getLastNCustAccess($resultInfo);
				}
				break;
				
				
				//Reistrar cliente vendedor
				case "regcus":
				{
					$resultado = registrarNuevoClienteVendedor($resultInfo);
				}
				break;
				
				//Grabar pago para cliente de prueba
				case "pagprue":
				{
					$resultado = saveStripResponseClientePrueba($resultInfo);
				}
				break;
			}
		}
		else
		{
			$resultInfo['code'] 	= 1;
			$resultInfo['errorDes'] = "Acci&oacute;n desconocida. El tipo de consulta no esta definido. ";	
		}
		return $resultado;
	}
	//----------------END ACCTION----------

	function sendComentario(&$resultInfo)
	{
		//$resultado = enviarEmailContacto();
		$resultado = enviarEmailContactoSMI();

		if( $resultado )
		{
			//Listar Obras Sociales
			$resultInfo['code'] = 0;
		}
		else
		{
			switch($resultado)
			{
				case 1:
				{
					$resultInfo['code'] 	= 1;
					$resultInfo['errorDes'] = "El nombre esta vacio";
				}
				break;
				
				case 2:
				{
					$resultInfo['code'] 	= 2;
					$resultInfo['errorDes'] = "El email esta vacio";
				}
				break;
				
				case 3:
				{
					$resultInfo['code'] 	= 3;
					$resultInfo['errorDes'] = "El teléfono esta vacio";
				}
				break;
				
				case 4:
				{
					$resultInfo['code'] 	= 4;
					$resultInfo['errorDes'] = "El comentario esta vacio";
				}
				break;
				
				default:
				{
					$resultInfo['code'] 	= -1;
					$resultInfo['errorDes'] = "Se produjo un error al recibir el comentario";
				}
				break;
			}
		}
	}

	function enviarEmailContactoSMI()
	{
		try
		{
			$continue = true;
			
			if( !isset($_REQUEST['nombre'])	||
				is_null($_REQUEST['nombre'])	||
				empty($_REQUEST['nombre'])
			)
			{
				//return 1; //Nombre invalido/vacio
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Nombre invalido/vacio";
				$continue = false;
			}
			else
			{
				$nombre = base64_decode($_REQUEST['nombre']);
			}
			
			if( !isset($_REQUEST['email'])	||
				is_null($_REQUEST['email'])	||
				empty($_REQUEST['email'])
			)
			{
				//return 2; //Email invalido/vacio
				$resultInfo['code'] = 2;
				$resultInfo['errorDes'] = "Email invalido/vacio";
				$continue = false;
			}
			else
			{
				$email = base64_decode($_REQUEST['email']);
			}
			
			if( !isset($_REQUEST['tel'])	||
				is_null($_REQUEST['tel'])	||
				empty($_REQUEST['tel'])
			)
			{
				//return 3; //Telefono invalido/vacio
				$resultInfo['code'] = 3;
				$resultInfo['errorDes'] = "Teléfono invalido/vacio";
				$continue = false;
			}
			else
			{
				$telefono = base64_decode($_REQUEST['tel']);
			}
			
			if( !isset($_REQUEST['mensaje'])	||
				is_null($_REQUEST['mensaje'])	||
				empty($_REQUEST['mensaje'])
			)
			{
				//return 4; //Comentario invalido/vacio
				$resultInfo['code'] = 4;
				$resultInfo['errorDes'] = "Teléfono invalido/vacio";
				$continue = false;
			}
			else
			{
				$comentario = base64_decode($_REQUEST['mensaje']);
			}
			//print_r("continue[$continue]");die(" <<<<<<");
			if( $continue )
			{
				//----------------------------------------------
				//Enviar email
				//----------------------------------------------
				//$clienteInfo = $clienteInfo[0]["cli_email"];
				//-----!!!!!!!-----
				//$email=$email;//TEST!!!! COMENTAR EN PRODUCCION
				$email="gustavojuarez@gmail.com";//TEST!!!! COMENTAR EN PRODUCCION
				if($GLOBALS['SMI_TEST_MODE'])
				{
					$email="gustavojuarez@gmail.com";//TEST!!!! COMENTAR EN PRODUCCION
				}
				//-----!!!!!!!-----
				$paramsEmail = array();
				$paramsEmail["email"]   = $email;
				$paramsEmail["cusN"]    = encodeDataB64($nombre);
				$paramsEmail["cusE"]    = encodeDataB64($email);
				$paramsEmail["cusT"]    = encodeDataB64($telefono);
				$paramsEmail["cusM"]    = encodeDataB64($comentario);
				$paramsEmail["nombre"]  = encodeDataB64($nombre);
				
				$paramsEmail["subject"] = "CONTACTO RECIBIDO";
				$paramsEmail['customer']= "1576dd8687342d79d0906e1a12570907";//$GLOBALS['WS_WHATSAPP_CUSTOMER'];//SPIDER
				$paramsEmail['template']= 15; //OBTENER DE LA BASE
				$paramsEmail['tipo']	= 25; //CONTACTO RECIBIDO SMI

				//grabarLogErrorAfip($paramsEmail,"ENVIAR_EMAIL_FAC","_enviar_email_params");

				$paramsEmail["fromn"] = $GLOBALS['FROMN'];
				$paramsEmail["from"]  = $GLOBALS['FROM'];
				
				//print_r($paramsEmail);die("    <<<<<<<<<  ");
				$result = false;
				try
				{
					$res = callWebServiceSendEmail($paramsEmail,$result);
					
					try{saveWebComment();}catch (Exception $e){}
					
					if($res)
					{
						return true;
					}
					else
					{
						$resultInfo['code'] 	= 102;
						$resultInfo['errorDes'] = "Se produjo un error inesperado";
					}
				}
				catch (Exception $e) 
				{
					$resultInfo['code'] 	= 101;
					$resultInfo['errorDes'] = "Se produjo un error inesperado";
				}
				
				//grabarLogErrorAfip(array("res"=>$res),"ENVIAR_EMAIL_CMP","_enviar_email_cmp_".($res?'ok':'error'));
				//return ($res?true:false);
				//----------------------------------------------
			}
			else
			{
				//$resultInfo['code'] 	= 3;
				$resultInfo['resultCode']= 1;
				//$resultInfo['errorDes'] = "Se produjo un error al limpiar la clave-1";
			}
			return false;
		}
		catch (Exception $e) 
		{
			$resultInfo['code'] 	 = 100;
			$resultInfo['resultCode']= 1;
			$resultInfo['errorDes']  = "Se produjo un error al limpiar la clave y enviar por email: [".$e->getMessage()."]";
			
			return false;
		}
	}
	
	function sendCuponAmigo($email)
	{
		$continue=true;
		$counter=0;
		
		$cupon = false;
		$cuponContinue = false;
		
		while($continue&&$counter<=10)
		{
			$counter++;
			
			$cupon = strtoupper(randomText(10));

			$sql = "SELECT 1
					  FROM dbo.cupones
					 WHERE cup_valor = '" . $cupon ."'";
			//print_r($sql);die;
			$rs = $GLOBALS['dbSQL']->Query($sql);
			
			if ( !$rs ) 
			{ 
				return false; 
			}
			else
			{
				$cuponinf = $GLOBALS['dbSQL']->getAll();
				if(is_array($cuponinf)&&count($cuponinf)>0)
				{
					$continue=true;
				}
				else
				{
					$continue=false;
					$cuponContinue = true;
				}
			}
		}
		
		if( $cuponContinue )
		{
			$sql = "INSERT INTO dbo.cupones(cup_valor,cup_usado) VALUES ('".$cupon."',0)";
			$rs = $GLOBALS['dbSQL']->Query($sql,true);
			
			if ( !$rs ) 
			{ 
				return false; 
			}
			else
			{
				$paramsEmail = array();
				$paramsEmail["email"] = $email;
				$paramsEmail["cmpC"]  = $cupon;
				$paramsEmail["nombre"]= encodeDataB64("SMI");
				$paramsEmail["subject"] = "Cupon Plan Amigo";
				$paramsEmail['customer']= $GLOBALS['WS_WHATSAPP_CUSTOMER'];;
				$paramsEmail['template']= 20; //OBTENER DE LA BASE
				$paramsEmail['tipo']	= 31; //CAMBIAR A CONSTANTE

				$result = false;
				$res = callWebServiceSendEmail($paramsEmail,$result);
				
				//grabarLogErrorAfip(array("res"=>$res),"ENVIAR_EMAIL_CMP","_enviar_email_cmp_".($res?'ok':'error'));
				return ($res?true:false);
			}			
		}
		return true;
	}
	
	function validarCupon($cupon,&$cupcod='')
	{
		$sql = "SELECT cup_numero
				  FROM dbo.cupones
				 WHERE ltrim(rtrim(lower(cup_valor))) = '" . mb_strtolower(trim($cupon))  ."'
				   AND cli_codigo IS NULL";
		//print_r($sql);die;
		$rs = $GLOBALS['dbSQL']->Query($sql);
		
		if ( !$rs ) 
		{ 
			return false; 
		}

		$rs = $GLOBALS['dbSQL']->getAll();
		//print_r("c[".count($rs)."]");print_r("\n");die;
		if(is_array($rs)&&count($rs)>0)
		{
			$cupcod = $rs[0]["cup_numero"];
			return true;
		}
		
		return false;
	}
	
	function consumirCupon($cuponInfo)
	{
		$sql = "  UPDATE   dbo.cupones
					 SET   cup_fecha 	= GETDATE()
						  ,cup_usado  	= 1
						  ,cli_codigo	= ".$cuponInfo["clinro"]."
				   WHERE  cup_numero    = ".$cuponInfo["cuponnro"];
			   
		$resultado = $GLOBALS['dbSQL']->Query($sql,true);
		if ( !$resultado ) 
		{
			//print_r($sql);print_r("\n");//die;
			//$res = $GLOBALS['dbSQLTR']->setRollbackTransaction();	
			return false;
		}
		return true;
	}
	
	function asociarClieteVendedor($cliVendInfo)
	{
		$sql = "  INSERT INTO dbo.vendedor_clientes
					(	
						 cli_codigo
						,vencl_codigo
						
					)
					VALUES
					(
						 ".$cliVendInfo["clinro"]."
						,".$cliVendInfo["vendnro"]."
					)";
		
		//print_r($sql);//die;
		$resultado = $GLOBALS['dbSQL']->Query($sql,true);
		if ( !$resultado ) 
		{
			//print_r($sql);print_r("\n");//die;
			//$res = $GLOBALS['dbSQLTR']->setRollbackTransaction();	
			return false;
		}
		return true;
	}

	function formatoClave($clave)
	{
		if(is_numeric($clave)) //SOLO TIENE NUMEROS
		{
			return false;
		}
		
		$matchesMa = false;
		preg_match_all('/[A-Z]/', $clave, $matchesMa, PREG_OFFSET_CAPTURE);
		
		$matchesMi = false;
		preg_match_all('/[a-z]/', $clave, $matchesMi, PREG_OFFSET_CAPTURE);
		
		if( !($matchesMa && is_array($matchesMa) && count($matchesMa)>0) &&  //TIENE AL MENOS UNA LETRA MAYUSCULA
			!($matchesMi && is_array($matchesMi) && count($matchesMi)>0)	 //TIENE AL MENOS UNA LETRA MINUSCULA
		) 
		{
			return false;
		}
		
		return true;
	}
	
	function validarVendedor($vendedor)
	{
		$sql = "SELECT ven_activo
				  FROM vendedores
				 WHERE ven_codigo = '".addslashes($vendedor)."'";
		
		//print_r($sql);print_r("\n");
		$rs = $GLOBALS['dbSQL']->Query($sql);
		if ( $rs ) 
		{
			$vendedor = $GLOBALS['dbSQL']->getAll();
			if(is_array($vendedor)&&count($vendedor)>0)
			{
				return (intval($vendedor[0]["ven_activo"])==1?true:false);
			}
		}

		return false;
	}
	
	function getProximoCliente()
	{
		$sql = "SELECT MAX(cli_codigo) as mccod FROM clientes";
		
		//print_r($sql);print_r("\n");
		$rs = $GLOBALS['dbSQL']->Query($sql);
		if ( $rs ) 
		{
			$lastcliente = $GLOBALS['dbSQL']->getAll();
			if(is_array($lastcliente)&&count($lastcliente)>0)
			{
				return (intval($lastcliente[0]["mccod"])+1);
			}
		}

		return 1;
	}

	function getVtoPago($codCliente,&$paymentInfo=array())
	{
		$sql = "SELECT   t0.*
						,FORMAT(DATEADD(day, 30, t0.clispay_respuesta),'dd/MM/yyyy') as vto
					    ,(CASE WHEN  (DATEADD(day, 30, t0.clispay_respuesta) < GETDATE()) THEN 1 ELSE 0 END) vencido
						,t0.obs_codigo as obscod
						,t0.obsplan as obspcod
						,obs.obs_denom as obsname
						,obsp.obsp_denom as obspname
				  FROM  cli_stripe_payments AS t0
			INNER JOIN	obrasoc  AS obs  ON obs.obs_codigo = t0.obs_codigo
			INNER JOIN	obsplan  AS obsp ON obsp.obs_codigo = obs.obs_codigo AND obsp.obsp_cod = t0.obsplan
				 WHERE  t0.clispay_numero = (SELECT MAX(t1.clispay_numero) 
											   FROM cli_stripe_payments AS t1
											  WHERE t1.cli_codigo = ".$codCliente."
												AND t1.clispay_success = 1)";

		//print_r($sql);print_r("\n");
		$rs = $GLOBALS['dbSQL']->Query($sql);
		if ( $rs ) 
		{
			$clienteInfo = $GLOBALS['dbSQL']->getAll();
			if(is_array($clienteInfo)&&count($clienteInfo)>0)
			{
				//if() //VALIDAR VACIO
				$paymentInfo["vto"] 		= $clienteInfo[0]['vto'];
				$paymentInfo["vencido"] 	= $clienteInfo[0]['vencido'];
				$paymentInfo["obscod"] 		= $clienteInfo[0]['obscod'];
				$paymentInfo["obsname"] 	= $clienteInfo[0]['obsname'];
				$paymentInfo["obspcod"] 	= $clienteInfo[0]['obspcod'];
				$paymentInfo["obspname"] 	= $clienteInfo[0]['obspname'];

				return true;
			}
			
			//return true;
		}
		return false;
	}

	function getCustomerInfo($codigo)
	{
		$sql = "SELECT  cli_codigo AS cod
					   ,cli_dni AS doc
					   ,cli_nombre AS name
					   ,cli_fname AS fname
					   ,cli_lname AS lname
					   ,cli_fecnto AS fnac
					   ,dbo.GetAge(cli_fecnto) AS edad
					   ,cli_sexo AS sex
					   ,obs_codigo AS obscod
					   ,obsp_cod AS obspcod
					   ,cli_email AS email
					   ,cli_tel_cod_area AS telarea
					   ,cli_tel_numero AS tnro
					   ,cli_pais AS pais
					   ,cli_paiscod AS paiscod
					   ,ISNULL(cli_val_email,0) AS fvemail
					   ,ISNULL(cli_val_plan,0) AS fvplan
					   ,ISNULL(cli_val_tel,0) AS fvtel
					   ,ISNULL(cli_val_fmed,0) AS fvfmed
					   ,ISNULL(cli_val_foto,0) AS fvfoto
				  FROM clientes
				 WHERE cli_codigo = '".addslashes($codigo)."'";
		
		//print_r($sql);print_r("\n");
		$rs = $GLOBALS['dbSQL']->Query($sql);
		if ( $rs ) 
		{
			$clienteInfo = $GLOBALS['dbSQL']->getAll();
			if(is_array($clienteInfo)&&count($clienteInfo)>0)
			{//die("111111");
				$clienteInfo[0]['d']	= ltrim(date("d",strtotime($clienteInfo[0]['fnac'])),'0');
				$clienteInfo[0]['m']	= ltrim(date("m",strtotime($clienteInfo[0]['fnac'])),'0');
				$clienteInfo[0]['a']	= date("Y",strtotime($clienteInfo[0]['fnac']));
				
				$asist=0;$inasist=0;
				list($asist,$inasist) 	= getEstadisticasAsistencia($clienteInfo[0]['cod']);
				$clienteInfo[0]['estadisticas']	= $asist.';'.$inasist;
				
				$clienteInfo[0]['token'] = getToken('u',$clienteInfo[0]['cod'],$clienteInfo[0]['name'],$clienteInfo[0]['email']);
				
				//DATOS DEL PLAN:
				$clienteInfo[0]['plinf'] = getPlanInfoSMI($clienteInfo[0]['obspcod']);

				//VERIFIACAR SI TIENE EL PLAN AMIGO
				if($clienteInfo[0]['obspcod']  == $GLOBALS['SMI_OBS_PLAN_FRIEND'])
				{
					$clienteInfo[0]['obsname']  = $GLOBALS['SMI_OBS_NAME'];
					$clienteInfo[0]['obspname'] = $GLOBALS['SMI_OBS_PLANNAME'];
					$clienteInfo[0]['vto'] 		= "01/01/2099";
					$clienteInfo[0]['fvvencido']= 0;
				}
				else
				{
					$clienteInfo[0]['obscod']   = '';
					$clienteInfo[0]['obspcod']  = '';
					$clienteInfo[0]['obsname']  = '';
					$clienteInfo[0]['obspname'] = '';
					$clienteInfo[0]['vto'] 		= '';
					$clienteInfo[0]['fvvencido']= 1;

					$paymentInfo				 = array();
					$res 		 				 = getVtoPago($clienteInfo[0]['cod'],$paymentInfo);
					if( $res )
					{
						$clienteInfo[0]['obscod']   = $paymentInfo["obscod"];
						$clienteInfo[0]['obspcod']  = $paymentInfo["obspcod"];
						$clienteInfo[0]['obsname']  = $paymentInfo["obsname"];
						$clienteInfo[0]['obspname'] = $paymentInfo["obspname"];
						$clienteInfo[0]['vto'] 		= $paymentInfo["vto"];
						$clienteInfo[0]['fvvencido']= $paymentInfo["vencido"];
					}
				}
				
				//FAMILIARES
				$clienteInfo[0]['tfmad']=0;
				$clienteInfo[0]['tfmpd']=0;
				$clienteInfo[0]['fminf'] = array();
				if($clienteInfo[0]['plinf']['ffm']==1)
				{
					$totalAdultos=0;
					$totalPediatricos=0;
					// print_r($clienteInfo[0]['plinf']);die;
					// print_r($clienteInfo);die;
					$clienteInfo[0]['fminf'] = getFamiliaresSMI($clienteInfo[0]['cod'],$clienteInfo,$clienteInfo[0]['plinf'],$totalAdultos,$totalPediatricos);
					
					//VERIFICAR UMBRAL DE FAMILIARES RESTANTES POR REGISTRAR
					if(is_array($clienteInfo[0]['fminf'])&&count($clienteInfo[0]['fminf'])>0)
					{
						$clienteInfo[0]['tfmad'] = intval($clienteInfo[0]['plinf']['fad'])-$totalAdultos;
						$clienteInfo[0]['tfmpd'] = intval($clienteInfo[0]['plinf']['fpd'])-$totalPediatricos;
					}
				}
				
				return $clienteInfo;
			}
		}

		return false;
	}

	function getCustomerInfoFast($codigo)
	{
		$sql = "SELECT  cli_codigo AS cod
					   ,cli_dni AS doc
					   ,cli_nombre AS name
					   ,cli_fname AS fname
					   ,cli_lname AS lname
					   ,cli_fecnto AS fnac
					   ,dbo.GetAge(cli_fecnto) AS edad
					   ,cli_sexo AS sex
					   ,obs_codigo AS obscod
					   ,obsp_cod AS obspcod
					   ,cli_email AS email
					   ,cli_tel_cod_area AS telarea
					   ,cli_tel_numero AS tnro
					   ,cli_pais AS pais
					   ,cli_paiscod AS paiscod
					   ,ISNULL(cli_val_email,0) AS fvemail
					   ,ISNULL(cli_val_plan,0) AS fvplan
					   ,ISNULL(cli_val_tel,0) AS fvtel
					   ,ISNULL(cli_val_fmed,0) AS fvfmed
					   ,ISNULL(cli_val_foto,0) AS fvfoto
					   ,(CASE WHEN cli_cuit IS NULL THEN '' ELSE cli_cuit END) AS cuit
				  FROM clientes
				 WHERE cli_codigo = '".addslashes($codigo)."'";
		
		//print_r($sql);print_r("\n");
		$rs = $GLOBALS['dbSQL']->Query($sql);
		if ( $rs ) 
		{
			$clienteInfo = $GLOBALS['dbSQL']->getAll();
			if(is_array($clienteInfo)&&count($clienteInfo)>0)
			{
				$clienteInfo[0]['d']	= ltrim(date("d",strtotime($clienteInfo[0]['fnac'])),'0');
				$clienteInfo[0]['m']	= ltrim(date("m",strtotime($clienteInfo[0]['fnac'])),'0');
				$clienteInfo[0]['a']	= date("Y",strtotime($clienteInfo[0]['fnac']));

				//DATOS DEL PLAN:
				$clienteInfo[0]['plinf'] = getPlanInfoSMI($clienteInfo[0]['obspcod']);

				
				$clienteInfo[0]['obscod']   = '';
				$clienteInfo[0]['obspcod']  = '';
				$clienteInfo[0]['obsname']  = '';
				$clienteInfo[0]['obspname'] = '';
				$clienteInfo[0]['vto'] 		= '';
				$clienteInfo[0]['fvvencido']= 1;

				$paymentInfo				 = array();
				$res 		 				 = getVtoPago($clienteInfo[0]['cod'],$paymentInfo);
				if( $res )
				{
					$clienteInfo[0]['obscod']   = $paymentInfo["obscod"];
					$clienteInfo[0]['obspcod']  = $paymentInfo["obspcod"];
					$clienteInfo[0]['obsname']  = $paymentInfo["obsname"];
					$clienteInfo[0]['obspname'] = $paymentInfo["obspname"];
					$clienteInfo[0]['vto'] 		= $paymentInfo["vto"];
					$clienteInfo[0]['fvvencido']= $paymentInfo["vencido"];
				}
				
				return $clienteInfo;
			}
		}

		return false;
	}
	
	function getCustomerExist($codigo)
	{
		$sql = "SELECT  1
				  FROM clientes
				 WHERE cli_codigo = '".addslashes($codigo)."'";
		
		//print_r($sql);print_r("\n");
		$rs = $GLOBALS['dbSQL']->Query($sql);
		if ( $rs ) 
		{
			$clienteInfo = $GLOBALS['dbSQL']->getAll();
			if(is_array($clienteInfo)&&count($clienteInfo)>0)
			{
				return true;
			}
		}

		return false;
	}
	
	function getCustomerInfoByLogin($email,$clave)
	{
		$sql = "SELECT  cli_codigo AS cod
					   ,cli_dni AS doc
					   ,cli_nombre AS name
					   ,cli_fname AS fname
					   ,cli_lname AS lname
					   ,cli_fecnto AS fnac
					   ,dbo.GetAge(cli_fecnto) AS edad
					   ,cli_sexo AS sex
					   ,obs_codigo AS obscod
					   ,obsp_cod AS obspcod
					   ,cli_email AS email
					   ,cli_tel_cod_area AS telarea
					   ,cli_tel_numero AS tnro
					   ,cli_pais AS pais
					   ,cli_paiscod AS paiscod
					   ,ISNULL(cli_val_email,0) AS fvemail
					   ,ISNULL(cli_val_plan,0) AS fvplan
					   ,ISNULL(cli_val_tel,0) AS fvtel
					   ,ISNULL(cli_val_fmed,0) AS fvfmed
					   ,ISNULL(cli_val_foto,0) AS fvfoto
				  FROM clientes
				 WHERE cli_email = '".addslashes($email)."'
				   AND cli_passw = '".md5(trim($clave))."'";
		
		//print_r($sql);print_r("\n");
		$rs = $GLOBALS['dbSQL']->Query($sql);
		if ( $rs ) 
		{
			$clienteInfo = $GLOBALS['dbSQL']->getAll();
			if(is_array($clienteInfo)&&count($clienteInfo)>0)
			{
				$clienteInfo[0]['d']	= ltrim(date("d",strtotime($clienteInfo[0]['fnac'])),'0');
				$clienteInfo[0]['m']	= ltrim(date("m",strtotime($clienteInfo[0]['fnac'])),'0');
				$clienteInfo[0]['a']	= date("Y",strtotime($clienteInfo[0]['fnac']));
				
				$asist=0;$inasist=0;
				list($asist,$inasist) = getEstadisticasAsistencia($clienteInfo[0]['cod']);
				$clienteInfo[0]['estadisticas']	= $asist.';'.$inasist;
				
				$clienteInfo[0]['token'] = getToken('u',$clienteInfo[0]['cod'],$clienteInfo[0]['name'],$clienteInfo[0]['email']);
				
				return $clienteInfo;
			}
		}

		return false;
	}

	function registrarclienteSMI(&$resultInfo)
	{
		//print_r($_REQUEST);die;
		
		$continue   				= true;
		$flagFamiliar				= false;
		$customerinfo 				= array();
		$customerinfo["nombre"]		= trim(base64_decode($_REQUEST["name"]));
		$customerinfo["apellido"] 	= trim(base64_decode($_REQUEST["lname"]));
		//$customerinfo["edad"] 		= trim(base64_decode($_REQUEST["age"]));
		$customerinfo["sexo"] 		= trim(base64_decode($_REQUEST["sex"]));
		$customerinfo["fnyear"] 	= trim(base64_decode($_REQUEST["fny"]));
		$customerinfo["fnmonth"] 	= trim(base64_decode($_REQUEST["fnm"]));
		$customerinfo["fnday"] 		= trim(base64_decode($_REQUEST["fnd"]));
		$customerinfo["pais"] 		= (isset($_REQUEST["country"])?	trim(base64_decode($_REQUEST["country"])):'');	// EN CASO DE FAMILIAR, ESTE DATO NO LLEGARIA
		$customerinfo["clave"] 		= (isset($_REQUEST["pass"])?	trim(base64_decode($_REQUEST["pass"])):'');		// EN CASO DE FAMILIAR, ESTE DATO NO LLEGARIA
		$customerinfo["rclave"] 	= (isset($_REQUEST["rpass"])?	trim(base64_decode($_REQUEST["rpass"])):'');	// EN CASO DE FAMILIAR, ESTE DATO NO LLEGARIA
		$customerinfo["email"] 		= (isset($_REQUEST["email"])?	trim(base64_decode($_REQUEST["email"])):'');	// EN CASO DE FAMILIAR, ESTE DATO NO LLEGARIA
		$customerinfo["country"] 	= (isset($_REQUEST["country"])?	$_REQUEST["country"]:false);						// EN CASO DE FAMILIAR, ESTE DATO NO LLEGARIA
		$customerinfo["telefono"] 	= (isset($_REQUEST["tnumber"])?	trim(base64_decode($_REQUEST["tnumber"])):'');	// EN CASO DE FAMILIAR, ESTE DATO NO LLEGARIA
		$customerinfo["cupon"] 		= (isset($_REQUEST["cupon"])&&!is_null($_REQUEST["cupon"])&&!empty($_REQUEST["cupon"])&&trim($_REQUEST["cupon"])!=""?trim($_REQUEST["cupon"]):false);	// EN CASO DE FAMILIAR, ESTE DATO NO LLEGARIA
		//Registrado por un vendedor
		$customerinfo["vendcod"] 	= (isset($_REQUEST["vendcod"])&&!is_null($_REQUEST["vendcod"])&&!empty($_REQUEST["vendcod"])&&trim($_REQUEST["vendcod"])!=""?trim($_REQUEST["vendcod"]):false);
		
		//print_r($customerinfo);die;

		if(	isset($_REQUEST["ff"]) &&
			isset($_REQUEST["token"]) 
		)
		{
			//Validar el Token
			$tokenInfo = false; 
			$result    = false;
			$continue = Acl::validateToken($_REQUEST["token"],$tokenInfo,$result);

			if( $result == Acl::TOKEN_VALID )
			{
				$clienteId = $tokenInfo->uid;
				$continue  = true;
			}
			elseif( $result == Acl::TOKEN_EXPIRED )
			{
				$resultInfo['code']     = 100;
				$resultInfo['data']     = array("res"=>"SU SESION HA EXPIRADO. REINGRESE E INTENTE NUEVAMENTE");
				$resultInfo['errorDes'] = "SU SESION HA EXPIRADO. REINGRESE E INTENTE NUEVAMENTE";
				$continue  = false;
			}

			$flagFamiliar = true;
			$cliecod 	  = $tokenInfo->uid;
		}

		if(	$continue )
		{

			if( !$flagFamiliar )
			{
				
				if( !validarFecha($customerinfo["fnyear"],$customerinfo["fnmonth"],$customerinfo["fnday"]) )
				{
					$continue  			= false;
					$resultInfo['code'] = 102;
					$resultInfo['errorDes'] = "La fecha de nacimiento es inválida";
				}
				
				if( $continue && !validarDiffFechaYears($customerinfo["fnyear"],$customerinfo["fnmonth"],$customerinfo["fnday"],18) )
				{
					$continue  			= false;
					$resultInfo['code'] = 103;
					$resultInfo['errorDes'] = "Debe ser mayor de 18 años para registrarse";
				}
				
				if( $continue && $customerinfo["clave"] != $customerinfo["rclave"] )
				{
					$continue  			= false;
					$resultInfo['code'] = 104;
					$resultInfo['errorDes'] = "La confirmación de la clave no coincide";
				}
				
				if( $continue && strlen($customerinfo["clave"]) < 8 )
				{
					$continue  			= false;
					$resultInfo['code'] = 105;
					$resultInfo['errorDes'] = "La clave deber tener al menos 8 caracteres";
				}
				
				if( $continue && strlen($customerinfo["clave"]) > 16 )
				{
					$continue  			= false;
					$resultInfo['code'] = 106;
					$resultInfo['errorDes'] = "La clave deber tener un máximo de 16 caracteres";
				}
				
				if( $continue && !formatoClave($customerinfo["clave"]) )
				{
					$continue  			= false;
					$resultInfo['code'] = 107;
					$resultInfo['errorDes'] = "La clave no cumple con el formato exigido: letras y numeros";
				}
				
				if( $continue && (!validarEmail($customerinfo["email"])))
				{
					$continue  			= false;
					$resultInfo['code'] = 108;
					$resultInfo['errorDes'] = "El email ya está registrado";
				}
				
				if( $continue && (validarEmailExistente($customerinfo["email"])))
				{
					$continue  			= false;
					$resultInfo['code'] = 109;
					$resultInfo['errorDes'] = "El email ingresado ya se encuentra registrado";
				}
				
				if( $continue && $customerinfo["vendcod"] && (validarVendedor($customerinfo["vendcod"])))
				{
					$continue  			= false;
					$resultInfo['code'] = 111;
					$resultInfo['errorDes'] = "El vendedor asociado se encuentra bloqueado. Consulte con el administrador";
				}
				
				
				//$customerinfo["vendcod"]
				
				/*if( $continue && (!validarEdad($customerinfo["email"])))
				{
					$continue  			= false;
					$resultInfo['code'] = 109;
					$resultInfo['errorDes'] = "El email ingresado ya se encuentra registrado";
				}*/
			}
		}
		
		//print_r($customerinfo);die;
		/*
		Array
		(
			[nombre] => dfgf
			[apellido] => dfg
			[edad] => 33
			[sexo] => option1
			[pais] => 
			[clave] => 123
			[rclave] => 123
			[email] => gjuarez@landaware.com.ar
			[telefono] => 17143455555
		)
		*/

		//-------------------------------
		//VALIDAR CUPON SI ESTA PRESENTE
		//-------------------------------
		$flagCupon=false;
		if( $continue 							&& 
			$customerinfo["cupon"] 				&& 
			strlen(trim($customerinfo["cupon"]))>0
		)
		{
			$cuponnro = false;
			$res = validarCupon(trim($customerinfo["cupon"]),$cuponnro);
			
			if($res)
			{
				$flagCupon=true;
			}
			else
			{
				$flagCupon=false;
				$continue  			= false;
				$resultInfo['code'] = 110;
				$resultInfo['errorDes'] = "El cupon ingresado no es válido";
			}
		}
		//-------------------------------

		if( $continue && !$flagFamiliar )
		{
			// if( !$flagFamiliar )
			// {
				/*if( !validarDNIExistente($_REQUEST["dni"]))
				{
					$sql = "UPDATE [codigos] SET [num_ultimo] = [num_ultimo] + 1, [num_fecha] = GETDATE() WHERE [num_codigo] = 6";
								
					$rs = $GLOBALS['dbSQL']->Query($sql,true);
					if ( $rs ) 
					{
						$sql = "SELECT [num_ultimo]
								  FROM [codigos]
								 WHERE num_codigo = 6";
						
						$rsN = $GLOBALS['dbSQL']->Query($sql);
						if ( $rsN )
						{
							$conta=0;

							$rsN = $GLOBALS['dbSQL']->getAll();

							foreach($rsN as $row)
							{
								$idCliente = $row["num_ultimo"];
								$conta++;
							}

							if( $conta > 0 )
							{*/
								if(strlen($customerinfo["fnmonth"])<2){$customerinfo["fnmonth"]='0'.$customerinfo["fnmonth"];}
								if(strlen($customerinfo["fnday"])<2){$customerinfo["fnday"]='0'.$customerinfo["fnday"];}
								
								//$customerinfo["fnyear"],$customerinfo["fnmonth"],$customerinfo["fnday"]

								$idCliente = getProximoCliente();
								$cliecod   = 0;
								$obscodsmi = $GLOBALS['SMI_OBS'];
								$customerinfo["clavetmp_email"]=md5(randomNumberText(4)).md5(randomNumberText(4));
								$customerinfo["clavetmp_tel"]  =randomNumberText(4);

								//,[cli_nombre_]
								//,'".mb_strtoupper($_REQUEST["apellido"]).' '.mb_strtoupper($_REQUEST["nombre"])."'
								$sql = "INSERT INTO dbo.[clientes]
									(
										cli_codigo
									   ,cli_dni
									   ,cli_nombre
									   ,cli_fname
									   ,cli_lname
									   ,cli_fecnto
									   ,cli_sexo
									   ,obs_codigo
									   ,obsp_cod
									   ,cli_email
									   ,med_codigo
									   ,cli_tel
									   ,cli_tel_cod_area
									   ,cli_tel_numero
									   ,cli_pais
									   ,cli_paiscod
									   ,cli_passw
									   ,cli_val_email
									   ,cli_val_tel
									   ,cli_val_fmed
									   ,cli_val_plan
									   ,cli_val_foto
									   ,cli_clavetmp_email
									   ,cli_clavetmp_tel
									   ,cli_origen
									   ,cli_codigo_padre
									)
								 VALUES
									   (
										".$idCliente."
										,NULL
										,'".mb_convert_encoding(mb_strtoupper(addslashes($customerinfo["apellido"])),"iso-8859-1", "UTF-8").' '.mb_convert_encoding(mb_strtoupper(addslashes($customerinfo["nombre"])),"iso-8859-1", "UTF-8")."'
										,'".mb_convert_encoding(mb_strtoupper(addslashes($customerinfo["nombre"])),"iso-8859-1", "UTF-8")."'
										,'".mb_convert_encoding(mb_strtoupper(addslashes($customerinfo["apellido"])),"iso-8859-1", "UTF-8")."'
										,'".$customerinfo["fnyear"].'-'.trim($customerinfo["fnmonth"]).'-'.trim($customerinfo["fnday"])."T00:00:00'
										,'".($customerinfo["sexo"]=="M"?"M":"F")."'
										,".$obscodsmi."
										,".($flagCupon?$GLOBALS['SMI_OBS_PLAN_FRIEND']:'NULL')."
										,'".mb_strtolower(trim(addslashes($customerinfo["email"])))	."'
										,1
										,'".$customerinfo["telefono"]."'
										,'".$customerinfo["country"]["cp"]."'
										,'".$customerinfo["telefono"]."'
										,'".$customerinfo["country"]["pn"]."'
										,'".$customerinfo["country"]["cpi"]."'
										,'".md5(trim($customerinfo["clave"]))."'
										,1
										,1
										,1
										,".($flagCupon?0:'1')."
										,1
										,'".$customerinfo["clavetmp_email"]."'
										,'".$customerinfo["clavetmp_tel"]."'
										,'WEB'
										,".$cliecod."
									   )";

									   //print_r($customerinfo);die;
										/*
										Array
										(
											[nombre] => dfgf
											[apellido] => dfg
											[edad] => 33
											[sexo] => option1
											[pais] => 
											[clave] => 123
											[rclave] => 123
											[email] => gjuarez@landaware.com.ar
											[telefono] => 17143455555
										)*/
								
								//debug($sql,true);
								//print_r($sql);die;

								$rs = $GLOBALS['dbSQL']->Query($sql,true);
								if ( $rs ) 
								{
									//$dni = $_REQUEST["dni"];
									//$userinfo = loginUserRegistrar($dni);
									$userinfo = getCustomerInfo($idCliente);
									
									if($customerinfo["vendcod"])
									{
										$cliVendInfo = array("clinro"=>$idCliente,"vendnro"=>$customerinfo["vendcod"]);
										$rescupon = asociarClieteVendedor($cliVendInfo);
									}
									
									if($flagCupon&&$cuponnro)
									{
										//CONSUMIR CUPON
										$cuponInfo = array("clinro"=>$idCliente,"cuponnro"=>$cuponnro);
										$rescupon = consumirCupon($cuponInfo);
									}
									
									$resultInfoCorreo=false;
									$res = sendEmailValidarCorreo($idCliente,$resultInfoCorreo);

									$resultInfo['code'] = 0;
									//$resultInfo['data'] = array("id"=>$GLOBALS['dbSQL']->getLastId('clientes','cli_codigo'));
									$resultInfo['data'] = array(
										"userinfo" => $userinfo
									);
								}
								else
								{
									$resultInfo['code'] = 1;
									$resultInfo['data'] = array("res"=>"Se produjo un error al registrar el usuario");
								}
							/*}
						}
					}
				}
				else
				{
					$resultInfo['code'] = 3;
					$resultInfo['data'] = array("res"=>"El DNI ingresado ya se encuentra registrado");
					$resultInfo['errorDes'] = "El DNI ingresado ya se encuentra registrado";
				}*/
			//}
		}
		
	}

	function registrarNuevoCliente(&$resultInfo)
	{
		try
		{
			//print_r($_REQUEST);die;

			if( 
				isset($_REQUEST["name"])  		&&
				!empty($_REQUEST["name"])  		&&
				!is_null($_REQUEST["name"]) 	&&
				
				isset($_REQUEST["lname"])  		&&
				!empty($_REQUEST["lname"])  	&&
				!is_null($_REQUEST["lname"]) 	&&
				
				isset($_REQUEST["email"])  		&&
				!empty($_REQUEST["email"])  	&&
				!is_null($_REQUEST["email"])	&&
				
				/*isset($_REQUEST["age"])  		&&
				!empty($_REQUEST["age"])  		&&
				!is_null($_REQUEST["age"])		&&*/

				isset($_REQUEST["fny"])  		&&
				!empty($_REQUEST["fny"])  		&&
				!is_null($_REQUEST["fny"])		&&
				
				isset($_REQUEST["fnm"])  		&&
				!empty($_REQUEST["fnm"])  		&&
				!is_null($_REQUEST["fnm"])		&&
				
				isset($_REQUEST["fnd"])  		&&
				!empty($_REQUEST["fnd"])  		&&
				!is_null($_REQUEST["fnd"])		&&
				
				/*isset($_REQUEST["tcountry"])  	&&
				!empty($_REQUEST["tcountry"])  	&&
				!is_null($_REQUEST["tcountry"])	&&*/
				
				isset($_REQUEST["tnumber"])  	&&
				!empty($_REQUEST["tnumber"])  	&&
				!is_null($_REQUEST["tnumber"])	&&

				isset($_REQUEST["pass"])  		&&
				!empty($_REQUEST["pass"])  		&&
				!is_null($_REQUEST["pass"])		&&
				
				isset($_REQUEST["rpass"])  		&&
				!empty($_REQUEST["rpass"])  	&&
				!is_null($_REQUEST["rpass"])
			)
			{
				$resultInfo = false;
				$resultado = registrarclienteSMI($resultInfo);
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se encontraron campos obligatorios vacíos/faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			return false;
		}
	}

	function sendRecoverPassCienteSMI(&$resultInfo)
	{
		//print_r($_REQUEST);die;
		
		$continue   	= true;
		$flagFamiliar	= false;
		$email			= trim(base64_decode($_REQUEST["email"]));

		if( validarEmailExistente($email))
		{
			$continue  			= true;
		}
		else
		{
			$continue  				= false;
			$resultInfo['code'] 	= 1;
			//$resultInfo['errorDes'] = "El email ingresado no esta se encuentra registrado";
			$resultInfo['errorDes'] = "";
		}

		//print_r($customerinfo);die;
		

		if( $continue )
		{			
			$customerInfo=false;
			$idCliente = getCustomerCodeByEmail($email,$customerInfo);
			$token	   = getToken('u',$idCliente,$customerInfo[0]["cli_nombre"],$email);

			$sql = "UPDATE dbo.clientes SET cli_recover_token = '".$token."' WHERE cli_codigo ='".$idCliente."'";
			//print_r($sql);die;
			$rs = $GLOBALS['dbSQL']->Query($sql,true);
			if ( $rs ) 
			{
				//$userinfo = getCustomerInfo($idCliente);
				
				$resultInfoCorreo=false;
				$res = sendEmailRecoverLink($idCliente,$resultInfoCorreo);

				$resultInfo['code'] = 0;
				$resultInfo['data'] = ($res?true:false);
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['data'] = array("res"=>"Se produjo un error al enviar email con el enlace de recuperación de la clave");
			}
		}
		
	}

	function recoverPassCustomerSMI(&$resultInfo)
	{
		try
		{
			//print_r($_REQUEST);die;

			if( isset($_REQUEST["email"])  		&&
				!empty($_REQUEST["email"])  	&&
				!is_null($_REQUEST["email"])
			)
			{
				$resultInfo = false;
				$resultado = sendRecoverPassCienteSMI($resultInfo);
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se encontraron campos obligatorios vacíos/faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			return false;
		}
	}

	function changePassCienteSMI($userId,&$resultInfo)
	{
		//print_r($_REQUEST);die;
		
		$continue   	= true;
		$flagFamiliar	= false;
		$clave			= trim(base64_decode($_REQUEST["clave"]));
		//$token			= $_REQUEST["token"]);
		//print_r($clave);die;
		$customerInfo=false;
		$idCliente = getCustomerById($userId,$customerInfo);

		$sql = "UPDATE dbo.clientes 
				   SET cli_passw = '".md5(trim($clave))."', 
					   cli_recover_token = NULL 
				 WHERE cli_codigo = '".$idCliente."'";

		//print_r($sql);die;
		$rs = $GLOBALS['dbSQL']->Query($sql,true);
		if ( $rs ) 
		{
			//$userinfo = getCustomerInfo($idCliente);

			// $resultInfoCorreo=false;
			// $res = sendEmailRecoverLink($idCliente,$resultInfoCorreo);

			$resultInfo['code'] = 0;
			$resultInfo['data'] = 1;
		}
		else
		{
			$resultInfo['code'] = 1;
			$resultInfo['data'] = array("res"=>"Se produjo un error al cambiar la clave del usuario");
		}
	}
	
	function changePassCustomerSMI(&$resultInfo)
	{
		try
		{
			//print_r($_REQUEST);die;

			if( isset($_REQUEST["clave"])  		&&
				!empty($_REQUEST["clave"])  	&&
				!is_null($_REQUEST["clave"])	&&

				isset($_REQUEST["token"])  		&&
				!empty($_REQUEST["token"])  	&&
				!is_null($_REQUEST["token"])
			)
			{
				$continue = true;
				$userId    = validarTokenFast($resultInfo);

				if(is_numeric($userId))
				{
					if( strlen($_REQUEST["clave"]) < 8 )
					{
						$continue  			= false;
						$resultInfo['code'] = 105;
						$resultInfo['errorDes'] = "La clave deber tener al menos 8 caracteres";
					}
					
					if( $continue && strlen($_REQUEST["clave"]) > 16 )
					{
						$continue  			= false;
						$resultInfo['code'] = 106;
						$resultInfo['errorDes'] = "La clave deber tener un máximo de 16 caracteres";
					}
					
					if( $continue && !formatoClave($_REQUEST["clave"]) )
					{
						$continue  			= false;
						$resultInfo['code'] = 107;
						$resultInfo['errorDes'] = "La clave no cumple con el formato exigido: letras y numeros";
					}
					
					
					if( $continue )
					{
						$resultInfo = false;
						$resultado = changePassCienteSMI($userId,$resultInfo);
					}
				}
				else
				{
					$resultInfo['code'] = 1;
					$resultInfo['errorDes'] = "Se produjo un error al cambiar la clave";
				}	
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se encontraron campos obligatorios vacíos/faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			return false;
		}
	}
	
	//
	function validarCustomerEmailTmpVal($token)
	{
		try
		{
			$sql = "SELECT cli_codigo
					  FROM dbo.clientes
					 WHERE cli_clavetmp_email = '".addslashes($token)."'";
			
			//print_r($sql);print_r("\n");
			$rs = $GLOBALS['dbSQL']->Query($sql);
			if ( $rs ) 
			{
				$customerinfo = $GLOBALS['dbSQL']->getAll();
				if(is_array($customerinfo)&&count($customerinfo)>0)
				{
					return $customerinfo[0]["cli_codigo"];
				}
			}

			return false;
		}
		catch (Exception $e)
		{
			//saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"createStripeToken","error"=>$e->__toString()));
			return false;
		}
	}

	function updateCustomerEmailValid($customerid,&$resultInfo)
	{
		try
		{
			$continue = true;
			/*$flagTransactionInit = false;

			if( setConeccionTransaccion() )
			{
				$flagTransactionInit = true;
				$GLOBALS['dbSQLTR']->setBeginTransaction();*/

				//MARCAR LA RESPUESTA EXITOSA/ERROR DEL PAGO
				$sql = "  UPDATE  dbo.clientes
							 SET  cli_val_email  = 0
						   WHERE  cli_codigo = ". $customerid;
					   
				//$resultado = $GLOBALS['dbSQLTR']->QueryTR($sql,true);
				$resultado = $GLOBALS['dbSQL']->Query($sql,true);
				if ( !$resultado ) 
				{
					//print_r($sql);print_r("\n");//die;
					//$res = $GLOBALS['dbSQLTR']->setRollbackTransaction();
					$continue = false;
					$resultInfo['code'] 	= -1;
					$resultInfo['errorDes'] = "Error al actualizar la validacion del correo";
				}

				if( $continue  )
				{
					//$res = $GLOBALS['dbSQLTR']->setCommitTransaction();
					$resultInfo['code'] = 0;
					$resultInfo['data'] = 1;
					return true;
				}

				$resultInfo['code'] 	= 2;
				$resultInfo['errorDes'] = "Error al grabar la validacion del correo - [Codigo 1001]";
				return false;
			/*}
			else
			{
				$resultInfo['code'] 	= 1;
				$resultInfo['errorDes'] = "Error al grabar la respueta del pago - [Codigo 1001]";
			}*/

			return false;
		}
		catch (Exception $e)
		{
			/*if( $flagTransactionInit )
			{
				$GLOBALS['dbSQLTR']->setRollbackTransaction();
			}*/
			
			$resultInfo['code'] 	= CODE_RESULT_ERROR_FATAL;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			
			//saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"createStripeToken","error"=>$e->__toString()));
			return false;
		}
	}

	function handlersEmailValidateResponse(&$resultInfo)
	{
		try
		{
			$flagResultado = false;
			$contunie	   = true;
			
			//OBTENER LOS PARAMETROS RECIBIDOS
			$event 		   = null;
			$debug_point   = "--dp--1"."\n";
			
			$params = array();
			
			if(isset($_REQUEST))
			{
				$params = $_REQUEST;
			}
			else
			{
				$contunie=false;
			}
			
			$debug_point="--dp--2"."\n";
			
			if($contunie)
			{
				$data = array(
					 0 => false //$payload
					,1 => $params
					,2 => $debug_point
				);

				$titulo = "result_transaction";

				//GRABAR LOG DE LA RESPUESTA EN UN ARCHIVO
				//-->$res = grabarLogStripe($data,$titulo);
			}
			$debug_point="--dp--3"."\n";

			//VERIFICAR SI EL TOKEN EXISTE
			if($contunie && isset($data[1]["t"]))
			{
				$clientecod = validarCustomerEmailTmpVal($data[1]["t"]);
				
				//if(!$clientecod){$contunie=false;}
				if($clientecod===false){$contunie=false;}
			}
			else
			{
				$contunie=false;
			}
			$debug_point="--dp--4"."\n";

			//MARCAR EMAIL COMO VALIDADO
			if($contunie)
			{
				$data[2] = $debug_point;

				$resultSave = updateCustomerEmailValid($clientecod,$resultInfo);
			
			}
			$debug_point="--dp--6"."\n";

			return $contunie;
		}
		catch (Exception $e)
		{
			//saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"createStripeToken","error"=>$e->__toString()));
			$titulo="emailvalid_error_handlersStripResponse_";
			if(!isset($data))
			{
				$data = array(
						 0 => $e->__toString()
						,1 => $debug_point
						,2 => $_REQUEST
					);
			}
			else
			{
				$data[2] = $debug_point;
				$data[3] = $e->__toString();
			}
			
			
			//-->$res = grabarLogStripe($data,$titulo);
			return false;
		}
	}

	function validateCustomerEmail(&$resultInfo)
	{
		if( isset($_REQUEST["t"])  	&&
			!empty($_REQUEST["t"])  &&
			!is_null($_REQUEST["t"])
		)
		{
			$resultInfo=false;
			$result = handlersEmailValidateResponse($resultInfo);
			
			if($result)
			{
				$resultInfo['code'] = 0;
				$resultInfo['data'] = 1;
			}
			else
			{
				$resultInfo['code'] 	= 2;
				$resultInfo['errorDes'] = "El enlace de validación de la casilla de correo es inválido.";
			}
		}
		else
		{
			$resultInfo['code'] 	= 1;
			$resultInfo['errorDes'] = "El enlace de validación de la casilla de correo es inválido.";
		}
	}

	function resendCustomerValEmail(&$resultInfo)
	{
		if( isset($_REQUEST["token"])  	&&
			!empty($_REQUEST["token"])  &&
			!is_null($_REQUEST["token"])
		)
		{
			$continue = true;
			$userId    = validarTokenFast($resultInfo);

			if($userId&&is_numeric($userId))
			{
				$resultInfo = false;
				$resultado = sendEmailValidarCorreo($userId,$resultInfo);
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se produjo un error al validar su cuenta(Cod.100)";
			}
		}
		else
		{
			$resultInfo['code'] 	= 1;
			$resultInfo['errorDes'] = "Se produjo un error al validar su cuenta(Cod.101)";
		}
	}

	function getPlanInfoSMI($plan)
	{
		//OBTENER CANTIDAD DE FAMILIARES QUE INCLUYE EL PLAN: 
		// CUANTOS ADULTOS  Y CUANTOS NIÑOS MENORES DE 18
		$infoPlan = getPlanInfo($plan);
		//print_r($infoPlan);die;
		$info = array(
			 "fad" => intval($infoPlan[0]["obsp_fam_adul"])
			,"fpd" => intval($infoPlan[0]["obsp_fam_pedia"])
			,"ffm" => ($infoPlan[0]["obsp_fam_adul"]>0||$infoPlan[0]["obsp_fam_pedia"]>0?1:0)
		);

		return $info;
	}

	function getFamType($cliCod)
	{
		$sql = "SELECT  DATEDIFF(YEAR, cli_fecnto, GetDate()) edadan
				  FROM clientes
				 WHERE cli_codigo = '".addslashes($cliCod)."'";
		
		//print_r($sql);print_r("\n");
		$rs = $GLOBALS['dbSQL']->Query($sql);
		if ( $rs ) 
		{
			$familiar = $GLOBALS['dbSQL']->getAll();
			if(is_array($familiar)&&count($familiar)>0)
			{
				if(intval($familiar[0]['edadan']) >= 18)
				{
					return TIPO_DEMANDA_ESP_ADULT;
				}
				return TIPO_DEMANDA_ESP_PEDIA;	
			}
		}

		return false;
	}

	function getFamiliaresSMI($codigo,$padreInfo,$planInfo,&$totalAdultos=0,&$totalPediatricos=0)
	{//print_r($padreInfo);die;
		//LISTAR LOS FAMILIARES
		$familaresOutput = array();

		$sql = "SELECT  cli_codigo AS cod
					   ,cli_dni AS doc
					   ,cli_nombre AS name
					   ,cli_fname AS fname
					   ,cli_lname AS lname
					   ,cli_fecnto AS fnac
					   ,dbo.GetAge(cli_fecnto) AS edad
					   ,DATEDIFF(YEAR, cli_fecnto, GetDate()) edadan
					   ,cli_sexo AS sex
					   ,obs_codigo AS obscod
					   ,obsp_cod AS obspcod
					   ,cli_email AS email
					   ,cli_tel_cod_area AS telarea
					   ,cli_tel_numero AS tnro
					   ,cli_pais AS pais
					   ,cli_paiscod AS paiscod
					   ,(CASE WHEN cli_conyuge IS NULL THEN 0 ELSE cli_conyuge END) as conyuge
					   ,0 AS fvemail
					   ,0 AS fvplan
					   ,0 AS fvtel
					   ,ISNULL(cli_val_fmed,0) AS fvfmed
					   ,ISNULL(cli_val_foto,0) AS fvfoto
				  FROM clientes
				 WHERE cli_codigo_padre IS NOT NULL 
				   AND cli_codigo_padre = '".addslashes($codigo)."'";
		
		//print_r($sql);print_r("\n");
		$rs = $GLOBALS['dbSQL']->Query($sql);
		if ( $rs ) 
		{
			$familiares = $GLOBALS['dbSQL']->getAll();
			if(is_array($familiares)&&count($familiares)>0)
			{
				for($i=0,$t=count($familiares);$i<$t;$i++)
				{
					$familiares[$i]['d']	= ltrim(date("d",strtotime($familiares[$i]['fnac'])),'0');
					$familiares[$i]['m']	= ltrim(date("m",strtotime($familiares[$i]['fnac'])),'0');
					$familiares[$i]['a']	= date("Y",strtotime($familiares[$i]['fnac']));

					$familiares[$i]['fcy'] = intval($familiares[$i]['conyuge']);
					
					$familiares[$i]['fad'] = 0;
					$familiares[$i]['fpd'] = 0;
					if(intval($familiares[$i]['edadan']) >= 18){$familiares[$i]['fad'] = 1;$totalAdultos++;}
					if(intval($familiares[$i]['edadan']) <  18){$familiares[$i]['fpd'] = 1;$totalPediatricos++;}
					
					//VERIFICA SI EL HIJO SUPERO LOS 18 AÑOS
					$familiares[$i]['ffmok'] = 1;
					if(	$familiares[$i]['fcy']!=1 &&
						$familiares[$i]['fad']==1
					)
					{
						$familiares[$i]['ffmok'] = 0;
					}

					$asist=0;$inasist=0;
					//list($asist,$inasist) 	= getEstadisticasAsistencia($familiares[$i]['cod']);
					$familiares[$i]['estadisticas']	= $asist.';'.$inasist;
					
					//$familiares[$i]['token'] = getToken('u',$familiares[$i]['cod'],$familiares[$i]['name'],$familiares[$i]['email']);
					
					//DATOS DEL PLAN:
					$familiares[$i]['plinf'] = $planInfo;

					//FAMILIARES
					$familiares[$i]['fminf'] = '';
					
					$familiares[$i]['obscod']   = $padreInfo[0]['obscod'];
					$familiares[$i]['obspcod']  = $padreInfo[0]['obspcod'];
					$familiares[$i]['obsname']  = $padreInfo[0]['obsname'];
					$familiares[$i]['obspname'] = $padreInfo[0]['obspname'];
					$familiares[$i]['vto'] 		= $padreInfo[0]['vto'];
					$familiares[$i]['fvvencido']= $padreInfo[0]['fvvencido'];
				}
				
				$familaresOutput = $familiares;
			}
		}

		return $familaresOutput;
	}

	function registrarfamiliarclienteSMI($customerId,&$resultInfo)
	{
		//print_r($_REQUEST);die;
		
		$continue   				= true;
		$flagFamiliar				= true;
		$customerinfo 				= array();
		$customerinfo["nombre"]		= trim(base64_decode($_REQUEST["name"]));
		$customerinfo["apellido"] 	= trim(base64_decode($_REQUEST["lname"]));
		$customerinfo["sexo"] 		= trim(base64_decode($_REQUEST["sex"]));
		$customerinfo["fnyear"] 	= trim(base64_decode($_REQUEST["fny"]));
		$customerinfo["fnmonth"] 	= trim(base64_decode($_REQUEST["fnm"]));
		$customerinfo["fnday"] 		= trim(base64_decode($_REQUEST["fnd"]));
		//print_r($customerinfo);die;

		if( !validarFecha($customerinfo["fnyear"],$customerinfo["fnmonth"],$customerinfo["fnday"]) )
		{
			$continue  			= false;
			$resultInfo['code'] = 102;
			$resultInfo['errorDes'] = "La fecha de nacimiento es inválida";
		}
		
		//SI NO ES CONYUGE VALIDAR QUE SEA MENOR DE 18
		if( $continue 									&& 
			$_REQUEST["type"]!=TIPO_DEMANDA_ESP_ADULT	&&
			validarDiffFechaYears($customerinfo["fnyear"],$customerinfo["fnmonth"],$customerinfo["fnday"],18) )
		{
			$continue  			= false;
			$resultInfo['code'] = 103;
			$resultInfo['errorDes'] = "Debe ser menor de 18 años para registrarse";
		}
		//VERIFICAR UNA EDAD LOGICA <=150 AÑOS
		elseif( $continue 								&& 
			$_REQUEST["type"]==TIPO_DEMANDA_ESP_ADULT	&&
			validarDiffFechaYears($customerinfo["fnyear"],$customerinfo["fnmonth"],$customerinfo["fnday"],150) )
		{
			$continue  			= false;
			$resultInfo['code'] = 104;
			$resultInfo['errorDes'] = "Debe ser menor a 150 años para registrarse";
		}

		//print_r($customerinfo);die;

		if( $continue )
		{
			$padreInfo = getCustomerInfoFast($customerId);
			// print_r("-----padreInfo---");print_r("\n");
			// print_r($padreInfo);print_r("\n");
			// print_r("-----------------");print_r("\n");
			/*
				Array
				(
					[0] => Array
						(
							[cod] => 112474
							[doc] => 
							[name] => AAA GUS
							[fname] => GUS
							[lname] => AAA
							[fnac] => 1963-02-14 00:00:00.000
							[edad] => 61A00M00D
							[sex] => M
							[obscod] => 
							[obspcod] => 
							[email] => juarezgustavoa@gmail.com
							[telarea] => 54
							[tnro] => 5493512349009
							[pais] => Argentina
							[paiscod] => ar
							[fvemail] => 0
							[fvplan] => 1
							[fvtel] => 1
							[fvfmed] => 0
							[fvfoto] => 1
							[cuit] => 
							[d] => 14
							[m] => 2
							[a] => 1963
							[plinf] => Array
								(
									[fad] => 1
									[fpd] => 100
									[ffm] => 1
								)

							[obsname] => 
							[obspname] => 
							[vto] => 
							[fvvencido] => 1
						)

				)
			*/
			
			if(strlen($customerinfo["fnmonth"])<2){$customerinfo["fnmonth"]='0'.$customerinfo["fnmonth"];}
			if(strlen($customerinfo["fnday"])<2){$customerinfo["fnday"]='0'.$customerinfo["fnday"];}
			
			//$customerinfo["fnyear"],$customerinfo["fnmonth"],$customerinfo["fnday"]

			$idCliente = getProximoCliente();
			$cliecod   = 0;
			$obscodsmi = $padreInfo[0]["obscod"];
			$customerinfo["clavetmp_email"]='';
			$customerinfo["clavetmp_tel"]  ='';

			$sql = "INSERT INTO dbo.[clientes]
				(
					cli_codigo
				   ,cli_dni
				   ,cli_nombre
				   ,cli_fname
				   ,cli_lname
				   ,cli_fecnto
				   ,cli_sexo
				   ,obs_codigo
				   ,obsp_cod
				   ,cli_email
				   ,med_codigo
				   ,cli_tel
				   ,cli_tel_cod_area
				   ,cli_tel_numero
				   ,cli_pais
				   ,cli_paiscod
				   ,cli_passw
				   ,cli_val_email
				   ,cli_val_tel
				   ,cli_val_fmed
				   ,cli_val_plan
				   ,cli_val_foto
				   ,cli_clavetmp_email
				   ,cli_clavetmp_tel
				   ,cli_origen
				   ,cli_codigo_padre
				   ,cli_conyuge
				)
			 VALUES
				   (
					".$idCliente."
					,NULL
					,'".mb_convert_encoding(mb_strtoupper(addslashes($customerinfo["apellido"])),"iso-8859-1", "UTF-8").' '.mb_convert_encoding(mb_strtoupper(addslashes($customerinfo["nombre"])),"iso-8859-1", "UTF-8")."'
					,'".mb_convert_encoding(mb_strtoupper(addslashes($customerinfo["nombre"])),"iso-8859-1", "UTF-8")."'
					,'".mb_convert_encoding(mb_strtoupper(addslashes($customerinfo["apellido"])),"iso-8859-1", "UTF-8")."'
					,'".$customerinfo["fnyear"].'-'.trim($customerinfo["fnmonth"]).'-'.trim($customerinfo["fnday"])."T00:00:00'
					,'".($customerinfo["sexo"]=="2"?"M":"F")."'
					,".$obscodsmi."
					,".$padreInfo[0]["obspcod"]."
					,'".mb_strtolower(trim($padreInfo[0]["email"]))	."'
					,1
					,''
					,''
					,''
					,''
					,''
					,''
					,1
					,1
					,1
					,0
					,1
					,''
					,''
					,'WEB'
					,".$customerId."
					,".($_REQUEST["type"]==TIPO_DEMANDA_ESP_ADULT?1:0)."
				   )";

				   //print_r($customerinfo);die;
					/*
					Array
					(
						[nombre] => dfgf
						[apellido] => dfg
						[edad] => 33
						[sexo] => option1
						[pais] => 
						[clave] => 123
						[rclave] => 123
						[email] => gjuarez@landaware.com.ar
						[telefono] => 17143455555
					)*/
			
			//debug($sql,true);
			//print_r($sql);die;
			//-->print_r($sql);print_r("\n");

			$rs = $GLOBALS['dbSQL']->Query($sql,true);
			if ( $rs ) 
			{
				$userinfo 	 = getCustomerInfo($customerId);
				//$newuserinfo = getCustomerInfo($idCliente);
				
				$resultInfo['code'] = 0;
				$resultInfo['data'] = array(
					 "userinfo" 	=> $userinfo
					,"newusercod"	=> $idCliente
				);
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['data'] = array("res"=>"Se produjo un error al registrar el usuario");
			}
		}
		
	}
	
	function registrarNuevoFamiliarCliente(&$resultInfo)
	{
		try
		{
			//print_r($_REQUEST);die;

			if( 
				isset($_REQUEST["name"])  		&&
				!empty($_REQUEST["name"])  		&&
				!is_null($_REQUEST["name"]) 	&&
				
				isset($_REQUEST["lname"])  		&&
				!empty($_REQUEST["lname"])  	&&
				!is_null($_REQUEST["lname"]) 	&&

				isset($_REQUEST["type"])  		&&
				!empty($_REQUEST["type"])  		&&
				!is_null($_REQUEST["type"])		&&
				
				isset($_REQUEST["fny"])  		&&
				!empty($_REQUEST["fny"])  		&&
				!is_null($_REQUEST["fny"])		&&
				
				isset($_REQUEST["fnm"])  		&&
				!empty($_REQUEST["fnm"])  		&&
				!is_null($_REQUEST["fnm"])		&&
				
				isset($_REQUEST["fnd"])  		&&
				!empty($_REQUEST["fnd"])  		&&
				!is_null($_REQUEST["fnd"])		&&
				
				isset($_REQUEST["token"])  		&&
				!empty($_REQUEST["token"])  	&&
				!is_null($_REQUEST["token"])
			)
			{
				$continue = true;
				$userId    = validarTokenFast($resultInfo);

				if($userId&&is_numeric($userId))
				{
					$resultInfo = false;
					$resultado = registrarfamiliarclienteSMI($userId,$resultInfo);
				}
				else
				{
					$resultInfo['code'] = 1;
					$resultInfo['errorDes'] = "Se produjo un error al registrar el nuevo familiar";
				}
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se encontraron campos obligatorios vacíos/faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			return false;
		}
	}
	
	function validarDeclaracionJuaradaClienteFmAd(&$decinfo,&$resultInfo)
	{
		$flagError=false;
		$decinfo = array();
		
		// $it=array(0=>'{FNAME}',1=>null,2=>true);
		// if(!(isset($_REQUEST["{FIELD}"])&&!empty($_REQUEST["{FIELD}"])&&!is_null($_REQUEST["{FIELD}"])))
		// {$it[2]=false;$flagError=true;}
		// else{$it[1]=$_REQUEST["{FIELD}"];}
		// $x = array_push($decinfo,$it);

		$it=array(0=>"fm_res_trn",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_res_trn"])&&!empty($_REQUEST["fm_res_trn"])&&!is_null($_REQUEST["fm_res_trn"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_res_trn"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_res_nin",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_res_nin"])&&!empty($_REQUEST["fm_res_nin"])&&!is_null($_REQUEST["fm_res_nin"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_res_nin"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_res_causa",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_res_causa"])&&!empty($_REQUEST["fm_res_causa"])&&!is_null($_REQUEST["fm_res_causa"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_res_causa"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_neu_convul",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_convul"])&&!empty($_REQUEST["fm_neu_convul"])&&!is_null($_REQUEST["fm_neu_convul"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_convul"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_desma",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_desma"])&&!empty($_REQUEST["fm_neu_desma"])&&!is_null($_REQUEST["fm_neu_desma"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_desma"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_inest",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_inest"])&&!empty($_REQUEST["fm_neu_inest"])&&!is_null($_REQUEST["fm_neu_inest"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_inest"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_mare",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_mare"])&&!empty($_REQUEST["fm_neu_mare"])&&!is_null($_REQUEST["fm_neu_mare"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_mare"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_paral",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_paral"])&&!empty($_REQUEST["fm_neu_paral"])&&!is_null($_REQUEST["fm_neu_paral"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_paral"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_th",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_th"])&&!empty($_REQUEST["fm_neu_th"])&&!is_null($_REQUEST["fm_neu_th"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_th"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_tl",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_tl"])&&!empty($_REQUEST["fm_neu_tl"])&&!is_null($_REQUEST["fm_neu_tl"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_tl"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_depre",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_depre"])&&!empty($_REQUEST["fm_neu_depre"])&&!is_null($_REQUEST["fm_neu_depre"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_depre"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_miga",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_miga"])&&!empty($_REQUEST["fm_neu_miga"])&&!is_null($_REQUEST["fm_neu_miga"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_miga"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_cefa",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_cefa"])&&!empty($_REQUEST["fm_neu_cefa"])&&!is_null($_REQUEST["fm_neu_cefa"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_cefa"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_son",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_son"])&&!empty($_REQUEST["fm_neu_son"])&&!is_null($_REQUEST["fm_neu_son"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_son"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_dnop",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_dnop"])&&!empty($_REQUEST["fm_neu_dnop"])&&!is_null($_REQUEST["fm_neu_dnop"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_dnop"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_cuales",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_cuales"])&&!empty($_REQUEST["fm_neu_cuales"])&&!is_null($_REQUEST["fm_neu_cuales"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_cuales"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_vis_mio",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_vis_mio"])&&!empty($_REQUEST["fm_vis_mio"])&&!is_null($_REQUEST["fm_vis_mio"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_vis_mio"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_vis_estra",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_vis_estra"])&&!empty($_REQUEST["fm_vis_estra"])&&!is_null($_REQUEST["fm_vis_estra"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_vis_estra"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_vis_glau",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_vis_glau"])&&!empty($_REQUEST["fm_vis_glau"])&&!is_null($_REQUEST["fm_vis_glau"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_vis_glau"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_vis_pret",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_vis_pret"])&&!empty($_REQUEST["fm_vis_pret"])&&!is_null($_REQUEST["fm_vis_pret"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_vis_pret"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_vis_pcor",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_vis_pcor"])&&!empty($_REQUEST["fm_vis_pcor"])&&!is_null($_REQUEST["fm_vis_pcor"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_vis_pcor"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_vis_ante",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_vis_ante"])&&!empty($_REQUEST["fm_vis_ante"])&&!is_null($_REQUEST["fm_vis_ante"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_vis_ante"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_orl_aden",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_orl_aden"])&&!empty($_REQUEST["fm_orl_aden"])&&!is_null($_REQUEST["fm_orl_aden"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_orl_aden"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_orl_tcv",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_orl_tcv"])&&!empty($_REQUEST["fm_orl_tcv"])&&!is_null($_REQUEST["fm_orl_tcv"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_orl_tcv"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_orl_sor",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_orl_sor"])&&!empty($_REQUEST["fm_orl_sor"])&&!is_null($_REQUEST["fm_orl_sor"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_orl_sor"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_orl_ronq",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_orl_ronq"])&&!empty($_REQUEST["fm_orl_ronq"])&&!is_null($_REQUEST["fm_orl_ronq"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_orl_ronq"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_orl_apn",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_orl_apn"])&&!empty($_REQUEST["fm_orl_apn"])&&!is_null($_REQUEST["fm_orl_apn"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_orl_apn"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_met_diab",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_met_diab"])&&!empty($_REQUEST["fm_met_diab"])&&!is_null($_REQUEST["fm_met_diab"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_met_diab"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_met_got",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_met_got"])&&!empty($_REQUEST["fm_met_got"])&&!is_null($_REQUEST["fm_met_got"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_met_got"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_met_atir",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_met_atir"])&&!empty($_REQUEST["fm_met_atir"])&&!is_null($_REQUEST["fm_met_atir"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_met_atir"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_met_obmar",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_met_obmar"])&&!empty($_REQUEST["fm_met_obmar"])&&!is_null($_REQUEST["fm_met_obmar"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_met_obmar"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_met_ainsu",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_met_ainsu"])&&!empty($_REQUEST["fm_met_ainsu"])&&!is_null($_REQUEST["fm_met_ainsu"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_met_ainsu"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_met_meddb",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_met_meddb"])&&!empty($_REQUEST["fm_met_meddb"])&&!is_null($_REQUEST["fm_met_meddb"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_met_meddb"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_alple_asm",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alple_asm"])&&!empty($_REQUEST["fm_alple_asm"])&&!is_null($_REQUEST["fm_alple_asm"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alple_asm"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alple_bron",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alple_bron"])&&!empty($_REQUEST["fm_alple_bron"])&&!is_null($_REQUEST["fm_alple_bron"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alple_bron"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alple_epoc",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alple_epoc"])&&!empty($_REQUEST["fm_alple_epoc"])&&!is_null($_REQUEST["fm_alple_epoc"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alple_epoc"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alple_inf",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alple_inf"])&&!empty($_REQUEST["fm_alple_inf"])&&!is_null($_REQUEST["fm_alple_inf"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alple_inf"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alple_ecs",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alple_ecs"])&&!empty($_REQUEST["fm_alple_ecs"])&&!is_null($_REQUEST["fm_alple_ecs"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alple_ecs"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alple_ibfa",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alple_ibfa"])&&!empty($_REQUEST["fm_alple_ibfa"])&&!is_null($_REQUEST["fm_alple_ibfa"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alple_ibfa"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_cor_angp",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_cor_angp"])&&!empty($_REQUEST["fm_cor_angp"])&&!is_null($_REQUEST["fm_cor_angp"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_cor_angp"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_cor_sop",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_cor_sop"])&&!empty($_REQUEST["fm_cor_sop"])&&!is_null($_REQUEST["fm_cor_sop"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_cor_sop"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_cor_infa",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_cor_infa"])&&!empty($_REQUEST["fm_cor_infa"])&&!is_null($_REQUEST["fm_cor_infa"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_cor_infa"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_cor_arri",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_cor_arri"])&&!empty($_REQUEST["fm_cor_arri"])&&!is_null($_REQUEST["fm_cor_arri"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_cor_arri"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_cor_hpar",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_cor_hpar"])&&!empty($_REQUEST["fm_cor_hpar"])&&!is_null($_REQUEST["fm_cor_hpar"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_cor_hpar"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_cor_vari",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_cor_vari"])&&!empty($_REQUEST["fm_cor_vari"])&&!is_null($_REQUEST["fm_cor_vari"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_cor_vari"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_cor_cans",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_cor_cans"])&&!empty($_REQUEST["fm_cor_cans"])&&!is_null($_REQUEST["fm_cor_cans"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_cor_cans"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_cor_rest",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_cor_rest"])&&!empty($_REQUEST["fm_cor_rest"])&&!is_null($_REQUEST["fm_cor_rest"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_cor_rest"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_cor_res",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_cor_res"])&&!empty($_REQUEST["fm_cor_res"])&&!is_null($_REQUEST["fm_cor_res"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_cor_res"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_dig_ulc",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_ulc"])&&!empty($_REQUEST["fm_dig_ulc"])&&!is_null($_REQUEST["fm_dig_ulc"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_ulc"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_gast",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_gast"])&&!empty($_REQUEST["fm_dig_gast"])&&!is_null($_REQUEST["fm_dig_gast"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_gast"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_her",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_her"])&&!empty($_REQUEST["fm_dig_her"])&&!is_null($_REQUEST["fm_dig_her"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_her"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_vesi",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_vesi"])&&!empty($_REQUEST["fm_dig_vesi"])&&!is_null($_REQUEST["fm_dig_vesi"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_vesi"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_colic",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_colic"])&&!empty($_REQUEST["fm_dig_colic"])&&!is_null($_REQUEST["fm_dig_colic"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_colic"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_hepa",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_hepa"])&&!empty($_REQUEST["fm_dig_hepa"])&&!is_null($_REQUEST["fm_dig_hepa"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_hepa"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_cual",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_cual"])&&!empty($_REQUEST["fm_dig_cual"])&&!is_null($_REQUEST["fm_dig_cual"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_cual"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_cdig",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_cdig"])&&!empty($_REQUEST["fm_dig_cdig"])&&!is_null($_REQUEST["fm_dig_cdig"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_cdig"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_rlabanor",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_rlabanor"])&&!empty($_REQUEST["fm_dig_rlabanor"])&&!is_null($_REQUEST["fm_dig_rlabanor"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_rlabanor"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_antfam",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_antfam"])&&!empty($_REQUEST["fm_dig_antfam"])&&!is_null($_REQUEST["fm_dig_antfam"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_antfam"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_popint",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_popint"])&&!empty($_REQUEST["fm_dig_popint"])&&!is_null($_REQUEST["fm_dig_popint"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_popint"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_sang_anem",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_anem"])&&!empty($_REQUEST["fm_sang_anem"])&&!is_null($_REQUEST["fm_sang_anem"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_anem"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_leuc",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_leuc"])&&!empty($_REQUEST["fm_sang_leuc"])&&!is_null($_REQUEST["fm_sang_leuc"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_leuc"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_linf",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_linf"])&&!empty($_REQUEST["fm_sang_linf"])&&!is_null($_REQUEST["fm_sang_linf"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_linf"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_afgan",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_afgan"])&&!empty($_REQUEST["fm_sang_afgan"])&&!is_null($_REQUEST["fm_sang_afgan"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_afgan"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_quim",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_quim"])&&!empty($_REQUEST["fm_sang_quim"])&&!is_null($_REQUEST["fm_sang_quim"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_quim"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_alrin",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_alrin"])&&!empty($_REQUEST["fm_sang_alrin"])&&!is_null($_REQUEST["fm_sang_alrin"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_alrin"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_alveg",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_alveg"])&&!empty($_REQUEST["fm_sang_alveg"])&&!is_null($_REQUEST["fm_sang_alveg"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_alveg"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_inur",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_inur"])&&!empty($_REQUEST["fm_sang_inur"])&&!is_null($_REQUEST["fm_sang_inur"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_inur"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_alpro",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_alpro"])&&!empty($_REQUEST["fm_sang_alpro"])&&!is_null($_REQUEST["fm_sang_alpro"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_alpro"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_valpesp",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_valpesp"])&&!empty($_REQUEST["fm_sang_valpesp"])&&!is_null($_REQUEST["fm_sang_valpesp"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_valpesp"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_calren",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_calren"])&&!empty($_REQUEST["fm_sang_calren"])&&!is_null($_REQUEST["fm_sang_calren"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_calren"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_infgen",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_infgen"])&&!empty($_REQUEST["fm_sang_infgen"])&&!is_null($_REQUEST["fm_sang_infgen"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_infgen"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_quisvu",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_quisvu"])&&!empty($_REQUEST["fm_sang_quisvu"])&&!is_null($_REQUEST["fm_sang_quisvu"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_quisvu"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_tumsvu",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_tumsvu"])&&!empty($_REQUEST["fm_sang_tumsvu"])&&!is_null($_REQUEST["fm_sang_tumsvu"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_tumsvu"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_expoves",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_expoves"])&&!empty($_REQUEST["fm_sang_expoves"])&&!is_null($_REQUEST["fm_sang_expoves"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_expoves"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_gin_ova",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_gin_ova"])&&!empty($_REQUEST["fm_gin_ova"])&&!is_null($_REQUEST["fm_gin_ova"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_gin_ova"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_gin_uter",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_gin_uter"])&&!empty($_REQUEST["fm_gin_uter"])&&!is_null($_REQUEST["fm_gin_uter"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_gin_uter"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_gin_gent",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_gin_gent"])&&!empty($_REQUEST["fm_gin_gent"])&&!is_null($_REQUEST["fm_gin_gent"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_gin_gent"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_gin_abort",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_gin_abort"])&&!empty($_REQUEST["fm_gin_abort"])&&!is_null($_REQUEST["fm_gin_abort"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_gin_abort"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_gin_emb",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_gin_emb"])&&!empty($_REQUEST["fm_gin_emb"])&&!is_null($_REQUEST["fm_gin_emb"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_gin_emb"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_gin_infer",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_gin_infer"])&&!empty($_REQUEST["fm_gin_infer"])&&!is_null($_REQUEST["fm_gin_infer"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_gin_infer"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_gin_hermo",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_gin_hermo"])&&!empty($_REQUEST["fm_gin_hermo"])&&!is_null($_REQUEST["fm_gin_hermo"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_gin_hermo"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_gin_fulcg",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_gin_fulcg"])&&!empty($_REQUEST["fm_gin_fulcg"])&&!is_null($_REQUEST["fm_gin_fulcg"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_gin_fulcg"];}
		$it[3]="D";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_gin_fulm",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_gin_fulm"])&&!empty($_REQUEST["fm_gin_fulm"])&&!is_null($_REQUEST["fm_gin_fulm"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_gin_fulm"];}
		$it[3]="D";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_kin_colum",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_colum"])&&!empty($_REQUEST["fm_kin_colum"])&&!is_null($_REQUEST["fm_kin_colum"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_colum"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_cade",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_cade"])&&!empty($_REQUEST["fm_kin_cade"])&&!is_null($_REQUEST["fm_kin_cade"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_cade"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_rodi",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_rodi"])&&!empty($_REQUEST["fm_kin_rodi"])&&!is_null($_REQUEST["fm_kin_rodi"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_rodi"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_mano",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_mano"])&&!empty($_REQUEST["fm_kin_mano"])&&!is_null($_REQUEST["fm_kin_mano"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_mano"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_hom",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_hom"])&&!empty($_REQUEST["fm_kin_hom"])&&!is_null($_REQUEST["fm_kin_hom"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_hom"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_cod",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_cod"])&&!empty($_REQUEST["fm_kin_cod"])&&!is_null($_REQUEST["fm_kin_cod"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_cod"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_pie",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_pie"])&&!empty($_REQUEST["fm_kin_pie"])&&!is_null($_REQUEST["fm_kin_pie"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_pie"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_dedod",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_dedod"])&&!empty($_REQUEST["fm_kin_dedod"])&&!is_null($_REQUEST["fm_kin_dedod"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_dedod"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_ccol",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_ccol"])&&!empty($_REQUEST["fm_kin_ccol"])&&!is_null($_REQUEST["fm_kin_ccol"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_ccol"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_cart",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_cart"])&&!empty($_REQUEST["fm_kin_cart"])&&!is_null($_REQUEST["fm_kin_cart"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_cart"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_prot",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_prot"])&&!empty($_REQUEST["fm_kin_prot"])&&!is_null($_REQUEST["fm_kin_prot"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_prot"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_tkin",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_tkin"])&&!empty($_REQUEST["fm_kin_tkin"])&&!is_null($_REQUEST["fm_kin_tkin"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_tkin"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_debmusc",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_debmusc"])&&!empty($_REQUEST["fm_kin_debmusc"])&&!is_null($_REQUEST["fm_kin_debmusc"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_debmusc"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_otro_oech",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oech"])&&!empty($_REQUEST["fm_otro_oech"])&&!is_null($_REQUEST["fm_otro_oech"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oech"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oein",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oein"])&&!empty($_REQUEST["fm_otro_oein"])&&!is_null($_REQUEST["fm_otro_oein"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oein"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oed",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oed"])&&!empty($_REQUEST["fm_otro_oed"])&&!is_null($_REQUEST["fm_otro_oed"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oed"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oep",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oep"])&&!empty($_REQUEST["fm_otro_oep"])&&!is_null($_REQUEST["fm_otro_oep"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oep"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oepsor",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oepsor"])&&!empty($_REQUEST["fm_otro_oepsor"])&&!is_null($_REQUEST["fm_otro_oepsor"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oepsor"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_omel",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_omel"])&&!empty($_REQUEST["fm_otro_omel"])&&!is_null($_REQUEST["fm_otro_omel"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_omel"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oeininf",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oeininf"])&&!empty($_REQUEST["fm_otro_oeininf"])&&!is_null($_REQUEST["fm_otro_oeininf"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oeininf"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_opra",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_opra"])&&!empty($_REQUEST["fm_otro_opra"])&&!is_null($_REQUEST["fm_otro_opra"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_opra"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_optali",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_optali"])&&!empty($_REQUEST["fm_otro_optali"])&&!is_null($_REQUEST["fm_otro_optali"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_optali"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_omedrec",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_omedrec"])&&!empty($_REQUEST["fm_otro_omedrec"])&&!is_null($_REQUEST["fm_otro_omedrec"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_omedrec"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oatratmedaf",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oatratmedaf"])&&!empty($_REQUEST["fm_otro_oatratmedaf"])&&!is_null($_REQUEST["fm_otro_oatratmedaf"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oatratmedaf"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oaeultan",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oaeultan"])&&!empty($_REQUEST["fm_otro_oaeultan"])&&!is_null($_REQUEST["fm_otro_oaeultan"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oaeultan"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oaint",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oaint"])&&!empty($_REQUEST["fm_otro_oaint"])&&!is_null($_REQUEST["fm_otro_oaint"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oaint"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oingmed",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oingmed"])&&!empty($_REQUEST["fm_otro_oingmed"])&&!is_null($_REQUEST["fm_otro_oingmed"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oingmed"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_odosis",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_odosis"])&&!empty($_REQUEST["fm_otro_odosis"])&&!is_null($_REQUEST["fm_otro_odosis"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_odosis"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oestrestmbisan",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oestrestmbisan"])&&!empty($_REQUEST["fm_otro_oestrestmbisan"])&&!is_null($_REQUEST["fm_otro_oestrestmbisan"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oestrestmbisan"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_ofuma",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_ofuma"])&&!empty($_REQUEST["fm_otro_ofuma"])&&!is_null($_REQUEST["fm_otro_ofuma"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_ofuma"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_ofuctos",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_ofuctos"])&&!empty($_REQUEST["fm_otro_ofuctos"])&&!is_null($_REQUEST["fm_otro_ofuctos"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_ofuctos"];}
		$it[3]="I";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_opmam",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_opmam"])&&!empty($_REQUEST["fm_otro_opmam"])&&!is_null($_REQUEST["fm_otro_opmam"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_opmam"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);



		// print_r("-----CAMPOS------");print_r("\n");
		// print_r("fe[$flagError]");
		// print_r($decinfo);
		// print_r("-----------------");print_r("\n");die;
		
		if($flagError)
		{
			$resultInfo['code']     = 1;
			$resultInfo['errorDes'] = "Se encontraron campos incompletos en la declaracion jurada";
			$resultInfo['fieldlst'] = $decinfo;
			return false;
		}
		return true;
	}

	function validarDeclaracionJuaradaClienteFmPed(&$decinfo,&$resultInfo)
	{
		$flagError=false;
		$decinfo = array();

		$it=array(0=>"fm_varios_niinad",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_niinad"])&&!empty($_REQUEST["fm_varios_niinad"])&&!is_null($_REQUEST["fm_varios_niinad"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_niinad"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_ealmed",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_ealmed"])&&!empty($_REQUEST["fm_varios_ealmed"])&&!is_null($_REQUEST["fm_varios_ealmed"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_ealmed"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_ealmeddet",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_ealmeddet"])&&!empty($_REQUEST["fm_varios_ealmeddet"])&&!is_null($_REQUEST["fm_varios_ealmeddet"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_ealmeddet"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_aleanipol",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_aleanipol"])&&!empty($_REQUEST["fm_varios_aleanipol"])&&!is_null($_REQUEST["fm_varios_aleanipol"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_aleanipol"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_alalimendet",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_alalimendet"])&&!empty($_REQUEST["fm_varios_alalimendet"])&&!is_null($_REQUEST["fm_varios_alalimendet"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_alalimendet"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_penfcro",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_penfcro"])&&!empty($_REQUEST["fm_varios_penfcro"])&&!is_null($_REQUEST["fm_varios_penfcro"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_penfcro"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_asmprores",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_asmprores"])&&!empty($_REQUEST["fm_varios_asmprores"])&&!is_null($_REQUEST["fm_varios_asmprores"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_asmprores"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_diab",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_diab"])&&!empty($_REQUEST["fm_varios_diab"])&&!is_null($_REQUEST["fm_varios_diab"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_diab"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_conv",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_conv"])&&!empty($_REQUEST["fm_varios_conv"])&&!is_null($_REQUEST["fm_varios_conv"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_conv"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_migra",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_migra"])&&!empty($_REQUEST["fm_varios_migra"])&&!is_null($_REQUEST["fm_varios_migra"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_migra"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_procar",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_procar"])&&!empty($_REQUEST["fm_varios_procar"])&&!is_null($_REQUEST["fm_varios_procar"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_procar"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_dolcab",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_dolcab"])&&!empty($_REQUEST["fm_varios_dolcab"])&&!is_null($_REQUEST["fm_varios_dolcab"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_dolcab"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_hemof",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_hemof"])&&!empty($_REQUEST["fm_varios_hemof"])&&!is_null($_REQUEST["fm_varios_hemof"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_hemof"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_yames",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_yames"])&&!empty($_REQUEST["fm_varios_yames"])&&!is_null($_REQUEST["fm_varios_yames"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_yames"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_sonamb",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_sonamb"])&&!empty($_REQUEST["fm_varios_sonamb"])&&!is_null($_REQUEST["fm_varios_sonamb"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_sonamb"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_pralim",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_pralim"])&&!empty($_REQUEST["fm_varios_pralim"])&&!is_null($_REQUEST["fm_varios_pralim"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_pralim"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_lamcol",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_lamcol"])&&!empty($_REQUEST["fm_varios_lamcol"])&&!is_null($_REQUEST["fm_varios_lamcol"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_lamcol"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_inconturnoc",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_inconturnoc"])&&!empty($_REQUEST["fm_varios_inconturnoc"])&&!is_null($_REQUEST["fm_varios_inconturnoc"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_inconturnoc"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_infrecoid",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_infrecoid"])&&!empty($_REQUEST["fm_varios_infrecoid"])&&!is_null($_REQUEST["fm_varios_infrecoid"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_infrecoid"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_nisabmes",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_nisabmes"])&&!empty($_REQUEST["fm_varios_nisabmes"])&&!is_null($_REQUEST["fm_varios_nisabmes"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_nisabmes"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_otrenf",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_otrenf"])&&!empty($_REQUEST["fm_varios_otrenf"])&&!is_null($_REQUEST["fm_varios_otrenf"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_otrenf"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_caotrenfcri",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_caotrenfcri"])&&!empty($_REQUEST["fm_varios_caotrenfcri"])&&!is_null($_REQUEST["fm_varios_caotrenfcri"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_caotrenfcri"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_hpadotrenf",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_hpadotrenf"])&&!empty($_REQUEST["fm_varios_hpadotrenf"])&&!is_null($_REQUEST["fm_varios_hpadotrenf"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_hpadotrenf"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_anrparnom",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_anrparnom"])&&!empty($_REQUEST["fm_varios_anrparnom"])&&!is_null($_REQUEST["fm_varios_anrparnom"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_anrparnom"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_nacpre",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_nacpre"])&&!empty($_REQUEST["fm_varios_nacpre"])&&!is_null($_REQUEST["fm_varios_nacpre"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_nacpre"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_trrespnac",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_trrespnac"])&&!empty($_REQUEST["fm_varios_trrespnac"])&&!is_null($_REQUEST["fm_varios_trrespnac"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_trrespnac"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_rupbolmat",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_rupbolmat"])&&!empty($_REQUEST["fm_varios_rupbolmat"])&&!is_null($_REQUEST["fm_varios_rupbolmat"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_rupbolmat"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_necintneona",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_necintneona"])&&!empty($_REQUEST["fm_varios_necintneona"])&&!is_null($_REQUEST["fm_varios_necintneona"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_necintneona"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_varios_causa",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_varios_causa"])&&!empty($_REQUEST["fm_varios_causa"])&&!is_null($_REQUEST["fm_varios_causa"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_varios_causa"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_antnac_percefa",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_antnac_percefa"])&&!empty($_REQUEST["fm_antnac_percefa"])&&!is_null($_REQUEST["fm_antnac_percefa"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_antnac_percefa"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_antnac_talla",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_antnac_talla"])&&!empty($_REQUEST["fm_antnac_talla"])&&!is_null($_REQUEST["fm_antnac_talla"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_antnac_talla"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_antnac_peso",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_antnac_peso"])&&!empty($_REQUEST["fm_antnac_peso"])&&!is_null($_REQUEST["fm_antnac_peso"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_antnac_peso"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_antnac_sememb",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_antnac_sememb"])&&!empty($_REQUEST["fm_antnac_sememb"])&&!is_null($_REQUEST["fm_antnac_sememb"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_antnac_sememb"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_antnac_vacrec",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_antnac_vacrec"])&&!empty($_REQUEST["fm_antnac_vacrec"])&&!is_null($_REQUEST["fm_antnac_vacrec"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_antnac_vacrec"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_antneu_convul",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_antneu_convul"])&&!empty($_REQUEST["fm_antneu_convul"])&&!is_null($_REQUEST["fm_antneu_convul"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_antneu_convul"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_antneu_desma",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_antneu_desma"])&&!empty($_REQUEST["fm_antneu_desma"])&&!is_null($_REQUEST["fm_antneu_desma"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_antneu_desma"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_antneu_inestab",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_antneu_inestab"])&&!empty($_REQUEST["fm_antneu_inestab"])&&!is_null($_REQUEST["fm_antneu_inestab"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_antneu_inestab"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_antneu_mareos",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_antneu_mareos"])&&!empty($_REQUEST["fm_antneu_mareos"])&&!is_null($_REQUEST["fm_antneu_mareos"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_antneu_mareos"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_antneu_paralisis",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_antneu_paralisis"])&&!empty($_REQUEST["fm_antneu_paralisis"])&&!is_null($_REQUEST["fm_antneu_paralisis"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_antneu_paralisis"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_antneu_trastorh",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_antneu_trastorh"])&&!empty($_REQUEST["fm_antneu_trastorh"])&&!is_null($_REQUEST["fm_antneu_trastorh"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_antneu_trastorh"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_antneu_trastorle",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_antneu_trastorle"])&&!empty($_REQUEST["fm_antneu_trastorle"])&&!is_null($_REQUEST["fm_antneu_trastorle"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_antneu_trastorle"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_antneu_depre",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_antneu_depre"])&&!empty($_REQUEST["fm_antneu_depre"])&&!is_null($_REQUEST["fm_antneu_depre"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_antneu_depre"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_antneu_disca",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_antneu_disca"])&&!empty($_REQUEST["fm_antneu_disca"])&&!is_null($_REQUEST["fm_antneu_disca"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_antneu_disca"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_altvis_miop",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altvis_miop"])&&!empty($_REQUEST["fm_altvis_miop"])&&!is_null($_REQUEST["fm_altvis_miop"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altvis_miop"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altvis_estrab",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altvis_estrab"])&&!empty($_REQUEST["fm_altvis_estrab"])&&!is_null($_REQUEST["fm_altvis_estrab"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altvis_estrab"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altvis_glauc",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altvis_glauc"])&&!empty($_REQUEST["fm_altvis_glauc"])&&!is_null($_REQUEST["fm_altvis_glauc"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altvis_glauc"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altvis_prret",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altvis_prret"])&&!empty($_REQUEST["fm_altvis_prret"])&&!is_null($_REQUEST["fm_altvis_prret"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altvis_prret"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altvis_prcor",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altvis_prcor"])&&!empty($_REQUEST["fm_altvis_prcor"])&&!is_null($_REQUEST["fm_altvis_prcor"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altvis_prcor"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altvis_uanteo",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altvis_uanteo"])&&!empty($_REQUEST["fm_altvis_uanteo"])&&!is_null($_REQUEST["fm_altvis_uanteo"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altvis_uanteo"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_afnari_adeno",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afnari_adeno"])&&!empty($_REQUEST["fm_afnari_adeno"])&&!is_null($_REQUEST["fm_afnari_adeno"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afnari_adeno"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afnari_tumcvoc",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afnari_tumcvoc"])&&!empty($_REQUEST["fm_afnari_tumcvoc"])&&!is_null($_REQUEST["fm_afnari_tumcvoc"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afnari_tumcvoc"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afnari_sord",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afnari_sord"])&&!empty($_REQUEST["fm_afnari_sord"])&&!is_null($_REQUEST["fm_afnari_sord"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afnari_sord"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afnari_ronqui",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afnari_ronqui"])&&!empty($_REQUEST["fm_afnari_ronqui"])&&!is_null($_REQUEST["fm_afnari_ronqui"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afnari_ronqui"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afnari_enfmeta",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afnari_enfmeta"])&&!empty($_REQUEST["fm_afnari_enfmeta"])&&!is_null($_REQUEST["fm_afnari_enfmeta"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afnari_enfmeta"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_enfmet_diabe",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_enfmet_diabe"])&&!empty($_REQUEST["fm_enfmet_diabe"])&&!is_null($_REQUEST["fm_enfmet_diabe"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_enfmet_diabe"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_enfmet_gota",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_enfmet_gota"])&&!empty($_REQUEST["fm_enfmet_gota"])&&!is_null($_REQUEST["fm_enfmet_gota"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_enfmet_gota"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_enfmet_alttir",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_enfmet_alttir"])&&!empty($_REQUEST["fm_enfmet_alttir"])&&!is_null($_REQUEST["fm_enfmet_alttir"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_enfmet_alttir"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_enfmet_obmar",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_enfmet_obmar"])&&!empty($_REQUEST["fm_enfmet_obmar"])&&!is_null($_REQUEST["fm_enfmet_obmar"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_enfmet_obmar"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_enfmet_saplins",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_enfmet_saplins"])&&!empty($_REQUEST["fm_enfmet_saplins"])&&!is_null($_REQUEST["fm_enfmet_saplins"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_enfmet_saplins"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_enfmet_meddiab",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_enfmet_meddiab"])&&!empty($_REQUEST["fm_enfmet_meddiab"])&&!is_null($_REQUEST["fm_enfmet_meddiab"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_enfmet_meddiab"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_altpul_asma",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altpul_asma"])&&!empty($_REQUEST["fm_altpul_asma"])&&!is_null($_REQUEST["fm_altpul_asma"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altpul_asma"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altpul_brncro",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altpul_brncro"])&&!empty($_REQUEST["fm_altpul_brncro"])&&!is_null($_REQUEST["fm_altpul_brncro"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altpul_brncro"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altpul_enfpulob",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altpul_enfpulob"])&&!empty($_REQUEST["fm_altpul_enfpulob"])&&!is_null($_REQUEST["fm_altpul_enfpulob"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altpul_enfpulob"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altpul_infec",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altpul_infec"])&&!empty($_REQUEST["fm_altpul_infec"])&&!is_null($_REQUEST["fm_altpul_infec"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altpul_infec"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altpul_expectosan",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altpul_expectosan"])&&!empty($_REQUEST["fm_altpul_expectosan"])&&!is_null($_REQUEST["fm_altpul_expectosan"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altpul_expectosan"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altpul_intbronc",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altpul_intbronc"])&&!empty($_REQUEST["fm_altpul_intbronc"])&&!is_null($_REQUEST["fm_altpul_intbronc"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altpul_intbronc"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altpul_protmam",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altpul_protmam"])&&!empty($_REQUEST["fm_altpul_protmam"])&&!is_null($_REQUEST["fm_altpul_protmam"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altpul_protmam"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_enfcor_angpe",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_enfcor_angpe"])&&!empty($_REQUEST["fm_enfcor_angpe"])&&!is_null($_REQUEST["fm_enfcor_angpe"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_enfcor_angpe"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_enfcor_sopl",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_enfcor_sopl"])&&!empty($_REQUEST["fm_enfcor_sopl"])&&!is_null($_REQUEST["fm_enfcor_sopl"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_enfcor_sopl"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_enfcor_infa",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_enfcor_infa"])&&!empty($_REQUEST["fm_enfcor_infa"])&&!is_null($_REQUEST["fm_enfcor_infa"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_enfcor_infa"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_enfcor_arrit",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_enfcor_arrit"])&&!empty($_REQUEST["fm_enfcor_arrit"])&&!is_null($_REQUEST["fm_enfcor_arrit"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_enfcor_arrit"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_enfcor_hpart",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_enfcor_hpart"])&&!empty($_REQUEST["fm_enfcor_hpart"])&&!is_null($_REQUEST["fm_enfcor_hpart"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_enfcor_hpart"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_enfcor_varic",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_enfcor_varic"])&&!empty($_REQUEST["fm_enfcor_varic"])&&!is_null($_REQUEST["fm_enfcor_varic"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_enfcor_varic"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_enfcor_cansa",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_enfcor_cansa"])&&!empty($_REQUEST["fm_enfcor_cansa"])&&!is_null($_REQUEST["fm_enfcor_cansa"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_enfcor_cansa"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_enfcor_reest",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_enfcor_reest"])&&!empty($_REQUEST["fm_enfcor_reest"])&&!is_null($_REQUEST["fm_enfcor_reest"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_enfcor_reest"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_enfcor_tires",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_enfcor_tires"])&&!empty($_REQUEST["fm_enfcor_tires"])&&!is_null($_REQUEST["fm_enfcor_tires"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_enfcor_tires"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_altdig_ulce",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altdig_ulce"])&&!empty($_REQUEST["fm_altdig_ulce"])&&!is_null($_REQUEST["fm_altdig_ulce"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altdig_ulce"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altdig_gast",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altdig_gast"])&&!empty($_REQUEST["fm_altdig_gast"])&&!is_null($_REQUEST["fm_altdig_gast"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altdig_gast"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altdig_hern",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altdig_hern"])&&!empty($_REQUEST["fm_altdig_hern"])&&!is_null($_REQUEST["fm_altdig_hern"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altdig_hern"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altdig_vesi",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altdig_vesi"])&&!empty($_REQUEST["fm_altdig_vesi"])&&!is_null($_REQUEST["fm_altdig_vesi"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altdig_vesi"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altdig_coli",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altdig_coli"])&&!empty($_REQUEST["fm_altdig_coli"])&&!is_null($_REQUEST["fm_altdig_coli"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altdig_coli"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altdig_hepa",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altdig_hepa"])&&!empty($_REQUEST["fm_altdig_hepa"])&&!is_null($_REQUEST["fm_altdig_hepa"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altdig_hepa"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altdig_cird",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altdig_cird"])&&!empty($_REQUEST["fm_altdig_cird"])&&!is_null($_REQUEST["fm_altdig_cird"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altdig_cird"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altdig_relabano",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altdig_relabano"])&&!empty($_REQUEST["fm_altdig_relabano"])&&!is_null($_REQUEST["fm_altdig_relabano"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altdig_relabano"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altdig_antfamtu",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altdig_antfamtu"])&&!empty($_REQUEST["fm_altdig_antfamtu"])&&!is_null($_REQUEST["fm_altdig_antfamtu"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altdig_antfamtu"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_altdig_polinte",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_altdig_polinte"])&&!empty($_REQUEST["fm_altdig_polinte"])&&!is_null($_REQUEST["fm_altdig_polinte"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_altdig_polinte"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_alsan_anem",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alsan_anem"])&&!empty($_REQUEST["fm_alsan_anem"])&&!is_null($_REQUEST["fm_alsan_anem"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alsan_anem"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alsan_leuc",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alsan_leuc"])&&!empty($_REQUEST["fm_alsan_leuc"])&&!is_null($_REQUEST["fm_alsan_leuc"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alsan_leuc"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alsan_linf",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alsan_linf"])&&!empty($_REQUEST["fm_alsan_linf"])&&!is_null($_REQUEST["fm_alsan_linf"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alsan_linf"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alsan_afecci",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alsan_afecci"])&&!empty($_REQUEST["fm_alsan_afecci"])&&!is_null($_REQUEST["fm_alsan_afecci"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alsan_afecci"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alsan_quim",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alsan_quim"])&&!empty($_REQUEST["fm_alsan_quim"])&&!is_null($_REQUEST["fm_alsan_quim"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alsan_quim"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alsan_altri",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alsan_altri"])&&!empty($_REQUEST["fm_alsan_altri"])&&!is_null($_REQUEST["fm_alsan_altri"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alsan_altri"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alsan_altveg",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alsan_altveg"])&&!empty($_REQUEST["fm_alsan_altveg"])&&!is_null($_REQUEST["fm_alsan_altveg"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alsan_altveg"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alsan_altpro",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alsan_altpro"])&&!empty($_REQUEST["fm_alsan_altpro"])&&!is_null($_REQUEST["fm_alsan_altpro"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alsan_altpro"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alsan_calre",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alsan_calre"])&&!empty($_REQUEST["fm_alsan_calre"])&&!is_null($_REQUEST["fm_alsan_calre"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alsan_calre"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alsan_infgen",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alsan_infgen"])&&!empty($_REQUEST["fm_alsan_infgen"])&&!is_null($_REQUEST["fm_alsan_infgen"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alsan_infgen"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alsan_quiviuri",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alsan_quiviuri"])&&!empty($_REQUEST["fm_alsan_quiviuri"])&&!is_null($_REQUEST["fm_alsan_quiviuri"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alsan_quiviuri"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alsan_tumviaur",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alsan_tumviaur"])&&!empty($_REQUEST["fm_alsan_tumviaur"])&&!is_null($_REQUEST["fm_alsan_tumviaur"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alsan_tumviaur"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alsan_polves",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alsan_polves"])&&!empty($_REQUEST["fm_alsan_polves"])&&!is_null($_REQUEST["fm_alsan_polves"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alsan_polves"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_afecgin_ova",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afecgin_ova"])&&!empty($_REQUEST["fm_afecgin_ova"])&&!is_null($_REQUEST["fm_afecgin_ova"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afecgin_ova"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afecgin_uter",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afecgin_uter"])&&!empty($_REQUEST["fm_afecgin_uter"])&&!is_null($_REQUEST["fm_afecgin_uter"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afecgin_uter"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afecgin_geni",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afecgin_geni"])&&!empty($_REQUEST["fm_afecgin_geni"])&&!is_null($_REQUEST["fm_afecgin_geni"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afecgin_geni"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afecgin_abor",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afecgin_abor"])&&!empty($_REQUEST["fm_afecgin_abor"])&&!is_null($_REQUEST["fm_afecgin_abor"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afecgin_abor"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afecgin_embcur",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afecgin_embcur"])&&!empty($_REQUEST["fm_afecgin_embcur"])&&!is_null($_REQUEST["fm_afecgin_embcur"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afecgin_embcur"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afecgin_infer",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afecgin_infer"])&&!empty($_REQUEST["fm_afecgin_infer"])&&!is_null($_REQUEST["fm_afecgin_infer"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afecgin_infer"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afecgin_hemor",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afecgin_hemor"])&&!empty($_REQUEST["fm_afecgin_hemor"])&&!is_null($_REQUEST["fm_afecgin_hemor"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afecgin_hemor"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afecgin_fultcg",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afecgin_fultcg"])&&!empty($_REQUEST["fm_afecgin_fultcg"])&&!is_null($_REQUEST["fm_afecgin_fultcg"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afecgin_fultcg"];}
		$it[3]="D";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_afmus_colum",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afmus_colum"])&&!empty($_REQUEST["fm_afmus_colum"])&&!is_null($_REQUEST["fm_afmus_colum"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afmus_colum"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afmus_cade",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afmus_cade"])&&!empty($_REQUEST["fm_afmus_cade"])&&!is_null($_REQUEST["fm_afmus_cade"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afmus_cade"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afmus_rodi",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afmus_rodi"])&&!empty($_REQUEST["fm_afmus_rodi"])&&!is_null($_REQUEST["fm_afmus_rodi"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afmus_rodi"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afmus_manos",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afmus_manos"])&&!empty($_REQUEST["fm_afmus_manos"])&&!is_null($_REQUEST["fm_afmus_manos"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afmus_manos"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afmus_homb",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afmus_homb"])&&!empty($_REQUEST["fm_afmus_homb"])&&!is_null($_REQUEST["fm_afmus_homb"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afmus_homb"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afmus_codo",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afmus_codo"])&&!empty($_REQUEST["fm_afmus_codo"])&&!is_null($_REQUEST["fm_afmus_codo"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afmus_codo"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afmus_pie",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afmus_pie"])&&!empty($_REQUEST["fm_afmus_pie"])&&!is_null($_REQUEST["fm_afmus_pie"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afmus_pie"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afmus_dedos",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afmus_dedos"])&&!empty($_REQUEST["fm_afmus_dedos"])&&!is_null($_REQUEST["fm_afmus_dedos"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afmus_dedos"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afmus_circol",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afmus_circol"])&&!empty($_REQUEST["fm_afmus_circol"])&&!is_null($_REQUEST["fm_afmus_circol"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afmus_circol"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afmus_artrorod",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afmus_artrorod"])&&!empty($_REQUEST["fm_afmus_artrorod"])&&!is_null($_REQUEST["fm_afmus_artrorod"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afmus_artrorod"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afmus_prote",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afmus_prote"])&&!empty($_REQUEST["fm_afmus_prote"])&&!is_null($_REQUEST["fm_afmus_prote"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afmus_prote"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afmus_trakin",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afmus_trakin"])&&!empty($_REQUEST["fm_afmus_trakin"])&&!is_null($_REQUEST["fm_afmus_trakin"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afmus_trakin"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_afmus_debmus",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_afmus_debmus"])&&!empty($_REQUEST["fm_afmus_debmus"])&&!is_null($_REQUEST["fm_afmus_debmus"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_afmus_debmus"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_oenf_econg",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_oenf_econg"])&&!empty($_REQUEST["fm_oenf_econg"])&&!is_null($_REQUEST["fm_oenf_econg"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_oenf_econg"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_oenf_einm",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_oenf_einm"])&&!empty($_REQUEST["fm_oenf_einm"])&&!is_null($_REQUEST["fm_oenf_einm"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_oenf_einm"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_oenf_edeg",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_oenf_edeg"])&&!empty($_REQUEST["fm_oenf_edeg"])&&!is_null($_REQUEST["fm_oenf_edeg"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_oenf_edeg"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_oenf_edlp",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_oenf_edlp"])&&!empty($_REQUEST["fm_oenf_edlp"])&&!is_null($_REQUEST["fm_oenf_edlp"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_oenf_edlp"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_oenf_psor",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_oenf_psor"])&&!empty($_REQUEST["fm_oenf_psor"])&&!is_null($_REQUEST["fm_oenf_psor"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_oenf_psor"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_oenf_mela",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_oenf_mela"])&&!empty($_REQUEST["fm_oenf_mela"])&&!is_null($_REQUEST["fm_oenf_mela"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_oenf_mela"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_oenf_einmuno",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_oenf_einmuno"])&&!empty($_REQUEST["fm_oenf_einmuno"])&&!is_null($_REQUEST["fm_oenf_einmuno"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_oenf_einmuno"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_oenf_rprat",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_oenf_rprat"])&&!empty($_REQUEST["fm_oenf_rprat"])&&!is_null($_REQUEST["fm_oenf_rprat"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_oenf_rprat"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_oenf_ptalm",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_oenf_ptalm"])&&!empty($_REQUEST["fm_oenf_ptalm"])&&!is_null($_REQUEST["fm_oenf_ptalm"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_oenf_ptalm"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_oenf_dmerec",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_oenf_dmerec"])&&!empty($_REQUEST["fm_oenf_dmerec"])&&!is_null($_REQUEST["fm_oenf_dmerec"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_oenf_dmerec"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_oenf_tresaf",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_oenf_tresaf"])&&!empty($_REQUEST["fm_oenf_tresaf"])&&!is_null($_REQUEST["fm_oenf_tresaf"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_oenf_tresaf"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_oenf_lheula",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_oenf_lheula"])&&!empty($_REQUEST["fm_oenf_lheula"])&&!is_null($_REQUEST["fm_oenf_lheula"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_oenf_lheula"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_oenf_heint",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_oenf_heint"])&&!empty($_REQUEST["fm_oenf_heint"])&&!is_null($_REQUEST["fm_oenf_heint"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_oenf_heint"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_oenf_ingmed",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_oenf_ingmed"])&&!empty($_REQUEST["fm_oenf_ingmed"])&&!is_null($_REQUEST["fm_oenf_ingmed"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_oenf_ingmed"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_oenf_detdrogados",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_oenf_detdrogados"])&&!empty($_REQUEST["fm_oenf_detdrogados"])&&!is_null($_REQUEST["fm_oenf_detdrogados"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_oenf_detdrogados"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_oenf_estresotomo",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_oenf_estresotomo"])&&!empty($_REQUEST["fm_oenf_estresotomo"])&&!is_null($_REQUEST["fm_oenf_estresotomo"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_oenf_estresotomo"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);





		// print_r("-----CAMPOS------");print_r("\n");
		// print_r("fe[$flagError]");
		// print_r($decinfo);
		// print_r("-----------------");print_r("\n");die;
		
		if($flagError)
		{
			$resultInfo['code']     = 1;
			$resultInfo['errorDes'] = "Se encontraron campos incompletos en la declaracion jurada";
			$resultInfo['fieldlst'] = $decinfo;
			return false;
		}
		return true;
	}

	function saveDeclaracionJuradaFmAd($clienteCod,$familiarInfo,$decinfo,&$resultInfo)
	{
		try
		{
			$flagTransactionInit = false;
			$sqlCloseDJ 	= false;
			$sqlAddDJ   	= false;
			$sqlUpdCusFlagFM= false;
			
			//----------------------------------------
			//VERIFICAR SI EXISTE UNA DJ DEL CLIENTE
			//----------------------------------------
			$sql = "SELECT clid_numero
					  FROM dbo.cli_declaracionjurada
					 WHERE cli_codigo  = '".addslashes($clienteCod)."'
					   AND clid_fecha_fin IS NULL";
			
			//print_r($sql);print_r("\n");//die;
			$rs = $GLOBALS['dbSQL']->Query($sql);

			if ( $rs ) 
			{ 		
				$rs = $GLOBALS['dbSQL']->getAll();
				if(is_array($rs)&&count($rs)>0)
				{
					//CERRAR DJ ACTUAL
					$sqlCloseDJ = " UPDATE dbo.cli_declaracionjurada 
									   SET clid_fecha_fin =  GETDATE()
									 WHERE clid_numero    = ".$rs[0]["clid_numero"];
				}
			}
			//----------------------------------------
			
			//----------------------------------------
			//INSERTAR LA NUEVA DJ
			//----------------------------------------
			$camposstatic = " cli_codigo
							 ,cligf_numero
							 ,clid_fecha_inicio
							 ,clid_fecha_fin";
			$valuesSt 	   =  $clienteCod."
							 ,".(!$familiarInfo?'NULL':$familiarInfo["codf"])."
							 ,GETDATE()
							 ,NULL";
			
			$valuesDn 		 = "";
			$camposdinamicos = "";
			
			
			for($i=0,$t=count($decinfo);$i<$t;$i++)
			{
				$campo		= str_replace("fm_","clid_",$decinfo[$i][0]);
				$tipo		= $decinfo[$i][3];
				switch($tipo)
				{
					case "B":{$valor="'".addslashes(($decinfo[$i][1]=="o1"?1:0))."'";}break;
					case "D":{$valor="'".getFechaFormateadaDj($decinfo[$i][1])."'";}break;
					case "I":{
								if(strlen($decinfo[$i][1])>5)
								{
									$valor="0";
								}
								else
								{
									$valor=(is_numeric($decinfo[$i][1])?"'".addslashes($decinfo[$i][1])."'":0);
								}
							}break;
					case "S":{
								if(strlen($decinfo[$i][1])>200)
								{
									$valor="'".addslashes(substr(trim($decinfo[$i][1]),0,200))."'";
								}
								else
								{
									$valor="'".addslashes(trim($decinfo[$i][1]))."'";
								}
							}break;
				}
				
				$sep=',';
				//if($camposdinamicos==""){$sep='';}
				$camposdinamicos.=$sep.$campo."\n";
				
				$valuesDn.=$sep.$valor."\n";
			}
							 
			$sqlAddDJ = "INSERT INTO dbo.cli_declaracionjurada
						(
							 ".$camposstatic."
							 ".$camposdinamicos."
						)
						VALUES(".$valuesSt.$valuesDn.")";
			//print_r($sql);die;
			//----------------------------------------
			
		
			//----------------------------------------
			//MARCAR EL FLAG DE FM DEL CLIENTE
			//----------------------------------------
			$sqlUpdCusFlagFM = "    UPDATE dbo.clientes
									   SET cli_val_fmed = 0
									 WHERE cli_codigo  = ".$clienteCod;
			//----------------------------------------

			$continue=true;
			if( setConeccionTransaccion() )
			{
				$flagTransactionInit = true;
				$GLOBALS['dbSQLTR']->setBeginTransaction();
				
				if( $sqlCloseDJ )
				{
					$resultado = $GLOBALS['dbSQLTR']->QueryTR($sqlCloseDJ,true);
					if ( !$resultado ) 
					{			
						$res=$GLOBALS['dbSQLTR']->setRollbackTransaction();	
						$continue = false;
						$errorPoint = 'Error al cerrar la D.J. actual';
						$resultInfo['code'] 	= -1;
						$resultInfo['errorDes'] = $errorPoint;
					}
				}
				
				if( $continue && $sqlAddDJ)
				{
					$resultado = $GLOBALS['dbSQLTR']->QueryTR($sqlAddDJ,true);
					if ( !$resultado ) 
					{			
						$res=$GLOBALS['dbSQLTR']->setRollbackTransaction();	
						$continue = false;
						$errorPoint = 'Error al grabar la D.J.';
						$resultInfo['code'] 	= -1;
						$resultInfo['errorDes'] = $errorPoint;
					}
				}
				
				if( $continue && $sqlUpdCusFlagFM)
				{
					$resultado = $GLOBALS['dbSQLTR']->QueryTR($sqlUpdCusFlagFM,true);
					if ( !$resultado ) 
					{			
						$res=$GLOBALS['dbSQLTR']->setRollbackTransaction();	
						$continue = false;
						$errorPoint = 'Error al actuaizar al cliente';
						$resultInfo['code'] 	= -1;
						$resultInfo['errorDes'] = $errorPoint;
					}
				}
				
				if( $continue  )
				{
					$res = $GLOBALS['dbSQLTR']->setCommitTransaction();
					$resultInfo['code'] = 0;
					$resultInfo['data'] = 1;
					return true;
				}
			}
			else
			{
				$resultInfo['code'] 	= -1;
				$resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1000]";
			}
			return false;
		} 
		catch ( Exception $e ) 
		{
			if( $flagTransactionInit )
			{
				$GLOBALS['dbSQLTR']->setRollbackTransaction();
			}
			
			$resultInfo['code'] 	= CODE_RESULT_ERROR_FATAL;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			logTrace(debug_backtrace(),$e->__toString());
			return false;
		}
	}
	
	function saveDeclaracionJuradaFmPed($clienteCod,$familiarInfo,$decinfo,&$resultInfo)
	{
		try
		{
			$flagTransactionInit = false;
			$sqlCloseDJ 	= false;
			$sqlAddDJ   	= false;
			$sqlUpdCusFlagFM= false;
			
			//----------------------------------------
			//VERIFICAR SI EXISTE UNA DJ DEL CLIENTE
			//----------------------------------------
			$sql = "SELECT clid_numero
					  FROM dbo.cli_declaracionjurada_pediatrica
					 WHERE cli_codigo  = '".addslashes($clienteCod)."'
					   AND clid_fecha_fin IS NULL";
			
			//print_r($sql);print_r("\n");//die;
			$rs = $GLOBALS['dbSQL']->Query($sql);

			if ( $rs ) 
			{ 		
				$rs = $GLOBALS['dbSQL']->getAll();
				if(is_array($rs)&&count($rs)>0)
				{
					//CERRAR DJ ACTUAL
					$sqlCloseDJ = " UPDATE dbo.cli_declaracionjurada_pediatrica 
									   SET clid_fecha_fin =  GETDATE()
									 WHERE clid_numero    = ".$rs[0]["clid_numero"];
				}
			}
			//----------------------------------------
			
			//----------------------------------------
			//INSERTAR LA NUEVA DJ
			//----------------------------------------
			$camposstatic = " cli_codigo
							 ,cligf_numero
							 ,clid_fecha_inicio
							 ,clid_fecha_fin";
			$valuesSt 	   =  $clienteCod."
							 ,".(!$familiarInfo?'NULL':$familiarInfo["codf"])."
							 ,GETDATE()
							 ,NULL";
			
			$valuesDn 		 = "";
			$camposdinamicos = "";
			
			
			for($i=0,$t=count($decinfo);$i<$t;$i++)
			{
				$campo		= str_replace("fm_","clid_",$decinfo[$i][0]);
				$tipo		= $decinfo[$i][3];
				switch($tipo)
				{
					case "B":{$valor="'".addslashes(($decinfo[$i][1]=="o1"?1:0))."'";}break;
					case "D":{$valor="'".getFechaFormateadaDj($decinfo[$i][1])."'";}break;
					case "I":{
								if(strlen($decinfo[$i][1])>5)
								{
									$valor="0";
								}
								else
								{
									$valor=(is_numeric($decinfo[$i][1])?"'".addslashes($decinfo[$i][1])."'":0);
								}
							}break;
					case "S":{
								if(strlen($decinfo[$i][1])>200)
								{
									$valor="'".addslashes(substr(trim($decinfo[$i][1]),0,200))."'";
								}
								else
								{
									$valor="'".addslashes(trim($decinfo[$i][1]))."'";
								}
							}break;
				}
				
				$sep=',';
				//if($camposdinamicos==""){$sep='';}
				$camposdinamicos.=$sep.$campo."\n";
				
				$valuesDn.=$sep.$valor."\n";
			}
							 
			$sqlAddDJ = "INSERT INTO dbo.cli_declaracionjurada_pediatrica
						(
							 ".$camposstatic."
							 ".$camposdinamicos."
						)
						VALUES(".$valuesSt.$valuesDn.")";
			//print_r($sql);die;
			//----------------------------------------
			
		
			//----------------------------------------
			//MARCAR EL FLAG DE FM DEL CLIENTE
			//----------------------------------------
			$sqlUpdCusFlagFM = "    UPDATE dbo.clientes
									   SET cli_val_fmed = 0
									 WHERE cli_codigo  = ".$clienteCod;
			//----------------------------------------

			$continue=true;
			if( setConeccionTransaccion() )
			{
				$flagTransactionInit = true;
				$GLOBALS['dbSQLTR']->setBeginTransaction();
				
				if( $sqlCloseDJ )
				{
					$resultado = $GLOBALS['dbSQLTR']->QueryTR($sqlCloseDJ,true);
					if ( !$resultado ) 
					{			
						$res=$GLOBALS['dbSQLTR']->setRollbackTransaction();	
						$continue = false;
						$errorPoint = 'Error al cerrar la D.J. actual';
						$resultInfo['code'] 	= -1;
						$resultInfo['errorDes'] = $errorPoint;
					}
				}
				
				if( $continue && $sqlAddDJ)
				{
					$resultado = $GLOBALS['dbSQLTR']->QueryTR($sqlAddDJ,true);
					if ( !$resultado ) 
					{			
						$res=$GLOBALS['dbSQLTR']->setRollbackTransaction();	
						$continue = false;
						$errorPoint = 'Error al grabar la D.J.';
						$resultInfo['code'] 	= -1;
						$resultInfo['errorDes'] = $errorPoint;
					}
				}
				
				if( $continue && $sqlUpdCusFlagFM)
				{
					$resultado = $GLOBALS['dbSQLTR']->QueryTR($sqlUpdCusFlagFM,true);
					if ( !$resultado ) 
					{			
						$res=$GLOBALS['dbSQLTR']->setRollbackTransaction();	
						$continue = false;
						$errorPoint = 'Error al actuaizar al cliente';
						$resultInfo['code'] 	= -1;
						$resultInfo['errorDes'] = $errorPoint;
					}
				}
				
				if( $continue  )
				{
					$res = $GLOBALS['dbSQLTR']->setCommitTransaction();
					$resultInfo['code'] = 0;
					$resultInfo['data'] = 1;
					return true;
				}
			}
			else
			{
				$resultInfo['code'] 	= -1;
				$resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1000]";
			}
			return false;
		} 
		catch ( Exception $e ) 
		{
			if( $flagTransactionInit )
			{
				$GLOBALS['dbSQLTR']->setRollbackTransaction();
			}
			
			$resultInfo['code'] 	= CODE_RESULT_ERROR_FATAL;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			logTrace(debug_backtrace(),$e->__toString());
			return false;
		}
	}
	
	function registrarDeclaracionJuaradaClienteFm(&$resultInfo)
	{
		try
		{
			$output = "";
			//print_r($_REQUEST);die;

			if( isset($_REQUEST["codfm"])  		&&
				!empty($_REQUEST["codfm"])  	&&
				!is_null($_REQUEST["codfm"])	&&
				
				isset($_REQUEST["token"])  		&&
				!empty($_REQUEST["token"])  	&&
				!is_null($_REQUEST["token"])
			)
			{
				$continue = true;
				$userId    = validarTokenFast($resultInfo);

				if($userId&&is_numeric($userId))
				{
					$decinfo    = false;
					$resultInfo = false;
					$familiarInfo=false;
					$typeFm = getFamType($_REQUEST["codfm"]);
					if( $typeFm == TIPO_DEMANDA_ESP_ADULT )
					{
						$resul = validarDeclaracionJuaradaClienteFmAd($decinfo,$resultInfo);
					}
					else
					{
						$resul = validarDeclaracionJuaradaClienteFmPed($decinfo,$resultInfo);
					}
					
					if($resul)
					{
						$resultInfo = false;
						if( $typeFm == TIPO_DEMANDA_ESP_ADULT )
						{
							$resultado = saveDeclaracionJuradaFmAd($_REQUEST["codfm"],$familiarInfo,$decinfo,$resultInfo);
						}
						else
						{
							$resultado = saveDeclaracionJuradaFmPed($_REQUEST["codfm"],$familiarInfo,$decinfo,$resultInfo);
						}
					}
				}
				else
				{
					$resultInfo['code'] = 1;
					$resultInfo['errorDes'] = "Se produjo un error al grabar la declaracion jurada";
				}	
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se encontraron campos obligatorios vacíos/faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"getStripePaymentToken","error"=>$e->__toString()));
			return false;
		}
	}
	
	//SMI REGISTRAR CLIENTE VENDEDOR
	function registrarclienteSMIVendedor($vendedor,&$resultInfo)
	{
		//print_r($_REQUEST);die;
		/*
			Array
			(
				[nombre] => aaaaaaaaaaaa
				[apellido] => bbbbbbbbbb
				[sexo] => 
				[fnyear] => 2020
				[fnmonth] => 10
				[fnday] => 10
				[pais] => 
				[email] => gujuarez@claro.com.ar
				[country] => Array
					(
						[cp] => 54
						[pn] => Argentina
						[cpi] => ar
					)

				[telefono] => 5493512349009
				[vendcod] => 98
			)
		*/
		
		$continue   				= true;
		$flagFamiliar				= false;
		$customerinfo 				= array();
		$customerinfo["nombre"]		= trim(base64_decode($_REQUEST["name"]));
		$customerinfo["apellido"] 	= trim(base64_decode($_REQUEST["lname"]));
		$customerinfo["sexo"] 		= trim(base64_decode($_REQUEST["sex"]));
		$customerinfo["fnyear"] 	= trim(base64_decode($_REQUEST["fny"]));
		$customerinfo["fnmonth"] 	= trim(base64_decode($_REQUEST["fnm"]));
		$customerinfo["fnday"] 		= trim(base64_decode($_REQUEST["fnd"]));
		$customerinfo["pais"] 		= (isset($_REQUEST["country"])?	trim(base64_decode($_REQUEST["country"])):'');	// EN CASO DE FAMILIAR, ESTE DATO NO LLEGARIA
		// $customerinfo["clave"] 	= (isset($_REQUEST["pass"])?	trim(base64_decode($_REQUEST["pass"])):'');		// EN CASO DE FAMILIAR, ESTE DATO NO LLEGARIA
		// $customerinfo["rclave"] 	= (isset($_REQUEST["rpass"])?	trim(base64_decode($_REQUEST["rpass"])):'');	// EN CASO DE FAMILIAR, ESTE DATO NO LLEGARIA
		$customerinfo["email"] 		= (isset($_REQUEST["email"])?	trim(base64_decode($_REQUEST["email"])):'');	// EN CASO DE FAMILIAR, ESTE DATO NO LLEGARIA
		$customerinfo["country"] 	= (isset($_REQUEST["country"])?	$_REQUEST["country"]:false);						// EN CASO DE FAMILIAR, ESTE DATO NO LLEGARIA
		$customerinfo["telefono"] 	= (isset($_REQUEST["tnumber"])?	trim(base64_decode($_REQUEST["tnumber"])):'');	// EN CASO DE FAMILIAR, ESTE DATO NO LLEGARIA
		$customerinfo["vendcod"] 	= $vendedor;
		
		//print_r($customerinfo);die;
		
		$customerinfo["clave"] = randomNumberText(8);
			
		if( !validarFecha($customerinfo["fnyear"],$customerinfo["fnmonth"],$customerinfo["fnday"]) )
		{
			$continue  			= false;
			$resultInfo['code'] = 102;
			$resultInfo['errorDes'] = "La fecha de nacimiento es inválida";
		}
		
		if( $continue && !validarDiffFechaYears($customerinfo["fnyear"],$customerinfo["fnmonth"],$customerinfo["fnday"],18) )
		{
			$continue  			= false;
			$resultInfo['code'] = 103;
			$resultInfo['errorDes'] = "Debe ser mayor de 18 años para registrarse";
		}
		/*
		if( $continue && $customerinfo["clave"] != $customerinfo["rclave"] )
		{
			$continue  			= false;
			$resultInfo['code'] = 104;
			$resultInfo['errorDes'] = "La confirmación de la clave no coincide";
		}
		
		if( $continue && strlen($customerinfo["clave"]) < 8 )
		{
			$continue  			= false;
			$resultInfo['code'] = 105;
			$resultInfo['errorDes'] = "La clave deber tener al menos 8 caracteres";
		}
		
		if( $continue && strlen($customerinfo["clave"]) > 16 )
		{
			$continue  			= false;
			$resultInfo['code'] = 106;
			$resultInfo['errorDes'] = "La clave deber tener un máximo de 16 caracteres";
		}
		
		if( $continue && !formatoClave($customerinfo["clave"]) )
		{
			$continue  			= false;
			$resultInfo['code'] = 107;
			$resultInfo['errorDes'] = "La clave no cumple con el formato exigido: letras y numeros";
		}
		*/
		
		if( $continue && (!validarEmail($customerinfo["email"])))
		{
			$continue  			= false;
			$resultInfo['code'] = 108;
			$resultInfo['errorDes'] = "El email ya está registrado";
		}
		
		if( $continue && (validarEmailExistente($customerinfo["email"])))
		{
			$continue  			= false;
			$resultInfo['code'] = 109;
			$resultInfo['errorDes'] = "El email ingresado ya se encuentra registrado";
		}
		
		if( $continue && $customerinfo["vendcod"] && (validarVendedor($customerinfo["vendcod"])))
		{
			$continue  			= false;
			$resultInfo['code'] = 111;
			$resultInfo['errorDes'] = "El vendedor asociado se encuentra bloqueado. Consulte con el administrador";
		}

		//print_r($customerinfo);die;
		
		//-------------------------------
		//VALIDAR CUPON SI ESTA PRESENTE
		//-------------------------------
		$flagCupon=false;
		/*
		if( $continue 							&& 
			$customerinfo["cupon"] 				&& 
			strlen(trim($customerinfo["cupon"]))>0
		)
		{
			$cuponnro = false;
			$res = validarCupon(trim($customerinfo["cupon"]),$cuponnro);
			
			if($res)
			{
				$flagCupon=true;
			}
			else
			{
				$flagCupon=false;
				$continue  			= false;
				$resultInfo['code'] = 110;
				$resultInfo['errorDes'] = "El cupon ingresado no es válido";
			}
		}
		*/
		//-------------------------------

		if( $continue )
		{
			
			if(strlen($customerinfo["fnmonth"])<2){$customerinfo["fnmonth"]='0'.$customerinfo["fnmonth"];}
			if(strlen($customerinfo["fnday"])<2){$customerinfo["fnday"]='0'.$customerinfo["fnday"];}
			
			//$customerinfo["fnyear"],$customerinfo["fnmonth"],$customerinfo["fnday"]

			$idCliente = getProximoCliente();
			$cliecod   = 0;
			$obscodsmi = $GLOBALS['SMI_OBS'];
			$customerinfo["clavetmp_email"]=md5(randomNumberText(4)).md5(randomNumberText(4));
			$customerinfo["clavetmp_tel"]  =randomNumberText(4);

			$sql = "INSERT INTO dbo.[clientes]
				(
					cli_codigo
				   ,cli_dni
				   ,cli_nombre
				   ,cli_fname
				   ,cli_lname
				   ,cli_fecnto
				   ,cli_sexo
				   ,obs_codigo
				   ,obsp_cod
				   ,cli_email
				   ,med_codigo
				   ,cli_tel
				   ,cli_tel_cod_area
				   ,cli_tel_numero
				   ,cli_pais
				   ,cli_paiscod
				   ,cli_passw
				   ,cli_val_email
				   ,cli_val_tel
				   ,cli_val_fmed
				   ,cli_val_plan
				   ,cli_val_foto
				   ,cli_clavetmp_email
				   ,cli_clavetmp_tel
				   ,cli_origen
				   ,cli_codigo_padre
				)
			 VALUES
				   (
					".$idCliente."
					,NULL
					,'".mb_convert_encoding(mb_strtoupper(addslashes($customerinfo["apellido"])),"iso-8859-1", "UTF-8").' '.mb_convert_encoding(mb_strtoupper(addslashes($customerinfo["nombre"])),"iso-8859-1", "UTF-8")."'
					,'".mb_convert_encoding(mb_strtoupper(addslashes($customerinfo["nombre"])),"iso-8859-1", "UTF-8")."'
					,'".mb_convert_encoding(mb_strtoupper(addslashes($customerinfo["apellido"])),"iso-8859-1", "UTF-8")."'
					,'".$customerinfo["fnyear"].'-'.trim($customerinfo["fnmonth"]).'-'.trim($customerinfo["fnday"])."T00:00:00'
					,'".($customerinfo["sexo"]=="M"?"M":"F")."'
					,".$obscodsmi."
					,".($flagCupon?$GLOBALS['SMI_OBS_PLAN_FRIEND']:'NULL')."
					,'".mb_strtolower(trim(addslashes($customerinfo["email"])))	."'
					,1
					,'".$customerinfo["telefono"]."'
					,'".$customerinfo["country"]["cp"]."'
					,'".$customerinfo["telefono"]."'
					,'".$customerinfo["country"]["pn"]."'
					,'".$customerinfo["country"]["cpi"]."'
					,'".md5(trim($customerinfo["clave"]))."'
					,1
					,1
					,1
					,".(!$flagCupon?0:'1')."
					,1
					,'".$customerinfo["clavetmp_email"]."'
					,'".$customerinfo["clavetmp_tel"]."'
					,'WEB'
					,".$cliecod."
				   )";

			//debug($sql,true);
			//print_r($sql);//die;

			$rs = $GLOBALS['dbSQL']->Query($sql,true);
			if ( $rs ) 
			{
				//$dni = $_REQUEST["dni"];
				//$userinfo = loginUserRegistrar($dni);
				$userinfo = getCustomerInfo($idCliente);
				
				$cliVendInfo = array("clinro"=>$idCliente,"vendnro"=>$customerinfo["vendcod"]);
				$rescupon = asociarClieteVendedor($cliVendInfo);
				
				if($flagCupon&&$cuponnro)
				{
					//CONSUMIR CUPON
					$cuponInfo = array("clinro"=>$idCliente,"cuponnro"=>$cuponnro);
					$rescupon = consumirCupon($cuponInfo);
				}
				
				$resultInfoCorreo=false;
				//$res = sendEmailValidarCorreo($idCliente,$resultInfoCorreo);
				$res = sendEmailValidarCorreoVendedor($idCliente,$customerinfo["clave"],$resultInfoCorreo);

				$resultInfo['code'] = 0;
				//$resultInfo['data'] = array("id"=>$GLOBALS['dbSQL']->getLastId('clientes','cli_codigo'));
				$resultInfo['data'] = array(
					"userinfo" => $userinfo
				);
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['data'] = array("res"=>"Se produjo un error al registrar el usuario");
			}
		}
		
	}

	function registrarNuevoClienteVendedor(&$resultInfo)
	{
		try
		{
			//print_r($_REQUEST);die;

			if( 
				isset($_REQUEST["name"])  		&&
				!empty($_REQUEST["name"])  		&&
				!is_null($_REQUEST["name"]) 	&&
				
				isset($_REQUEST["lname"])  		&&
				!empty($_REQUEST["lname"])  	&&
				!is_null($_REQUEST["lname"]) 	&&
				
				isset($_REQUEST["email"])  		&&
				!empty($_REQUEST["email"])  	&&
				!is_null($_REQUEST["email"])	&&
				
				isset($_REQUEST["fny"])  		&&
				!empty($_REQUEST["fny"])  		&&
				!is_null($_REQUEST["fny"])		&&
				
				isset($_REQUEST["fnm"])  		&&
				!empty($_REQUEST["fnm"])  		&&
				!is_null($_REQUEST["fnm"])		&&
				
				isset($_REQUEST["fnd"])  		&&
				!empty($_REQUEST["fnd"])  		&&
				!is_null($_REQUEST["fnd"])		&&
				
				isset($_REQUEST["tnumber"])  	&&
				!empty($_REQUEST["tnumber"])  	&&
				!is_null($_REQUEST["tnumber"])	&&
				
				isset($_REQUEST["token"])  		&&
				!empty($_REQUEST["token"])  	&&
				!is_null($_REQUEST["token"])
			)
			{
				$continue = true;
				$userId    = validarTokenFast($resultInfo);

				if($userId&&is_numeric($userId))
				{
					$resultInfo = false;
					$resultado = registrarclienteSMIVendedor($userId,$resultInfo);
				}
				else
				{
					$resultInfo['code'] = 1;
					$resultInfo['errorDes'] = "Acceso no autorizado";
				}
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se encontraron campos obligatorios vacíos/faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			return false;
		}
	}
	
	//SMI PROF
	function getValidarProfSMI($email,$clave, $mat, &$cod, &$name, &$dni, &$sexo, &$telefono, &$alerta, &$fnac, &$cesp, &$tit)
	{
		//print_r("c[$clave]m[".md5($clave)."]");die;
		$sql = "SELECT    med_dni AS DNI
						, med_codigo AS COD
						, med_nombre AS NOMBRE
						, med_mp AS MATRICULA
						, med_email AS EMAIL
						, med_tel AS TEL
						, med_fecnto AS FNAC
						, med_webcoment AS COMW
						, es.esp_denom as ESP
						, ti.tit_abrev as TIT
				  FROM  medicos as m
			LEFT JOIN	tbl_titulos AS ti 	ON ti.tit_codigo = m.tit_codigo 
			LEFT JOIN	especial AS es 		ON m.esp_codigo = es.esp_codigo
			INNER JOIN  empleado as e 		ON e.emp_codigo = m.usu_mapeo AND e.emp_email = m.med_email
				 WHERE  med_email  = '".addslashes($email)."'
				   AND  emp_passw  = '".md5($clave)."'";
				   
		$sql = "SELECT    med_dni AS DNI
						, med_codigo AS COD
						, med_nombre AS NOMBRE
						, med_mp AS MATRICULA
						, med_email AS EMAIL
						, med_tel AS TEL
						, med_fecnto AS FNAC
						, med_webcoment AS COMW
						, es.esp_denom as ESP
						, ti.tit_abrev as TIT
						,med_email
				  FROM  medicos as m
			LEFT JOIN	tbl_titulos AS ti 	ON ti.tit_codigo = m.tit_codigo 
			LEFT JOIN	especial AS es 		ON m.esp_codigo = es.esp_codigo
			INNER JOIN  empleado as e 		ON e.emp_codigo = m.usu_mapeo AND e.emp_email = m.med_email
				 WHERE  med_email  = '".addslashes($email)."'";

		//print_r($sql);die;
		$rs = $GLOBALS['dbSQL']->Query($sql);
				
		if ( $rs ) 
		{
			$result = $GLOBALS['dbSQL']->getAll();

			if( count($result)>0 )
			{
				$cod		= $result[0]['COD'];
				$name		= trim($result[0]['NOMBRE']);
				$email		= $result[0]['EMAIL'];
				$sexo		= '';
				$telefono	= trim($result[0]['TEL']);
				$alerta		= trim($result[0]['COMW']);
				$fnac		= $result[0]['FNAC'];
				$cesp		= $result[0]['ESP'];
				$tit		= $result[0]['TIT'];
				
				return $result;
			}
		}
		
		return false; 
	}
	
	function getValidarProfSMIExiste($cod)
	{
		//print_r("c[$clave]m[".md5($clave)."]");die;
		$sql = "SELECT  1
				  FROM  medicos as m
				 WHERE  med_codigo = '".addslashes($cod)."'";
		
		//print_r($sql);die;

		$rs = $GLOBALS['dbSQL']->Query($sql);
				
		if ( $rs ) 
		{
			$result = $GLOBALS['dbSQL']->getAll();

			if(is_array($result) && count($result)>0 )
			{
				return true;
			}
		}
		
		return false; 
	}
	
	function savelogaccesoProfesional($loginInfo)
	{
		$sesion = date("dmYHis").str_pad($loginInfo["cod"],5,"0",$loginInfo["cod"],STR_PAD_LEFT);

		$sql = "INSERT INTO dbo.accesos
				   (
						 acc_fecha
						,usu_codigo
						,acc_insal
						,acc_pc
						,acc_ip
						,acc_sesion
						,acc_origen
				   )
				   VALUES
				   (
						 GETDATE()
						,".$loginInfo["cod"]."
						,'".$loginInfo["type"]."'
						,'-'
						,'".(isset($_SERVER['REMOTE_ADDR'])?$_SERVER['REMOTE_ADDR']:'')."'
						,".$sesion."
						,'P'
				   )";

		//print_r($sql);print_r("\n");die;
		$rs = $GLOBALS['dbSQL']->Query($sql,true);

		if ( $rs ) 
		{ 		
			return true;
		}

		return false;
		
	}

	function savelogaccsoCustomer($loginInfo)
	{
		//print_r($loginInfo);die;
		$sesion = date("dmYHis").str_pad($loginInfo["cod"],5,"0",$loginInfo["cod"],STR_PAD_LEFT);

		$sql = "INSERT INTO dbo.accesos
				   (
						 acc_fecha
						,usu_codigo
						,acc_insal
						,acc_pc
						,acc_ip
						,acc_sesion
						,acc_origen
				   )
				   VALUES
				   (
						 GETDATE()
						,".$loginInfo["cod"]."
						,'".$loginInfo["type"]."'
						,'-'
						,'".(isset($_SERVER['REMOTE_ADDR'])?$_SERVER['REMOTE_ADDR']:'')."'
						,".$sesion."
						,'C'
				   )";

		//print_r($sql);print_r("\n");die;
		$rs = $GLOBALS['dbSQL']->Query($sql,true);

		if ( $rs ) 
		{ 		
			return true;
		}

		return false;
		
	}
	
	function loginProfSMI(&$resultInfo)
	{
		$email = $_REQUEST["email"];
		$clave = $_REQUEST["clave"];

		$resultInfo['code'] = 0;
		
		/*if( is_numeric($dni) )
		{*/
			$name		= "";
			$codP		= -1;
			$nombre		= false;
			$sexo		= false;
			$telefono	= false;
			$alerta		= false;
			$fnac		= false;
			$cesp		= false;
			$tit		= false;
			$mat		= '';
			$dni		= '';

			$resultado = getValidarProfSMI($email,$clave,$mat,$codP,$nombre,$dni,$sexo,$telefono,$alerta,$fnac,$cesp,$tit);
			// print_r($resultado);die;

			if( $resultado )
			{
				$userInfo['dni']   	= $dni;
				$userInfo['mat']    = $mat;
				$userInfo['cod']    = $codP;
				$userInfo['name']	= $nombre;
				$userInfo['email']	= $email;
				$userInfo['sexo']	= $sexo;
				$userInfo['tel']	= $telefono;
				$userInfo['fnacd']	= date("d",strtotime($fnac));
				$userInfo['fnacm']	= date("m",strtotime($fnac));
				$userInfo['fnaca']	= date("Y",strtotime($fnac));
				$userInfo['cweb']	= $alerta;
				$userInfo['cesp']	= $cesp;
				$userInfo['tit']	= $tit;
				$userInfo['hoy']	= date("d/m/Y");
				
				//$turnos = getCountListProfTurnos($codP);
				$userInfo['turnos']	= 0;//$turnos;
				
				$userInfo['ld']		= false;//getIsProfesionalLDOnline($codP);
				
				$userInfo['ldpi']	= getProfesionalLDPicture($codP);
				
				$userInfo['token']	= getToken('p',$codP,$nombre,$email);

				$resultInfo['code'] = 0;
				$resultInfo['data'] = array("userinfo" => $userInfo );
				//print_r($resultInfo);die;
				
				//Save log acceso
				savelogaccesoProfesional(array("cod"=>$codP,"type"=>"I"));

				return true;
			}
			else
			{
				$resultInfo['code'] 	= 1;
				$resultInfo['errorDes'] = "Email y clave inválidos. No esta registrado.";
			}
		/*}
		else
		{
			$resultInfo['code'] = 2;
			$resultInfo['errorDes'] = "DNI inv&aacute;lido. No es numerico";
		}*/
		return false;
	}
	
	function logoutProfSMI(&$resultInfo)
	{
		if(	isset($_REQUEST["prof"]) 	&&
			!is_null($_REQUEST["prof"])	&&
			!empty($_REQUEST["prof"])
		)
		{
			$prof = $_REQUEST["prof"];
			
			$resultado = getValidarProfSMIExiste($_REQUEST["prof"]);

			if( $resultado )
			{
				//Save log acceso
				savelogaccesoProfesional(array("cod"=>$_REQUEST["prof"],"type"=>"S"));

				$resultInfo['code'] = 0;
				$resultInfo['data'] = 1;

				return true;
			}
			else
			{
				$resultInfo['code'] 	= 1;
				$resultInfo['errorDes'] = "Email y clave inválidos. No esta registrado.";
			}
		}
		return false;
	}
	
	/*
	function getStripePaymentToken(&$resultInfo)
	{
		try
		{
			$output = "";
			//print_r($_REQUEST);die;

			if( isset($_REQUEST["plan"])  		&&
				!empty($_REQUEST["plan"])  		&&
				!is_null($_REQUEST["plan"])		&&
				
				isset($_REQUEST["token"])  		&&
				!empty($_REQUEST["token"])  	&&
				!is_null($_REQUEST["token"])
			)
			{
				$continue = true;
				$userId    = validarTokenFast($resultInfo);

				if($userId&&is_numeric($userId))
				{
					$resultInfo = false;
					$resultado = getStripeToken($userId,$_REQUEST["plan"],$resultInfo);
				}
				else
				{
					$resultInfo['code'] = 1;
					$resultInfo['errorDes'] = "Se produjo un error al iniciar el proceso de pago";
				}	
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se encontraron campos obligatorios vacíos/faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"getStripePaymentToken","error"=>$e->__toString()));
			return false;
		}
	}
	*/

	function sendEmailRecoverLink($clienteId,&$resultInfo)
	{
		try
		{
			$clienteInfo = getClienteTmpCorreoVal($clienteId);
			//print_r($empleadoInfo);die;
			
			if( $clienteInfo )
			{
				//----------------------------------------------
				//Enviar email
				//----------------------------------------------
				//$clienteInfo = $clienteInfo[0]["cli_email"];
				//-----!!!!!!!-----
				$email=$clienteInfo[0]["cli_email"];//TEST!!!! COMENTAR EN PRODUCCION
				if($GLOBALS['SMI_TEST_MODE'])
				{
					$email="gustavojuarez@gmail.com";//TEST!!!! COMENTAR EN PRODUCCION
				}
				//-----!!!!!!!-----
				$paramsEmail = array();
				$paramsEmail["email"]   = $email;
				$paramsEmail["tokenRec"]= $clienteInfo[0]["cli_recover_token"];
				
				$paramsEmail["nombre"]  = encodeDataB64($clienteInfo[0]["cli_nombre"]);
				$paramsEmail["cusN"]    = encodeDataB64($clienteInfo[0]["cli_nombre"]);
				$paramsEmail["subject"] = "Recuperar Clave";
				$paramsEmail['customer']= "1576dd8687342d79d0906e1a12570907";//$GLOBALS['WS_WHATSAPP_CUSTOMER'];//SPIDER
				$paramsEmail['template']= 18; //OBTENER DE LA BASE
				$paramsEmail['tipo']	= 28; //VALIDACION DE CORREO SMI
				$paramsEmail['testmode']= ($GLOBALS['SMI_TEST_MODE']?1:0); //VALIDACION DE CORREO SMI
				
				//grabarLogErrorAfip($paramsEmail,"ENVIAR_EMAIL_FAC","_enviar_email_params");

				$paramsEmail["fromn"] = $GLOBALS['FROMN'];
				$paramsEmail["from"]  = $GLOBALS['FROM'];
				
				//print_r($paramsEmail);die("    <<<<<<<<<  ");
				$result = false;
				try
				{
					$res = callWebServiceSendEmail($paramsEmail,$result);
					
					if($res)
					{
						$resultInfo['code'] = 0;
						$resultInfo['data'] = array( "resultado" => $res );
					}
					else
					{
						$resultInfo['code'] 	= 2;
						$resultInfo['errorDes'] = "Se produjo un error al enviar las credenciales por email: [".$e->getMessage()."]";
					}
				}
				catch (Exception $e) 
				{
					$resultInfo['code'] 	= 2;
					$resultInfo['errorDes'] = "Se produjo un error al enviar las credenciales por email: [".$e->getMessage()."]";
				}
				
				//grabarLogErrorAfip(array("res"=>$res),"ENVIAR_EMAIL_CMP","_enviar_email_cmp_".($res?'ok':'error'));
				//return ($res?true:false);
				//----------------------------------------------
			}
			else
			{
				$resultInfo['code'] 	= 3;
				$resultInfo['errorDes'] = "Se produjo un error al limpiar la clave-1";
			}
			return true;


		}
		catch (Exception $e) 
		{
			$resultInfo['code'] 	= 2;
			$resultInfo['errorDes'] = "Se produjo un error al limpiar la clave y enviar por email: [".$e->getMessage()."]";
			
			return false;
		}
	}

	function getClienteTmpCorreoVal($clienteCod)
	{
		$sql = "SELECT *
				  FROM clientes
				 WHERE cli_codigo  = '".addslashes($clienteCod)."'";
		
		//print_r($sql);print_r("\n");//die;
		$rs = $GLOBALS['dbSQL']->Query($sql);

		if ( $rs ) 
		{ 		
			$rs = $GLOBALS['dbSQL']->getAll();
			if(is_array($rs)&&count($rs)===0){return true;}
			return $rs;
		}

		return false;
	}

	function sendEmailValidarCorreo($clienteId,&$resultInfo)
	{
		try
		{
			$clienteInfo = getClienteTmpCorreoVal($clienteId);
			//print_r($empleadoInfo);die;
			
			if( $clienteInfo )
			{
				//----------------------------------------------
				//Enviar email
				//----------------------------------------------
				//$clienteInfo = $clienteInfo[0]["cli_email"];
				//-----!!!!!!!-----
				$email=$clienteInfo[0]["cli_email"];//TEST!!!! COMENTAR EN PRODUCCION
				if($GLOBALS['SMI_TEST_MODE'])
				{
					$email="gustavojuarez@gmail.com";//TEST!!!! COMENTAR EN PRODUCCION
				}
				//-----!!!!!!!-----
				$paramsEmail = array();
				$paramsEmail["email"]   = $email;
				$paramsEmail["emaE"]    = $clienteInfo[0]["cli_clavetmp_email"];
				
				$paramsEmail["nombre"]  = encodeDataB64($clienteInfo[0]["cli_nombre"]);
				$paramsEmail["cusN"]    = encodeDataB64($clienteInfo[0]["cli_nombre"]);
				$paramsEmail["subject"] = "Validacion de Correo";
				$paramsEmail['customer']= "1576dd8687342d79d0906e1a12570907";//$GLOBALS['WS_WHATSAPP_CUSTOMER'];//SPIDER
				$paramsEmail['template']= 17; //OBTENER DE LA BASE
				$paramsEmail['tipo']	= 27; //VALIDACION DE CORREO SMI
				$paramsEmail['testmode']= ($GLOBALS['SMI_TEST_MODE']?1:0); //VALIDACION DE CORREO SMI
				
				//grabarLogErrorAfip($paramsEmail,"ENVIAR_EMAIL_FAC","_enviar_email_params");

				$paramsEmail["fromn"] = $GLOBALS['FROMN'];
				$paramsEmail["from"]  = $GLOBALS['FROM'];
				
				//print_r($paramsEmail);die("    <<<<<<<<<  ");
				$result = false;
				try
				{
					$res = callWebServiceSendEmail($paramsEmail,$result);
					
					if($res)
					{
						$resultInfo['code'] = 0;
						$resultInfo['data'] = array( "resultado" => $res );
					}
					else
					{
						$resultInfo['code'] 	= 2;
						$resultInfo['errorDes'] = "Se produjo un error al enviar las credenciales por email: [".$e->getMessage()."]";
					}
				}
				catch (Exception $e) 
				{
					$resultInfo['code'] 	= 2;
					$resultInfo['errorDes'] = "Se produjo un error al enviar las credenciales por email: [".$e->getMessage()."]";
				}
				
				//grabarLogErrorAfip(array("res"=>$res),"ENVIAR_EMAIL_CMP","_enviar_email_cmp_".($res?'ok':'error'));
				//return ($res?true:false);
				//----------------------------------------------
			}
			else
			{
				$resultInfo['code'] 	= 3;
				$resultInfo['errorDes'] = "Se produjo un error al limpiar la clave-1";
			}
			return true;


		}
		catch (Exception $e) 
		{
			$resultInfo['code'] 	= 2;
			$resultInfo['errorDes'] = "Se produjo un error al limpiar la clave y enviar por email: [".$e->getMessage()."]";
			
			return false;
		}
	}
	
	function sendEmailValidarCorreoVendedor($clienteId,$clave,&$resultInfo)
	{
		try
		{
			$clienteInfo = getClienteTmpCorreoVal($clienteId);
			//print_r($empleadoInfo);die;
			
			if( $clienteInfo )
			{
				//----------------------------------------------
				//Enviar email
				//----------------------------------------------
				//$clienteInfo = $clienteInfo[0]["cli_email"];
				//-----!!!!!!!-----
				$email=$clienteInfo[0]["cli_email"];//TEST!!!! COMENTAR EN PRODUCCION
				if($GLOBALS['SMI_TEST_MODE'])
				{
					$email="gustavojuarez@gmail.com";//TEST!!!! COMENTAR EN PRODUCCION
				}
				//-----!!!!!!!-----
				$paramsEmail = array();
				$paramsEmail["email"]   = $email;
				$paramsEmail["emaE"]    = $clienteInfo[0]["cli_email"];
				
				$paramsEmail["nombre"]  = encodeDataB64($clienteInfo[0]["cli_nombre"]);
				$paramsEmail["cusN"]    = encodeDataB64($clienteInfo[0]["cli_nombre"]);
				$paramsEmail["cusCK"]   = encodeDataB64($clave);
				$paramsEmail["subject"] = "Validacion de Correo";
				$paramsEmail['customer']= "1576dd8687342d79d0906e1a12570907";//$GLOBALS['WS_WHATSAPP_CUSTOMER'];//SPIDER
				$paramsEmail['template']= 24; //OBTENER DE LA BASE
				$paramsEmail['tipo']	= 33; //VALIDACION DE CORREO SMI
				$paramsEmail["url"]   = $GLOBALS['SMI_URL']["prod"]["validateemail"];
				if(isset($params['testmode'])&&intval($params['testmode'])===1)
				{
					$paramsEmail["url"]   = $GLOBALS['SMI_URL']["test"]["validateemail"];
				}
				
				//grabarLogErrorAfip($paramsEmail,"ENVIAR_EMAIL_FAC","_enviar_email_params");

				$paramsEmail["fromn"] = $GLOBALS['FROMN'];
				$paramsEmail["from"]  = $GLOBALS['FROM'];
				
				//print_r($paramsEmail);die("    <<<<<<<<<  ");
				$result = false;
				try
				{
					$res = callWebServiceSendEmail($paramsEmail,$result);
					
					if($res)
					{
						$resultInfo['code'] = 0;
						$resultInfo['data'] = array( "resultado" => $res );
					}
					else
					{
						$resultInfo['code'] 	= 2;
						$resultInfo['errorDes'] = "Se produjo un error al enviar las credenciales por email: [".$e->getMessage()."]";
					}
				}
				catch (Exception $e) 
				{
					$resultInfo['code'] 	= 2;
					$resultInfo['errorDes'] = "Se produjo un error al enviar las credenciales por email: [".$e->getMessage()."]";
				}
				
				//grabarLogErrorAfip(array("res"=>$res),"ENVIAR_EMAIL_CMP","_enviar_email_cmp_".($res?'ok':'error'));
				//return ($res?true:false);
				//----------------------------------------------
			}
			else
			{
				$resultInfo['code'] 	= 3;
				$resultInfo['errorDes'] = "Se produjo un error al limpiar la clave-1";
			}
			return true;


		}
		catch (Exception $e) 
		{
			$resultInfo['code'] 	= 2;
			$resultInfo['errorDes'] = "Se produjo un error al limpiar la clave y enviar por email: [".$e->getMessage()."]";
			
			return false;
		}
	}
	
	function enviarEmailValidacionCorreoCliente(&$resultInfo)
	{
		try
		{
			if( 
				isset($_REQUEST["ccod"])  	&&
				!empty($_REQUEST["ccod"])  	&&
				!is_null($_REQUEST["ccod"]) 	&&
				is_numeric($_REQUEST["ccod"])
			)
			{
				$resultado = sendEmailValidarCorreo($_REQUEST["ccod"],$resultInfo);

				if( $resultado )
				{
					//Retornar exito del envio de credenciales
					$resultInfo['code'] = 0;
					$resultInfo['data'] = 1;
				}
			}
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			return false;
		}
	}

	function saveStripResponseClientePrueba(&$resultInfo)
	{
		try
		{
			//print_r($_REQUEST);die;
			if( 
				isset($_REQUEST["clicod"])  	&&
				!empty($_REQUEST["clicod"])  	&&
				!is_null($_REQUEST["clicod"]) 	&&
				 is_numeric($_REQUEST["clicod"])&&
				
				isset($_REQUEST["token"])  		&&
				!empty($_REQUEST["token"])  	&&
				!is_null($_REQUEST["token"])
			)
			{
				//print_r($_REQUEST);die;
				$continue = true;
				$userId    = validarTokenFast($resultInfo);

				if($userId&&is_numeric($userId))
				{
					$resultInfo = false;
					$resultado = saveCustomerPaymentTestUser($userId,$_REQUEST["clicod"],$resultInfo);
				}
				else
				{
					$resultInfo['code'] = 1;
					$resultInfo['errorDes'] = "Acceso no autorizado";
				}
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se encontraron campos obligatorios vacíos/faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			return false;
		}
	}

	function saveCustomerPaymentTestUser($user_id,$cli_codigo,&$resultInfo)
	{
		try
		{
			$continue = true;
			$flagTransactionInit = false;
			
			$striptoken=randomText(15);
			$trannro = randomNumberText(5);//$GLOBALS['SMI_TEST_MODE'];//getTransactionNro();
			//print_r("trannro[$trannro]");die;
			
			if( setConeccionTransaccion() )
			{
				$flagTransactionInit = true;
				$GLOBALS['dbSQLTR']->setBeginTransaction();
				
				$exito = $GLOBALS['STRIPE_RESPONSE_FLAG_OK'];

				//REGISTRAR PAGO FICTICIO
				$sql = "INSERT INTO dbo.cli_stripe_payments 
									(
										 cli_codigo
										,clispay_token
										,clispay_inicio
										,clispay_respuesta
										,clispay_response
										,clispay_success
										,clispay_importe
										,obs_codigo
										,obsplan
										,clispay_payment_intent
										,clispay_nro
									)
							VALUES (
										 ".$cli_codigo."
										,'".$striptoken."'
										,GETDATE()
										,GETDATE()
										,'PAGO USUARIO DE PRUEBA'
										,".$exito."
										,1
										,".$GLOBALS['SMI_OBS']."
										,".$GLOBALS['SMI_OBS_PLAN_TEST']."
										,1
										,".randomNumberText(5)."
									)";

				//print_r($sql);print_r("\n");//die;
				$resultado = $GLOBALS['dbSQLTR']->QueryTR($sql,true);
				if ( !$resultado ) 
				{
					//print_r($sql);print_r("\n");//die;
					$res = $GLOBALS['dbSQLTR']->setRollbackTransaction();
					$continue = false;
					$resultInfo['code'] 	= -1;
					$resultInfo['errorDes'] = "Error al actualizar la respuesta del pago";
				}
				
				//MARCAR EL FLAG DE PLAN DEL CLIENTE COMO PAGADO SI FUE EXITOSO
				// Y ASOCIAR LA OBS Y PLAN AL CLIENTE
				if( $continue )
				{
					$sql = "  UPDATE   dbo.clientes
								 SET   cli_val_plan = 0
									  ,obs_codigo  = ".$GLOBALS['SMI_OBS']."
									  ,obsp_cod	   = ".$GLOBALS['SMI_OBS_PLAN_TEST']."
							   WHERE  cli_codigo   = ".$cli_codigo;
						   
					$resultado = $GLOBALS['dbSQLTR']->QueryTR($sql,true);
					if ( !$resultado ) 
					{
						//print_r($sql);print_r("\n");//die;
						$res = $GLOBALS['dbSQLTR']->setRollbackTransaction();	
						$continue = false;
						$resultInfo['code'] 	= -1;
						$resultInfo['errorDes'] = "Error al actualizar el estado de plan del cliente";
					}
				}
				
				if( $continue )
				{
					//ASIGNAR UN VENDEDOR AL CLIENTE
					$sql = "  DELETE FROM dbo.vendedor_clientes
									WHERE cli_codigo   = '".addslashes($cli_codigo)."'
									  AND vencl_codigo = ".$user_id;
										

					$resultado = $GLOBALS['dbSQLTR']->QueryTR($sql,true);
					if ( !$resultado ) 
					{
						//print_r($sql);print_r("\n");//die;
						$res = $GLOBALS['dbSQLTR']->setRollbackTransaction();	
						$continue = false;
						$resultInfo['code'] 	= -1;
						$resultInfo['errorDes'] = "Error al eliminar el vendedor de prueba al cliente";
					}
					
					if( $continue )
					{
						$sql = "  INSERT INTO dbo.vendedor_clientes
											(	
												 cli_codigo
												,vencl_codigo
												
											)
											VALUES
											(
												 ".$cli_codigo."
												,".$user_id."
											)";

						$resultado = $GLOBALS['dbSQLTR']->QueryTR($sql,true);
						if ( !$resultado ) 
						{
							//print_r($sql);print_r("\n");//die;
							$res = $GLOBALS['dbSQLTR']->setRollbackTransaction();	
							$continue = false;
							$resultInfo['code'] 	= -1;
							$resultInfo['errorDes'] = "Error al asociar el vendedor de prueba al cliente";
						}
					}
				}

				if( $continue  )
				{
					$res = $GLOBALS['dbSQLTR']->setCommitTransaction();
					$resultInfo['code'] = 0;
					$resultInfo['data'] = array("tranro"=>$trannro);
					return true;
				}

				$resultInfo['code'] 	= 2;
				$resultInfo['errorDes'] = "Error al grabar la respueta del pago - [Codigo 1002]";
				return false;
			}
			else
			{
				$resultInfo['code'] 	= 1;
				$resultInfo['errorDes'] = "Error al grabar la respueta del pago - [Codigo 1001]";
			}

			return false;
		}
		catch (Exception $e)
		{
			if( $flagTransactionInit )
			{
				$GLOBALS['dbSQLTR']->setRollbackTransaction();
			}
			
			$resultInfo['code'] 	= CODE_RESULT_ERROR_FATAL;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			
			//saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"createStripeToken","error"=>$e->__toString()));
			return false;
		}
	}


	function loginCustomerSMI(&$resultInfo)
	{
		if( isset($_REQUEST["email"])  		&&
			!empty($_REQUEST["email"])  	&&
			!is_null($_REQUEST["email"])	&&
			
			isset($_REQUEST["clave"])  		&&
			!empty($_REQUEST["clave"])  	&&
			!is_null($_REQUEST["clave"])
		)
		{
			$email = $_REQUEST["email"];
			$clave = $_REQUEST["clave"];

			$userinfo = getCustomerInfoByLogin($email,$clave);
			//print_r($userinfo);die("---------------------<<<<<<<<");
			if($userinfo && is_array($userinfo) && count($userinfo)>0)
			{
				//TODO: ENVIAR EMAIL DE ALERTA DE ACCESO
				//-->$resultInfoCorreo=false;
				//-->$res = sendEmailValidarCorreo($idCliente,$resultInfoCorreo);

				//Save log acceso
				savelogaccsoCustomer(array("cod"=>$userinfo[0]["cod"],"type"=>"I"));

				$resultInfo['code'] = 0;
				$resultInfo['data'] = array(
					"userinfo" => $userinfo
				);
			}
			else
			{
				$resultInfo['code'] 	= 1;
				$resultInfo['errorDes'] = "Email y clave inválidos.";
			}
		}
		else
		{die("11111112222222222");
			$resultInfo['code'] 	= 1;
			$resultInfo['errorDes'] = "Email y clave inválidos";
		}
	}
	
	function logoutCustSMI(&$resultInfo)
	{
		if( isset($_REQUEST["token"])  		&&
			!empty($_REQUEST["token"])  	&&
			!is_null($_REQUEST["token"])
		)
		{
			$continue = true;
			$userId    = validarTokenFast($resultInfo);

			if($userId&&is_numeric($userId))
			{
				savelogaccsoCustomer(array("cod"=>$userId,"type"=>"S"));
				
				$resultInfo['code'] = 0;
				$resultInfo['data'] = 1;
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se produjo un error al grabar la declaracion jurada";
			}	
		}
		else
		{
			$resultInfo['code'] = 1;
			$resultInfo['errorDes'] = "Se encontraron campos obligatorios vacíos/faltantes";
		}
		
		return true;
	}

	function loadCustomerSMI(&$resultInfo)
	{
		try
		{
			$output = "";

			if( isset($_REQUEST["token"])  		&&
				!empty($_REQUEST["token"])  	&&
				!is_null($_REQUEST["token"])
			)
			{
				$continue = true;
				$userId    = validarTokenFast($resultInfo);

				if($userId&&is_numeric($userId))
				{
					$userinfo = getCustomerInfo($userId);
			
					if($userinfo && is_array($userinfo) && count($userinfo)>0)
					{
						$resultInfo['code'] = 0;
						$resultInfo['data'] = array(
							"userinfo" => $userinfo
						);
					}
					else
					{
						$resultInfo['code'] 	= 1;
						$resultInfo['errorDes'] = "Email y clave inválidos.";
					}
				}
				else
				{
					$resultInfo['code'] = 1;
					$resultInfo['errorDes'] = "Se produjo un error al iniciar el proceso de pago";
				}	
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se encontraron campos obligatorios vacíos/faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"getStripePaymentToken","error"=>$e->__toString()));
			return false;
		}
	}

	function getListaEmpleadosProfesionales()
	{
		//,FORMAT(e.emp_alta,'dd/MM/yyyy') as falta
		$params = false;
		
		$flagMedico = false;
		if(  isset($_REQUEST["pro_d"])&&intval($_REQUEST["pro_d"])!==(-1) && isset($_REQUEST["pro_h"])&&intval($_REQUEST["pro_h"])!==(-1))
		{
			$flagMedico = true;
		}
		
		$flagFilDEA = false;
		if(  isset($_REQUEST["dea"])&&intval($_REQUEST["dea"])!==(-1))
		{
			$flagFilDEA = true;
		}
		$flagFilDEP = false;
		if(  isset($_REQUEST["dep"])&&intval($_REQUEST["dep"])!==(-1))
		{
			$flagFilDEP = true;
		}
		$flagFilAGA = false;
		if(  isset($_REQUEST["aga"])&&intval($_REQUEST["aga"])!==(-1))
		{
			$flagFilAGA = true;
		}
		$flagFilAGP = false;
		if(  isset($_REQUEST["agp"])&&intval($_REQUEST["agp"])!==(-1))
		{
			$flagFilAGP = true;
		}
		$flagFilDER = false;
		if(  isset($_REQUEST["der"])&&intval($_REQUEST["der"])!==(-1))
		{
			$flagFilDER = true;
		}
		
		if($flagMedico||$flagFilDEA||$flagFilDEP||$flagFilAGA||$flagFilAGP||$flagFilDER)
		{
			$params = "";
		}
		
		if($flagMedico)			
		{ 
			$params = ($params==""?" ":" AND ") . "  ( m.med_codigo BETWEEN '".$_REQUEST["pro_d"]."' AND '".$_REQUEST["pro_h"]."')"; 
		}
		
		if($flagFilDEA){$params.= ($params==""?" ":" AND ") . "  ( m.med_flag_da = 1)";}
		if($flagFilDEP){$params.= ($params==""?" ":" AND ") . "  ( m.med_flag_dp = 1)";}
		if($flagFilAGA){$params.= ($params==""?" ":" AND ") . "  ( m.med_flag_aa = 1)";}
		if($flagFilAGP){$params.= ($params==""?" ":" AND ") . "  ( m.med_flag_ap = 1)";}
		if($flagFilDER){$params.= ($params==""?" ":" AND ") . "  ( m.med_flag_der= 1)";}

		if($params)
		{
			$where = " WHERE  ".$params;
		}
		
		$sql = "SELECT	 m.med_codigo  as cod
						,m.med_nombre  as nombre
						,e.emp_codigo  as codem
						,e.emp_nombre  as emnombre
						,e.emp_login   as usuario
						,FORMAT(m.med_fecnto,'dd/MM/yyyy') as fnto
						,FORMAT(e.emp_alta,'dd/MM/yyyy') as falta
						,m.med_email as email
						,e.emp_email as ememail
						,m.med_tel as tel
						,esp.esp_denom as esp
						,0 as itemselected
						,0 as rem
						,0 as erst
						,(CASE WHEN e.emp_codigo IS NULL THEN 0 ELSE 1 END) as femp
						,med_flag_aa 	as flag_aa 
						,med_flag_ap	as flag_ap 
						,med_flag_da 	as flag_da 
						,med_flag_dp	as flag_dp
						,med_flag_der	as flag_der
						,med_bloqueado  AS activo
						,m.esp_codigo 
			      FROM  medicos as m
			 LEFT JOIN  empleado as e ON e.emp_codigo = m.usu_mapeo
			 LEFT JOIN  especial as esp ON esp.esp_codigo = m.esp_codigo
						".$where."
			  ORDER BY  m.med_nombre";
		
		//print_r($sql);die;
		$rs = $GLOBALS['dbSQL']->Query($sql);

		if ( $rs ) 
		{ 		
			$profesionales = $GLOBALS['dbSQL']->getAll();
			
			if( is_array($profesionales)&&count($profesionales)>0 )
			{
				for($i=0,$t=count($profesionales);$i<$t;$i++)
				{
					//Especialidades
					$esp = array();
					$x = array_push($esp,array(
						 "cod"	=> $profesionales[$i]["esp_codigo"]
						,"denom"=> $profesionales[$i]["esp"]
					));

					$esplst = getProfesionalEspecialidades($profesionales[$i]["cod"]);
					if($esplst==EMPTY_LST)
					{
						$profesionales[$i]["esplst"] = $esp;	
					}
					else
					{
						$profesionales[$i]["esplst"] = array_merge($esp,$esplst);
						// print_r($esp);print_r("\n");
						// print_r($esplst);print_r("\n");
						// print_r($profesionales[$i]["esplst"]);die;
					}
					
					//Grilla
					$grilla = getProfesionalSMIGrilla($profesionales[$i]["cod"]);
					if($esplst==EMPTY_LST)
					{
						$profesionales[$i]["gri"] = $esp;	
					}
					else
					{
						$profesionales[$i]["gri"] = $grilla;
						
					}
					
				}
				//print_r($profesionales);die;
				return $profesionales;
			}

			return EMPTY_LST;
		}

		return false;
	}
	
	function getProfesionalEspecialidades($codProf=false)
	{
		
		$where = false;
		if($codProf)
		{
			$where = "med_codigo = ". $codProf;
		}
		elseif(isset($_REQUEST["key"]))
		{
			$where = "med_codigo = '".addslashes($_REQUEST["key"])."'";
		}
		
		if($where)
		{
			//,FORMAT(e.emp_alta,'dd/MM/yyyy') as falta
			// select * from med_especialidades
			$sql = "SELECT	 m.esp_codigo  as cod
							,e.esp_denom as denom
					  FROM  med_especialidades as m
				INNER JOIN  especial as e ON e.esp_codigo = m.esp_codigo
					 WHERE  ".$where."
				  ORDER BY  e.esp_denom";
			
			//if($codProf==77){print_r($sql);die;}
			$rs = $GLOBALS['dbSQL']->Query($sql);

			if ( $rs ) 
			{ 		
				$rs = $GLOBALS['dbSQL']->getAll();
				
				if( is_array($rs)&&count($rs)>0 )
				{
					return $rs;
				}
			}
		}

		return EMPTY_LST;
	}

	function getProfesionalSMIGrilla($codProf=false)
	{
		// med_codigo	mh_dia	mh_desde1	mh_hasta1	mh_desde2	mh_hasta2	mh_int1	mh_int2
		// 596			2		900			2000		0			0			15		0
		// 596			3		900			2000		0			0			15		0
		// 596			4		900			2000		0			0			15		0
		// 596			5		900			2000		0			0			15		0
		// 596			6		900			2000		0			0			15		0
		// 596			7		900			2000		0			0			15		0
		
		$where = false;
		if($codProf)
		{
			$where = "med_codigo = ". $codProf;
		}
		elseif(isset($_REQUEST["key"]))
		{
			$where = "med_codigo = '".addslashes($_REQUEST["key"])."'";
		}
		
		if( $where )
		{
			$sql = "SELECT  med_codigo
							,(CASE WHEN mh_dia = 1 THEN 'DOMINGO'
							  WHEN mh_dia = 2 THEN 'LUNES'
							  WHEN mh_dia = 3 THEN 'MARTES'
							  WHEN mh_dia = 4 THEN 'MIERCOLES'
							  WHEN mh_dia = 5 THEN 'JUEVES'
							  WHEN mh_dia = 6 THEN 'VIERNES'
							  ELSE 'SABADO'END) as dia
						    ,(CASE WHEN mh_desde1 <> 0 THEN mh_desde1 ELSE -1 END) AS mh_desde1
						    ,mh_hasta1
						    ,(CASE WHEN mh_desde2 <> 0 THEN mh_desde2 ELSE -1 END) AS mh_desde2 
						    ,mh_hasta2
						    ,mh_int1
						    ,mh_int2
					 FROM  dbo.medhora
				    WHERE  ".$where."
			     ORDER BY  mh_dia ASC, mh_desde1 ASC, mh_desde2 ASC";
			
			//if($codProf==77){print_r($sql);die;}
			$rs = $GLOBALS['dbSQL']->Query($sql);

			if ( $rs ) 
			{ 		
				$grilla = $GLOBALS['dbSQL']->getAll();
				
				if( is_array($grilla)&&count($grilla)>0 )
				{
					for($i=0,$t=count($grilla);$i<$t;$i++)
					{
						//$diaSemana = $grilla[$i]["mh_dia"];
						$hDesde_m  = $grilla[$i]["mh_desde1"];
						$hHasta_m  = $grilla[$i]["mh_hasta1"];
						$hDesde_t  = $grilla[$i]["mh_desde2"];
						$hHasta_t  = $grilla[$i]["mh_hasta2"];
						$int_m 	   = $grilla[$i]["mh_int1"];
						$int_t 	   = $grilla[$i]["mh_int2"];
						
						
						//Parseo los horarios
						if($hDesde_m<0)
						{
							$hDesde_m = '';
							$hHasta_m = '';
							$int_m    = '';
						}
						else
						{
							if(strlen($hDesde_m)<4) { $hDesde_m = '0'.substr($hDesde_m,0,1).':'.substr($hDesde_m,1,2); }
							else					{ $hDesde_m = substr($hDesde_m,0,2).':'.substr($hDesde_m,2,2); }
							
							if(strlen($hHasta_m)<4) { $hHasta_m = '0'.substr($hHasta_m,0,1).':'.substr($hHasta_m,1,2); }
							else					{ $hHasta_m = substr($hHasta_m,0,2).':'.substr($hHasta_m,2,2); }
						}

						$grilla[$i]["mh_desde1"] = $hDesde_m;
						$grilla[$i]["mh_hasta1"] = $hHasta_m;
						$grilla[$i]["mh_int1"]   = $int_m;
						
						if($hDesde_t<0)
						{
							$hDesde_t = '';
							$hHasta_t = '';
							$int_t    = '';
						}
						else
						{
							if(strlen($hDesde_t)<4) { $hDesde_t = '0'.substr($hDesde_t,0,1).':'.substr($hDesde_t,1,2); }
							else					{ $hDesde_t = substr($hDesde_t,0,2).':'.substr($hDesde_t,2,2); }
							
							if(strlen($hHasta_t)<4) { $hHasta_t = '0'.substr($hHasta_t,0,1).':'.substr($hHasta_t,1,2); }
							else					{ $hHasta_t = substr($hHasta_t,0,2).':'.substr($hHasta_t,2,2); }
						}

						$grilla[$i]["mh_desde2"] = $hDesde_t;
						$grilla[$i]["mh_hasta2"] = $hHasta_t;
						$grilla[$i]["mh_int2"]   = $int_t;
						
					}
					return $grilla;
				}
			}
		}

		return EMPTY_LST;
	}

	function getTurnoInfo($idTurno,&$error=false)
	{
		try
		{
			$sql = "SELECT   CONVERT(VARCHAR(10),t.tur_fecha,120) AS fecha_alta
							,cl.cli_nombre as clinombre
							,cl.cli_email as email
							,cl.cli_tel_cod_area as areatel
							,cl.cli_tel_numero as tel
							,cl.cli_dni as dni
							,t.med_codigo as medcod
					  FROM  turnos AS t
				INNER JOIN  clientes as cl ON cl.cli_codigo = t.cli_codigo
					 WHERE  t.tur_numero = ".$idTurno;
			
			$rs = $GLOBALS['dbSQL']->Query($sql);

			if ( !$rs ) 
			{
				$error=array("cod"=>1,"d"=>"Error al buscar informacion del turno");
				return array(false,false);
			}

			$res = $GLOBALS['dbSQL']->getAll();
			//print_r($rs);die;

			$tunoInfo = array
			(
				 "name"			=> getNombreCliente($res[0]['clinombre'],false)
				,"surname"		=> getNombreCliente($res[0]['clinombre'],true)
				,"email"		=> $res[0]['email']
				,"date_created"	=> date("Y-m-dTH:i:s.000-04:00",strtotime($res[0]['fecha_alta'].' 00:00:00'))
				,"area_code"	=> $res[0]['areatel']
				,"tel"			=> $res[0]['tel']
				,"number"		=> $res[0]['dni']
				,"trid"			=> $idTurno
			);

			return $tunoInfo;
		}
		catch ( Exception $e )
		{
			//Error: al ejecutar el metodo
			//print_r($e->__toString());die;
			$error=array("cod"=>2,"f"=>"getTurnoInfo","d"=>$e->__toString());
			return false;
		}
	}
	
	function getCantidadAtencionesPaciente($idPaciente,&$error=false)
	{
		try
		{
			//SOLO TURNOS DE TELEMEDICINA 
			$sql = "SELECT  COUNT(*)
					  FROM  turnos AS t
				INNER JOIN  clientes as cl ON cl.cli_codigo = t.cli_codigo
					 WHERE  t.cli_codigo = ".$idTurno."
					   AND  tur_telemed  = 1
					   AND  tur_asiste   = 1
					   AND  tur_atendido = 1
					   AND  (CASE WHEN tur_telemed_sesion IS NULL THEN 0 ELSE 1 END) = 1
					   AND  ISNULL(tur_telemed_confirmado,0) = 1
					   AND  ISNULL(tur_telemed_estado,0)     = 0";
			
			$rs = $GLOBALS['dbSQL']->Query($sql);

			if ( !$rs ) 
			{
				$error=array("cod"=>1,"d"=>"Error al buscar informacion del turno");
				return array(false,false);
			}

			$res = $GLOBALS['dbSQL']->getAll();
			//print_r($rs);die;

			$tunoInfo = array
			(
				 "name"			=> getNombreCliente($res[0]['clinombre'],false)
				,"surname"		=> getNombreCliente($res[0]['clinombre'],true)
				,"email"		=> $res[0]['email']
				,"date_created"	=> date("Y-m-dTH:i:s.000-04:00",strtotime($res[0]['fecha_alta'].' 00:00:00'))
				,"area_code"	=> $res[0]['areatel']
				,"tel"			=> $res[0]['tel']
				,"number"		=> $res[0]['dni']
				,"trid"			=> $idTurno
			);

			return $tunoInfo;
		}
		catch ( Exception $e )
		{
			//Error: al ejecutar el metodo
			//print_r($e->__toString());die;
			$error=array("cod"=>2,"f"=>"getTurnoInfo","d"=>$e->__toString());
			return false;
		}
	}
	
	function getListProfTurnosTelemedicina()
	{
		//LISTAR TURNOS DE TELEMEDICINA DEL PROFESIONAL
		if(  isset($_REQUEST["idpro"])  	&&
			!empty($_REQUEST["idpro"])  	&&
			!is_null($_REQUEST["idpro"]) 	&&
			is_numeric($_REQUEST["idpro"])
		)
		{
			$error=false;
			//$turnoInfo 	 = getTurnoInfo($_REQUEST["idtur"],$error);

			/*if($turnoInfo)
			{*/
				$profesional = $_REQUEST["idpro"];//$turnoInfo["medcod"];
				
				$flagAtendidos = false;
				if(  isset($_REQUEST["fat"])  	&&
					!empty($_REQUEST["fat"])  	&&
					!is_null($_REQUEST["fat"]) 	&&
					is_numeric($_REQUEST["fat"])
				)
				{
					$flagAtendidos = true;
				}
				
				$rango = false;
				
				if(  isset($_REQUEST["rfd"])      &&
					 !empty($_REQUEST["rfd"])     &&
					 !is_null($_REQUEST["rfd"])   &&
					 
					 isset($_REQUEST["rfh"])      &&
					 !empty($_REQUEST["rfh"])     &&
					 !is_null($_REQUEST["rfh"])
				)
				{
					$rango = array();
					$rango[0] = str_replace(".","-",$_REQUEST["rfd"]);
					$rango[1] = str_replace(".","-",$_REQUEST["rfh"]);
					
					if( strtotime($rango[0])===false  || 
						strtotime($rango[1])===false)
					{
						$rango = false;
					}
				}
				
				$fecha = date("Y-m-d");
			
				if(  isset($_REQUEST["fecha"])  	&&
					!empty($_REQUEST["fecha"])  	&&
					!is_null($_REQUEST["fecha"])
				)
				{
					$fecha = $_REQUEST["fecha"];
				}

				if( $rango )
				{
					$desde = date("Y-m-d",strtotime($rango[0]));
					$hasta = date("Y-m-d",strtotime($rango[1]));

					$rs['fecha']  = $desde . ' - ' . $hasta;
					//$periodo = " AND ( t.tur_fecha BETWEEN '". $desde ."' AND '". $hasta ."' )";
					$periodo = " AND ( LEFT(CONVERT(VARCHAR,t.tur_fecha, 120), 10) BETWEEN LEFT(CONVERT(VARCHAR,'".$desde."', 120), 10) AND LEFT(CONVERT(VARCHAR,'".$hasta."', 120), 10) )";
				}
				else
				{
					$rs['fecha'] = $fecha;
					//$periodo = " AND ( t.tur_fecha BETWEEN '". $fecha ."' AND '". $fecha ."' )";
					$periodo = " AND ( LEFT(CONVERT(VARCHAR,t.tur_fecha, 120), 10) BETWEEN LEFT(CONVERT(VARCHAR,'".$fecha."', 120), 10) AND LEFT(CONVERT(VARCHAR,'".$fecha."', 120), 10) )";
				}

				if(!$flagAtendidos)
				{
					//AND  tt.tur_asiste   = 1
					
					$sql = "SELECT    e.esp_denom AS Esp
									, m.med_nombre AS Med
									, CONVERT(VARCHAR(10),t.tur_fecha,103) AS Fec
									, o.obs_denom AS Obs
									, op.obsp_denom AS Plan_
									, t.tur_hora AS Hor
									, t.tur_numero AS CodT
									, t.med_codigo AS idMed
									, tt.tit_abrev AS Tit
									, t.cli_codigo As ID_PACIENTE
									, c.cli_nombre AS PACIENTE
									, dbo.GetAge(c.cli_fecnto) AS edad
									, c.cli_tel AS telefono
									, c.cli_email AS email
									, t.tur_atendido AS atendido
									, t.tur_asiste AS asistio
									, t.tur_visado AS espera
									, t.tur_asiste_hora AS horallegada
									,(CASE WHEN t.tur_telemed IS NULL THEN 0 ELSE ((CASE WHEN t.tur_telemed = 0 THEN 0 ELSE 1 END)) END) AS Telemed
									,tur_confirmado as tcnf
									,(CASE WHEN t.tur_telemed_motivo IS NULL THEN (CASE WHEN tur_comen IS NULL THEN '-' ELSE tur_comen END) ELSE t.tur_telemed_motivo end) as motivo
									,datediff(minute, t.tur_telemed_fechasolicita, GETDATE()) AS minitosespera
									,FORMAT(t.tur_telemed_fechasolicita, 'yyyy-MM-dd HH:mm:ss') AS fsol
									,FORMAT(t.tur_telemed_fechasolicita, 'MM/dd/yyyy HH:mm:ss') AS fsolt
									,ISNULL((SELECT  COUNT(*)
											   FROM  turnos AS tt
											  WHERE  tt.cli_codigo = t.cli_codigo
												AND  tt.tur_telemed  = 1
												AND  (CASE WHEN tt.tur_telemed_sesion IS NULL THEN 0 ELSE 1 END) = 1
												AND  ISNULL(tt.tur_telemed_confirmado,0) = 1
												AND  ISNULL(tt.tur_telemed_estado,0)     = 0
									),0) as atenciones
							  FROM  turnos AS t
						INNER JOIN  medicos AS m	ON t.med_codigo = m.med_codigo
						INNER JOIN  especial AS e	ON m.esp_codigo = e.esp_codigo
						INNER JOIN  tbl_titulos tt	ON tt.tit_codigo = m.tit_codigo
						INNER JOIN  clientes AS c	ON t.cli_codigo = c.cli_codigo
						INNER JOIN 	obrasoc AS o	ON t.obs_codigo = o.obs_codigo
						INNER JOIN  obsplan As op	ON t.obs_codigo = op.obs_codigo AND t.obsp_cod = op.obsp_cod
							 WHERE  t.med_codigo  = ".$profesional."
									".$periodo."
							   AND  t.cli_codigo  <> 1
							   AND  t.tur_telemed = 1
							   AND  tur_asiste    = 0
							   AND  tur_atendido  = 0
							   AND  (CASE WHEN tur_telemed_sesion IS NULL THEN 0 ELSE 1 END) = 1
							   AND  ISNULL(tur_telemed_confirmado,0) = 0
							   AND  ISNULL(tur_telemed_estado,0)     = 0
						  ORDER BY  t.tur_registracion";
				}
				else
				{
					//AND  tt.tur_asiste   = 1
					
					$sql = "SELECT    e.esp_denom AS Esp
								, m.med_nombre AS Med
								, CONVERT(VARCHAR(10),t.tur_fecha,103) AS Fec
								, o.obs_denom AS Obs
								, op.obsp_denom AS Plan_
								, t.tur_hora AS Hor
								, t.tur_numero AS CodT
								, t.med_codigo AS idMed
								, tt.tit_abrev AS Tit
								, t.cli_codigo As ID_PACIENTE
								, c.cli_nombre AS PACIENTE
								, dbo.GetAge(c.cli_fecnto) AS edad
								, c.cli_tel AS telefono
								, c.cli_email AS email
								, t.tur_atendido AS atendido
								, t.tur_asiste AS asistio
								, t.tur_visado AS espera
								, t.tur_asiste_hora AS horallegada
								,(CASE WHEN t.tur_telemed IS NULL THEN 0 ELSE ((CASE WHEN t.tur_telemed = 0 THEN 0 ELSE 1 END)) END) AS Telemed
								,tur_confirmado as tcnf
								,(CASE WHEN t.tur_telemed_motivo IS NULL THEN (CASE WHEN tur_comen IS NULL THEN '-' ELSE tur_comen END) ELSE t.tur_telemed_motivo end) as motivo
								,datediff(minute, t.tur_telemed_fechasolicita, GETDATE()) AS minitosespera
								,FORMAT(t.tur_telemed_fechasolicita, 'yyyy-MM-dd HH:mm:ss') AS fsol
								,FORMAT(t.tur_telemed_fechasolicita, 'MM/dd/yyyy HH:mm:ss') AS fsolt
								,ISNULL((SELECT  COUNT(*)
										   FROM  turnos AS tt
										  WHERE  tt.cli_codigo = t.cli_codigo
										    AND  tt.tur_telemed  = 1
										    
										    AND  (CASE WHEN tt.tur_telemed_sesion IS NULL THEN 0 ELSE 1 END) = 1
										    AND  ISNULL(tt.tur_telemed_confirmado,0) = 1
										    AND  ISNULL(tt.tur_telemed_estado,0)     = 0
								),0) as atenciones
								,FORMAT(t.tur_telemed_fechaatencioninicia, 'dd/MM/yyyy HH:mm:ss') AS fini
								,DATEDIFF(minute,tur_telemed_fechaatencioninicia, tur_telemed_fechaatencionfin) as durmin
								,ISNULL(tur_telemed_fderiva,0) as fder
						  FROM  turnos AS t
					INNER JOIN  medicos AS m	ON t.med_codigo = m.med_codigo
					INNER JOIN  especial AS e	ON m.esp_codigo = e.esp_codigo
					INNER JOIN  tbl_titulos tt	ON tt.tit_codigo = m.tit_codigo
					INNER JOIN  clientes AS c	ON t.cli_codigo = c.cli_codigo
					INNER JOIN 	obrasoc AS o	ON t.obs_codigo = o.obs_codigo
					INNER JOIN  obsplan As op	ON t.obs_codigo = op.obs_codigo AND t.obsp_cod = op.obsp_cod
						 WHERE  t.med_codigo  = ".$profesional."
								".$periodo."
						   AND  t.cli_codigo  <> 1
						   AND  t.tur_telemed = 1
						   AND  t.tur_atendido= 1
						   AND  (CASE WHEN tur_telemed_sesion IS NULL THEN 0 ELSE 1 END) = 1
						   AND  ISNULL(tur_telemed_confirmado,0) = 1
					  ORDER BY  t.tur_registracion";
				}
				//ORDER BY  t.tur_fecha, t.tur_hora";

				//print_r($sql);die;
				$resultado = $GLOBALS['dbSQL']->Query($sql);
				//print_r($rs);die;
				if ( !$resultado ) 
				{
					return false; 
				}

				$resultado = $GLOBALS['dbSQL']->getAll();

				$rs['total'] = 0;
				
				$rs['fecha'] = date("d/m/Y", strtotime($rs['fecha']));

				if( count($resultado) > 0 )
				{
					$rs['turnos'] = $resultado;
					$rs['total']  = count($resultado);
				}
			//}

			return $rs;
		}
		else
		{
			return false;
		}
	}
	
	function getLstTurnosTelemedicina(&$resultInfo)
	{
		$resultado = getListProfTurnosTelemedicina();
		
		if( $resultado )
		{
			//Listar turnos pendientes del profesional
			$resultInfo['code'] = 0;
			$resultInfo['data'] = array(  "total"   	=> $resultado['total']
										 ,"listTurnos" 	=> (isset($resultado['turnos'])?$resultado['turnos']:'')
										 ,"fecha" 		=> $resultado['fecha']
			);
		}
		else
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Se produjo un error al consultar los turnos";
		}
	}

	function getListProfAccesos()
	{
		$accesos = array();
		
		//LISTAR ACCCESOS DEL PROFESIONAL
		if(  isset($_REQUEST["idpro"])  	&&
			!empty($_REQUEST["idpro"])  	&&
			!is_null($_REQUEST["idpro"]) 	&&
			is_numeric($_REQUEST["idpro"])
		)
		{
			$error=false;

			$profesional = $_REQUEST["idpro"];
			
			$lastNRows = 50;
			if(  isset($_REQUEST["nrows"])  	&&
				!empty($_REQUEST["nrows"])  	&&
				!is_null($_REQUEST["nrows"]) 	&&
				is_numeric($_REQUEST["nrows"])
			)
			{
				$lastNRows = $_REQUEST["nrows"];
			}
			
			//**************
			$periodo = '';
				
			if(  isset($_REQUEST["rfd"])      &&
				 !empty($_REQUEST["rfd"])     &&
				 !is_null($_REQUEST["rfd"])   &&
				 
				 isset($_REQUEST["rfh"])      &&
				 !empty($_REQUEST["rfh"])     &&
				 !is_null($_REQUEST["rfh"])
			)
			{
				$rango = array();
				$rango[0] = str_replace(".","-",$_REQUEST["rfd"]);
				$rango[1] = str_replace(".","-",$_REQUEST["rfh"]);
				
				if( !	(strtotime($rango[0])===false  || strtotime($rango[1])===false))
				{
					$desde = date("Y-m-d",strtotime($rango[0]));
					$hasta = date("Y-m-d",strtotime($rango[1]));

					$rs['fecha']  = $desde . ' - ' . $hasta;
					$periodo = " AND ( LEFT(CONVERT(VARCHAR,acc_fecha, 120), 10) BETWEEN LEFT(CONVERT(VARCHAR,'".$desde."', 120), 10) AND LEFT(CONVERT(VARCHAR,'".$hasta."', 120), 10) )";
				}
			}

			//**************
			//WHERE  usu_codigo  = (SELECT usu_mapeo FROM medicos WHERE med_codigo = '".addslashes($profesional)."')
			$sql = "SELECT TOP ".$lastNRows."  
							FORMAT(acc_fecha, 'dd/MM/yyyy HH:mm:ss') AS f
							,acc_insal AS t
					  FROM  dbo.accesos
					 WHERE  usu_codigo  = '".addslashes($profesional)."'
					   AND  acc_origen <> 'C'
					        ".$periodo."
				  ORDER BY  acc_fecha DESC";
			
			//ORDER BY  t.tur_fecha, t.tur_hora";

			//print_r($sql);die;
			$resultado = $GLOBALS['dbSQL']->Query($sql);
			//print_r($rs);die;
			if ( $resultado ) 
			{
				$accesos = $GLOBALS['dbSQL']->getAll();

				if( is_array($accesos)&&count($accesos) > 0 )
				{
					return $accesos;
				}
			}
		}

		return $accesos;
	}
	
	function getLastNProfAccess(&$resultInfo)
	{
		$resultado = getListProfAccesos();
		
		if( $resultado )
		{
			//Listar turnos pendientes del profesional
			$resultInfo['code'] = 0;
			$resultInfo['data'] = array(  "total"   	=> (is_array($resultado)&&count($resultado)?count($resultado):0)
										 ,"listAccesos" => (is_array($resultado)&&count($resultado)?$resultado:array())
			);
		}
		else
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Se produjo un error al consultar los turnos";
		}
	}
	
	//function enviarEmailComprobante(&$resultInfo)
	function enviarEmailContactoRecibido(&$resultInfo)
	{
		try
		{
			if( 
				isset($_REQUEST["nm"])  	&&
				!empty($_REQUEST["nm"])  	&&
				!is_null($_REQUEST["nm"]) 	&&
				
				isset($_REQUEST["em"])  	&&
				!empty($_REQUEST["em"])  	&&
				!is_null($_REQUEST["em"]) 	&&
				
				isset($_REQUEST["mens"])  	&&
				!empty($_REQUEST["mens"])  	&&
				!is_null($_REQUEST["mens"])
			)
			{
				//Validar email
				$email = base64_decode($_REQUEST["em"]);
				if( ValidarEmail($email) )
				{
					$params = array(
						 "email" => $email
						,"cusN"  => $_REQUEST['nm']
						,"cusE"  => $_REQUEST['em']
						,"cusM"  => $_REQUEST['mens']
						,"nombre"=> $_REQUEST['nm']
					);
					$resultado = sendEmailContacto($params,$resultInfo);

					if( $resultado )
					{
						//Retornar nro de presupuesto creado
						$resultInfo['code'] = 0;
						$resultInfo['data'] = 1;
					}
				}
				else
				{
					$resultInfo['code'] = 2;
					$resultInfo['errorDes'] = "Paciente no registrado";
				}
			}
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			return false;
		}
	}

	function sendEmailContacto($params,&$resultInfo)
	{
		$params = array(
			 "email" => $email
			,"cusN"  => $_REQUEST['nm']
			,"cusE"  => $_REQUEST['em']
			,"cusM"  => $_REQUEST['mens']
			,"nombre" => $_REQUEST['nm']
		);
		
		
		$_REQUEST["rid"] = $_REQUEST["rec"];
		$_REQUEST["pid"] = $_REQUEST["pr"];

		//$result = getReciboInfo($resultInfo,$_REQUEST["rec"],$_REQUEST["pr"]);
		//print_r($resultInfo);die("    <<<<<<<<<  ");

		if( $result )
		{
			$continue = true;

			$email = $params["email"];
			//-----!!!!!!!-----
			$email=EMAIL_CONSULTAS;
			//-----!!!!!!!-----
			$paramsEmail = array();
			$paramsEmail["email"]  = $email;

			$paramsEmail["cusN"] = $params["cusN"];
			$paramsEmail["cusE"] = $params["cusE"];
			$paramsEmail["cusM"] = $params["cusM"];
			$paramsEmail["nombre"]= $params["nombre"]; //encodeDataB64($resultInfo["data"]["cliente"][0]["cli_nombre"]);
			$paramsEmail["subject"] = "CONTACTO RECIBIDO";
			$paramsEmail['customer']= '1576dd8687342d79d0906e1a12570907';//$GLOBALS['WS_WHATSAPP_CUSTOMER'];;
			$paramsEmail['template']= 15; //OBTENER DE LA BASE
			$paramsEmail['tipo']	= 25; //CAMBIAR A CONSTANTE
			
			grabarLogErrorAfip($paramsEmail,"ENVIAR_EMAIL_CONTACTO","_enviar_email_params");

			//print_r($paramsEmail);die("    <<<<<<<<<  ");
			$result = false;
			$res = callWebServiceSendEmail($paramsEmail,$result);
			
			//grabarLogErrorAfip(array("res"=>$res),"ENVIAR_EMAIL_CMP","_enviar_email_cmp_".($res?'ok':'error'));
			return ($res?true:false);
		}
		else
		{
			$resultInfoEm["errorDes"] = "Error en la aplicaci&oacute;n";
		}

		return false;
	}

	function getProfTmpPassw($empId)
	{
		$sql = "SELECT *
				  FROM empleado
				 WHERE emp_codigo  = '".addslashes($empId)."'";
		
		//print_r($sql);print_r("\n");//die;
		$rs = $GLOBALS['dbSQL']->Query($sql);

		if ( $rs ) 
		{ 		
			$rs = $GLOBALS['dbSQL']->getAll();
			if(is_array($rs)&&count($rs)===0){return true;}
			return $rs;
		}

		return false;
	}
	
	function sendEmailCredencialesProf($empleadoId,&$resultInfo)
	{
		try
		{
			//$resultado = updateClientePasswPanel($_REQUEST["sed"],$_REQUEST["cod"],$_REQUEST["clave"]);
			$empleadoInfo = getProfTmpPassw($empleadoId);
			//print_r($empleadoInfo);die;
			
			if( $empleadoInfo )
			{
				//----------------------------------------------
				//Enviar email
				//----------------------------------------------
				$clienteInfo = $empleadoInfo[0]["emp_email"];
				//-----!!!!!!!-----
				$email=$empleadoInfo[0]["emp_email"];//TEST!!!! COMENTAR EN PRODUCCION
				if($GLOBALS['SMI_TEST_MODE'])
				{
					$email="gustavojuarez@gmail.com";//TEST!!!! COMENTAR EN PRODUCCION
				}
				//-----!!!!!!!-----
				$paramsEmail = array();
				$paramsEmail["email"]   = $email;
				$paramsEmail["cusE"]    = $email;
				$paramsEmail["passT"]   = $empleadoInfo[0]["tmpp"];
				
				$paramsEmail["nombre"]  = encodeDataB64($empleadoInfo[0]["emp_nombre"]);
				$paramsEmail["cusN"]    = encodeDataB64($empleadoInfo[0]["emp_nombre"]);
				$paramsEmail["subject"] = "Credenciales de Acceso";
				$paramsEmail['customer']= "1576dd8687342d79d0906e1a12570907";//$GLOBALS['WS_WHATSAPP_CUSTOMER'];//SPIDER
				$paramsEmail['template']= 16; //OBTENER DE LA BASE
				$paramsEmail['tipo']	= 26; //CREDENCIALES ACCESO SMI
				$paramsEmail['testmode']= ($GLOBALS['SMI_TEST_MODE']?1:0); //VALIDACION DE CORREO SMI
				
				//grabarLogErrorAfip($paramsEmail,"ENVIAR_EMAIL_FAC","_enviar_email_params");

				$paramsEmail["fromn"] = $GLOBALS['FROMN'];
				$paramsEmail["from"]  = $GLOBALS['FROM'];
				
				//print_r($paramsEmail);die("    <<<<<<<<<  ");
				$result = false;
				try
				{
					$res = callWebServiceSendEmail($paramsEmail,$result);
					
					if($res)
					{
						$resultInfo['code'] = 0;
						$resultInfo['data'] = array( "resultado" => $res );
					}
					else
					{
						$resultInfo['code'] 	= 2;
						$resultInfo['errorDes'] = "Se produjo un error al enviar las credenciales por email: [".$e->getMessage()."]";
					}
				}
				catch (Exception $e) 
				{
					$resultInfo['code'] 	= 2;
					$resultInfo['errorDes'] = "Se produjo un error al enviar las credenciales por email: [".$e->getMessage()."]";
				}
				
				//grabarLogErrorAfip(array("res"=>$res),"ENVIAR_EMAIL_CMP","_enviar_email_cmp_".($res?'ok':'error'));
				//return ($res?true:false);
				//----------------------------------------------
			}
			else
			{
				$resultInfo['code'] 	= 3;
				$resultInfo['errorDes'] = "Se produjo un error al limpiar la clave-1";
			}
			return true;


		}
		catch (Exception $e) 
		{
			$resultInfo['code'] 	= 2;
			$resultInfo['errorDes'] = "Se produjo un error al limpiar la clave y enviar por email: [".$e->getMessage()."]";
			
			return false;
		}
	}

	function enviarEmailCredencialesProfesionales(&$resultInfo)
	{
		try
		{
			if( 
				isset($_REQUEST["pcod"])  	&&
				!empty($_REQUEST["pcod"])  	&&
				!is_null($_REQUEST["pcod"]) 	&&
				is_numeric($_REQUEST["pcod"])
			)
			{
				$presupuesto=false;
				$resultado = sendEmailCredencialesProf($_REQUEST["pcod"],$resultInfo);

				if( $resultado )
				{
					//Retornar exito del envio de credenciales
					$resultInfo['code'] = 0;
					$resultInfo['data'] = 1;
				}
			}
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			return false;
		}
	}

	function getListadoProfesionales()
	{
		$sql = "SELECT  med_codigo
					   ,med_nombre
					   ,med_email
					   ,tmpp
				  FROM medicos as m
			INNER JOIN empleado as  em ON em.emp_codigo= m.usu_mapeo
				 WHERE med_bloqueado  = 0";
		
		//print_r($sql);print_r("\n");//die;
		$rs = $GLOBALS['dbSQL']->Query($sql);

		if ( $rs ) 
		{ 		
			$rs = $GLOBALS['dbSQL']->getAll();
			if(is_array($rs)&&count($rs)===0){return true;}
			return $rs;
		}

		return false;
	}
	
	function sendEmailCredencialesProfMasivo(&$resultInfo)
	{
		try
		{
			$listadoMedicos = getListadoProfesionales();
			
			if(is_array($listadoMedicos)&&count($listadoMedicos)>0)
			{
				$counter=5;
				for($i=0;$i<count($listadoMedicos);$i++)
				{
				
					$empleadoInfo = $listadoMedicos[$i];
					//print_r($empleadoInfo);die;
					
					if( $empleadoInfo )
					{
						$counter--;
						//----------------------------------------------
						//Enviar email
						//----------------------------------------------
						$clienteInfo = $empleadoInfo["med_email"];
						//-----!!!!!!!-----
						$email=$empleadoInfo["med_email"];//TEST!!!! COMENTAR EN PRODUCCION
						if($GLOBALS['SMI_TEST_MODE'])
						{
							$email="gustavojuarez@gmail.com";//TEST!!!! COMENTAR EN PRODUCCION
						}
						//-----!!!!!!!-----
						$paramsEmail = array();
						$paramsEmail["email"]   = $email;
						$paramsEmail["cusE"]    = $email;
						$paramsEmail["passT"]   = $empleadoInfo["tmpp"];
						
						$paramsEmail["nombre"]  = encodeDataB64($empleadoInfo["med_nombre"]);
						$paramsEmail["cusN"]    = encodeDataB64($empleadoInfo["med_nombre"]);
						$paramsEmail["subject"] = "Credenciales de Acceso";
						$paramsEmail['customer']= "1576dd8687342d79d0906e1a12570907";//$GLOBALS['WS_WHATSAPP_CUSTOMER'];//SPIDER
						$paramsEmail['template']= 16; //OBTENER DE LA BASE
						$paramsEmail['tipo']	= 26; //CREDENCIALES ACCESO SMI
						$paramsEmail['testmode']= ($GLOBALS['SMI_TEST_MODE']?1:0); //VALIDACION DE CORREO SMI
						
						//grabarLogErrorAfip($paramsEmail,"ENVIAR_EMAIL_FAC","_enviar_email_params");

						$paramsEmail["fromn"] = $GLOBALS['FROMN'];
						$paramsEmail["from"]  = $GLOBALS['FROM'];
						
						//print_r($paramsEmail);die("    <<<<<<<<<  ");
						$result = false;
						try
						{
							$res = callWebServiceSendEmail($paramsEmail,$result);
							
							if($res)
							{
								$resultInfo['code'] = 0;
								$resultInfo['data'] = array( "resultado" => $res );
							}
							else
							{
								$resultInfo['code'] 	= 2;
								$resultInfo['errorDes'] = "Se produjo un error al enviar las credenciales por email: [".$e->getMessage()."]";
							}
						}
						catch (Exception $e) 
						{
							$resultInfo['code'] 	= 2;
							$resultInfo['errorDes'] = "Se produjo un error al enviar las credenciales por email: [".$e->getMessage()."]";
						}
						
						//grabarLogErrorAfip(array("res"=>$res),"ENVIAR_EMAIL_CMP","_enviar_email_cmp_".($res?'ok':'error'));
						//return ($res?true:false);
						//----------------------------------------------
					}
					else
					{
						$resultInfo['code'] 	= 3;
						$resultInfo['errorDes'] = "Se produjo un error al limpiar la clave-1";
					}
				}
			}
			else
			{
				$resultInfo['code'] 	= 3;
				$resultInfo['errorDes'] = "Listado de Profesionales Vacío";
			}
			
			return true;


		}
		catch (Exception $e) 
		{
			$resultInfo['code'] 	= 2;
			$resultInfo['errorDes'] = "Se produjo un error al limpiar la clave y enviar por email: [".$e->getMessage()."]";
			
			return false;
		}
	}
	
	function enviarEmailCredencialesProfesionalesMasivo(&$resultInfo)
	{
		try
		{
			if( 
				isset($_REQUEST["cseg"])  	&&
				!empty($_REQUEST["cseg"])  	&&
				!is_null($_REQUEST["cseg"])
			)
			{
				if($_REQUEST["cseg"]=="Gino2023")
				{
					$resultado = sendEmailCredencialesProfMasivo($resultInfo);

					if( $resultado )
					{
						//Retornar exito del envio de credenciales
						$resultInfo['code'] = 0;
						$resultInfo['data'] = 1;
					}
				}
				else
				{
					$resultInfo['code'] = 1;
					$resultInfo['errorDes'] = "Acceso no permitido";
				}
			}
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			return false;
		}
	}

	//CLIENTES
	function getClientePagos($clicodigo)
	{
		$sql = "SELECT	 c.cli_codigo AS cod
						,c.clispay_success as success
						,c.clispay_importe as imp
						,c.obs_codigo as obscod
						,c.obsplan as plcod
						,ISNULL(c.clispay_success,0) as res
						,FORMAT(c.clispay_inicio,'dd/MM/yyyy') as fini
						,clispay_inicio 
						,(CASE WHEN c.clispay_respuesta IS NOT NULL THEN FORMAT(c.clispay_respuesta,'dd/MM/yyyy') ELSE '' END) as ffin
						,obp.obsp_denom AS plan_
			      FROM  cli_stripe_payments as c
			 LEFT JOIN  obrasoc as ob ON ob.obs_codigo = c.obs_codigo
			 LEFT JOIN  obsplan as obp ON obp.obs_codigo = c.obs_codigo AND obp.obsp_cod = c.obsplan
			     WHERE  cli_codigo = ".$clicodigo."
			  ORDER BY  c.clispay_inicio DESC";
		
		//print_r($sql);die;
		$rs = $GLOBALS['dbSQL']->Query($sql);

		if ( $rs ) 
		{ 		
			$clientes = $GLOBALS['dbSQL']->getAll();
			
			if( is_array($clientes)&&count($clientes)>0 )
			{
				return $clientes;
			}
		}
		
		return EMPTY_LST;
	}
	
	function getcustomerPayments(&$resultInfo)
	{
		try
		{
			if( isset($_REQUEST["cli"])  		&&
				!empty($_REQUEST["cli"])  	&&
				!is_null($_REQUEST["cli"])
			)
			{
				$resultado = getClientePagos($_REQUEST["cli"]);
				
				if( $resultado )
				{
					//Listar turnos pendientes del profesional
					$resultInfo['code'] = 0;
					$resultInfo['data'] = array(  "total"   	 => (is_array($resultado)&&count($resultado)?count($resultado):0)
												 ,"listPayments" => (is_array($resultado)&&count($resultado)?$resultado:array())
					);
				}
				else
				{
					$resultInfo['code'] 	= 0;
					$resultInfo['errorDes'] = "Se produjo un error al consultar los turnos";
				}
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se produjo un error al solicitar la atencion";
			}

			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			//saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"getStripePaymentToken","error"=>$e->__toString()));
			return false;
		}
	}
	
	function getClienteAtenciones($clicodigo)
	{
		//".$periodo."
		
		$sql = "SELECT    RTRIM(LTRIM(e.esp_denom)) AS Esp
						, RTRIM(LTRIM(m.med_nombre)) AS Med
						, CONVERT(VARCHAR(10),t.tur_fecha,103) AS Fec
						, t.tur_hora AS Hor
						, t.tur_numero AS CodT
						, t.med_codigo AS idMed
						, tt.tit_abrev AS Tit
						, t.cli_codigo As ID_PACIENTE
						, RTRIM(LTRIM(c.cli_nombre)) AS PACIENTE
						, RTRIM(LTRIM(o.obs_denom)) AS Obs
						, RTRIM(LTRIM(op.obsp_denom)) AS Plan_
						, dbo.GetAge(c.cli_fecnto) AS edad
						, c.cli_tel AS telefono
						, c.cli_email AS email
						, t.tur_atendido AS atendido
						, t.tur_asiste AS asistio
						, t.tur_visado AS espera
						, t.tur_asiste_hora AS horallegada
						,(CASE WHEN t.tur_telemed IS NULL THEN 0 ELSE ((CASE WHEN t.tur_telemed = 0 THEN 0 ELSE 1 END)) END) AS Telemed
						,tur_confirmado as tcnf
				  FROM   turnos AS t
						, medicos AS m
						, especial AS e
						, tbl_titulos tt
						, clientes AS c
						, obrasoc AS o
						, obsplan As op
			     WHERE  t.cli_codigo = ".$clicodigo."
				   AND  t.cli_codigo = c.cli_codigo
				   AND	t.med_codigo = m.med_codigo
				   AND  m.esp_codigo = e.esp_codigo
				   AND  tt.tit_codigo = m.tit_codigo
				   AND  t.obs_codigo = o.obs_codigo
				   AND  t.obs_codigo = op.obs_codigo
				   AND  t.obsp_cod = op.obsp_cod
				   AND  t.cli_codigo <> 1
				   AND  t.tur_asiste = 1
				   ORDER BY t.tur_fecha DESC, t.tur_hora DESC";
		
		//print_r($sql);die;
		$rs = $GLOBALS['dbSQL']->Query($sql);

		if ( $rs ) 
		{ 		
			$atenciones = $GLOBALS['dbSQL']->getAll();
			
			if( is_array($atenciones)&&count($atenciones)>0 )
			{
				return $atenciones;
			}
		}
		
		return EMPTY_LST;
	}
	
	function getcustomerDates(&$resultInfo)
	{
		try
		{
			if( isset($_REQUEST["token"])  		&&
				!empty($_REQUEST["token"])  	&&
				!is_null($_REQUEST["token"])
			)
			{
				$continue = true;
				$userId    = validarTokenFast($resultInfo);

				if($userId&&is_numeric($userId))
				{
					
					$resultado = getClienteAtenciones($_REQUEST["cli"]);
					$resultInfo['code'] = 0;
					$resultInfo['data'] = array(  "total"   	 => (is_array($resultado)&&count($resultado)?count($resultado):0)
												 ,"listDates" => (is_array($resultado)&&count($resultado)?$resultado:array())
					);
				}
				else
				{
					$resultInfo['code'] = 1;
					$resultInfo['errorDes'] = "Se produjo un error al listar las atenciones del cliente";
				}	
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se encontraron campos obligatorios vacíos/faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			//saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"getStripePaymentToken","error"=>$e->__toString()));
			return false;
		}
	}
	
	function sendCustomerCuponAmigo(&$resultInfo)
	{
		try
		{
			if( isset($_REQUEST["token"])  		&&
				!empty($_REQUEST["token"])  	&&
				!is_null($_REQUEST["token"])
			)
			{
				$continue = true;
				$userId    = validarTokenFast($resultInfo);

				if($userId&&is_numeric($userId))
				{
					
					$resultado = sendCuponAmigo($_REQUEST["email"]);
					$resultInfo['code'] = 0;
					$resultInfo['data'] = 1;
				}
				else
				{
					$resultInfo['code'] = 1;
					$resultInfo['errorDes'] = "Se produjo un error al listar las atenciones del cliente";
				}	
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se encontraron campos obligatorios vacíos/faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			//saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"getStripePaymentToken","error"=>$e->__toString()));
			return false;
		}
	}
	
	function getListCustomerAccesos()
	{
		$accesos = array();
		
		//LISTAR ACCCESOS DEL PROFESIONAL
		if(  isset($_REQUEST["cli"])  	&&
			!empty($_REQUEST["cli"])  	&&
			!is_null($_REQUEST["cli"]) 	&&
			is_numeric($_REQUEST["cli"])
		)
		{
			$error=false;

			$cliente = $_REQUEST["cli"];
			
			$lastNRows = 50;
			if(  isset($_REQUEST["nrows"])  	&&
				!empty($_REQUEST["nrows"])  	&&
				!is_null($_REQUEST["nrows"]) 	&&
				is_numeric($_REQUEST["nrows"])
			)
			{
				$lastNRows = $_REQUEST["nrows"];
			}
			
			//WHERE  usu_codigo  = (SELECT usu_mapeo FROM medicos WHERE med_codigo = '".addslashes($profesional)."')
			$sql = "SELECT TOP ".$lastNRows."  
							FORMAT(acc_fecha, 'dd/MM/yyyy HH:mm:ss') AS f
							,acc_insal AS t
					  FROM  dbo.accesos
					 WHERE  usu_codigo  = '".addslashes($cliente)."'
					   AND  acc_origen  = 'C'
				  ORDER BY  acc_fecha DESC";
			
			//ORDER BY  t.tur_fecha, t.tur_hora";

			//print_r($sql);die;
			$resultado = $GLOBALS['dbSQL']->Query($sql);
			//print_r($rs);die;
			if ( $resultado ) 
			{
				$accesos = $GLOBALS['dbSQL']->getAll();

				if( is_array($accesos)&&count($accesos) > 0 )
				{
					return $accesos;
				}
			}
		}

		return $accesos;
	}
	
	function getLastNCustAccess(&$resultInfo)
	{
		$resultado = getListCustomerAccesos();
		
		if( $resultado )
		{
			//Listar turnos pendientes del profesional
			$resultInfo['code'] = 0;
			$resultInfo['data'] = array(  "total"   	=> (is_array($resultado)&&count($resultado)?count($resultado):0)
										 ,"listAccesos" => (is_array($resultado)&&count($resultado)?$resultado:array())
			);
		}
		else
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Se produjo un error al consultar los turnos";
		}
	}

	function getListaClientesSMI()
	{
		//,FORMAT(e.emp_alta,'dd/MM/yyyy') as falta
		$params = false;
		
		$flagCliente = false;
		if(  isset($_REQUEST["cl_d"])&&intval($_REQUEST["cl_d"])!==(-1) && isset($_REQUEST["cl_h"])&&intval($_REQUEST["cl_h"])!==(-1))
		{
			$flagCliente = true;
		}
		
		$flagNombre = false;
		if(  isset($_REQUEST["cnam"])&&intval($_REQUEST["cnam"])!==(-1))
		{
			$flagNombre = true;
		}
		
		$flagEmail = false;
		if(  isset($_REQUEST["cema"])&&intval($_REQUEST["cema"])!==(-1))
		{
			$flagEmail = true;
		}
		
		
		if($flagCliente||$flagNombre||$flagEmail)
		{
			$params = "";
		}
		
		if($flagCliente){$params = ($params==""?" ":" AND ") . "  ( c.cli_codigo BETWEEN '".$_REQUEST["cl_d"]."' AND '".$_REQUEST["cl_h"]."')";}
		if($flagNombre) {$params.= ($params==""?" ":" AND ") . "  ( LOWER(LTRIM(RTRIM(c.cli_nombre))) LIKE '%".addslashes(strtolower(trim($_REQUEST["cnam"])))."%')";}
		if($flagEmail)  {$params.= ($params==""?" ":" AND ") . "  ( LOWER(LTRIM(RTRIM(c.cli_email))) LIKE '%".addslashes(strtolower(trim($_REQUEST["cema"])))."%')";}

		//, dbo.GetAge(c.cli_fecnto) AS edad
		
		//$resultado = getUserInfo( $_REQUEST["uid"] );
		$continue = true;
		$userId    = validarTokenFast($resultInfo);

		if($userId&&is_numeric($userId))
		{
			$userInfo = getUserInfo( $userId );
			//print_r($userInfo);die("11111");
			//if(intval($userInfo[0]["flSMIVen"])===1&&intval($userInfo[0]["flSMIDual"])===0)
			if(intval($userInfo["flSMIVen"])===1) //TODO: LIBERAR EN PROD !!!!!!TEST
			{
				//Vendedor Adminin
				// $params.= ($params==""?" ":" AND ") . "  
					// ( EXISTS
						// (
							// SELECT 1
							  // FROM vendedor_clientes AS vc
						// INNER JOIN empleado_vendedor AS ev ON ev.vencl_codigo = vc.ven_codigo
							 // WHERE vc.cli_codigo = c.cli_codigo
							   // AND ev.emp_codigo = '".addslashes($userId)."'
						// )
					// )";
					
				$params.= ($params==""?" ":" AND ") . "  
					( EXISTS
						(
							SELECT 1
							  FROM vendedor_clientes AS vc
							 WHERE vc.cli_codigo   = c.cli_codigo
							   AND vc.vencl_codigo = '".addslashes($userId)."'
						)
					)";
			}
			// $userInfo[0]["flSMI"] 	   = 0;
			// $userInfo[0]["flSMIVen"]    = 0;
			// $userInfo[0]["flSMIVenAd"]  = 0;
			// $userInfo[0]["flSMIDual"]   = intval($userInfo[0]["emp_dual"]);
		}

		$where = "";
		if($params)
		{
			$where = " WHERE  ".$params;
		}

		$sql = "SELECT TOP 100 c.cli_codigo  as cod
						,c.cli_nombre  as nombre
						,FORMAT(c.cli_fecnto,'dd/MM/yyyy') as fnto
						,FORMAT(c.cli_registracion,'dd/MM/yyyy') as falta
						, c.cli_tel AS tel
						, c.cli_email AS email
						,0 as itemselected
						,0 as rem
						,0 as erst
						,cli_bloqueado  AS bloquedo
						,obp.obsp_denom AS plan_
			      FROM  clientes as c
			 LEFT JOIN  obrasoc as ob ON ob.obs_codigo = c.obs_codigo
			 LEFT JOIN  obsplan as obp ON obp.obs_codigo = c.obs_codigo AND obp.obsp_cod = c.obsp_cod
						".$where."
			  ORDER BY  c.cli_nombre";
		
		//print_r($sql);die;
		$rs = $GLOBALS['dbSQL']->Query($sql);

		if ( $rs ) 
		{ 		
			$clientes = $GLOBALS['dbSQL']->getAll();
			
			if( is_array($clientes)&&count($clientes)>0 )
			{
				/*for($i=0,$t=count($clientes);$i<$t;$i++)
				{
					//Pagos
					$esp = array();

					$pagoslst = getClientePagos($clientes[$i]["cod"]);
					if($pagoslst==EMPTY_LST)
					{
						$clientes[$i]["pglst"] = array();	
					}
					else
					{
						$clientes[$i]["pglst"] = $pagoslst;
						// print_r($esp);print_r("\n");
						// print_r($esplst);print_r("\n");
						// print_r($profesionales[$i]["esplst"]);die;
					}
					
					//Atenciones
					$grilla = getProfesionalSMIGrilla($profesionales[$i]["cod"]);
					if($esplst==EMPTY_LST)
					{
						$profesionales[$i]["gri"] = $esp;	
					}
					else
					{
						$profesionales[$i]["gri"] = $grilla;
						
					}
					
				}*/
				//print_r($clientes);die;
				return $clientes;
			}

			return EMPTY_LST;
		}

		return false;
	}
	
	function getListaVendedoresSMI()
	{
		//,FORMAT(e.emp_alta,'dd/MM/yyyy') as falta
		$params = false;
		
		$flagCliente = false;
		if(  isset($_REQUEST["cl_d"])&&intval($_REQUEST["cl_d"])!==(-1) && isset($_REQUEST["cl_h"])&&intval($_REQUEST["cl_h"])!==(-1))
		{
			$flagCliente = true;
		}
		
		$flagNombre = false;
		if(  isset($_REQUEST["cnam"])&&intval($_REQUEST["cnam"])!==(-1))
		{
			$flagNombre = true;
		}
		
		$flagEmail = false;
		if(  isset($_REQUEST["cema"])&&intval($_REQUEST["cema"])!==(-1))
		{
			$flagEmail = true;
		}
		
		
		if($flagCliente||$flagNombre||$flagEmail)
		{
			$params = "";
		}
		
		if($flagCliente){$params = ($params==""?" ":" AND ") . "  ( v.ven_codigo BETWEEN '".$_REQUEST["cl_d"]."' AND '".(intval($_REQUEST["cl_h"])>9999?9999:$_REQUEST["cl_h"])."')";}
		if($flagNombre) {$params.= ($params==""?" ":" AND ") . "  ( LOWER(LTRIM(RTRIM(e.emp_nombre))) LIKE '%".addslashes(strtolower(trim($_REQUEST["cnam"])))."%')";}
		//if($flagEmail)  {$params.= ($params==""?" ":" AND ") . "  ( LOWER(LTRIM(RTRIM(c.cli_email))) LIKE '%".addslashes(strtolower(trim($_REQUEST["cema"])))."%')";}

		$where = "";
		if($params)
		{
			$where = " WHERE  ".$params;
		}
		
		//, dbo.GetAge(c.cli_fecnto) AS edad
		
		$sql = "SELECT   v.ven_codigo  as cod
						,e.emp_nombre  as nombre
						,FORMAT(v.ven_baja,'dd/MM/yyyy') as fbaja
						,FORMAT(v.ven_alta,'dd/MM/yyyy') as falta
						,e.emp_telefono AS tel
						,e.emp_email AS email
						,v.ven_telefono AS telv
						,v.ven_email AS emailv
						,0 as itemselected
						,0 as rem
						,0 as erst
						,v.ven_activo  AS bloquedo
			      FROM  vendedores as v
			INNER JOIN  empleado_vendedor as ev ON ev.ven_codigo = v.ven_codigo
			INNER JOIN  empleado as e ON e.emp_codigo = ev.emp_codigo
						".$where."
			  ORDER BY  e.emp_nombre";
		
		//print_r($sql);die;
		$rs = $GLOBALS['dbSQL']->Query($sql);

		if ( $rs ) 
		{ 		
			$clientes = $GLOBALS['dbSQL']->getAll();
			
			if( is_array($clientes)&&count($clientes)>0 )
			{
				/*for($i=0,$t=count($clientes);$i<$t;$i++)
				{
					//Pagos
					$esp = array();

					$pagoslst = getClientePagos($clientes[$i]["cod"]);
					if($pagoslst==EMPTY_LST)
					{
						$clientes[$i]["pglst"] = array();	
					}
					else
					{
						$clientes[$i]["pglst"] = $pagoslst;
						// print_r($esp);print_r("\n");
						// print_r($esplst);print_r("\n");
						// print_r($profesionales[$i]["esplst"]);die;
					}
					
					//Atenciones
					$grilla = getProfesionalSMIGrilla($profesionales[$i]["cod"]);
					if($esplst==EMPTY_LST)
					{
						$profesionales[$i]["gri"] = $esp;	
					}
					else
					{
						$profesionales[$i]["gri"] = $grilla;
						
					}
					
				}*/
				//print_r($clientes);die;
				return $clientes;
			}

			return EMPTY_LST;
		}

		return false;
	}

	//VIDEO
	function openSesionVideo($idTurno)
	{
		$sql = "UPDATE turnos 
				   SET tur_telemed_fechaatencioninicia = GETDATE()
			     WHERE tur_numero  = '".addslashes($idTurno)."'";
		//print_r($sql);print_r("\n");die;die("1111");
		$rs = $GLOBALS['dbSQL']->Query($sql,true);
				
		if ( !$rs ) 
		{
			return false; 
		}
		
		return true;
	}
	
	function getTurnoTMClienteEmail($idTurno)
	{
		$sql = "SELECT cli_nombre,
					   cli_email
				  FROM clientes as c
			INNER JOIN turnos as t ON c.cli_codigo = t.cli_codigo
			     WHERE tur_numero  = '".addslashes($idTurno)."'";
		//print_r($sql);print_r("\n");
		$rs = $GLOBALS['dbSQL']->Query($sql);
				
		if ( !$rs ) 
		{
			return false; 
		}
		
		$turInfo = $GLOBALS['dbSQL']->getAll();
		
		if(is_array($turInfo)&&count($turInfo)>0)
		{
			return $turInfo[0];
		}		
		
		return false;
	}
	
	function saveSesionVideoInfoVideo($idTurno,$sesion,$token)
	{
		$sql = "UPDATE turnos 
				   SET tur_telemed_sesionid = '".addslashes($sesion)."',
					   tur_telemed_token	= '".addslashes($token)."',
					   tur_telemed_status   = ".TURNO_TELEMEDICINA_INICIADO."
			     WHERE tur_numero  = '".addslashes($idTurno)."'";
		//print_r($sql);print_r("\n");
		$rs = $GLOBALS['dbSQL']->Query($sql,true);
				
		if ( !$rs ) 
		{
			return false; 
		}
		
		return true;
	}

	function createSessionVideo($sesionId,&$resultInfo)
	{
		//Actualizar el turno
		$resultado = openSesionVideo($sesionId);
		//die("--ok-0");
		if($resultado)
		{
			// sesion: 
			// "2_MX40NzcxMTk5MX5-MTY4Mzk4MDY2NjY5M35hUFdTVU4wV3ZLSVpzZE5QV21jSk51eHd-UH5-"
			// token 
			// "T1==cGFydG5lcl9pZD00NzcxMTk5MSZzaWc9ZDYxY2Q3NmJjMzJmZjQ4ZmNkNDEyZThmNjUwYWQ5ZDdkMDdlNTBjMjpzZXNzaW9uX2lkPTJfTVg0ME56Y3hNVGs1TVg1LU1UWTRNems0TURZMk5qWTVNMzVoVUZkVFZVNHdWM1pMU1ZwelpFNVFWMjFqU2s1MWVIZC1VSDUtJmNyZWF0ZV90aW1lPTE2ODM5ODA2NjYmcm9sZT1wdWJsaXNoZXImbm9uY2U9MTY4Mzk4MDY2Ni4wMzE1MTk5MzM0NDY1MiZpbml0aWFsX2xheW91dF9jbGFzc19saXN0PQ=="

			
			/*$resultInfo['code'] = 0;
			$resultInfo['data'] = array(
				 "sesion" => "2_MX40NzcxMTk5MX5-MTY4Mzk4MDY2NjY5M35hUFdTVU4wV3ZLSVpzZE5QV21jSk51eHd-UH5-"
				,"token"  => "T1==cGFydG5lcl9pZD00NzcxMTk5MSZzaWc9ZDYxY2Q3NmJjMzJmZjQ4ZmNkNDEyZThmNjUwYWQ5ZDdkMDdlNTBjMjpzZXNzaW9uX2lkPTJfTVg0ME56Y3hNVGs1TVg1LU1UWTRNems0TURZMk5qWTVNMzVoVUZkVFZVNHdWM1pMU1ZwelpFNVFWMjFqU2s1MWVIZC1VSDUtJmNyZWF0ZV90aW1lPTE2ODM5ODA2NjYmcm9sZT1wdWJsaXNoZXImbm9uY2U9MTY4Mzk4MDY2Ni4wMzE1MTk5MzM0NDY1MiZpbml0aWFsX2xheW91dF9jbGFzc19saXN0PQ=="
			);*/

			// $resultInfo['code'] = 0;
			// $resultInfo['data'] = array(
				 // "sesion" => "1_MX40NzcxMTk5MX5-MTY4NDU4NTk0MDIyMH5BTkkvaDgxeThudVRZWUJtTEUydXlnZjF-UH5-"
				// ,"token"  => "T1==cGFydG5lcl9pZD00NzcxMTk5MSZzaWc9ZjAzOTA5ZDE0OTIwOWNhOGM0MzU1MWZjMDFjOTAzYWY2NTNjMzhjMjpzZXNzaW9uX2lkPTFfTVg0ME56Y3hNVGs1TVg1LU1UWTRORFU0TlRrME1ESXlNSDVCVGtrdmFEZ3hlVGh1ZFZSWldVSnRURVV5ZFhsblpqRi1VSDUtJmNyZWF0ZV90aW1lPTE2ODQ1ODU5NDAmcm9sZT1wdWJsaXNoZXImbm9uY2U9MTY4NDU4NTk0MC44Njc1MTM0MDQ3ODYzOCZpbml0aWFsX2xheW91dF9jbGFzc19saXN0PQ=="
			// );
			
			// saveSesionVideoInfoVideo($sesionId,$resultInfo['data']["sesion"],$resultInfo['data']["token"]);
			
			// return true;
			
			// //-------------------------
			
			try
			{
				require_once('video.php');
				
				$video = new Video();
				
				if($video->ini)
				{
					//die("ok video");
					$sessionId = '';
					$sesion = $video->createSession($sessionId);
					//die("--ok-3");
					// print_r("sesion[$sesion]");
					// die("--ok-4");
					if($sesion)
					{//print_r("sesion[$sesion]");
						$token = $video->createSessionToken($sessionId);
						
						if($token)
						{//print_r("token[$token]");
							//Asociar sesion de video a la sesion
							saveSesionVideoInfoVideo($sesionId,$sessionId,$token);

							//Retornar token y sesion
							$resultInfo['code'] = 0;
							$resultInfo['data'] = array(
								 "sesion" => $sessionId
								,"token"  => $token
							);
							
							return true;
						}
					}
				}
			}
			catch ( Exception $e ) 
			{
				print_r($e->__toString());
				return false;
			}
		}
		
		return false;
	}

	function getSessionVideo(&$resultInfo,$flagArcos=false)
	{
		try
		{
			if( 
				// isset($_REQUEST["sesid"])  	&&
				// !empty($_REQUEST["sesid"])  &&
				// !is_null($_REQUEST["sesid"])
				
				isset($_REQUEST["tnro"])  	&&
				!empty($_REQUEST["tnro"])  &&
				!is_null($_REQUEST["tnro"])
			)
			{
				$resultInfo = false;
				
				//$resultado = createSessionVideo($_REQUEST["sesid"],$resultInfo);
				$resultado = createSessionVideo($_REQUEST["tnro"],$resultInfo);

				if( !$resultado )
				{
					$resultInfo['code'] = 2;
					$resultInfo['errorDes'] = "Sistema no disponible";
				}
				else
				{
					//Enviar email al paciente
					$customer = getTurnoTMClienteEmail($_REQUEST["tnro"]);
					
					if( $customer )
					{
						$resultado = sendVideoSesionCienteSMI($customer,$flagArcos,$resultInfo);	
					}
				}
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Parametros faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			return false;
		}
	}
	
	function getSessionVideoArcos(&$resultInfo)
	{
		getSessionVideo($resultInfo,true);
	}
	
	function getTurnoInfoVideoLlamadaInfo($tokenTurno,&$tokentel='',&$sesiontel='')
	{
		$sql = "SELECT  (CASE WHEN tur_telemed_token IS NULL THEN '' ELSE tur_telemed_token END) as tokentel
					   ,(CASE WHEN tur_telemed_sesionid IS NULL THEN '' ELSE tur_telemed_sesionid END) as sesiontel
				  FROM turnos
			     WHERE tur_token  = '".addslashes($tokenTurno)."'";
		//print_r($sql);print_r("\n");
		$rs = $GLOBALS['dbSQL']->Query($sql);
				
		if ( !$rs ) 
		{
			return false; 
		}
		
		$turInfo = $GLOBALS['dbSQL']->getAll();
		
		if(is_array($turInfo)&&count($turInfo)>0)
		{
			$tokentel  = $turInfo[0]["tokentel"];
			$sesiontel = $turInfo[0]["sesiontel"];
			return true;
		}		
		
		return false;
	}
	
	
	function getSessionVideoInfo(&$resultInfo)
	{
		try
		{
			if( isset($_REQUEST["tnro"])  	&&
				!empty($_REQUEST["tnro"])  &&
				!is_null($_REQUEST["tnro"])
			)
			{
				$tokentel  = false;
				$sesiontel = false;
				$resultado = getTurnoInfoVideoLlamadaInfo($_REQUEST["tnro"],$tokentel,$sesiontel);

				if( !$resultado )
				{
					$resultInfo['code'] = 2;
					$resultInfo['errorDes'] = "Sistema no disponible";
				}
				else
				{
					$resultInfo['code'] = 0;
					$resultInfo['data'] = array(
						 "sesion" => $sesiontel
						,"token"  => $tokentel
					);
				}
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Parametros faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			return false;
		}
	}
	
	function getTurnoSesionVideollamadaInfoPorTurno(&$resultInfo)
	{
		getSessionVideoInfo($resultInfo);
	}
	
	function sendVideoSesionCienteSMI($customer,$flagArcos=false,$resultInfo)
	{
		try
		{
			if( $customer )
			{
				//----------------------------------------------
				//Enviar email
				//----------------------------------------------
				//$clienteInfo = $clienteInfo[0]["cli_email"];
				//-----!!!!!!!-----
				$email=$customer["cli_email"];//TEST!!!! COMENTAR EN PRODUCCION
				if($GLOBALS['SMI_TEST_MODE'])
				{
					$email="gustavojuarez@gmail.com";//TEST!!!! COMENTAR EN PRODUCCION
				}
				//-----!!!!!!!-----
				$paramsEmail = array();
				$paramsEmail["email"]   = $email;
				$paramsEmail["vidSes"]= $resultInfo['data']["sesion"];
				$paramsEmail["vidTok"]= $resultInfo['data']["token"];

				$paramsEmail["nombre"]  = encodeDataB64($customer["cli_nombre"]);
				$paramsEmail["cusN"]    = encodeDataB64($customer["cli_nombre"]);
				$paramsEmail["subject"] = "VIDEO CONSULTA EN ESPERA";
				$paramsEmail['customer']= "1576dd8687342d79d0906e1a12570907";//$GLOBALS['WS_WHATSAPP_CUSTOMER'];//SPIDER
				$paramsEmail['template']= (!$flagArcos?21:51); //OBTENER DE LA BASE
				$paramsEmail['tipo']	= (!$flagArcos?32:35); //VALIDACION DE CORREO SMI
				$paramsEmail['testmode']= ($GLOBALS['SMI_TEST_MODE']?1:0); //LLAMADA PREPARADA
				
				//grabarLogErrorAfip($paramsEmail,"ENVIAR_EMAIL_FAC","_enviar_email_params");

				$paramsEmail["fromn"] = $GLOBALS['FROMN'];
				$paramsEmail["from"]  = $GLOBALS['FROM'];
				
				//print_r($paramsEmail);die("    <<<<<<<<<  ");
				$result = false;
				try
				{
					$res = callWebServiceSendEmail($paramsEmail,$result);
					
					if($res)
					{
						$resultInfo['code'] = 0;
						$resultInfo['data'] = array( "resultado" => $res );
					}
					else
					{
						$resultInfo['code'] 	= 2;
						$resultInfo['errorDes'] = "Se produjo un error al enviar el email de atencion: [".$e->getMessage()."]";
					}
				}
				catch (Exception $e) 
				{
					$resultInfo['code'] 	= 2;
					$resultInfo['errorDes'] = "Se produjo un error al enviar el email de atencion: [".$e->getMessage()."]";
				}
				
				//grabarLogErrorAfip(array("res"=>$res),"ENVIAR_EMAIL_CMP","_enviar_email_cmp_".($res?'ok':'error'));
				//return ($res?true:false);
				//----------------------------------------------
			}
			else
			{
				$resultInfo['code'] 	= 3;
				$resultInfo['errorDes'] = "Se produjo un error al limpiar la clave-1";
			}
			return true;


		}
		catch (Exception $e) 
		{
			$resultInfo['code'] 	= 2;
			$resultInfo['errorDes'] = "Se produjo un error al limpiar la clave y enviar por email: [".$e->getMessage()."]";
			
			return false;
		}
	}
	
	function saveHxSMI($idTurno)
	{
		$comentario = (isset($_REQUEST['hx'])?$_REQUEST['hx']:'');
		$comentarioD= (isset($_REQUEST['hxder'])?$_REQUEST['hxder']:'');

		//Grabar Hx Resumida
		if($comentario!="")
		{
			$sql = " INSERT INTO dbo.[cli_diagnosticos]
					   (	cli_codigo
						   ,cd_item
						   ,cd_fecha
						   ,cd_observ
						   ,cd_tratam
						   ,med_codigo
						   ,cd_motivo
						   ,cd_encode
						   ,cd_derivacion
					   )
				  VALUES
					   (	(SELECT cli_codigo FROM turnos WHERE tur_numero='".addslashes($idTurno)."')
						   ,(SELECT (CASE WHEN TT1.ITEM IS NULL THEN 1 ELSE TT1.ITEM + 1 END) FROM (SELECT MAX(cd_item) AS ITEM FROM cli_diagnosticos WHERE cli_codigo = (SELECT cli_codigo FROM turnos WHERE tur_numero='".addslashes($idTurno)."')) AS TT1)
						   ,GETDATE()
						   ,'".addslashes(base64_decode($comentario))."'
						   ,NULL
						   ,(SELECT med_codigo FROM turnos WHERE tur_numero='".addslashes($idTurno)."')
						   ,NULL
						   ,1
						   ,0
						)";

			//print_r($sql);print_r("\n");
			$rs = $GLOBALS['dbSQL']->Query($sql,true);

			if ( !$rs ) 
			{
				//Fallo la actualización
				return ERROR_INSERT_COMENTMEDHX_LD; 
			}
		}
		
		//Grabar Hx Resumida  -DERIVACION
		if($comentarioD!="")
		{
			$sql = " INSERT INTO dbo.[cli_diagnosticos]
					   (	cli_codigo
						   ,cd_item
						   ,cd_fecha
						   ,cd_observ
						   ,cd_tratam
						   ,med_codigo
						   ,cd_motivo
						   ,cd_encode
						   ,cd_derivacion
					   )
				  VALUES
					   (	(SELECT cli_codigo FROM turnos WHERE tur_numero='".addslashes($idTurno)."')
						   ,(SELECT (CASE WHEN TT1.ITEM IS NULL THEN 1 ELSE TT1.ITEM + 1 END) FROM (SELECT MAX(cd_item) AS ITEM FROM cli_diagnosticos WHERE cli_codigo = (SELECT cli_codigo FROM turnos WHERE tur_numero='".addslashes($idTurno)."')) AS TT1)
						   ,GETDATE()
						   ,'".addslashes($comentarioD)."'
						   ,NULL
						   ,(SELECT med_codigo FROM turnos WHERE tur_numero='".addslashes($idTurno)."')
						   ,NULL
						   ,1
						   ,1
						)";

			//print_r($sql);print_r("\n");
			$rs = $GLOBALS['dbSQL']->Query($sql,true);

			if ( !$rs ) 
			{
				//Fallo la actualización
				return ERROR_INSERT_COMENTMEDHX_LD; 
			}
		}

		return true;
	}
	
	
	function finalizarSessionVideo($idTurno,&$resultInfo)
	{
		$sql = "UPDATE turnos 
				   SET  tur_telemed_confirmado 		= 1
					   ,tur_telemed_fechaatencionfin= GETDATE()
					   ,tur_asiste 					= 1
					   ,tur_atendido				= 1
					   ,tur_telemed_status			= ".TURNO_TELEMEDICINA_FINALIZADO."
			     WHERE tur_numero  = '".addslashes($idTurno)."'";

		//print_r($sql);print_r("\n");
		$rs = $GLOBALS['dbSQL']->Query($sql,true);
				
		if ( !$rs ) 
		{
			//Retornar token y sesion
			$resultInfo['code'] = 1;
			$resultInfo['errorDes'] = "Error al actualizar la Sesion";
			return false; 
		}
		else
		{
			//GRABAR HX
			saveHxSMI($idTurno);
		}
		
		
		//Retornar token y sesion
		$resultInfo['code'] = 0;
		$resultInfo['data'] = 1;
		
		return true;
	}
	
	function endSessionVideo(&$resultInfo)
	{
		try
		{
			if( 
				// isset($_REQUEST["sesid"])  	&&
				// !empty($_REQUEST["sesid"])  &&
				// !is_null($_REQUEST["sesid"])
				
				isset($_REQUEST["tnro"])  	&&
				!empty($_REQUEST["tnro"])  &&
				!is_null($_REQUEST["tnro"])
			)
			{
				$resultInfo = false;
				$resultado = finalizarSessionVideo($_REQUEST["tnro"],$resultInfo);

				if( !$resultado )
				{
					$resultInfo['code'] = 2;
					$resultInfo['errorDes'] = "Sistema no disponible";
				}
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Parametros faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			return false;
		}
	}
	
	function addUserSessionVideo(&$resultInfo)
	{
		try
		{
			if( 
				isset($_REQUEST["type"])  	&&
				!empty($_REQUEST["type"])  	&&
				!is_null($_REQUEST["type"])	&&
				
				isset($_REQUEST["sesid"])  	&&
				!empty($_REQUEST["sesid"])  &&
				!is_null($_REQUEST["sesid"])&&
				
				isset($_REQUEST["ctnid"])  	&&
				!empty($_REQUEST["ctnid"])  &&
				!is_null($_REQUEST["ctnid"])
			)
			{
				$resultInfo = false;
				
				$resultado = addSessionVideo($_REQUEST["sesid"],$resultInfo);

				if( !$resultado )
				{
					$resultInfo['code'] = 2;
					$resultInfo['errorDes'] = "Sistema no disponible";
				}
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Parametros faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			return false;
		}
	}
	
	
	function validarSessionVideo($sesion,$token)
	{
		$sql = "SELECT 1
				  FROM dbo.turnos
				 WHERE tur_telemed_sesionid = '".addslashes($sesion)."'
				   AND tur_telemed_token	= '".addslashes($token)."'
				   AND tur_telemed_status   = ".TURNO_TELEMEDICINA_INICIADO;
		//print_r($sql);//die;
		$rs = $GLOBALS['dbSQL']->Query($sql);
		
		if ( !$rs ) 
		{ 
			return false; 
		}
		else
		{
			$cuponinf = $GLOBALS['dbSQL']->getAll();
			if(is_array($cuponinf)&&count($cuponinf)>0)
			{
				return true;
			}
		}
		
		return false;
	}
	
	function validarSessionVideoArcos(&$resultInfo)
	{
		try
		{
			if( 
				isset($_REQUEST["sesion"])  	&&
				!empty($_REQUEST["sesion"])  	&&
				!is_null($_REQUEST["sesion"]) 	&&

				isset($_REQUEST["token"])  		&&
				!empty($_REQUEST["token"])  	&&
				!is_null($_REQUEST["token"])
			)
			{
				$resultInfo = false;
				
				//$resultado = createSessionVideo($_REQUEST["sesid"],$resultInfo);
				$resultado = validarSessionVideo($_REQUEST["sesion"],$_REQUEST["token"]);

				if( !$resultado )
				{
					$resultInfo['code'] = 2;
					$resultInfo['errorDes'] = "Sistema no disponible";
				}
				else
				{
					$resultInfo['code'] = 0;
				}
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Parametros faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			return false;
		}
	}
	
	//DECLARACIONES JURADAS
	function validarDeclaracionJuaradaCliente(&$decinfo,&$resultInfo)
	{
		$flagError=false;
		$decinfo = array();
		
		// $it=array(0=>'{FNAME}',1=>null,2=>true);
		// if(!(isset($_REQUEST["{FIELD}"])&&!empty($_REQUEST["{FIELD}"])&&!is_null($_REQUEST["{FIELD}"])))
		// {$it[2]=false;$flagError=true;}
		// else{$it[1]=$_REQUEST["{FIELD}"];}
		// $x = array_push($decinfo,$it);

		$it=array(0=>"fm_res_trn",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_res_trn"])&&!empty($_REQUEST["fm_res_trn"])&&!is_null($_REQUEST["fm_res_trn"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_res_trn"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_res_nin",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_res_nin"])&&!empty($_REQUEST["fm_res_nin"])&&!is_null($_REQUEST["fm_res_nin"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_res_nin"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_res_causa",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_res_causa"])&&!empty($_REQUEST["fm_res_causa"])&&!is_null($_REQUEST["fm_res_causa"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_res_causa"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_neu_convul",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_convul"])&&!empty($_REQUEST["fm_neu_convul"])&&!is_null($_REQUEST["fm_neu_convul"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_convul"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_desma",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_desma"])&&!empty($_REQUEST["fm_neu_desma"])&&!is_null($_REQUEST["fm_neu_desma"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_desma"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_inest",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_inest"])&&!empty($_REQUEST["fm_neu_inest"])&&!is_null($_REQUEST["fm_neu_inest"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_inest"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_mare",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_mare"])&&!empty($_REQUEST["fm_neu_mare"])&&!is_null($_REQUEST["fm_neu_mare"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_mare"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_paral",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_paral"])&&!empty($_REQUEST["fm_neu_paral"])&&!is_null($_REQUEST["fm_neu_paral"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_paral"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_th",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_th"])&&!empty($_REQUEST["fm_neu_th"])&&!is_null($_REQUEST["fm_neu_th"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_th"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_tl",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_tl"])&&!empty($_REQUEST["fm_neu_tl"])&&!is_null($_REQUEST["fm_neu_tl"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_tl"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_depre",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_depre"])&&!empty($_REQUEST["fm_neu_depre"])&&!is_null($_REQUEST["fm_neu_depre"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_depre"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_miga",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_miga"])&&!empty($_REQUEST["fm_neu_miga"])&&!is_null($_REQUEST["fm_neu_miga"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_miga"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_cefa",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_cefa"])&&!empty($_REQUEST["fm_neu_cefa"])&&!is_null($_REQUEST["fm_neu_cefa"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_cefa"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_son",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_son"])&&!empty($_REQUEST["fm_neu_son"])&&!is_null($_REQUEST["fm_neu_son"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_son"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_dnop",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_dnop"])&&!empty($_REQUEST["fm_neu_dnop"])&&!is_null($_REQUEST["fm_neu_dnop"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_dnop"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_neu_cuales",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_neu_cuales"])&&!empty($_REQUEST["fm_neu_cuales"])&&!is_null($_REQUEST["fm_neu_cuales"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_neu_cuales"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_vis_mio",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_vis_mio"])&&!empty($_REQUEST["fm_vis_mio"])&&!is_null($_REQUEST["fm_vis_mio"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_vis_mio"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_vis_estra",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_vis_estra"])&&!empty($_REQUEST["fm_vis_estra"])&&!is_null($_REQUEST["fm_vis_estra"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_vis_estra"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_vis_glau",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_vis_glau"])&&!empty($_REQUEST["fm_vis_glau"])&&!is_null($_REQUEST["fm_vis_glau"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_vis_glau"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_vis_pret",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_vis_pret"])&&!empty($_REQUEST["fm_vis_pret"])&&!is_null($_REQUEST["fm_vis_pret"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_vis_pret"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_vis_pcor",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_vis_pcor"])&&!empty($_REQUEST["fm_vis_pcor"])&&!is_null($_REQUEST["fm_vis_pcor"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_vis_pcor"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_vis_ante",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_vis_ante"])&&!empty($_REQUEST["fm_vis_ante"])&&!is_null($_REQUEST["fm_vis_ante"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_vis_ante"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_orl_aden",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_orl_aden"])&&!empty($_REQUEST["fm_orl_aden"])&&!is_null($_REQUEST["fm_orl_aden"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_orl_aden"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_orl_tcv",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_orl_tcv"])&&!empty($_REQUEST["fm_orl_tcv"])&&!is_null($_REQUEST["fm_orl_tcv"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_orl_tcv"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_orl_sor",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_orl_sor"])&&!empty($_REQUEST["fm_orl_sor"])&&!is_null($_REQUEST["fm_orl_sor"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_orl_sor"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_orl_ronq",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_orl_ronq"])&&!empty($_REQUEST["fm_orl_ronq"])&&!is_null($_REQUEST["fm_orl_ronq"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_orl_ronq"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_orl_apn",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_orl_apn"])&&!empty($_REQUEST["fm_orl_apn"])&&!is_null($_REQUEST["fm_orl_apn"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_orl_apn"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_met_diab",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_met_diab"])&&!empty($_REQUEST["fm_met_diab"])&&!is_null($_REQUEST["fm_met_diab"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_met_diab"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_met_got",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_met_got"])&&!empty($_REQUEST["fm_met_got"])&&!is_null($_REQUEST["fm_met_got"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_met_got"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_met_atir",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_met_atir"])&&!empty($_REQUEST["fm_met_atir"])&&!is_null($_REQUEST["fm_met_atir"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_met_atir"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_met_obmar",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_met_obmar"])&&!empty($_REQUEST["fm_met_obmar"])&&!is_null($_REQUEST["fm_met_obmar"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_met_obmar"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_met_ainsu",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_met_ainsu"])&&!empty($_REQUEST["fm_met_ainsu"])&&!is_null($_REQUEST["fm_met_ainsu"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_met_ainsu"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_met_meddb",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_met_meddb"])&&!empty($_REQUEST["fm_met_meddb"])&&!is_null($_REQUEST["fm_met_meddb"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_met_meddb"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_alple_asm",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alple_asm"])&&!empty($_REQUEST["fm_alple_asm"])&&!is_null($_REQUEST["fm_alple_asm"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alple_asm"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alple_bron",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alple_bron"])&&!empty($_REQUEST["fm_alple_bron"])&&!is_null($_REQUEST["fm_alple_bron"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alple_bron"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alple_epoc",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alple_epoc"])&&!empty($_REQUEST["fm_alple_epoc"])&&!is_null($_REQUEST["fm_alple_epoc"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alple_epoc"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alple_inf",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alple_inf"])&&!empty($_REQUEST["fm_alple_inf"])&&!is_null($_REQUEST["fm_alple_inf"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alple_inf"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alple_ecs",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alple_ecs"])&&!empty($_REQUEST["fm_alple_ecs"])&&!is_null($_REQUEST["fm_alple_ecs"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alple_ecs"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_alple_ibfa",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_alple_ibfa"])&&!empty($_REQUEST["fm_alple_ibfa"])&&!is_null($_REQUEST["fm_alple_ibfa"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_alple_ibfa"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_cor_angp",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_cor_angp"])&&!empty($_REQUEST["fm_cor_angp"])&&!is_null($_REQUEST["fm_cor_angp"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_cor_angp"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_cor_sop",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_cor_sop"])&&!empty($_REQUEST["fm_cor_sop"])&&!is_null($_REQUEST["fm_cor_sop"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_cor_sop"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_cor_infa",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_cor_infa"])&&!empty($_REQUEST["fm_cor_infa"])&&!is_null($_REQUEST["fm_cor_infa"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_cor_infa"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_cor_arri",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_cor_arri"])&&!empty($_REQUEST["fm_cor_arri"])&&!is_null($_REQUEST["fm_cor_arri"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_cor_arri"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_cor_hpar",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_cor_hpar"])&&!empty($_REQUEST["fm_cor_hpar"])&&!is_null($_REQUEST["fm_cor_hpar"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_cor_hpar"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_cor_vari",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_cor_vari"])&&!empty($_REQUEST["fm_cor_vari"])&&!is_null($_REQUEST["fm_cor_vari"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_cor_vari"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_cor_cans",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_cor_cans"])&&!empty($_REQUEST["fm_cor_cans"])&&!is_null($_REQUEST["fm_cor_cans"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_cor_cans"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_cor_rest",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_cor_rest"])&&!empty($_REQUEST["fm_cor_rest"])&&!is_null($_REQUEST["fm_cor_rest"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_cor_rest"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_cor_res",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_cor_res"])&&!empty($_REQUEST["fm_cor_res"])&&!is_null($_REQUEST["fm_cor_res"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_cor_res"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_dig_ulc",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_ulc"])&&!empty($_REQUEST["fm_dig_ulc"])&&!is_null($_REQUEST["fm_dig_ulc"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_ulc"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_gast",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_gast"])&&!empty($_REQUEST["fm_dig_gast"])&&!is_null($_REQUEST["fm_dig_gast"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_gast"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_her",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_her"])&&!empty($_REQUEST["fm_dig_her"])&&!is_null($_REQUEST["fm_dig_her"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_her"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_vesi",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_vesi"])&&!empty($_REQUEST["fm_dig_vesi"])&&!is_null($_REQUEST["fm_dig_vesi"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_vesi"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_colic",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_colic"])&&!empty($_REQUEST["fm_dig_colic"])&&!is_null($_REQUEST["fm_dig_colic"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_colic"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_hepa",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_hepa"])&&!empty($_REQUEST["fm_dig_hepa"])&&!is_null($_REQUEST["fm_dig_hepa"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_hepa"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_cual",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_cual"])&&!empty($_REQUEST["fm_dig_cual"])&&!is_null($_REQUEST["fm_dig_cual"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_cual"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_cdig",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_cdig"])&&!empty($_REQUEST["fm_dig_cdig"])&&!is_null($_REQUEST["fm_dig_cdig"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_cdig"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_rlabanor",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_rlabanor"])&&!empty($_REQUEST["fm_dig_rlabanor"])&&!is_null($_REQUEST["fm_dig_rlabanor"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_rlabanor"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_antfam",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_antfam"])&&!empty($_REQUEST["fm_dig_antfam"])&&!is_null($_REQUEST["fm_dig_antfam"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_antfam"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_dig_popint",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_dig_popint"])&&!empty($_REQUEST["fm_dig_popint"])&&!is_null($_REQUEST["fm_dig_popint"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_dig_popint"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_sang_anem",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_anem"])&&!empty($_REQUEST["fm_sang_anem"])&&!is_null($_REQUEST["fm_sang_anem"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_anem"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_leuc",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_leuc"])&&!empty($_REQUEST["fm_sang_leuc"])&&!is_null($_REQUEST["fm_sang_leuc"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_leuc"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_linf",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_linf"])&&!empty($_REQUEST["fm_sang_linf"])&&!is_null($_REQUEST["fm_sang_linf"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_linf"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_afgan",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_afgan"])&&!empty($_REQUEST["fm_sang_afgan"])&&!is_null($_REQUEST["fm_sang_afgan"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_afgan"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_quim",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_quim"])&&!empty($_REQUEST["fm_sang_quim"])&&!is_null($_REQUEST["fm_sang_quim"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_quim"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_alrin",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_alrin"])&&!empty($_REQUEST["fm_sang_alrin"])&&!is_null($_REQUEST["fm_sang_alrin"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_alrin"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_alveg",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_alveg"])&&!empty($_REQUEST["fm_sang_alveg"])&&!is_null($_REQUEST["fm_sang_alveg"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_alveg"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_inur",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_inur"])&&!empty($_REQUEST["fm_sang_inur"])&&!is_null($_REQUEST["fm_sang_inur"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_inur"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_alpro",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_alpro"])&&!empty($_REQUEST["fm_sang_alpro"])&&!is_null($_REQUEST["fm_sang_alpro"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_alpro"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_valpesp",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_valpesp"])&&!empty($_REQUEST["fm_sang_valpesp"])&&!is_null($_REQUEST["fm_sang_valpesp"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_valpesp"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_calren",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_calren"])&&!empty($_REQUEST["fm_sang_calren"])&&!is_null($_REQUEST["fm_sang_calren"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_calren"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_infgen",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_infgen"])&&!empty($_REQUEST["fm_sang_infgen"])&&!is_null($_REQUEST["fm_sang_infgen"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_infgen"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_quisvu",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_quisvu"])&&!empty($_REQUEST["fm_sang_quisvu"])&&!is_null($_REQUEST["fm_sang_quisvu"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_quisvu"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_tumsvu",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_tumsvu"])&&!empty($_REQUEST["fm_sang_tumsvu"])&&!is_null($_REQUEST["fm_sang_tumsvu"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_tumsvu"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_sang_expoves",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_sang_expoves"])&&!empty($_REQUEST["fm_sang_expoves"])&&!is_null($_REQUEST["fm_sang_expoves"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_sang_expoves"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_gin_ova",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_gin_ova"])&&!empty($_REQUEST["fm_gin_ova"])&&!is_null($_REQUEST["fm_gin_ova"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_gin_ova"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_gin_uter",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_gin_uter"])&&!empty($_REQUEST["fm_gin_uter"])&&!is_null($_REQUEST["fm_gin_uter"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_gin_uter"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_gin_gent",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_gin_gent"])&&!empty($_REQUEST["fm_gin_gent"])&&!is_null($_REQUEST["fm_gin_gent"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_gin_gent"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_gin_abort",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_gin_abort"])&&!empty($_REQUEST["fm_gin_abort"])&&!is_null($_REQUEST["fm_gin_abort"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_gin_abort"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_gin_emb",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_gin_emb"])&&!empty($_REQUEST["fm_gin_emb"])&&!is_null($_REQUEST["fm_gin_emb"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_gin_emb"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_gin_infer",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_gin_infer"])&&!empty($_REQUEST["fm_gin_infer"])&&!is_null($_REQUEST["fm_gin_infer"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_gin_infer"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_gin_hermo",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_gin_hermo"])&&!empty($_REQUEST["fm_gin_hermo"])&&!is_null($_REQUEST["fm_gin_hermo"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_gin_hermo"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_gin_fulcg",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_gin_fulcg"])&&!empty($_REQUEST["fm_gin_fulcg"])&&!is_null($_REQUEST["fm_gin_fulcg"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_gin_fulcg"];}
		$it[3]="D";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_gin_fulm",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_gin_fulm"])&&!empty($_REQUEST["fm_gin_fulm"])&&!is_null($_REQUEST["fm_gin_fulm"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_gin_fulm"];}
		$it[3]="D";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_kin_colum",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_colum"])&&!empty($_REQUEST["fm_kin_colum"])&&!is_null($_REQUEST["fm_kin_colum"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_colum"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_cade",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_cade"])&&!empty($_REQUEST["fm_kin_cade"])&&!is_null($_REQUEST["fm_kin_cade"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_cade"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_rodi",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_rodi"])&&!empty($_REQUEST["fm_kin_rodi"])&&!is_null($_REQUEST["fm_kin_rodi"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_rodi"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_mano",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_mano"])&&!empty($_REQUEST["fm_kin_mano"])&&!is_null($_REQUEST["fm_kin_mano"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_mano"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_hom",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_hom"])&&!empty($_REQUEST["fm_kin_hom"])&&!is_null($_REQUEST["fm_kin_hom"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_hom"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_cod",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_cod"])&&!empty($_REQUEST["fm_kin_cod"])&&!is_null($_REQUEST["fm_kin_cod"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_cod"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_pie",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_pie"])&&!empty($_REQUEST["fm_kin_pie"])&&!is_null($_REQUEST["fm_kin_pie"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_pie"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_dedod",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_dedod"])&&!empty($_REQUEST["fm_kin_dedod"])&&!is_null($_REQUEST["fm_kin_dedod"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_dedod"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_ccol",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_ccol"])&&!empty($_REQUEST["fm_kin_ccol"])&&!is_null($_REQUEST["fm_kin_ccol"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_ccol"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_cart",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_cart"])&&!empty($_REQUEST["fm_kin_cart"])&&!is_null($_REQUEST["fm_kin_cart"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_cart"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_prot",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_prot"])&&!empty($_REQUEST["fm_kin_prot"])&&!is_null($_REQUEST["fm_kin_prot"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_prot"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_tkin",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_tkin"])&&!empty($_REQUEST["fm_kin_tkin"])&&!is_null($_REQUEST["fm_kin_tkin"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_tkin"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_kin_debmusc",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_kin_debmusc"])&&!empty($_REQUEST["fm_kin_debmusc"])&&!is_null($_REQUEST["fm_kin_debmusc"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_kin_debmusc"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);


		$it=array(0=>"fm_otro_oech",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oech"])&&!empty($_REQUEST["fm_otro_oech"])&&!is_null($_REQUEST["fm_otro_oech"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oech"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oein",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oein"])&&!empty($_REQUEST["fm_otro_oein"])&&!is_null($_REQUEST["fm_otro_oein"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oein"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oed",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oed"])&&!empty($_REQUEST["fm_otro_oed"])&&!is_null($_REQUEST["fm_otro_oed"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oed"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oep",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oep"])&&!empty($_REQUEST["fm_otro_oep"])&&!is_null($_REQUEST["fm_otro_oep"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oep"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oepsor",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oepsor"])&&!empty($_REQUEST["fm_otro_oepsor"])&&!is_null($_REQUEST["fm_otro_oepsor"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oepsor"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_omel",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_omel"])&&!empty($_REQUEST["fm_otro_omel"])&&!is_null($_REQUEST["fm_otro_omel"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_omel"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oeininf",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oeininf"])&&!empty($_REQUEST["fm_otro_oeininf"])&&!is_null($_REQUEST["fm_otro_oeininf"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oeininf"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_opra",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_opra"])&&!empty($_REQUEST["fm_otro_opra"])&&!is_null($_REQUEST["fm_otro_opra"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_opra"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_optali",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_optali"])&&!empty($_REQUEST["fm_otro_optali"])&&!is_null($_REQUEST["fm_otro_optali"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_optali"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_omedrec",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_omedrec"])&&!empty($_REQUEST["fm_otro_omedrec"])&&!is_null($_REQUEST["fm_otro_omedrec"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_omedrec"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oatratmedaf",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oatratmedaf"])&&!empty($_REQUEST["fm_otro_oatratmedaf"])&&!is_null($_REQUEST["fm_otro_oatratmedaf"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oatratmedaf"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oaeultan",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oaeultan"])&&!empty($_REQUEST["fm_otro_oaeultan"])&&!is_null($_REQUEST["fm_otro_oaeultan"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oaeultan"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oaint",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oaint"])&&!empty($_REQUEST["fm_otro_oaint"])&&!is_null($_REQUEST["fm_otro_oaint"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oaint"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oingmed",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oingmed"])&&!empty($_REQUEST["fm_otro_oingmed"])&&!is_null($_REQUEST["fm_otro_oingmed"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oingmed"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_odosis",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_odosis"])&&!empty($_REQUEST["fm_otro_odosis"])&&!is_null($_REQUEST["fm_otro_odosis"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_odosis"];}
		$it[3]="S";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_oestrestmbisan",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_oestrestmbisan"])&&!empty($_REQUEST["fm_otro_oestrestmbisan"])&&!is_null($_REQUEST["fm_otro_oestrestmbisan"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_oestrestmbisan"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_ofuma",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_ofuma"])&&!empty($_REQUEST["fm_otro_ofuma"])&&!is_null($_REQUEST["fm_otro_ofuma"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_ofuma"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_ofuctos",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_ofuctos"])&&!empty($_REQUEST["fm_otro_ofuctos"])&&!is_null($_REQUEST["fm_otro_ofuctos"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_ofuctos"];}
		$it[3]="I";
		$x = array_push($decinfo,$it);

		$it=array(0=>"fm_otro_opmam",1=>null,2=>true,3=>null);
		if(!(isset($_REQUEST["fm_otro_opmam"])&&!empty($_REQUEST["fm_otro_opmam"])&&!is_null($_REQUEST["fm_otro_opmam"])))
		{$it[2]=false;$flagError=true;}
		else{$it[1]=$_REQUEST["fm_otro_opmam"];}
		$it[3]="B";
		$x = array_push($decinfo,$it);



		// print_r("-----CAMPOS------");print_r("\n");
		// print_r("fe[$flagError]");
		// print_r($decinfo);
		// print_r("-----------------");print_r("\n");die;
		
		if($flagError)
		{
			$resultInfo['code']     = 1;
			$resultInfo['errorDes'] = "Se encontraron campos incompletos en la declaracion jurada";
			$resultInfo['fieldlst'] = $decinfo;
			return false;
		}
		return true;
	}

	function getFechaFormateadaDj($d)
	{
		$fecha = DateTime::createFromFormat('d/m/Y', $d);
		$date = date("Y-m-d 00:00:00.000",strtotime($fecha->format('Y-m-d')));
		// //$hasta = date("Y-m-d",strtotime($rango[1]->format('Y-m-d')));
		//print_r($ff);die;
		
		
		// $date = date('d/m/Y',strtotime($d));
		// print_r($date);die;
		// $date = date($GLOBALS['FORMATDATE_DJ'],strtotime($ff));
		
		return $date;
	}

	function saveDeclaracionJurada($clienteCod,$familiarInfo,$decinfo,&$resultInfo)
	{
		try
		{
			$flagTransactionInit = false;
			$sqlCloseDJ 	= false;
			$sqlAddDJ   	= false;
			$sqlUpdCusFlagFM= false;
			
			//----------------------------------------
			//VERIFICAR SI EXISTE UNA DJ DEL CLIENTE
			//----------------------------------------
			$sql = "SELECT clid_numero
					  FROM dbo.cli_declaracionjurada
					 WHERE cli_codigo  = '".addslashes($clienteCod)."'
					   AND clid_fecha_fin IS NULL";
			
			//print_r($sql);print_r("\n");//die;
			$rs = $GLOBALS['dbSQL']->Query($sql);

			if ( $rs ) 
			{ 		
				$rs = $GLOBALS['dbSQL']->getAll();
				if(is_array($rs)&&count($rs)>0)
				{
					//CERRAR DJ ACTUAL
					$sqlCloseDJ = " UPDATE dbo.cli_declaracionjurada 
									   SET clid_fecha_fin =  GETDATE()
									 WHERE clid_numero    = ".$rs[0]["clid_numero"];
				}
			}
			//----------------------------------------
			
			//----------------------------------------
			//INSERTAR LA NUEVA DJ
			//----------------------------------------
			$camposstatic = " cli_codigo
							 ,cligf_numero
							 ,clid_fecha_inicio
							 ,clid_fecha_fin";
			$valuesSt 	   =  $clienteCod."
							 ,".(!$familiarInfo?'NULL':$familiarInfo["codf"])."
							 ,GETDATE()
							 ,NULL";
			
			$valuesDn 		 = "";
			$camposdinamicos = "";
			
			
			for($i=0,$t=count($decinfo);$i<$t;$i++)
			{
				$campo		= str_replace("fm_","clid_",$decinfo[$i][0]);
				$tipo		= $decinfo[$i][3];
				switch($tipo)
				{
					case "B":{$valor="'".addslashes(($decinfo[$i][1]=="o1"?1:0))."'";}break;
					case "D":{$valor="'".getFechaFormateadaDj($decinfo[$i][1])."'";}break;
					case "I":{
								if(strlen($decinfo[$i][1])>5)
								{
									$valor="0";
								}
								else
								{
									$valor=(is_numeric($decinfo[$i][1])?"'".addslashes($decinfo[$i][1])."'":0);
								}
							}break;
					case "S":{
								if(strlen($decinfo[$i][1])>200)
								{
									$valor="'".addslashes(substr(trim($decinfo[$i][1]),0,200))."'";
								}
								else
								{
									$valor="'".addslashes(trim($decinfo[$i][1]))."'";
								}
							}break;
				}
				
				$sep=',';
				//if($camposdinamicos==""){$sep='';}
				$camposdinamicos.=$sep.$campo."\n";
				
				$valuesDn.=$sep.$valor."\n";
			}
							 
			$sqlAddDJ = "INSERT INTO dbo.cli_declaracionjurada
						(
							 ".$camposstatic."
							 ".$camposdinamicos."
						)
						VALUES(".$valuesSt.$valuesDn.")";
			//print_r($sql);die;
			//----------------------------------------
			
		
			//----------------------------------------
			//MARCAR EL FLAG DE FM DEL CLIENTE
			//----------------------------------------
			$sqlUpdCusFlagFM = "    UPDATE dbo.clientes
									   SET cli_val_fmed = 0
									 WHERE cli_codigo  = ".$clienteCod;
			//----------------------------------------

			$continue=true;
			if( setConeccionTransaccion() )
			{
				$flagTransactionInit = true;
				$GLOBALS['dbSQLTR']->setBeginTransaction();
				
				if( $sqlCloseDJ )
				{
					$resultado = $GLOBALS['dbSQLTR']->QueryTR($sqlCloseDJ,true);
					if ( !$resultado ) 
					{			
						$res=$GLOBALS['dbSQLTR']->setRollbackTransaction();	
						$continue = false;
						$errorPoint = 'Error al cerrar la D.J. actual';
						$resultInfo['code'] 	= -1;
						$resultInfo['errorDes'] = $errorPoint;
					}
				}
				
				if( $continue && $sqlAddDJ)
				{
					$resultado = $GLOBALS['dbSQLTR']->QueryTR($sqlAddDJ,true);
					if ( !$resultado ) 
					{			
						$res=$GLOBALS['dbSQLTR']->setRollbackTransaction();	
						$continue = false;
						$errorPoint = 'Error al grabar la D.J.';
						$resultInfo['code'] 	= -1;
						$resultInfo['errorDes'] = $errorPoint;
					}
				}
				
				if( $continue && $sqlUpdCusFlagFM)
				{
					$resultado = $GLOBALS['dbSQLTR']->QueryTR($sqlUpdCusFlagFM,true);
					if ( !$resultado ) 
					{			
						$res=$GLOBALS['dbSQLTR']->setRollbackTransaction();	
						$continue = false;
						$errorPoint = 'Error al actuaizar al cliente';
						$resultInfo['code'] 	= -1;
						$resultInfo['errorDes'] = $errorPoint;
					}
				}
				
				if( $continue  )
				{
					$res = $GLOBALS['dbSQLTR']->setCommitTransaction();
					$resultInfo['code'] = 0;
					$resultInfo['data'] = 1;
					return true;
				}
			}
			else
			{
				$resultInfo['code'] 	= -1;
				$resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1000]";
			}
			return false;
		} 
		catch ( Exception $e ) 
		{
			if( $flagTransactionInit )
			{
				$GLOBALS['dbSQLTR']->setRollbackTransaction();
			}
			
			$resultInfo['code'] 	= CODE_RESULT_ERROR_FATAL;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			logTrace(debug_backtrace(),$e->__toString());
			return false;
		}
	}
	
	function registrarDeclaracionJuaradaCliente(&$resultInfo)
	{
		try
		{
			$output = "";
			//print_r($_REQUEST);die;

			if( isset($_REQUEST["token"])  		&&
				!empty($_REQUEST["token"])  	&&
				!is_null($_REQUEST["token"])
			)
			{
				$continue = true;
				$userId    = validarTokenFast($resultInfo);

				if($userId&&is_numeric($userId))
				{
					$decinfo    = false;
					$resultInfo = false;
					$familiarInfo=false;
					$resul = validarDeclaracionJuaradaCliente($decinfo,$resultInfo);
					
					if($resul)
					{
						$resultInfo = false;
						$resultado = saveDeclaracionJurada($userId,$familiarInfo,$decinfo,$resultInfo);
					}
				}
				else
				{
					$resultInfo['code'] = 1;
					$resultInfo['errorDes'] = "Se produjo un error al grabar la declaracion jurada";
				}	
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se encontraron campos obligatorios vacíos/faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"getStripePaymentToken","error"=>$e->__toString()));
			return false;
		}
	}
	
	function getDeclaracionJurada($clienteCod,$familiarInfo)
	{
		try
		{
			//----------------------------------------
			//VERIFICAR SI EXISTE UNA DJ DEL CLIENTE
			//----------------------------------------
			$sql = "SELECT   cli_codigo as cod
							,ISNULL(cligf_numero,0) as codf
							,FORMAT(clid_fecha_inicio,'dd/MM/yyyy') as fini
							,(CASE WHEN clid_fecha_fin IS NULL THEN '' ELSE FORMAT(clid_fecha_fin,'dd/MM/yyyy') END) as ffin
							,(CASE WHEN clid_res_trn=1 THEN 'o1' ELSE 'o2' END) as fm_res_trn
							,(CASE WHEN clid_res_nin=1 THEN 'o1' ELSE 'o2' END) as fm_res_nin
							,clid_res_causa as fm_res_causa
							,(CASE WHEN clid_neu_convul=1 THEN 'o1' ELSE 'o2' END) as fm_neu_convul
							,(CASE WHEN clid_neu_desma=1 THEN 'o1' ELSE 'o2' END) as fm_neu_desma
							,(CASE WHEN clid_neu_inest=1 THEN 'o1' ELSE 'o2' END) as fm_neu_inest
							,(CASE WHEN clid_neu_mare=1 THEN 'o1' ELSE 'o2' END) as fm_neu_mare
							,(CASE WHEN clid_neu_paral=1 THEN 'o1' ELSE 'o2' END) as fm_neu_paral
							,(CASE WHEN clid_neu_th=1 THEN 'o1' ELSE 'o2' END) as fm_neu_th
							,(CASE WHEN clid_neu_tl=1 THEN 'o1' ELSE 'o2' END) as fm_neu_tl
							,(CASE WHEN clid_neu_depre=1 THEN 'o1' ELSE 'o2' END) as fm_neu_depre
							,(CASE WHEN clid_neu_miga=1 THEN 'o1' ELSE 'o2' END) as fm_neu_miga
							,(CASE WHEN clid_neu_cefa=1 THEN 'o1' ELSE 'o2' END) as fm_neu_cefa
							,(CASE WHEN clid_neu_son=1 THEN 'o1' ELSE 'o2' END) as fm_neu_son
							,(CASE WHEN clid_neu_dnop=1 THEN 'o1' ELSE 'o2' END) as fm_neu_dnop
							,clid_neu_cuales as fm_neu_cuales
							,(CASE WHEN clid_vis_mio=1 THEN 'o1' ELSE 'o2' END) as fm_vis_mio
							,(CASE WHEN clid_vis_estra=1 THEN 'o1' ELSE 'o2' END) as fm_vis_estra
							,(CASE WHEN clid_vis_glau=1 THEN 'o1' ELSE 'o2' END) as fm_vis_glau
							,(CASE WHEN clid_vis_pret=1 THEN 'o1' ELSE 'o2' END) as fm_vis_pret
							,(CASE WHEN clid_vis_pcor=1 THEN 'o1' ELSE 'o2' END) as fm_vis_pcor
							,(CASE WHEN clid_vis_ante=1 THEN 'o1' ELSE 'o2' END) as fm_vis_ante
							,(CASE WHEN clid_orl_aden=1 THEN 'o1' ELSE 'o2' END) as fm_orl_aden
							,(CASE WHEN clid_orl_tcv=1 THEN 'o1' ELSE 'o2' END) as fm_orl_tcv
							,(CASE WHEN clid_orl_sor=1 THEN 'o1' ELSE 'o2' END) as fm_orl_sor
							,(CASE WHEN clid_orl_ronq=1 THEN 'o1' ELSE 'o2' END) as fm_orl_ronq
							,(CASE WHEN clid_orl_apn=1 THEN 'o1' ELSE 'o2' END) as fm_orl_apn
							,(CASE WHEN clid_met_diab=1 THEN 'o1' ELSE 'o2' END) as fm_met_diab
							,(CASE WHEN clid_met_got=1 THEN 'o1' ELSE 'o2' END) as fm_met_got
							,(CASE WHEN clid_met_atir=1 THEN 'o1' ELSE 'o2' END) as fm_met_atir
							,(CASE WHEN clid_met_obmar=1 THEN 'o1' ELSE 'o2' END) as fm_met_obmar
							,(CASE WHEN clid_met_ainsu=1 THEN 'o1' ELSE 'o2' END) as fm_met_ainsu
							,clid_met_meddb as fm_met_meddb
							,(CASE WHEN clid_alple_asm=1 THEN 'o1' ELSE 'o2' END) as fm_alple_asm
							,(CASE WHEN clid_alple_bron=1 THEN 'o1' ELSE 'o2' END) as fm_alple_bron
							,(CASE WHEN clid_alple_epoc=1 THEN 'o1' ELSE 'o2' END) as fm_alple_epoc
							,(CASE WHEN clid_alple_inf=1 THEN 'o1' ELSE 'o2' END) as fm_alple_inf
							,(CASE WHEN clid_alple_ecs=1 THEN 'o1' ELSE 'o2' END) as fm_alple_ecs
							,(CASE WHEN clid_alple_ibfa=1 THEN 'o1' ELSE 'o2' END) as fm_alple_ibfa
							,(CASE WHEN clid_cor_angp=1 THEN 'o1' ELSE 'o2' END) as fm_cor_angp
							,(CASE WHEN clid_cor_sop=1 THEN 'o1' ELSE 'o2' END) as fm_cor_sop
							,(CASE WHEN clid_cor_infa=1 THEN 'o1' ELSE 'o2' END) as fm_cor_infa
							,(CASE WHEN clid_cor_arri=1 THEN 'o1' ELSE 'o2' END) as fm_cor_arri
							,(CASE WHEN clid_cor_hpar=1 THEN 'o1' ELSE 'o2' END) as fm_cor_hpar
							,(CASE WHEN clid_cor_vari=1 THEN 'o1' ELSE 'o2' END) as fm_cor_vari
							,(CASE WHEN clid_cor_cans=1 THEN 'o1' ELSE 'o2' END) as fm_cor_cans
							,(CASE WHEN clid_cor_rest=1 THEN 'o1' ELSE 'o2' END) as fm_cor_rest
							,(CASE WHEN clid_cor_res=1 THEN 'o1' ELSE 'o2' END) as fm_cor_res
							,(CASE WHEN clid_dig_ulc=1 THEN 'o1' ELSE 'o2' END) as fm_dig_ulc
							,(CASE WHEN clid_dig_gast=1 THEN 'o1' ELSE 'o2' END) as fm_dig_gast
							,(CASE WHEN clid_dig_her=1 THEN 'o1' ELSE 'o2' END) as fm_dig_her
							,(CASE WHEN clid_dig_vesi=1 THEN 'o1' ELSE 'o2' END) as fm_dig_vesi
							,(CASE WHEN clid_dig_colic=1 THEN 'o1' ELSE 'o2' END) as fm_dig_colic
							,(CASE WHEN clid_dig_hepa=1 THEN 'o1' ELSE 'o2' END) as fm_dig_hepa
							,clid_dig_cual as fm_dig_cual
							,(CASE WHEN clid_dig_cdig=1 THEN 'o1' ELSE 'o2' END) as fm_dig_cdig
							,(CASE WHEN clid_dig_rlabanor=1 THEN 'o1' ELSE 'o2' END) as fm_dig_rlabanor
							,(CASE WHEN clid_dig_antfam=1 THEN 'o1' ELSE 'o2' END) as fm_dig_antfam
							,(CASE WHEN clid_dig_popint=1 THEN 'o1' ELSE 'o2' END) as fm_dig_popint
							,(CASE WHEN clid_sang_anem=1 THEN 'o1' ELSE 'o2' END) as fm_sang_anem
							,(CASE WHEN clid_sang_leuc=1 THEN 'o1' ELSE 'o2' END) as fm_sang_leuc
							,(CASE WHEN clid_sang_linf=1 THEN 'o1' ELSE 'o2' END) as fm_sang_linf
							,(CASE WHEN clid_sang_afgan=1 THEN 'o1' ELSE 'o2' END) as fm_sang_afgan
							,(CASE WHEN clid_sang_quim=1 THEN 'o1' ELSE 'o2' END) as fm_sang_quim
							,(CASE WHEN clid_sang_alrin=1 THEN 'o1' ELSE 'o2' END) as fm_sang_alrin
							,(CASE WHEN clid_sang_alveg=1 THEN 'o1' ELSE 'o2' END) as fm_sang_alveg
							,(CASE WHEN clid_sang_inur=1 THEN 'o1' ELSE 'o2' END) as fm_sang_inur
							,(CASE WHEN clid_sang_alpro=1 THEN 'o1' ELSE 'o2' END) as fm_sang_alpro
							,(CASE WHEN clid_sang_valpesp=1 THEN 'o1' ELSE 'o2' END) as fm_sang_valpesp
							,(CASE WHEN clid_sang_calren=1 THEN 'o1' ELSE 'o2' END) as fm_sang_calren
							,(CASE WHEN clid_sang_infgen=1 THEN 'o1' ELSE 'o2' END) as fm_sang_infgen
							,(CASE WHEN clid_sang_quisvu=1 THEN 'o1' ELSE 'o2' END) as fm_sang_quisvu
							,(CASE WHEN clid_sang_tumsvu=1 THEN 'o1' ELSE 'o2' END) as fm_sang_tumsvu
							,(CASE WHEN clid_sang_expoves=1 THEN 'o1' ELSE 'o2' END) as fm_sang_expoves
							,(CASE WHEN clid_gin_ova=1 THEN 'o1' ELSE 'o2' END) as fm_gin_ova
							,(CASE WHEN clid_gin_uter=1 THEN 'o1' ELSE 'o2' END) as fm_gin_uter
							,(CASE WHEN clid_gin_gent=1 THEN 'o1' ELSE 'o2' END) as fm_gin_gent
							,(CASE WHEN clid_gin_abort=1 THEN 'o1' ELSE 'o2' END) as fm_gin_abort
							,(CASE WHEN clid_gin_emb=1 THEN 'o1' ELSE 'o2' END) as fm_gin_emb
							,(CASE WHEN clid_gin_infer=1 THEN 'o1' ELSE 'o2' END) as fm_gin_infer
							,(CASE WHEN clid_gin_hermo=1 THEN 'o1' ELSE 'o2' END) as fm_gin_hermo
							,(CASE WHEN clid_gin_fulcg IS NULL THEN '' ELSE FORMAT(clid_gin_fulcg,'dd/MM/yyyy') END) as fm_gin_fulcg
							,(CASE WHEN clid_gin_fulm IS NULL THEN '' ELSE FORMAT(clid_gin_fulm,'dd/MM/yyyy') END) as fm_gin_fulm
							,(CASE WHEN clid_kin_colum=1 THEN 'o1' ELSE 'o2' END) as fm_kin_colum
							,(CASE WHEN clid_kin_cade=1 THEN 'o1' ELSE 'o2' END) as fm_kin_cade
							,(CASE WHEN clid_kin_rodi=1 THEN 'o1' ELSE 'o2' END) as fm_kin_rodi
							,(CASE WHEN clid_kin_mano=1 THEN 'o1' ELSE 'o2' END) as fm_kin_mano
							,(CASE WHEN clid_kin_hom=1 THEN 'o1' ELSE 'o2' END) as fm_kin_hom
							,(CASE WHEN clid_kin_cod=1 THEN 'o1' ELSE 'o2' END) as fm_kin_cod
							,(CASE WHEN clid_kin_pie=1 THEN 'o1' ELSE 'o2' END) as fm_kin_pie
							,(CASE WHEN clid_kin_dedod=1 THEN 'o1' ELSE 'o2' END) as fm_kin_dedod
							,(CASE WHEN clid_kin_ccol=1 THEN 'o1' ELSE 'o2' END) as fm_kin_ccol
							,(CASE WHEN clid_kin_cart=1 THEN 'o1' ELSE 'o2' END) as fm_kin_cart
							,(CASE WHEN clid_kin_prot=1 THEN 'o1' ELSE 'o2' END) as fm_kin_prot
							,(CASE WHEN clid_kin_tkin=1 THEN 'o1' ELSE 'o2' END) as fm_kin_tkin
							,(CASE WHEN clid_kin_debmusc=1 THEN 'o1' ELSE 'o2' END) as fm_kin_debmusc
							,(CASE WHEN clid_otro_oech=1 THEN 'o1' ELSE 'o2' END) as fm_otro_oech
							,(CASE WHEN clid_otro_oein=1 THEN 'o1' ELSE 'o2' END) as fm_otro_oein
							,(CASE WHEN clid_otro_oed=1 THEN 'o1' ELSE 'o2' END) as fm_otro_oed
							,(CASE WHEN clid_otro_oep=1 THEN 'o1' ELSE 'o2' END) as fm_otro_oep
							,(CASE WHEN clid_otro_oepsor=1 THEN 'o1' ELSE 'o2' END) as fm_otro_oepsor
							,(CASE WHEN clid_otro_omel=1 THEN 'o1' ELSE 'o2' END) as fm_otro_omel
							,(CASE WHEN clid_otro_oeininf=1 THEN 'o1' ELSE 'o2' END) as fm_otro_oeininf
							,(CASE WHEN clid_otro_opra=1 THEN 'o1' ELSE 'o2' END) as fm_otro_opra
							,(CASE WHEN clid_otro_optali=1 THEN 'o1' ELSE 'o2' END) as fm_otro_optali
							,clid_otro_omedrec as fm_otro_omedrec
							,(CASE WHEN clid_otro_oatratmedaf=1 THEN 'o1' ELSE 'o2' END) as fm_otro_oatratmedaf
							,(CASE WHEN clid_otro_oaeultan=1 THEN 'o1' ELSE 'o2' END) as fm_otro_oaeultan
							,(CASE WHEN clid_otro_oaint=1 THEN 'o1' ELSE 'o2' END) as fm_otro_oaint
							,(CASE WHEN clid_otro_oingmed=1 THEN 'o1' ELSE 'o2' END) as fm_otro_oingmed
							,clid_otro_odosis as fm_otro_odosis
							,(CASE WHEN clid_otro_oestrestmbisan=1 THEN 'o1' ELSE 'o2' END) as fm_otro_oestrestmbisan
							,(CASE WHEN clid_otro_ofuma=1 THEN 'o1' ELSE 'o2' END) as fm_otro_ofuma
							,clid_otro_ofuctos as fm_otro_ofuctos
							,(CASE WHEN clid_otro_opmam=1 THEN 'o1' ELSE 'o2' END) as fm_otro_opmam
							
					  FROM dbo.cli_declaracionjurada
					 WHERE cli_codigo  = '".addslashes($clienteCod)."'
					   AND clid_fecha_fin IS NULL";
			
			//print_r($sql);print_r("\n");//die;
			$rs = $GLOBALS['dbSQL']->Query($sql);

			if ( $rs ) 
			{ 		
				$rs = $GLOBALS['dbSQL']->getAll();
				if(is_array($rs)&&count($rs)>0)
				{
					return $rs;
				}
			}
			//----------------------------------------
			return false;
		} 
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= CODE_RESULT_ERROR_FATAL;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			logTrace(debug_backtrace(),$e->__toString());
			return false;
		}
	}
	
	function loadDeclaracionJuaradaCliente(&$resultInfo)
	{
		try
		{
			$output = "";
			//print_r($_REQUEST);die;

			if( isset($_REQUEST["token"])  		&&
				!empty($_REQUEST["token"])  	&&
				!is_null($_REQUEST["token"])
			)
			{
				$continue = true;
				$userId    = validarTokenFast($resultInfo);

				if($userId&&is_numeric($userId))
				{
					$familiarInfo=false;
					$resultado = getDeclaracionJurada($userId,$familiarInfo);
					
					if( $resultado )
					{
						$resultInfo['code'] = 0;
						$resultInfo['data'] = $resultado;
					}
					else
					{
						$resultInfo['code'] = 1;
						$resultInfo['errorDes'] = "Se produjo un error al grabar la declaracion jurada";
					}
				}
				else
				{
					$resultInfo['code'] = 1;
					$resultInfo['errorDes'] = "Se produjo un error al grabar la declaracion jurada";
				}	
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se encontraron campos obligatorios vacíos/faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"getStripePaymentToken","error"=>$e->__toString()));
			return false;
		}
	}

	function loadhXCliente(&$resultInfo)
	{
		try
		{
			$output = "";
			//print_r($_REQUEST);die;

			if( isset($_REQUEST["token"])  		&&
				!empty($_REQUEST["token"])  	&&
				!is_null($_REQUEST["token"])
			)
			{
				$continue = true;
				$userId    = validarTokenFast($resultInfo);

				if($userId&&is_numeric($userId))
				{
					$familiarInfo	= false;
					$diagnosticos 	= array();
					$diagnosticosFL = array();
					
					$resultado = getLD_Hx($userId,$diagnosticos,$diagnosticosFL);

					if( $resultado )
					{
						$resultInfo['code'] = 0;
						$resultInfo['data'] = array( "resultado" 		=> $resultado
													,"listDiagnosticos"	=> $diagnosticos
													,"listDiagFL"	=> $diagnosticosFL
						);

						return true;
					}
					else
					{
						$resultInfo['code'] 	= 2;
						$resultInfo['errorDes'] = "Se produjo un error al consultar la Hx del paciente";
					}
				}
				else
				{
					$resultInfo['code'] = 1;
					$resultInfo['errorDes'] = "Se produjo un error al grabar la declaracion jurada";
				}	
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se encontraron campos obligatorios vacíos/faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"getStripePaymentToken","error"=>$e->__toString()));
			return false;
		}
	}
	/*function gethX(&$resultInfo)
	{
		
		$cliente 	  	= false;
		$diagnosticos 	= array();
		$diagnosticosFL = array();

		if( isset($_REQUEST["cli"])   &&
			!empty($_REQUEST["cli"])  &&
			!is_null($_REQUEST["cli"])
		)
		{

			$cliente  = $_REQUEST["cli"];
			$rango = false;


			$resultado = getLD_Hx($cliente,$diagnosticos,$diagnosticosFL);

			if( $resultado )
			{
				$resultInfo['code'] = 0;
				$resultInfo['data'] = array( "resultado" 		=> $resultado
											,"listDiagnosticos"	=> $diagnosticos
											,"listDiagFL"	=> $diagnosticosFL
				);

				return true;
			}
			else
			{
				$resultInfo['code'] 	= 2;
				$resultInfo['errorDes'] = "Se produjo un error al consultar la Hx del paciente";
			}
		}
		else
		{
			$resultInfo['code'] 	= 1;
			$resultInfo['errorDes'] = "Parámetros incompletos";
		}

		return false;
	}
	*/
	
	function getMedicoBroker($tipoAt)
	{
		$medico = MEDICO_GENERICO_SMI;
		$fecha  = date("Y-m-d");
		
		//Buscar Medicos girlla de hoy
		$lstMedicos = getMedicosGrillaHoy($fecha,$tipoAt);
		
		if($lstMedicos!=EMPTY_LST)
		{
			//Buscar si se loguearon hoy y no salieron
			$lstMedicosDisponibles = getMedicosLogueados($lstMedicos);
			
			//Se encontraron medicos para hoy
			$medicoSel = getMedicoBalanceador($fecha,$lstMedicosDisponibles);
			
			if($medicoSel)
			{
				$medico = $medicoSel;
			}
		}
		else
		{
			//No se enconraron medicos hoy	
			//Buscar medicos logueados
			$lstMedicosDisponibles = getMedicosLogueados();
			
			//Se encontraron medicos para hoy
			$medicoSel = getMedicoBalanceador($fecha,$lstMedicosDisponibles);
			
			if($medicoSel)
			{
				$medico = $medicoSel;
			}
		}

		return $medico;
	}
	
	function registrarTurnoSMIDE($userId,&$profinfo,&$familiarInfo,&$sesion='')
	{	
		
		$userinfo = getCustomerInfo($userId);
		//print_r($userinfo);die;
		
		//VALIDAR ESTADO DE 

		//Actualizacion del numerador de Turnos
		$sql = "UPDATE [codigos] SET [num_ultimo] = [num_ultimo] + 1, [num_fecha] = GETDATE() WHERE [num_codigo] = 4";
		
		$rs = $GLOBALS['dbSQL']->Query($sql,true);
		if ( $rs ) 
		{			
			$sql = "SELECT [num_ultimo]
					  FROM dbo.[codigos]
					 WHERE num_codigo = 4";
			
			$rsN = $GLOBALS['dbSQL']->Query($sql);
			if ( $rsN )
			{
				$conta=0;

				$rsN = $GLOBALS['dbSQL']->getAll();
				foreach($rsN as $row)
				{
					$idTurno = $row["num_ultimo"];
					$conta++;
				}
				
				if( $conta > 0 )
				{
					$dataTurno["obs"] = '(SELECT [par_obsp] FROM dbo.[empresa])';
					$dataTurno["plan"] = '(SELECT [par_obpp] FROM dbo.[empresa])';
					
					// $fecha = date("Y-m-d.H:i:s",strtotime($dataTurno["fecha"]));
					// $fecha = str_replace(".","T",$fecha).".000";

					$medico			= $GLOBALS['SMI_MED_TEST'];//getMedicoBroker(); //TODO
					$dni 			= '1000000'; //UN NRO CUALQUIERA YA QUE POR AHORA NO PEDIMOS DNI (04/08/2023)
					$planCustomer	= $userinfo[0]["obspcod"];//$GLOBALS['SMI_OBS_PLAN_TEST'];//TODO
					$sesiontelemed	= md5(date("YmdHis").$idTurno.$userId);
					$sesion			= $sesiontelemed;
					// ,'.($dataTurno["ff"]?$dataTurno["cliecod"]:'NULL').'
					
					$motivo = '';
					if(	isset($_REQUEST["motivo"])		&&
						!empty($_REQUEST["motivo"])		&&
						!is_null($_REQUEST["motivo"])
						
					)
					{
						$motivo = trim($_REQUEST["motivo"]);
					}

					//Insertar el turno
					$sql = "INSERT INTO dbo.turnos
								   (
									tur_numero
								   ,tur_fecha
								   ,tur_hora
								   ,med_codigo
								   ,cli_codigo
								   ,cli_dni
								   ,obs_codigo
								   ,obsp_cod
								   ,usu_codigo
								   ,tur_asiste
								   ,tur_impobs
								   ,tur_impart
								   ,inos_cod
								   ,nom_codigo
								   ,tur_telemed
								   ,tur_costo
								   ,tur_token
								   ,cli_codigo_padre
								   ,tur_telemed_sesion
								   ,tur_telemed_confirmado
								   ,tur_telemed_estado
								   ,tur_telemed_fechasolicita
								   ,tur_telemed_motivo
								)
							VALUES
								   (
								   ". $idTurno."
								   ,GETDATE()
								   ,convert(smallint, ". date("Hi").")
								   ,". $medico ."
								   ,". $userId ."
								   ,'". $dni ."'
								   ,". $GLOBALS['SMI_OBS'] ."
								   ,". $planCustomer ."
								   ,99
								   ,0
								   ,0
								   ,0
								   ,(SELECT [pra_codigo] FROM dbo.[empresa])
								   ,(SELECT [nom_codigo] FROM dbo.[empresa])
								   ,1
								   ,0
								   ,'".getComTurnoToken($idTurno,false)."'
								   ,NULL
								   ,'".$sesiontelemed."'
								   ,0
								   ,0
								   ,GETDATE()
								   ,'".addslashes($motivo)."'
								)";
					$tursql = $sql;
					//print_r($sql);die(" spider ");
					$rsI = $GLOBALS['dbSQL']->Query($sql,true);
					
					if ( $rsI ) 
					{
						return true;
						/*
						if(isset($_SESSION['obsNoCoincide']))		{ unset($_SESSION['obsNoCoincide']);}
						if(isset($_SESSION['obsUmbralAlcanzado']))	{ unset($_SESSION['obsUmbralAlcanzado']);}
						if(isset($_SESSION['obsOBS_Bloqueada']))	{ unset($_SESSION['obsOBS_Bloqueada']);}
						*/
						
						// //Actualizar el ultimo acceso del cliente						
						// $sql = "UPDATE [clientes] SET [cli_utlimoingresoweb] = GETDATE() WHERE [cli_dni] = " . $dataTurno["dni"];
		
						// $rsC = $GLOBALS['dbSQL']->Query($sql,true);
						// if ( !$rsC ) 
						// {
							// //Warning
							// //Fallo actualizacion de Ultimo Acceso
						// }
						
						/*
						if($GLOBALS['EMAIL_DEBUG']&&false)//spider
						{
							$data=array();
							$data['paciente']='['.($familiar ? $_SESSION['GF']['codP'] : $_SESSION['codP']).'] '.($familiar ? $_SESSION['GF']['name'] : $_SESSION['name']);
							$data['dni']=($familiar ? $_SESSION['GF']['dni'] : $_SESSION['dni']);
							$data['familiar']=($familiar ? 'SI' : 'NO');
							$data['email']=(isset($_SESSION['email']) && trim($_SESSION['email'])!='' ? $_SESSION['email'] : '');
							$data['turnoId']=$idTurno;
							$data['medico']='['.$medData[0].']'.$medData[3].' '.$medData[1];
							$data['osocial']=$dataTurno[2];
							$data['plan']=$dataTurno[3];
							$data['fechaT']=str_replace('00:00:00',$dataTurno[1],$fecha);
							sendDebugEmail($data,CONFIRMAR_TURNO_OK,true);
						}
						*/
						
						// $dataTurno["idTurno"] = $idTurno;
						// $dataTurno["email"] = $email;
						
						
						//Enviar Email de Confirmacion
						if( $GLOBALS['EMAIL_CUSTOMER'] )
						{
						//if( $dataTurno["dni"]=='27249289' )
						//{
							//sendEmailConfirmacionWs(TYPE_EMAIL_CT, $idTurno);
						//}
						}

						//print_r($dataTurno);die;
						$res = 0;
						//return 0;
					}
					else
					{
						//Error insertar turno [3]
						$res = 4;
						//return 4;
					}
				}
				else
				{
					//Error recuperar numerador
					$res = 3;
					//return 3;
				}
			}
			else
			{
				//Error recuperar numerador
				$res = 2;
				//return 2;
			}
		}
		else
		{
			//Error al actualizar numerador
			$res = 1;
			//return 1;
		}
		

		if( is_null($res) )
		{ 
			$res = -1;
		}
		
		return false;
		
		//print_r($dataTurno);die("   -------  ");
		/*
		$pacienteData 	= getPacienteInfo((isset($dataTurno["idPaciente"])?$dataTurno["idPaciente"]:0));
		$medData 		= getMedicoInfo((isset($dataTurno["medico"])?$dataTurno["medico"]:0));
		$obsData 		= getNombreObraSocial((isset($dataTurno["obs"])?$dataTurno["obs"]:0));
		$planData 		= getNombrePlan((isset($dataTurno["obs"])?$dataTurno["obs"]:0),(isset($dataTurno["plan"])?$dataTurno["plan"]:0));
		*/

		if( $res !== 0 )
		{
			// if($GLOBALS['LOG_ERROR'])		
			// {
				// $data=array();
				// $data['paciente']	= '['. (isset($dataTurno["idPaciente"])?$dataTurno["idPaciente"]:0).'] '. $pacienteData[1];
				// $data['dni']		= $pacienteData[0];
				// $data['familiar']	= 'NO';
				// $data['email']		= $pacienteData[2];
				// $data['turnoId']	= (isset($idTurno) ? $idTurno : '<null>');
				// $data['medico']		= '['.$medData[0].']'.$medData[3].' '.$medData[1];
				// $data['osocial']	= '['.$dataTurno["obs"].']'. $obsData;
				// $data['plan']		= '['.$dataTurno["plan"].']'. $planData;
				// $data['fechaT']		= $dataTurno['fecha'];
				// $data['error']		= $res;
			
				// if($GLOBALS['EMAIL_DEBUG']&&false)
				// { 
					// sendDebugEmail($data,CONFIRMAR_TURNO_ERROR,false);
				// }//spider

				// if( $GLOBALS['LOG_SPECIAL'] )
				// {	//Log Especial
					// $resultLogEspecial = registrarLogSpecial($data, __FUNCTION__, true,(isset($tursql) ? $tursql : ''));
				// }
			// }
		}
		else
		{
			// $msj = '';
			// $msj.= 'TIPO EMAIL:<b>[ '. CONFIRMAR_TURNO_OK  . " ]</b><br/><br/>". "\n";	
			// $msj.= 'Paciente:   '. '['. $dataTurno["idPaciente"].'] '. $pacienteData[1] . "<br/><br/>". "\n";	
			// $msj.= 'DNI:        '. $pacienteData[0] . "<br/><br/>". "\n";
			// $msj.= 'Email:      '. $pacienteData[2] . "<br/><br/>". "\n";
			// $msj.= 'Es Familiar:'. ' - ' . "<br/><br/>". "\n";
			// $msj.= 'Id Turno:   '. $idTurno . "<br/><br/>". "\n";
			// $msj.= 'Medico:     '. '['.$medData[0].']'.$medData[3].' '.$medData[1] . "<br/><br/>". "\n";
			// $msj.= 'O. Social:  '. '['.$dataTurno["obs"].']'. $obsData . "<br/><br/>". "\n";
			// $msj.= 'Plan:       '. '['.$dataTurno["plan"].']'. $planData . "<br/><br/>". "\n";
			// $msj.= 'Fecha Turno:'. $dataTurno['fecha'] . "<br/><br/>". "\n";
			// $msj.= 'Fecha:      '. date('d/m/Y H:i:s') . "<br/><br/>". "\n";
			// $msj.= 'Resultado:<b>[ OK ]</b><br/><br/>'. "\n";
		
			// $resultLog = registrarLogTurnosEnArchivo($msj);
		}

		return $res;
		//return false;
	}
	
	function registrarTurnoDemandaEspontanea(&$resultInfo)
	{
		try
		{
			$output = "";
			//print_r($_REQUEST);die;

			if( isset($_REQUEST["token"])  		&&
				!empty($_REQUEST["token"])  	&&
				!is_null($_REQUEST["token"])
			)
			{
				$continue = true;
				$userId    = validarTokenFast($resultInfo);

				if($userId&&is_numeric($userId))
				{
					$familiarInfo	= false;
					$profinfo 		= array();
					
					if(isset($_REQUEST["fmcod"]))
					{
						$familiarInfo = $_REQUEST["fmcod"];
					}
					
					//print_r("cod[$userId]");die(" <<<ok ");
					$resultado = registrarTurnoSMIDE($userId,$profinfo,$familiarInfo,$sesion);

					if( $resultado )
					{//die("46654");
						$resultInfo['code'] = 0;
						$resultInfo['data'] = array( "resultado" 	=> 1
													,"sesion"		=> $sesion
						);

						return true;
					}
					else
					{//die("xxxxx");
						$resultInfo['code'] 	= 2;
						$resultInfo['errorDes'] = "Se produjo un error al solicitar la atencion";
					}
				}
				else
				{
					$resultInfo['code'] = 1;
					$resultInfo['errorDes'] = "Se produjo un error al solicitar la atencion";
				}	
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se produjo un error al solicitar la atencion";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			//saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"getStripePaymentToken","error"=>$e->__toString()));
			return false;
		}
	}

	function getHcPacienteSMI($idcliente)
	{
		$result = array(
			 "hc"		=> array()
		);

		$sql = "SELECT 	cli_id AS id, 
						FORMAT ( cd_fecha, 'dd/MM/yyyy' )  as fecha,
						FORMAT(cd_fecha,'dd/MM/yyyy HH:mm:ss') AS fechahora,
						e.cd_observ as evo,
						m.med_nombre as med,
						es.esp_denom as esp,
						(CASE WHEN ti.tit_abrev IS NULL THEN '' ELSE ti.tit_abrev END) as tit,
						ISNULL(cd_encode,0) as flagencode,
						ISNULL(cd_derivacion,0) as flagderivacion
				  FROM  cli_diagnosticos as e
			INNER JOIN	clientes as c ON c.cli_codigo = e.cli_codigo 
			INNER JOIN	medicos as m ON m.med_codigo = e.med_codigo
			 LEFT JOIN	especial AS es ON  m.esp_codigo = es.esp_codigo
			 LEFT JOIN	tbl_titulos AS ti ON  ti.tit_codigo = m.tit_codigo 
			 LEFT JOIN	obrasoc as o ON  o.obs_codigo = c.obs_codigo
				 WHERE  c.cli_codigo = '".addslashes($idcliente)."'
				   
				ORDER BY cd_fecha DESC";

		$rs = $GLOBALS['dbSQL']->Query($sql);
				
		if ( !$rs ) 
		{
			return false; 
		}
		
		$outPut = array();
		$counter=0;

		$result["hc"] = $GLOBALS['dbSQL']->getAll();

		return $result;
	}

	// --------------------------------------------
	// END - SMI
	// --------------------------------------------

	//--------------------------------
	//STRIPE
	//--------------------------------
	function saveStripResponse(&$resultInfo)
	{
		$resultInfo=false;
		$result = handlersStripResponse($resultInfo);
		
		if($result)
		{
			$resultInfo['code'] = 0;
			$resultInfo['data'] = 1;
		}
		else
		{
			$resultInfo['code'] 	= 2;
			$resultInfo['errorDes'] = "Se produjo un error al precesar el pago. Si ud cree que debe reclamar el pago, por favor envie un email a '' con información del pago: Su nombre, email, fecha del pago y monto, le responderemos la brevedad.";
		}
	}

	function grabarLogStripe($data,$titulo)
	{
		try
		{
			$filePath = './logsStripe/';
			$file     = $filePath.'stripe_'.$titulo."_".date("Ymd_H_i_s").".log";
			file_put_contents($file, print_r($data,true));
		}
		catch ( Exception $e )
		{
			//Error: al ejecutar el metodo
			//print_r($e->__toString());die;
			return false;
		}
	}

	function validarCustomerSecret($secret)
	{
		try
		{
			$sql = "SELECT  clispay_numero,
							cli_codigo,
							obs_codigo,
							obsplan
					  FROM  dbo.cli_stripe_payments
					 WHERE  clispay_token = '".addslashes($secret)."'";
			
			//print_r($sql);print_r("\n");
			$rs = $GLOBALS['dbSQL']->Query($sql);
			if ( $rs ) 
			{
				$paymetinfo = $GLOBALS['dbSQL']->getAll();
				if(is_array($paymetinfo)&&count($paymetinfo)>0)
				{
					//return $paymetinfo[0]["clispay_numero"];
					return $paymetinfo[0];
				}
			}

			return false;
		}
		catch (Exception $e)
		{
			//saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"createStripeToken","error"=>$e->__toString()));
			return false;
		}
	}
	
	function getTransactionNro()
	{
		try
		{
			$sql = "SELECT MAX(clispay_nro) as nro
					  FROM dbo.cli_stripe_payments";
			
			//print_r($sql);print_r("\n");
			$rs = $GLOBALS['dbSQL']->Query($sql);
			if ( $rs ) 
			{
				$paymetinfo = $GLOBALS['dbSQL']->getAll();
				if(is_array($paymetinfo)&&count($paymetinfo)>0)
				{
					if(!is_null($paymetinfo[0]["nro"])&&!empty($paymetinfo[0]["nro"])&&is_numeric(intval($paymetinfo[0]["nro"])))
					{
						//print_r("--1--[".$paymetinfo[0]["nro"]."]");die;
						return (intval($paymetinfo[0]["nro"])+1);
					}
					// else
					// {
						// print_r("--0--[".$paymetinfo[0]["nro"]."]");die;
					// }
					
					// print_r($paymetinfo);die;
					// return (intval($paymetinfo[0]["nro"])+1);
				}
			}

			return $GLOBALS['STRIPE_TR_INI'];
		}
		catch (Exception $e)
		{
			//saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"createStripeToken","error"=>$e->__toString()));
			return $GLOBALS['STRIPE_TR_INI'];
		}
	}
	
	function saveCustomerPaymentResponse($paymentInfo,$response,$flagResponse,&$resultInfo)
	{
		try
		{
			$continue = true;
			$flagTransactionInit = false;
			
			$trannro = getTransactionNro();
			//print_r("trannro[$trannro]");die;
			
			if( setConeccionTransaccion() )
			{
				$flagTransactionInit = true;
				$GLOBALS['dbSQLTR']->setBeginTransaction();
				
				$exito = ($flagResponse?$GLOBALS['STRIPE_RESPONSE_FLAG_OK']:$GLOBALS['STRIPE_RESPONSE_FLAG_ERR']);

				//MARCAR LA RESPUESTA EXITOSA/ERROR DEL PAGO
				$sql = "  UPDATE  dbo.cli_stripe_payments
							 SET  clispay_respuesta 	  = GETDATE()
								 ,clispay_response  	  = '".addslashes(print_r($response,true))."'
								 ,clispay_payment_intent  = '".addslashes($response[1]["payment_intent"])."'
								 ,clispay_success   	  = ".$exito."
								 ,clispay_nro			  = ".$trannro."
						   WHERE  clispay_numero = ". $paymentInfo["clispay_numero"];
					   
				$resultado = $GLOBALS['dbSQLTR']->QueryTR($sql,true);
				if ( !$resultado ) 
				{
					//print_r($sql);print_r("\n");//die;
					$res = $GLOBALS['dbSQLTR']->setRollbackTransaction();
					$continue = false;
					$resultInfo['code'] 	= -1;
					$resultInfo['errorDes'] = "Error al actualizar la respuesta del pago";
				}
				
				//MARCAR EL FLAG DE PLAN DEL CLIENTE COMO PAGADO SI FUE EXITOSO
				// Y ASOCIAR LA OBS Y PLAN AL CLIENTE
				if( $continue && $exito==$GLOBALS['STRIPE_RESPONSE_FLAG_OK'] )
				{
					$sql = "  UPDATE   dbo.clientes
								 SET   cli_val_plan = 0
									  ,obs_codigo  = ".$paymentInfo["obs_codigo"]."
									  ,obsp_cod	   = ".$paymentInfo["obsplan"]."
							   WHERE  cli_codigo   = ".$paymentInfo["cli_codigo"];
						   
					$resultado = $GLOBALS['dbSQLTR']->QueryTR($sql,true);
					if ( !$resultado ) 
					{
						//print_r($sql);print_r("\n");//die;
						$res = $GLOBALS['dbSQLTR']->setRollbackTransaction();	
						$continue = false;
						$resultInfo['code'] 	= -1;
						$resultInfo['errorDes'] = "Error al actualizar el estado de plan del cliente";
					}
				}

				if( $continue  )
				{
					$res = $GLOBALS['dbSQLTR']->setCommitTransaction();
					$resultInfo['code'] = 0;
					$resultInfo['data'] = array("tranro"=>$trannro);
					return true;
				}

				$resultInfo['code'] 	= 2;
				$resultInfo['errorDes'] = "Error al grabar la respueta del pago - [Codigo 1002]";
				return false;
			}
			else
			{
				$resultInfo['code'] 	= 1;
				$resultInfo['errorDes'] = "Error al grabar la respueta del pago - [Codigo 1001]";
			}

			return false;
		}
		catch (Exception $e)
		{
			if( $flagTransactionInit )
			{
				$GLOBALS['dbSQLTR']->setRollbackTransaction();
			}
			
			$resultInfo['code'] 	= CODE_RESULT_ERROR_FATAL;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			
			//saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"createStripeToken","error"=>$e->__toString()));
			return false;
		}
	}

	function handlersStripResponse(&$resultInfo)
	{
		try
		{
			$flagResultado = false;
			$contunie	   = true;
			
			//OBTENER LOS PARAMETROS RECIBIDOS
			$payload 	   = @file_get_contents('php://input');
			$event 		   = null;
			$debug_point   = "--dp--1"."\n";
			
			$params = array();
			
			if(isset($_REQUEST))
			{
				$params = $_REQUEST;
			}
			else
			{
				$contunie=false;
			}
			
			$debug_point="--dp--2"."\n";
			
			if($contunie)
			{
				$data = array(
					 0 => $payload
					,1 => $params
					,2 => $debug_point
				);

				$titulo = "result_transaction";

				//GRABAR LOG DE LA RESPUESTA EN UN ARCHIVO
				$res = grabarLogStripe($data,$titulo);
			}
			$debug_point="--dp--3"."\n";
			
			
			//VERIFICAR SI ESTA DEFINIDO EL INDICE DEL TOKEN
			//VERIFICAR SI EL TOKEN EXISTE
			if($contunie && isset($data[1]["payment_intent_client_secret"]))
			{
				$paymentInfo = validarCustomerSecret($data[1]["payment_intent_client_secret"]);
				
				if(!$paymentInfo){$contunie=false;}
			}
			else
			{
				$contunie=false;
			}
			$debug_point="--dp--4"."\n";

			//VERIFICAR SI ESTA DEFINIDO EL INDICE DE LA RESPUESTA
			if($contunie && isset($data[1]["redirect_status"]))
			{
				//VERIFICAR SI LA RESPUESTA ES EXITOSA
				if( strtolower(trim($data[1]["redirect_status"])) == $GLOBALS['STRIPE_RESPONSE_OK'])
				{
					$flagResultado = true;
				}
			}
			$debug_point="--dp--5"."\n";
			
			
			
			//GRABAR EL RESULTADO
			if($contunie)
			{
				$data[2] = $debug_point;

				$resultSave = saveCustomerPaymentResponse($paymentInfo,$data,$flagResultado,$resultInfo);
			
			}
			$debug_point="--dp--6"."\n";
			
			
			
			/*
			Array
			(
				[0] => 
				[1] => Array
					(
						[payment_intent] => pi_3NF25XEmHHULHVKu0CmcSl0b
						[payment_intent_client_secret] => pi_3NF25XEmHHULHVKu0CmcSl0b_secret_V8AZQK5OLkdYWovpgsFpTFODQ
						[redirect_status] => succeeded
					)
			)
			
			*/
			
			
			
			/*print_r("-------------------------");print_r("\n");
			print_r("RESPUESTA");print_r("\n");
			print_r("-------------------------");print_r("\n");
			print_r($data);print_r("\n");*/
			
			return true;
		}
		catch (Exception $e)
		{
			//saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"createStripeToken","error"=>$e->__toString()));
			$titulo="stripe_error_handlersStripResponse_";
			if(!isset($data))
			{
				$data = array(
						 0 => $e->__toString()
						,1 => $debug_point
						,2 => $_REQUEST
					);
			}
			else
			{
				$data[2] = $debug_point;
				$data[3] = $e->__toString();
			}
			
			
			$res = grabarLogStripe($data,$titulo);
			return false;
		}
	}

	function getPlanCod($plan)
	{
		$planCod = false;

		switch($plan)
		{
			case $GLOBALS['PLSMIBLUE1']:{$planCod = $GLOBALS['PLSMIBLUE1_COD'];}break;
			case $GLOBALS['PLSMIBLUE2']:{$planCod = $GLOBALS['PLSMIBLUE2_COD'];}break;
			case $GLOBALS['PLSMIBLUE3']:{$planCod = $GLOBALS['PLSMIBLUE3_COD'];}break;
			default: 					{return false;}break;
		}

		return $planCod;
	}

	function getPlanInfo($plan)
	{
		$sql = "SELECT  obs_codigo
					   ,obsp_cod
					   ,obsp_denom
					   ,plan_coseg
					   ,obsp_orden
					   ,obsp_importe
					   ,(CASE WHEN obsp_fam_adul IS NULL THEN 0 ELSE obsp_fam_adul END) AS obsp_fam_adul
					   ,(CASE WHEN obsp_fam_pedia IS NULL THEN 0 ELSE obsp_fam_pedia END) AS obsp_fam_pedia
				  FROM dbo.obsplan
				 WHERE obs_codigo  = " . $GLOBALS['SMI_OBS']." 
				   AND obsp_cod    = " . $plan;

		//print_r($sql);print_r("\n");//die;
		$rs = $GLOBALS['dbSQL']->Query($sql);
		
		if ( !$rs ) 
		{ 
			return false; 
		}

		$rs = $GLOBALS['dbSQL']->getAll();
		//print_r("c[".count($rs)."]");print_r("\n");die;
		if(is_array($rs)&&count($rs)>0){return $rs;}
		
		return false;
	}
	
	function saveLogCreateStripPayment($clicod,$type,$info)
	{
		try
		{
			if(isset($GLOBALS['LOG_STRIPE'])&&$GLOBALS['LOG_STRIPE'])
			{
				switch($type)
				{
					case STRIPE_LOG_TYPE_INI:{$typelog="create_token_";}break;
					case STRIPE_LOG_TYPE_OK:{$typelog="success_";}break;
					case STRIPE_LOG_TYPE_ERROR:{$typelog="error_";}break;
					
				}

				$fichero = './logsStripe/'.$typelog.$clicod.'_'.(date('dmY_His')).'.log';
				$actual = "FECHA[".date('Y-m-d_H:i:s')."]\n";
				$actual.= print_r($info,true)."\n";
				// Escribe el contenido al fichero
				file_put_contents($fichero, $actual);
			}
		}
		catch ( Exception $e ) 
		{
			return false;
		}
	}
	
	function createStripeToken($clicod,$importe)
	{
		try
		{
			$output = "";

			\Stripe\Stripe::setApiKey( $GLOBALS['STRIPESECRETKEY'] );
			
			// Create a PaymentIntent with amount and currency
			$paymentIntent = \Stripe\PaymentIntent::create([
				'amount' => 99.00,//$importe,
				'currency' => 'usd',
				//'automatic_payment_methods' => ['enabled' => true,]
				'payment_method_types' => ['card'],
			]);

			$output = [
				'clientSecret' => $paymentIntent->client_secret,
			];
			
			saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_INI,array("token"=>$output));
			
			return $output;
		}
		catch (Exception $e)
		{
			saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"createStripeToken","error"=>$e->__toString()));
			return false;
		}
	}
	
	function getStripeToken($clicod,$plan,&$resultInfo)
	{
		try
		{
			//print_r($_REQUEST);die;
			
			$continue   	= true;
			$output = "";
			
			//$token			= $_REQUEST["token"]);
			//print_r($clave);die;
			//$customerInfo=false;
			$idCliente = getCustomerById($clicod,$customerInfo);
			
			if(!$idCliente)
			{
				$resultInfo['code'] = 4;
				$resultInfo['data'] = array("res"=>"Se produjo un error iniciar el proceso de cobro con STRIPE");
				saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"getCustomerById","error"=>$e->__toString()));
			}
			else
			{
				$planInfo  = getPlanInfo(getPlanCod($plan));

				if($planInfo)
				{
					$importe = 100.00;//number_format($planInfo[0]["obsp_importe"], 2, '.', '');

					$striptoken = createStripeToken($clicod,$importe);
					
					// print_r($clicod);print_r("\n");
					// print_r($planInfo);print_r("\n");
					// print_r($striptoken);print_r("\n");

					if($striptoken)
					{
						$sql = "INSERT INTO dbo.cli_stripe_payments 
											(
												 cli_codigo
												,clispay_token
												,clispay_inicio
												,clispay_respuesta
												,clispay_response
												,clispay_success
												,clispay_importe
												,obs_codigo
												,obsplan
											)
									VALUES (
												 ".$clicod."
												,'".$striptoken["clientSecret"]."'
												,GETDATE()
												,NULL
												,NULL
												,0
												,".$importe."
												,".$GLOBALS['SMI_OBS']."
												,".$planInfo[0]["obsp_cod"]."
											)";

						//print_r($sql);print_r("\n");//die;
						$rs = $GLOBALS['dbSQL']->Query($sql,true);
						if ( $rs ) 
						{
							$resultInfo['code'] = 0;
							$resultInfo['data'] = array("stoken"=>$striptoken);
						}
						else
						{
							$resultInfo['code'] = 3;
							$resultInfo['data'] = array("res"=>"Se produjo un error iniciar el proceso de cobro con STRIPE");
							saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"sql","extra"=>$sql,"error"=>print_r($resultInfo,true)));
						}
					}
					else
					{
						$resultInfo['code'] = 2;
						$resultInfo['data'] = array("res"=>"Se produjo un error iniciar el proceso de cobro con STRIPE");
						//saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"striptoken","error"=>$e->__toString()));
					}
				}
				else
				{
					$resultInfo['code'] = 1;
					$resultInfo['data'] = array("res"=>"Se produjo un error iniciar el proceso de cobro con STRIPE");
					saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"planInfo","error"=>print_r($resultInfo,true)));
				}
			}
		}
		catch (Exception $e)
		{
			saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"getStripeToken","error"=>$e->__toString()));
			return false;
		}
	}
	
	function getStripePaymentToken(&$resultInfo)
	{
		try
		{
			$output = "";
			//print_r($_REQUEST);die;

			if( isset($_REQUEST["plan"])  		&&
				!empty($_REQUEST["plan"])  		&&
				!is_null($_REQUEST["plan"])		&&
				
				isset($_REQUEST["token"])  		&&
				!empty($_REQUEST["token"])  	&&
				!is_null($_REQUEST["token"])
			)
			{
				$continue = true;
				$userId    = validarTokenFast($resultInfo);

				if($userId&&is_numeric($userId))
				{
					$resultInfo = false;
					$resultado = getStripeToken($userId,$_REQUEST["plan"],$resultInfo);
				}
				else
				{
					$resultInfo['code'] = 1;
					$resultInfo['errorDes'] = "Se produjo un error al iniciar el proceso de pago";
				}	
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Se encontraron campos obligatorios vacíos/faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			saveLogCreateStripPayment($clicod,STRIPE_LOG_TYPE_ERROR,array("token"=>$output,"dpoint"=>"getStripePaymentToken","error"=>$e->__toString()));
			return false;
		}
	}

	// --------------------------------------------
	// END - STRIPE
	// --------------------------------------------

	function vendedorSMIInfo(&$userInfo)
	{	//print_r($userInfo);die;
		$userInfo[0]["flSMI"] 		= 0;
		$userInfo[0]["flSMIVen"] 	= 0;
		$userInfo[0]["flSMIVenAd"]  = 0;
		$userInfo[0]["flSMIDual"]   = 0;
		if(	is_array($userInfo)	&&
			count($userInfo)>0	&&
			isset($userInfo[0]["emp_dual"])
		)
		{
			$userInfo[0]["flSMIDual"]   = intval($userInfo[0]["emp_dual"]);
		}
		
		if(is_array($userInfo)&&count($userInfo)>0)
		{
			$sql = "SELECT  ven_codigo
					  FROM  empleado_vendedor
					 WHERE  emp_codigo = '".$userInfo[0]["emp_codigo"]."'";

			//print_r($sql);print_r("\n");die;
			$rsV = $GLOBALS['dbSQL']->Query($sql);

			if ( $rsV ) 
			{
				$vendedorInfo = $GLOBALS['dbSQL']->getAll();

				if(is_array($vendedorInfo)&&count($vendedorInfo)>0)
				{
					$sql = "SELECT   ven_activo
									,ISNULL(ven_codigo_padre,0) AS ven_codigo_padre
									,ISNULL(ven_admin,0) AS ven_admin
							  FROM  vendedores
							 WHERE  ven_codigo = '".$vendedorInfo[0]["ven_codigo"]."'";

					//print_r($sql);print_r("\n");die;
					$rs = $GLOBALS['dbSQL']->Query($sql);

					if ( $rs ) 
					{
						$vendedorInfo = $GLOBALS['dbSQL']->getAll();
						if(is_array($vendedorInfo)&&count($vendedorInfo)>0)
						{
							$userInfo[0]["flSMI"] 	   = 1;
							$userInfo[0]["flSMIVen"]   = 1;
							$userInfo[0]["flSMIVenAd"] = ($vendedorInfo[0]["ven_admin"]==1?1:0);
						}
					}
				}
			}
		}
	}

	
	//----------------------------------------------
	// ARCOS
	//----------------------------------------------
	//ARCOS PROF
	function getValidarProfArcos($email,$doc, $mat, &$cod, &$name, &$dni, &$sexo, &$telefono, &$alerta, &$fnac, &$cesp, &$tit)
	{
		//AND e.emp_email = m.med_email
		
		//print_r("c[$clave]m[".md5($clave)."]");die;
		$sql = "SELECT   med_dni 		AS DNI
						,med_codigo 	AS COD
						,med_nombre 	AS NOMBRE
						,med_mp 		AS MATRICULA
						,med_email 		AS EMAIL
						,med_tel 		AS TEL
						,med_fecnto 	AS FNAC
						,med_webcoment AS COMW
						,es.esp_denom 	AS ESP
						,ti.tit_abrev 	AS TIT
				  FROM  medicos as m
			LEFT JOIN	tbl_titulos AS ti 	ON ti.tit_codigo = m.tit_codigo 
			LEFT JOIN	especial AS es 		ON m.esp_codigo = es.esp_codigo
			INNER JOIN  empleado as e 		ON e.emp_codigo = m.usu_mapeo
				 WHERE  med_email  = '".addslashes($email)."'
				   AND  med_dni    = '".addslashes($doc)."'";

		//print_r($sql);die;
		$rs = $GLOBALS['dbSQL']->Query($sql);
				
		if ( $rs ) 
		{
			$result = $GLOBALS['dbSQL']->getAll();

			if( count($result)>0 )
			{
				$cod		= $result[0]['COD'];
				$name		= trim($result[0]['NOMBRE']);
				$email		= $result[0]['EMAIL'];
				$sexo		= '';
				$telefono	= trim($result[0]['TEL']);
				$alerta		= trim($result[0]['COMW']);
				$fnac		= $result[0]['FNAC'];
				$cesp		= $result[0]['ESP'];
				$tit		= $result[0]['TIT'];
				return $result;
			}
		}
		
		return false; 
	}
	
	
	function loginProfArcos(&$resultInfo)
	{
		$email = $_REQUEST["email"];
		$dni   = $_REQUEST["clave"];

		$resultInfo['code'] = 0;
		
		/*if( is_numeric($dni) )
		{*/
			$name		= "";
			$codP		= -1;
			$nombre		= false;
			$sexo		= false;
			$telefono	= false;
			$alerta		= false;
			$fnac		= false;
			$cesp		= false;
			$tit		= false;
			$mat		= '';

			$resultado = getValidarProfArcos($email,$dni,$mat,$codP,$nombre,$dni,$sexo,$telefono,$alerta,$fnac,$cesp,$tit);
			// print_r($resultado);die;

			if( $resultado )
			{
				$userInfo['dni']   	= $dni;
				$userInfo['mat']    = $mat;
				$userInfo['cod']    = $codP;
				$userInfo['name']	= $nombre;
				$userInfo['email']	= $email;
				$userInfo['sexo']	= $sexo;
				$userInfo['tel']	= $telefono;
				$userInfo['fnacd']	= date("d",strtotime($fnac));
				$userInfo['fnacm']	= date("m",strtotime($fnac));
				$userInfo['fnaca']	= date("Y",strtotime($fnac));
				$userInfo['cweb']	= $alerta;
				$userInfo['cesp']	= $cesp;
				$userInfo['tit']	= $tit;
				$userInfo['hoy']	= date("d/m/Y");
				
				//$turnos = getCountListProfTurnos($codP);
				$userInfo['turnos']	= 0;//$turnos;
				
				$userInfo['ld']		= false;//getIsProfesionalLDOnline($codP);
				
				$userInfo['ldpi']	= '';//-->getProfesionalLDPicture($codP);
				
				$userInfo['token']	= getToken('p',$codP,$nombre,$email);

				$resultInfo['code'] = 0;
				$resultInfo['data'] = array("userinfo" => $userInfo );
				//print_r($resultInfo);die;
				
				//Save log acceso
				savelogaccesoProfesional(array("cod"=>$codP,"type"=>"I"));

				return true;
			}
			else
			{
				$resultInfo['code'] 	= 1;
				$resultInfo['errorDes'] = "Email y Nro. de documento inválidos. No esta registrado.";
			}
		/*}
		else
		{
			$resultInfo['code'] = 2;
			$resultInfo['errorDes'] = "DNI inv&aacute;lido. No es numerico";
		}*/
		return false;
	}

	function getMinutosEspera($record)
	{
		$minutos = intval($record["esperamin"]);
		$horas   = intval($record["esperahoras"]);
 
		if($horas>0)
		{
			$minresta = $horas*60;
			$minutos = $minutos - $minresta;
			
			$calculo = $horas.'hrs '.$minutos.'min';
		}
		else
		{
			if($minutos>=0)
			{
				$calculo = $minutos.'min';
			}
			else
			{
				$calculo = '';
			}
		}
 
		return $calculo;
		
	}
	
	function getListProfTurnosTelemedicinaArcos()
	{
		//LISTAR TURNOS DE TELEMEDICINA DEL PROFESIONAL
		if(  isset($_REQUEST["idpro"])  	&&
			!empty($_REQUEST["idpro"])  	&&
			!is_null($_REQUEST["idpro"]) 	&&
			is_numeric($_REQUEST["idpro"])
		)
		{
			$error=false;
			//$turnoInfo 	 = getTurnoInfo($_REQUEST["idtur"],$error);

			/*if($turnoInfo)
			{*/
				$profesional = $_REQUEST["idpro"];//$turnoInfo["medcod"];
				
				$flagAtendidos = false;
				if(  isset($_REQUEST["fat"])  	&&
					!empty($_REQUEST["fat"])  	&&
					!is_null($_REQUEST["fat"]) 	&&
					is_numeric($_REQUEST["fat"])
				)
				{
					$flagAtendidos = true;
				}
				
				$rango = false;
				
				if(  isset($_REQUEST["rfd"])      &&
					 !empty($_REQUEST["rfd"])     &&
					 !is_null($_REQUEST["rfd"])   &&
					 
					 isset($_REQUEST["rfh"])      &&
					 !empty($_REQUEST["rfh"])     &&
					 !is_null($_REQUEST["rfh"])
				)
				{
					$rango = array();
					$rango[0] = str_replace(".","-",$_REQUEST["rfd"]);
					$rango[1] = str_replace(".","-",$_REQUEST["rfh"]);
					
					if( strtotime($rango[0])===false  || 
						strtotime($rango[1])===false)
					{
						$rango = false;
					}
				}
				
				$fecha = date("Y-m-d");
			
				if(  isset($_REQUEST["fecha"])  	&&
					!empty($_REQUEST["fecha"])  	&&
					!is_null($_REQUEST["fecha"])
				)
				{
					$fecha = $_REQUEST["fecha"];
				}

				if( $rango )
				{
					$desde = date("Y-m-d",strtotime($rango[0]));
					$hasta = date("Y-m-d",strtotime($rango[1]));

					$rs['fecha']  = $desde . ' - ' . $hasta;
					//$periodo = " AND ( t.tur_fecha BETWEEN '". $desde ."' AND '". $hasta ."' )";
					$periodo = " AND ( LEFT(CONVERT(VARCHAR,t.tur_fecha, 120), 10) BETWEEN LEFT(CONVERT(VARCHAR,'".$desde."', 120), 10) AND LEFT(CONVERT(VARCHAR,'".$hasta."', 120), 10) )";
				}
				else
				{
					$rs['fecha'] = $fecha;
					//$periodo = " AND ( t.tur_fecha BETWEEN '". $fecha ."' AND '". $fecha ."' )";
					$periodo = " AND ( LEFT(CONVERT(VARCHAR,t.tur_fecha, 120), 10) BETWEEN LEFT(CONVERT(VARCHAR,'".$fecha."', 120), 10) AND LEFT(CONVERT(VARCHAR,'".$fecha."', 120), 10) )";
				}

				if(!$flagAtendidos)
				{
					// ,DATEDIFF(MINUTE, CAST(CONCAT(CAST(t.tur_fecha AS DATE),' ',STUFF(RIGHT('0000' + CAST(t.tur_hora AS VARCHAR(4)), 4), 3, 0, ':'),':00')AS DATETIME), GETDATE()) AS esperamin
					// ,DATEDIFF(HOUR, CAST(CONCAT(CAST(t.tur_fecha AS DATE),' ',STUFF(RIGHT('0000' + CAST(t.tur_hora AS VARCHAR(4)), 4), 3, 0, ':'),':00')AS DATETIME), GETDATE()) AS esperahoras
					
					//AND  (CASE WHEN tur_telemed_sesion IS NULL THEN 0 ELSE 1 END) = 1 !!REVISAR POR ERA NECESARIO ESTA CLAUSULA
					//AND  tur_asiste    = 0
					// ,ISNULL((SELECT  COUNT(*)
											   // FROM  turnos AS tt
											  // WHERE  tt.cli_codigo = t.cli_codigo
												// AND  tt.tur_telemed  = 1
												// AND  (CASE WHEN tt.tur_telemed_sesion IS NULL THEN 0 ELSE 1 END) = 1
												// AND  ISNULL(tt.tur_telemed_confirmado,0) = 1
												// AND  ISNULL(tt.tur_telemed_estado,0)     = 0
									// ),0) as atenciones
					
					
					
					$sql = "SELECT    e.esp_denom AS Esp
									, m.med_nombre AS Med
									, CONVERT(VARCHAR(10),t.tur_fecha,103) AS Fec
									, o.obs_denom AS Obs
									, op.obsp_denom AS Plan_
									, t.tur_hora AS Hor
									, t.tur_numero AS CodT
									, t.med_codigo AS idMed
									, tt.tit_abrev AS Tit
									, t.cli_codigo As ID_PACIENTE
									, c.cli_nombre AS PACIENTE
									, dbo.GetAge(c.cli_fecnto) AS edad
									, c.cli_tel AS telefono
									, c.cli_email AS email
									, t.tur_atendido AS atendido
									, t.tur_asiste AS asistio
									, t.tur_visado AS espera
									, t.tur_asiste_hora AS horallegada
									,(CASE WHEN t.tur_telemed IS NULL THEN 0 ELSE ((CASE WHEN t.tur_telemed = 0 THEN 0 ELSE 1 END)) END) AS Telemed
									,tur_confirmado as tcnf
									,(CASE WHEN t.tur_telemed_motivo IS NULL THEN (CASE WHEN tur_comen IS NULL THEN '-' ELSE tur_comen END) ELSE t.tur_telemed_motivo end) as motivo
									,datediff(minute, t.tur_telemed_fechasolicita, GETDATE()) AS minitosespera
									,FORMAT(t.tur_telemed_fechasolicita, 'yyyy-MM-dd HH:mm:ss') AS fsol
									,FORMAT(t.tur_telemed_fechasolicita, 'MM/dd/yyyy HH:mm:ss') AS fsolt
									,ISNULL((SELECT  COUNT(*)
											   FROM  turnos AS tt
											  WHERE  tt.cli_codigo = t.cli_codigo
												AND  tt.tur_telemed  = 1
												AND  tt.tur_atendido = 1
									),0) as atenciones
									,ISNULL((SELECT  COUNT(*)
											   FROM  turnos AS tt
											  WHERE  tt.cli_codigo = t.cli_codigo
												AND  tt.tur_telemed  = 1
												AND  tt.tur_atendido = 1
												AND  ISNULL(tt.tur_telemed_confirmado,0) = 1
												AND  ISNULL(tt.tur_telemed_estado,0)     = 0
									),0) as atencionesTM
									, (CASE WHEN c.cli_sexo IS NULL THEN '' 
										WHEN c.cli_sexo = 'M' THEN 'MASCULINO' ELSE 'FEMENINO' END)	AS sexo
									, c.cli_sexo AS sexoA
									,DATEDIFF(HOUR, CONCAT(CONVERT(VARCHAR(19),CAST(t.tur_fecha AS DATE),120),' ',STUFF(RIGHT('0000' + CAST(t.tur_hora AS VARCHAR(4)), 4), 3, 0, ':'),':00') ,GETDATE()) AS esperahoras
									,DATEDIFF(MINUTE, CONCAT(CONVERT(VARCHAR(19),CAST(t.tur_fecha AS DATE),120),' ',STUFF(RIGHT('0000' + CAST(t.tur_hora AS VARCHAR(4)), 4), 3, 0, ':'),':00') ,GETDATE()) AS esperamin
									,CONCAT(CONVERT(VARCHAR(10),t.tur_fecha,103),' ',STUFF(RIGHT('0000' + CAST(t.tur_hora AS VARCHAR(4)), 4), 3, 0, ':')) AS fh
									,ISNULL(tur_telemed_finanormal,0) AS estado
									,CONCAT(CAST(t.tur_fecha AS DATE),' ',STUFF(RIGHT('0000' + CAST(t.tur_hora AS VARCHAR(4)), 4), 3, 0, ':'),':00') AS tf0 

							  FROM  turnos AS t
						INNER JOIN  medicos AS m	ON t.med_codigo = m.med_codigo
						INNER JOIN  especial AS e	ON m.esp_codigo = e.esp_codigo
						INNER JOIN  tbl_titulos tt	ON tt.tit_codigo = m.tit_codigo
						INNER JOIN  clientes AS c	ON t.cli_codigo = c.cli_codigo
						INNER JOIN 	obrasoc AS o	ON t.obs_codigo = o.obs_codigo
						INNER JOIN  obsplan As op	ON t.obs_codigo = op.obs_codigo AND t.obsp_cod = op.obsp_cod
							 WHERE  t.med_codigo  = ".$profesional."
									".$periodo."
							   AND  t.cli_codigo  <> 1
							   AND  t.tur_telemed = 1
							   AND  tur_atendido  = 0
							   AND  ISNULL(tur_telemed_confirmado,0) = 0
							   AND  ISNULL(tur_telemed_estado,0)     = 0
						  ORDER BY  t.tur_registracion";
				}
				else
				{
					//AND  tt.tur_asiste   = 1
					//AND  (CASE WHEN tur_telemed_sesion IS NULL THEN 0 ELSE 1 END) = 1 !!REVISAR POR ERA NECESARIO ESTA CLAUSULA
					//ORDER BY  t.tur_registracion
					$sql = "SELECT    e.esp_denom AS Esp
								, m.med_nombre AS Med
								, CONVERT(VARCHAR(10),t.tur_fecha,103) AS Fec
								, o.obs_denom AS Obs
								, op.obsp_denom AS Plan_
								, t.tur_hora AS Hor
								, t.tur_numero AS CodT
								, t.med_codigo AS idMed
								, tt.tit_abrev AS Tit
								, t.cli_codigo As ID_PACIENTE
								, c.cli_nombre AS PACIENTE
								, dbo.GetAge(c.cli_fecnto) AS edad
								, c.cli_tel AS telefono
								, c.cli_email AS email
								, t.tur_atendido AS atendido
								, t.tur_asiste AS asistio
								, t.tur_visado AS espera
								, t.tur_asiste_hora AS horallegada
								,(CASE WHEN t.tur_telemed IS NULL THEN 0 ELSE ((CASE WHEN t.tur_telemed = 0 THEN 0 ELSE 1 END)) END) AS Telemed
								,tur_confirmado as tcnf
								,(CASE WHEN t.tur_telemed_motivo IS NULL THEN (CASE WHEN tur_comen IS NULL THEN '-' ELSE tur_comen END) ELSE t.tur_telemed_motivo end) as motivo
								,datediff(minute, t.tur_telemed_fechasolicita, GETDATE()) AS minitosespera
								,FORMAT(t.tur_telemed_fechasolicita, 'yyyy-MM-dd HH:mm:ss') AS fsol
								,FORMAT(t.tur_telemed_fechasolicita, 'MM/dd/yyyy HH:mm:ss') AS fsolt
								,ISNULL((SELECT  COUNT(*)
											   FROM  turnos AS tt
											  WHERE  tt.cli_codigo = t.cli_codigo
												AND  tt.tur_telemed  = 1
												AND  tt.tur_atendido = 1
									),0) as atenciones
									,ISNULL((SELECT  COUNT(*)
											   FROM  turnos AS tt
											  WHERE  tt.cli_codigo = t.cli_codigo
												AND  tt.tur_telemed  = 1
												AND  tt.tur_atendido = 1
												AND  ISNULL(tt.tur_telemed_confirmado,0) = 1
												AND  ISNULL(tt.tur_telemed_estado,0)     = 0
									),0) as atencionesTM
								,FORMAT(t.tur_telemed_fechaatencioninicia, 'dd/MM/yyyy HH:mm:ss') AS fini
								,DATEDIFF(minute,tur_telemed_fechaatencioninicia, tur_telemed_fechaatencionfin) as durmin
								,ISNULL(tur_telemed_fderiva,0) as fder
								, (CASE WHEN c.cli_sexo IS NULL THEN '' 
										WHEN c.cli_sexo = 'M' THEN 'MASCULINO' ELSE 'FEMENINO' END)	AS sexo
								, c.cli_sexo AS sexoA
								,0 AS esperamin
								,0 AS esperahoras
								,CONCAT(CONVERT(VARCHAR(10),t.tur_fecha,103),' ',STUFF(RIGHT('0000' + CAST(t.tur_hora AS VARCHAR(4)), 4), 3, 0, ':')) AS fh
								,ISNULL(tur_telemed_finanormal,0) AS estado
								,CONCAT(CAST(t.tur_fecha AS DATE),' ',STUFF(RIGHT('0000' + CAST(t.tur_hora AS VARCHAR(4)), 4), 3, 0, ':'),':00') AS tf0 
						  FROM  turnos AS t
					INNER JOIN  medicos AS m	ON t.med_codigo = m.med_codigo
					INNER JOIN  especial AS e	ON m.esp_codigo = e.esp_codigo
					INNER JOIN  tbl_titulos tt	ON tt.tit_codigo = m.tit_codigo
					INNER JOIN  clientes AS c	ON t.cli_codigo = c.cli_codigo
					INNER JOIN 	obrasoc AS o	ON t.obs_codigo = o.obs_codigo
					INNER JOIN  obsplan As op	ON t.obs_codigo = op.obs_codigo AND t.obsp_cod = op.obsp_cod
						 WHERE  t.med_codigo  = ".$profesional."
								".$periodo."
						   AND  t.cli_codigo  <> 1
						   AND  t.tur_telemed = 1
						   AND  tur_atendido  = 1
						   AND  ISNULL(tur_telemed_confirmado,0) = 1
					  ORDER BY  33";
				}
				//ORDER BY  t.tur_fecha, t.tur_hora";

				//if(intval($_REQUEST["idpro"])==319){print_r($sql);die;}
				//print_r($sql);die;
				$resultado = $GLOBALS['dbSQL']->Query($sql);
				//print_r($rs);die;
				if ( !$resultado ) 
				{
					return false; 
				}

				$resultado = $GLOBALS['dbSQL']->getAll();

				$rs['total'] = 0;
				
				$rs['fecha'] = date("d/m/Y", strtotime($rs['fecha']));

				if( is_array($resultado)&&count($resultado) > 0 )
				{
					if(!$flagAtendidos)
					{
						for($i=0,$t=count($resultado);$i<$t;$i++)
						{
							$resultado[$i]["esperamin"] = getMinutosEspera($resultado[$i]);
						}
					}
					$rs['turnos'] = $resultado;
					$rs['total']  = count($resultado);
				}
			//}

			return $rs;
		}
		else
		{
			return false;
		}
	}
	
	function getLstTurnosTelemedicinaArcos(&$resultInfo)
	{
		$resultado = getListProfTurnosTelemedicinaArcos();
		
		if( $resultado )
		{
			//Listar turnos pendientes del profesional
			$resultInfo['code'] = 0;
			$resultInfo['data'] = array(  "total"   	=> $resultado['total']
										 ,"listTurnos" 	=> (isset($resultado['turnos'])?$resultado['turnos']:'')
										 ,"fecha" 		=> $resultado['fecha']
			);
		}
		else
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Se produjo un error al consultar los turnos";
		}
	}
	
	
	function finalizarSessionVideoArcos($idTurno,$flagAnormal,&$resultInfo)
	{
		$sql = "UPDATE turnos 
				   SET tur_telemed_confirmado = 1,
					   tur_telemed_fechaatencionfin = GETDATE(),
					   tur_asiste = 1,
					   tur_atendido=1,
					   tur_telemed_finanormal = '". addslashes(intval($flagAnormal))."'
			     WHERE tur_numero  = '".addslashes($idTurno)."'";
		//print_r($sql);print_r("\n");
		$rs = $GLOBALS['dbSQL']->Query($sql,true);
				
		if ( !$rs ) 
		{
			//Retornar token y sesion
			$resultInfo['code'] = 1;
			$resultInfo['errorDes'] = "Error al actualizar la Sesion";
			return false; 
		}
		else
		{
			//GRABAR HX
			saveHxSMI($idTurno);
		}
		
		
		//Retornar token y sesion
		$resultInfo['code'] = 0;
		$resultInfo['data'] = 1;
		
		return true;
	}
	
	function endSessionVideoArcos(&$resultInfo)
	{
		try
		{
			if( 
				// isset($_REQUEST["sesid"])  	&&
				// !empty($_REQUEST["sesid"])  &&
				// !is_null($_REQUEST["sesid"])
				
				isset($_REQUEST["tnro"])  	&&
				!empty($_REQUEST["tnro"])  &&
				!is_null($_REQUEST["tnro"])
			)
			{
				$resultInfo = false;
				$resultado = finalizarSessionVideoArcos($_REQUEST["tnro"],$_REQUEST["fa"],$resultInfo);

				if( !$resultado )
				{
					$resultInfo['code'] = 2;
					$resultInfo['errorDes'] = "Sistema no disponible";
				}
			}
			else
			{
				$resultInfo['code'] = 1;
				$resultInfo['errorDes'] = "Parametros faltantes";
			}
			
			return true;
		}
		catch ( Exception $e ) 
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Error:".($e->__toString());
			return false;
		}
	}
	
	function getListClientesArcos()
	{
		//LISTAR PACIENTES
		$flagCod = false;
		if(  isset($_REQUEST["cod"])  	&&
			!empty($_REQUEST["cod"])  	&&
			!is_null($_REQUEST["cod"]) 	&&
			is_numeric($_REQUEST["cod"])
		)
		{
			$flagCod = $_REQUEST["cod"];
		}
		
		$flagDoc = false;
		if(  isset($_REQUEST["doc"])  	&&
			!empty($_REQUEST["doc"])  	&&
			!is_null($_REQUEST["doc"]) 	&&
			is_numeric($_REQUEST["doc"])
		)
		{
			$flagDoc = $_REQUEST["doc"];
		}

		if($flagCod)
		{
			$where = " cli_codigo = '".addslashes($flagCod)."'";
			
		}
		else
		{
			$where = " cli_dni = '".addslashes($flagDoc)."'";
		}

		$sql = "SELECT        c.cli_codigo As cod
							, c.cli_nombre AS paciente
							, dbo.GetAge(c.cli_fecnto) AS edad
							, c.cli_tel AS telefono
							, c.cli_email AS email
							, (CASE WHEN c.cli_sexo IS NULL THEN '' 
								WHEN c.cli_sexo = 'M' THEN 'MASCULINO' ELSE 'FEMENINO' END)	AS sexo
							, c.cli_sexo AS sexoA
							,c.cli_dni as doc
					  FROM  clientes AS c
				INNER JOIN 	obrasoc AS o	ON c.obs_codigo = o.obs_codigo
				INNER JOIN  obsplan As op	ON c.obs_codigo = op.obs_codigo AND c.obsp_cod = op.obsp_cod
					 WHERE  ".$where."
				  ORDER BY  2";

		//print_r($sql);die;
		$resultado = $GLOBALS['dbSQL']->Query($sql);
		//print_r($rs);die;
		if ( !$resultado ) 
		{
			return false; 
		}

		$resultado = $GLOBALS['dbSQL']->getAll();

		$rs['total'] = 0;
		
		if( is_array($resultado)&&count($resultado) > 0 )
		{
			$rs['clientes'] = $resultado;
			$rs['total']    = count($resultado);
			return $rs;
		}
		
		return false;
	}
	
	function getLstClientesByCodDocArcos(&$resultInfo)
	{
		$resultado = getListClientesArcos();
		
		if( $resultado )
		{
			//Listar turnos pendientes del profesional
			$resultInfo['code'] = 0;
			$resultInfo['data'] = array(  "total"   	=> $resultado['total']
										 ,"listClientes"=> (isset($resultado['clientes'])?$resultado['clientes']:array())
			);
		}
		else
		{
			$resultInfo['code'] 	= 0;
			$resultInfo['errorDes'] = "Se produjo un error al consultar los pacientes";
		}
	}
	//----------------------------------------------
	
?>