"; $cantletras=(int)$cantletras; for($i=0;$i<=$cantletras;$i=$i+1){ $x=substr($var1,$i,1); //echo "la letra ".$i." es ".$x."
"; //echo "el caracter buscado es: ".$caracter."
"; if ($x==(string)$caracter){ $cont=$cont + 1; //echo " si se cumplio lo de sumar 1 al contador y vale ahora mismo: ".$cont; } } } function validar_clave($fpasscliente,&$error_encontrado,&$f2){ //echo "fpasscliente:".$fpasscliente." fpasscliente2: ".$f2." error encontrado: ".$error_encontrado; if(strlen($fpasscliente) < 6){ $error_encontrado = "La clave debe tener al menos 6 caracteres"; return false; } if(strlen($fpasscliente) > 16){ $error_encontrado = "La clave no puede tener mas de 16 caracteres"; return false; } //validad espacios en blanco aqui if($fpasscliente != $f2){ $error_encontrado = "Las claves no coinciden, favor de verificarlas"; //echo $fpasscliente; //echo $f2; return false; } $caracter=" "; comprobar_ciclo($fpasscliente,$caracter,$cont); if ($cont>=1){ $error_encontrado="La clave no debe de contener espacios, favor de verificarla"; return false; } $cuenta=0; $permitidos = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789-_@."; $cantletras=strlen($fpasscliente); for ($i=0; $istrlen($fpasscliente)){$error_encontrado = "El password contiene caracteres invalidos"; return false;} $validarpass="1"; //echo "se valido el password ".$validarpass; return true; } function validar_mail($fmailcliente,&$error_encontrado2){ if(strlen($fmailcliente)<5) { $error_encontrado2="Introduce un mail valido, mail muy corto"; return false; } if(strlen($fmailcliente)>45) { $error_encontrado2="Introduce un mail valido. Mail muy largo"; return false; } $caracter="."; comprobar_ciclo($fmailcliente,$caracter,$cont); if ($cont==0){ $error_encontrado2=" Escribe un mail valido, falta signo de puntuacion"; return false; } $cont=0; $mail=strlen($fmailcliente); $mail=(int)$mail; for($i=0;$i<=$mail;$i++){ $x=substr($fmailcliente,$i,1); //echo $x; if ($x=="@"){ $cont=$cont + 1; } } if ($cont<>1){ $error_encontrado2= " El email debe de contener @"; return false; } //compruebo que los caracteres sean los permitidos $cuenta=0; $permitidos = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789-_@."; $cantletras=strlen($fmailcliente); for ($i=0; $istrlen($fmailcliente)){$error_encontrado2="El e-mail contiene caracteres invlaidos"; return false;} $validarmail="1"; //echo "se valido el mail".$validarmail; $error_encontrado2=""; return true; } //FUNCION PARA ENVIAR CORREO POR OLVIDO function mandar_correo_olvido($fmailcliente){ $destinatario = $fmailcliente; $asunto = "RECUPERACION PASSWORD TERAPEUTAS EN LINEA"; $cuerpo = " CORREO DE RECUPERACION DE PASSWORD DE TERAPEUTASENLINEA.COM

CONFIRMA TU CORREO

Este es un mensaje de recuperacion de password enviado desde terapeutasenlinea.com,
Da clic en el vinculo que esta a continuacion para confirmar que necesitas recuperar el password y que tu hiciste la peticion.
En caso de recibir este correo sin haber hecho una peticion de recuperacion de contraseña a terapeutasenlinea.com favor de ignorarlo
Clic aqui para recuperar tu correo

"; //para el envío en formato HTML $headers = "MIME-Version: 1.0\r\n"; $headers .= "Content-type: text/html; charset=iso-8859-1\r\n"; //dirección del remitente $headers .= "From: TERAPEUTASENLINEA.COM \r\n"; //dirección de respuesta, si queremos que sea distinta que la del remitente //$headers .= "Reply-To: mariano@desarrolloweb.com\r\n"; //ruta del mensaje desde origen a destino $headers .= "Return-path: fallocorreo@terapeutasenlinea.com\r\n"; //direcciones que recibián copia //$headers .= "Cc: maria@desarrolloweb.com\r\n"; //direcciones que recibirán copia oculta $headers .= "Bcc: mailfalso@terapeutasenlinea.com,vgorena@gmail.com\r\n"; mail($destinatario,$asunto,$cuerpo,$headers) ; } //TERMNA LA FUNCIO DE ENVIAR CORRE POR OLVIDO function validar_plan($ftipocliente,&$error_encontrado3){ $ftipocliente=(string)$ftipocliente; switch ($ftipocliente){ case "1": //echo "Elegiste el Plan 1
"; $validarplan="1"; $error_encontrado3=""; return true; break; case "2": //echo "Elegiste el Plan 2
"; $validarplan="2"; $error_encontrado3=""; return true; break; case "3": //echo "Elegiste el Plan 3
"; $validarplan="3"; $error_encontrado3=""; return true; break; default: //echo "Por favor elige un tipo de plan"; $error_encontrado3="No has elegido aun un plan, regresa y elige uno"; return false; break; } } function mandar_correo_conf($fmailcliente,$nombre_pantalla){ $destinatario = $fmailcliente; $asunto = "Mensaje de confirmacion de correo"; $cuerpo = " CORREO DE CONFIRMACION DE INSCRIPCION A TERAPEUTASENLINEA.COM

CONFIRMA TU CORREO

Este es un mensaje de confirmacion enviado desde terapeutasenlinea.com,
Da clic en el vinculo que esta a continuacion para confirmar que este es tu correo y que tu hiciste la suscripcion.
En caso de recibir este correo sin haber hecho una suscripcion a terapeutasenlinea.com favor de ignorarlo
Clic aqui para confirmar tu correo

"; //para el envío en formato HTML $headers = "MIME-Version: 1.0\r\n"; $headers .= "Content-type: text/html; charset=iso-8859-1\r\n"; //dirección del remitente $headers .= "From: TERAPEUTASENLINEA.COM \r\n"; //dirección de respuesta, si queremos que sea distinta que la del remitente //$headers .= "Reply-To: mariano@desarrolloweb.com\r\n"; //ruta del mensaje desde origen a destino $headers .= "Return-path: fallocorreo@terapeutasenlinea.com\r\n"; //direcciones que recibián copia //$headers .= "Cc: maria@desarrolloweb.com\r\n"; //direcciones que recibirán copia oculta $headers .= "Bcc: mailfalso@terapeutasenlinea.com,vgorena@gmail.com\r\n"; mail($destinatario,$asunto,$cuerpo,$headers) ; } function mandar_mail($fmailcliente,$numeroaleatorio){ $destinatario = $fmailcliente; $asunto = "Mensaje de confirmacion de correo"; $cuerpo = " CORREO DE REESTABLECIMIENTO DE CONTRASEÑA

ESTE ES EL LINK PARA REESTABLECER TU CONTRASEÑA

Este es un mensaje de reestablecimiento de contraseña ha sido enviado desde terapeutasenlinea.com,
Da clic en el vinculo que esta a continuacion para reestablecer la contraseña y que tu hiciste la peticion.
En caso de recibir este correo sin haber hecho una peticion de reestablecer la contraseña a terapeutasenlinea.com favor de ignorarlo
Clic aqui para reestablecer tu contraseña

"; //para el envío en formato HTML $headers = "MIME-Version: 1.0\r\n"; $headers .= "Content-type: text/html; charset=iso-8859-1\r\n"; //dirección del remitente $headers .= "From: TERAPEUTASENLINEA.COM \r\n"; //dirección de respuesta, si queremos que sea distinta que la del remitente //$headers .= "Reply-To: mariano@desarrolloweb.com\r\n"; //ruta del mensaje desde origen a destino $headers .= "Return-path: fallocorreo@terapeutasenlinea.com\r\n"; //direcciones que recibián copia //$headers .= "Cc: maria@desarrolloweb.com\r\n"; //direcciones que recibirán copia oculta $headers .= "Bcc: mailfalso@terapeutasenlinea.com,vgorena@gmail.com\r\n"; mail($destinatario,$asunto,$cuerpo,$headers) ; } //funcion de mandar correo a terapeuta function mandar_mailter($mailterapeuta,$nombreterapeuta,$nombrepaciente,$drt,$dnumt,$mes,$anio,$hpter){ $destinatario = $mailterapeuta; $asunto = "Te han agendado una cita en terapeutasenlinea.com"; $cuerpo = " AVISO DE CITA AGENDADA PARA EL $drt $dnumt de $mes de $anio a las $hpter horas

$nombreterapeuta: el paciente $nombrepaciente te ha reservado una cita

Felicidades! te han agendado una cita nueva el dia $drt $dnumt de $mes de $anio, a las $hpter horas
Para ver la nueva cita, ve a tu panel de control que se accesa desde terapeutasenlinea.com
usando tu e-mail de inscripcion y tu contraseña

En caso de tener algun problema para atender esta cita, en tu panel de control en el boton verde de Agenda Citas, encontraras el registro y el formato para enviar un mail de cancelacion o de cambio de horario.

Recuerda que los pagos se hacen directo a tu cuenta de pay pal o cuenta bancaria, revisalas para saber si ya ha sido pagada.
Si tienes necesidad de comunicarte con tu paciente para algun detalle no olvides accesar a tu panel de control y si necesitas hablar con nuestro equipo de terapeutasenlinea.com agreganos en facebook, siguenos en twitter o manda un whatsapp al +528114183972.

"; //para el envío en formato HTML $headers = "MIME-Version: 1.0\r\n"; $headers .= "Content-type: text/html; charset=iso-8859-1\r\n"; //dirección del remitente $headers .= "From: TERAPEUTASENLINEA.COM \r\n"; //dirección de respuesta, si queremos que sea distinta que la del remitente //$headers .= "Reply-To: mariano@desarrolloweb.com\r\n"; //ruta del mensaje desde origen a destino $headers .= "Return-path: fallocorreo@terapeutasenlinea.com\r\n"; //direcciones que recibián copia //$headers .= "Cc: maria@desarrolloweb.com\r\n"; //direcciones que recibirán copia oculta $headers .= "Bcc: mailfalso@terapeutasenlinea.com,vgorena@gmail.com\r\n"; mail($destinatario,$asunto,$cuerpo,$headers) ; } //funcion de mandar correo a paciente function mandar_mailpac($mailpaciente,$nombreterapeuta,$nombrepaciente,$drp,$dnump,$mes,$anio,$hppac){ $destinatario = $mailpaciente; $asunto = "$nombrepaciente, Has agendado una cita en terapeutasenlinea.com"; $cuerpo = " AVISO DE CITA AGENDADA PARA EL $drp $dnump de $mes de $anio a las $hppac horas

Hola, $nombrepaciente has reservado una cita con $nombreterapeuta

Felicidades! has agendado una cita nueva el dia $drp $dnump de $mes de $anio a las $hppac horas,
Recibiras un correo de recordatorio 24 horas antes de tu cita, para que no la olvides.

En caso de tener algun problema para atender esta cita, necesitas hablar con nuestro equipo de terapeutasenlinea.com agreganos en facebook, siguenos en twitter o manda un whatsapp al 528114183972.
Si el terapeuta $nombreterapeuta tuviera algun problema para atenderla, te lo hara saber a traves de un e-mail, a traves del sitio, terapeutasenlinea no le proporciona el correo al terapeuta
pero si un formulario para escribirte en caso de que tuviera que cancelar o mover la cita

"; //para el envío en formato HTML $headers = "MIME-Version: 1.0\r\n"; $headers .= "Content-type: text/html; charset=iso-8859-1\r\n"; //dirección del remitente $headers .= "From: TERAPEUTASENLINEA.COM \r\n"; //dirección de respuesta, si queremos que sea distinta que la del remitente //$headers .= "Reply-To: mariano@desarrolloweb.com\r\n"; //ruta del mensaje desde origen a destino $headers .= "Return-path: fallocorreo@terapeutasenlinea.com\r\n"; //direcciones que recibián copia //$headers .= "Cc: maria@desarrolloweb.com\r\n"; //direcciones que recibirán copia oculta $headers .= "Bcc: mailfalso@terapeutasenlinea.com,vgorena@gmail.com\r\n"; mail($destinatario,$asunto,$cuerpo,$headers) ; } function crear_cuenta(){ } //FIN DE FUNCIONES $prueba=$_GET['reservarcita']; echo $prueba; if(!isset($_POST['reservarfin'])){ //0reserva final //echo "primero"; if(!isset($_POST['reservar'])){ //1if reservar no esta puesto //echo "segundo"; if($prueba=="si"){ //2if reservarcita si esta puesto se imprimen dias de zh el reservar cita viene de la pagina del terapeuta y es lo primero que se imprime $terapeuta=$_GET['fide']; //echo "tercero"; //echo $terapeuta; echo "
Elige tu hora actual:
"; echo ""; $sumando=1; while ( $sumando <= 12 ) { $h1=$sumando; $hm1=$h1*60; $ms1=$hm1*60; $zh1=gmdate("H:i",time()+($ms1)); $zh="+".$sumando; $zhs=$sumando; echo ""; $sumando ++; } echo "
".$zh1."-
"; echo ""; $sumando=1; while ( $sumando <= 12 ){ $h1=$sumando; $hm1=$h1*60; $ms1=$hm1*60; $zh1=gmdate("H:i",time()-($ms1)); $zh="-".$sumando; $zhs="-".$sumando; echo ""; $sumando ++; } echo "
".$zh1."-
"; }else{ //2if reservarcita no esta puesto ya no se imprimen dias de zh y se imprime calendario de citas $terapeuta=$_POST['terapeuta']; error_reporting(E_COMPILE_ERROR|E_ERROR|E_CORE_ERROR); $zonahorariapaciente=$_POST['zonahorariapaciente']; //echo $zonahorariapaciente; //echo $terapeuta; $username="vgorena"; $password = "Tramontina1014."; $hostname = "bateriaslth.netfirmsmysql.com"; $conectado=mysql_connect($hostname,$username,$password) or die ("Unable to connect"); mysql_select_db("chataux",$conectado); $consulta= "SELECT * FROM login WHERE (idcliente='$terapeuta' ) "; $hacerConsulta= mysql_query($consulta,$conectado); $numregistros=mysql_num_rows ($hacerConsulta); //echo "el numero de registros fue:".$numeroregistros; if($numregistros==1){ $ret = mysql_fetch_array($hacerConsulta); $ide=$ret[cvecliente]; $zhterapeuta=$ret[zh]; //echo intval($zhterapeuta); //echo "el ide: ".$ide; $lunes=$ret[Lun]; $martes=$ret[Mar]; $miercoles=$ret[Mier]; $jueves=$ret[Jue]; $viernes=$ret[Vie]; $sabado=$ret[Sab]; $domingo=$ret[Dom]; //echo $lunes.$martes.$miercoles.$jueves.$viernes.$sabado.$domingo; } if((intval($zonahorariapaciente)>0)&&(intval($zhterapeuta)>0)){$dzh=abs($zonahorariapaciente)-abs($zhterapeuta); $dzh=abs($dzh); if((intval($zhterapeuta))<(intval($zonahorariapaciente))){$numzh='sumar';}else{$numzh='restar';} } if((intval($zonahorariapaciente)<0)&&(intval($zhterapeuta)<0)){$dzh=abs($zonahorariapaciente)-abs($zhterapeuta); $dzh=abs($dzh); if((intval($zhterapeuta))<(intval($zonahorariapaciente))){$numzh='sumar';}else{$numzh='restar';} } if((intval($zonahorariapaciente)<0)&&(intval($zhterapeuta)>0)){$dzh=abs($zonahorariapaciente)+abs($zhterapeuta); $dzh=abs($dzh); $numzh='restar'; } if((intval($zonahorariapaciente)>0)&&(intval($zhterapeuta)<0)){$dzh=abs($zonahorariapaciente)+abs($zhterapeuta); $dzh=abs($dzh); $numzh='sumar'; } if($zhterapeuta<$zonahorariapaciente){$diasumorest=1; } if($zhterapeuta>$zonahorariapaciente){$diasumorest=-1; } if($zhterapeuta==$zonahorariapaciente){$diasumorest=0; } $date=time(); $day=date('d',$date); $month=date('m',$date); $year=date('Y', $date); $first_day=mktime(0,0,0,$month,1,$year); $title = date('F', $first_day) ; $day_of_week = date('D', $first_day) ; switch($day_of_week){ case "Sun": $blank = 0; break; case "Mon": $blank = 1; break; case "Tue": $blank = 2; break; case "Wed": $blank = 3; break; case "Thu": $blank = 4; break; case "Fri": $blank = 5; break; case "Sat": $blank = 6; break; } echo "
Da clic en el dia que necesitas la cita:
"; //$contmes=0; //while($contmes<3){ //0 echo "
"; $month=$month+0; $days_in_month = cal_days_in_month(0, $month, $year) ; switch ($month){ case 1: $mes="Ene"; break; case 2: $mes="Feb"; break; case 3: $mes="Mar"; break; case 4: $mes="Abr"; break; case 5: $mes="May"; break; case 6: $mes="Jun"; break; case 7: $mes="Jul"; break; case 8: $mes="Ago"; break; case 9: $mes="Sep"; break; case 10:$mes="Oct"; break; case 11:$mes="Nov"; break; case 12:$mes="Dic"; break; } echo "
"; echo ""; echo ""; $day_count = 1; echo ""; while ( $blank > 0 ){ echo ""; $blank = $blank-1; $day_count++; } switch($day_count){ case 1 : $dia="Dom"; $dian=1; break; case 2 : $dia="Lun"; $dian=2; break; case 3 : $dia="Mar"; $dian=3; break; case 4 : $dia="Mier"; $dian=4; break; case 5 : $dia="Jue"; $dian=5; break; case 6 : $dia="Vie"; $dian=6; break; case 7 : $dia="Sab"; $dian=7; break; } $day_num = 1; while ( $day_num <= $days_in_month ) { //1 si imprime tabla y se usa el input de pantalla echo ""; $dian++; if($dian<8){ //2 switch($dian){ //3 case 1 : $dia="Dom"; $dian=1; $atiende=$ret[Dom]; if($atiende=='no'){ if($ret[Sab]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Sab'; $drp='Dom';}}} if($ret[Lun]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si'; $drt='Lun'; $drp='Dom';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Sab]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Sab'; $drp='Dom';}else{ $drt='Dom'; $drp='Dom';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Lun]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Lun'; $drp='Dom';}else{ $drt='Dom'; $drp='Dom';}}else{$atiende='no';}} } //echo "el dia: ".$dia."el terapeuta: ".$atiende." atiende"; break; case 2 : $dia="Lun"; $dian=2; $atiende=$ret[Lun]; if($atiende=='no'){ if($ret[Dom]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Dom'; $drp='Lun';}}} if($ret[Mar]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si'; $drt='Mar'; $drp='Lun';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Dom]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Dom'; $drp='Lun';}else{ $drt='Lun'; $drp='Lun';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Mar]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Mar'; $drp='Lun';}else{ $drt='Lun'; $drp='Lun';}}else{$atiende='no';}} } //echo "el dia: ".$dia."el terapeuta: ".$atiende." atiende"; break; case 3 : $dia="Mar"; $dian=3; $atiende=$ret[Mar]; if($atiende=='no'){ $cuentap=0; if($ret[Lun]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } for($i=1;$i<=$dzh;$i++){ $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }$horaproblema++; }if($cuentap>=1){ $atiende='si'; $drt='Lun'; $drp='Mar';}}} if($ret[Mier]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } for($i=$dzh;$i>=0;$i--){ $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }$horasproblema--; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } }if($cuentap>=1){ $atiende='si'; $drt='Mier'; $drp='Mar'; }} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Lun]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Lun'; $drp='Mar';}else{ $drt='Mar'; $drp='Mar';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Mier]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Mier'; $drp='Mar';}else{ $drt='Mar'; $drp='Mar';}}else{$atiende='no';}} } //echo "el dia: ".$dia."el terapeuta: ".$atiende." atiende"; break; case 4 : $dia="Mier"; $dian=4; $atiende=$ret[Mier]; if($atiende=='no'){ if($ret[Mar]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Mar'; $drp='Mier';}}} if($ret[Jue]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si'; $drt='Jue'; $drp='Mier';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Mar]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Mar'; $drp='Mier';}else{ $drt='Mier'; $drp='Mier';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Jue]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Jue'; $drp='Mier';}else{ $drt='Mier'; $drp='Mier';}}else{$atiende='no';}} } //echo "el dia: ".$dia."el terapeuta: ".$atiende." atiende"; break; case 5 : $dia="Jue"; $dian=5; $atiende=$ret[Jue]; if($atiende=='no'){ if($ret[Mier]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Mier'; $drp='Jue';}}} if($ret[Vie]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si'; $drt='Vie'; $drp='Jue';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Mier]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Mier'; $drp='Jue';}else{ $drt='Jue'; $drp='Jue';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Vie]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Vier'; $drp='Jue';}else{ $drt='Jue'; $drp='Jue';}}else{$atiende='no';}} } break; case 6 : $dia="Vie"; $dian=6; $atiende=$ret[Vie]; if($atiende=='no'){ if($ret[Jue]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Jue'; $drp='Vie';}}} if($ret[Sab]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si'; $drt='Sab'; $drp='Vie';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Jue]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Jue'; $drp='Vie';}else{ $drt='Vie'; $drp='Vie';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Sab]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Sab'; $drp='Vie';}else{ $drt='Vie'; $drp='Vie';}}else{$atiende='no';}} } break; case 7 : $dia="Sab"; $dian=7; $atiende=$ret[Sab]; if($atiende=='no'){ if($ret[Vie]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Vie'; $drp='Sab';}}} if($ret[Dom]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si'; $drt='Dom'; $drp='Sab';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Vie]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Vie'; $drp='Sab';}else{ $drt='Sab'; $drp='Sab';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Dom]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Dom'; $drp='Sab';}else{ $drt='Sab'; $drp='Sab';}}else{$atiende='no';}} } break; } //3 }else{ $dian=1; $dia="Dom"; $atiende=$ret[Dom]; if($atiende=='no'){ if($ret[Sab]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Sab'; }}} if($ret[Lun]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Sab]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Sab'; $drp='Dom';}else{ $drt='Dom'; $drp='Dom';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Lun]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Lun'; $drp='Dom';}else{ $drt='Dom'; $drp='Dom';}}else{$atiende='no';}} } } //2 $day_num++; $day_count++; if ($day_count > 7) { echo ""; $day_count = 1; } } //1 final de impresion de tabla? while ( $day_count >1 && $day_count <=7 ) { echo ""; $day_count++; } $space=" "; echo "
$mes $year
DLMMJVS
"; if($day_num>$day){echo ""; }else{ echo ""; } echo "
Siguiente Mes:"; //$contmes++; //}//0 $date=time(); $day=date('d',$date); $month=date('m',$date); $month=$month+1; $year=date('Y', $date); $date2=date_create($year.'-'.$month.'-'.$day); //echo date_format($date2, 'Y-m-d'); $day=date_format($date2,'d'); $month=date_format($date2,'m'); //echo $month; $year=date_format($date2,'Y'); $first_day=mktime(0,0,0,$month,1,$year); $title = date('F', $first_day) ; $day_of_week = date('D', $first_day) ; switch($day_of_week){ case "Sun": $blank = 0; break; case "Mon": $blank = 1; break; case "Tue": $blank = 2; break; case "Wed": $blank = 3; break; case "Thu": $blank = 4; break; case "Fri": $blank = 5; break; case "Sat": $blank = 6; break; } $days_in_month = cal_days_in_month(0, $month, $year) ; switch ($month){ case 1: $mes="Ene"; break; case 2: $mes="Feb"; break; case 3: $mes="Mar"; break; case 4: $mes="Abr"; break; case 5: $mes="May"; break; case 6: $mes="Jun"; break; case 7: $mes="Jul"; break; case 8: $mes="Ago"; break; case 9: $mes="Sep"; break; case 10:$mes="Oct"; break; case 11:$mes="Nov"; break; case 12:$mes="Dic"; break; } echo "
"; echo ""; echo ""; $day_count = 1; echo ""; while ( $blank > 0 ){ echo ""; $blank = $blank-1; $day_count++; } switch($day_count){ case 1 : $dia="Dom"; $dian=1; break; case 2 : $dia="Lun"; $dian=2; break; case 3 : $dia="Mar"; $dian=3; break; case 4 : $dia="Mier"; $dian=4; break; case 5 : $dia="Jue"; $dian=5; break; case 6 : $dia="Vie"; $dian=6; break; case 7 : $dia="Sab"; $dian=7; break; } $day_num = 1; while ( $day_num <= $days_in_month ) { //1 si imprime tabla y se usa el input de pantalla echo ""; $dian++; if($dian<8){ //2 switch($dian){ //3 case 1 : $dia="Dom"; $dian=1; $atiende=$ret[Dom]; if($atiende=='no'){ if($ret[Sab]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Sab'; $drp='Dom';}}} if($ret[Lun]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si'; $drt='Lun'; $drp='Dom';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Sab]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Sab'; $drp='Dom';}else{ $drt='Dom'; $drp='Dom';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Lun]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Lun'; $drp='Dom';}else{ $drt='Dom'; $drp='Dom';}}else{$atiende='no';}} } //echo "el dia: ".$dia."el terapeuta: ".$atiende." atiende"; break; case 2 : $dia="Lun"; $dian=2; $atiende=$ret[Lun]; if($atiende=='no'){ if($ret[Dom]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Dom'; $drp='Lun';}}} if($ret[Mar]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si'; $drt='Mar'; $drp='Lun';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Dom]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Dom'; $drp='Lun';}else{ $drt='Lun'; $drp='Lun';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Mar]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Mar'; $drp='Lun';}else{ $drt='Lun'; $drp='Lun';}}else{$atiende='no';}} } //echo "el dia: ".$dia."el terapeuta: ".$atiende." atiende"; break; case 3 : $dia="Mar"; $dian=3; $atiende=$ret[Mar]; if($atiende=='no'){ $cuentap=0; if($ret[Lun]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } for($i=1;$i<=$dzh;$i++){ $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }$horaproblema++; }if($cuentap>=1){ $atiende='si'; $drt='Lun'; $drp='Mar';}}} if($ret[Mier]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } for($i=$dzh;$i>=0;$i--){ $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }$horasproblema--; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } }if($cuentap>=1){ $atiende='si'; $drt='Mier'; $drp='Mar'; }} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Lun]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Lun'; $drp='Mar';}else{ $drt='Mar'; $drp='Mar';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Mier]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Mier'; $drp='Mar';}else{ $drt='Mar'; $drp='Mar';}}else{$atiende='no';}} } //echo "el dia: ".$dia."el terapeuta: ".$atiende." atiende"; break; case 4 : $dia="Mier"; $dian=4; $atiende=$ret[Mier]; if($atiende=='no'){ if($ret[Mar]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Mar'; $drp='Mier';}}} if($ret[Jue]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si'; $drt='Jue'; $drp='Mier';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Mar]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Mar'; $drp='Mier';}else{ $drt='Mier'; $drp='Mier';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Jue]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Jue'; $drp='Mier';}else{ $drt='Mier'; $drp='Mier';}}else{$atiende='no';}} } //echo "el dia: ".$dia."el terapeuta: ".$atiende." atiende"; break; case 5 : $dia="Jue"; $dian=5; $atiende=$ret[Jue]; if($atiende=='no'){ if($ret[Mier]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Mier'; $drp='Jue';}}} if($ret[Vie]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si'; $drt='Vie'; $drp='Jue';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Mier]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Mier'; $drp='Jue';}else{ $drt='Jue'; $drp='Jue';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Vie]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Vier'; $drp='Jue';}else{ $drt='Jue'; $drp='Jue';}}else{$atiende='no';}} } break; case 6 : $dia="Vie"; $dian=6; $atiende=$ret[Vie]; if($atiende=='no'){ if($ret[Jue]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Jue'; $drp='Vie';}}} if($ret[Sab]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si'; $drt='Sab'; $drp='Vie';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Jue]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Jue'; $drp='Vie';}else{ $drt='Vie'; $drp='Vie';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Sab]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Sab'; $drp='Vie';}else{ $drt='Vie'; $drp='Vie';}}else{$atiende='no';}} } break; case 7 : $dia="Sab"; $dian=7; $atiende=$ret[Sab]; if($atiende=='no'){ if($ret[Vie]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Vie'; $drp='Sab';}}} if($ret[Dom]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si'; $drt='Dom'; $drp='Sab';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Vie]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Vie'; $drp='Sab';}else{ $drt='Sab'; $drp='Sab';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Dom]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Dom'; $drp='Sab';}else{ $drt='Sab'; $drp='Sab';}}else{$atiende='no';}} } break; } //3 }else{ $dian=1; $dia="Dom"; $atiende=$ret[Dom]; if($atiende=='no'){ if($ret[Sab]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Sab'; $drp='Dom'; }}} if($ret[Lun]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Sab]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Sab'; $drp='Dom';}else{ $drt='Dom'; $drp='Dom';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Lun]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Lun'; $drp='Dom';}else{ $drt='Dom'; $drp='Dom';}}else{$atiende='no';}} } } //2 $day_num++; $day_count++; if ($day_count > 7) { echo ""; $day_count = 1; } } //1 final de impresion de tabla? while ( $day_count >1 && $day_count <=7 ) { echo ""; $day_count++; } $space=" "; echo "
$mes $year
DLMMJVS
"; echo "
Siguiente Mes:"; $date=time(); $day=date('d',$date); $month=date('m',$date); $month=$month+2; $year=date('Y', $date); $date2=date_create($year.'-'.$month.'-'.$day); //echo date_format($date2, 'Y-m-d'); $day=date_format($date2,'d'); $month=date_format($date2,'m'); //echo $month; $year=date_format($date2,'Y'); $first_day=mktime(0,0,0,$month,1,$year); $title = date('F', $first_day) ; $day_of_week = date('D', $first_day) ; switch($day_of_week){ case "Sun": $blank = 0; break; case "Mon": $blank = 1; break; case "Tue": $blank = 2; break; case "Wed": $blank = 3; break; case "Thu": $blank = 4; break; case "Fri": $blank = 5; break; case "Sat": $blank = 6; break; } $days_in_month = cal_days_in_month(0, $month, $year) ; switch ($month){ case 1: $mes="Ene"; break; case 2: $mes="Feb"; break; case 3: $mes="Mar"; break; case 4: $mes="Abr"; break; case 5: $mes="May"; break; case 6: $mes="Jun"; break; case 7: $mes="Jul"; break; case 8: $mes="Ago"; break; case 9: $mes="Sep"; break; case 10:$mes="Oct"; break; case 11:$mes="Nov"; break; case 12:$mes="Dic"; break; } echo "
"; echo ""; echo ""; $day_count = 1; echo ""; while ( $blank > 0 ){ echo ""; $blank = $blank-1; $day_count++; } switch($day_count){ case 1 : $dia="Dom"; $dian=1; break; case 2 : $dia="Lun"; $dian=2; break; case 3 : $dia="Mar"; $dian=3; break; case 4 : $dia="Mier"; $dian=4; break; case 5 : $dia="Jue"; $dian=5; break; case 6 : $dia="Vie"; $dian=6; break; case 7 : $dia="Sab"; $dian=7; break; } $day_num = 1; while ( $day_num <= $days_in_month ) { //1 si imprime tabla y se usa el input de pantalla echo ""; $dian++; if($dian<8){ //2 switch($dian){ //3 case 1 : $dia="Dom"; $dian=1; $atiende=$ret[Dom]; if($atiende=='no'){ if($ret[Sab]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Sab'; $drp='Dom';}}} if($ret[Lun]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si'; $drt='Lun'; $drp='Dom';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Sab]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Sab'; $drp='Dom';}else{ $drt='Dom'; $drp='Dom';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Lun]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Lun'; $drp='Dom';}else{ $drt='Dom'; $drp='Dom';}}else{$atiende='no';}} } //echo "el dia: ".$dia."el terapeuta: ".$atiende." atiende"; break; case 2 : $dia="Lun"; $dian=2; $atiende=$ret[Lun]; if($atiende=='no'){ if($ret[Dom]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Dom'; $drp='Lun';}}} if($ret[Mar]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si'; $drt='Mar'; $drp='Lun';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Dom]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Dom'; $drp='Lun';}else{ $drt='Lun'; $drp='Lun';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Mar]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Mar'; $drp='Lun';}else{ $drt='Lun'; $drp='Lun';}}else{$atiende='no';}} } //echo "el dia: ".$dia."el terapeuta: ".$atiende." atiende"; break; case 3 : $dia="Mar"; $dian=3; $atiende=$ret[Mar]; if($atiende=='no'){ $cuentap=0; if($ret[Lun]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } for($i=1;$i<=$dzh;$i++){ $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }$horaproblema++; }if($cuentap>=1){ $atiende='si'; $drt='Lun'; $drp='Mar';}}} if($ret[Mier]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } for($i=$dzh;$i>=0;$i--){ $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }$horasproblema--; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } }if($cuentap>=1){ $atiende='si'; $drt='Mier'; $drp='Mar'; }} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Lun]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Lun'; $drp='Mar';}else{ $drt='Mar'; $drp='Mar';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Mier]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Mier'; $drp='Mar';}else{ $drt='Mar'; $drp='Mar';}}else{$atiende='no';}} } //echo "el dia: ".$dia."el terapeuta: ".$atiende." atiende"; break; case 4 : $dia="Mier"; $dian=4; $atiende=$ret[Mier]; if($atiende=='no'){ if($ret[Mar]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Mar'; $drp='Mier';}}} if($ret[Jue]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si'; $drt='Jue'; $drp='Mier';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Mar]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Mar'; $drp='Mier';}else{ $drt='Mier'; $drp='Mier';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Jue]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Jue'; $drp='Mier';}else{ $drt='Mier'; $drp='Mier';}}else{$atiende='no';}} } //echo "el dia: ".$dia."el terapeuta: ".$atiende." atiende"; break; case 5 : $dia="Jue"; $dian=5; $atiende=$ret[Jue]; if($atiende=='no'){ if($ret[Mier]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Mier'; $drp='Jue';}}} if($ret[Vie]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si'; $drt='Vie'; $drp='Jue';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Mier]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Mier'; $drp='Jue';}else{ $drt='Jue'; $drp='Jue';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Vie]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Vier'; $drp='Jue';}else{ $drt='Jue'; $drp='Jue';}}else{$atiende='no';}} } break; case 6 : $dia="Vie"; $dian=6; $atiende=$ret[Vie]; if($atiende=='no'){ if($ret[Jue]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Jue'; $drp='Vie';}}} if($ret[Sab]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si'; $drt='Sab'; $drp='Vie';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Jue]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Jue'; $drp='Vie';}else{ $drt='Vie'; $drp='Vie';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Sab]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Sab'; $drp='Vie';}else{ $drt='Vie'; $drp='Vie';}}else{$atiende='no';}} } break; case 7 : $dia="Sab"; $dian=7; $atiende=$ret[Sab]; if($atiende=='no'){ if($ret[Vie]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Vie'; $drp='Sab';}}} if($ret[Dom]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si'; $drt='Dom'; $drp='Sab';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Vie]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Vie'; $drp='Sab';}else{ $drt='Sab'; $drp='Sab';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Dom]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Dom'; $drp='Sab';}else{ $drt='Sab'; $drp='Sab';}}else{$atiende='no';}} } break; } //3 }else{ $dian=1; $dia="Dom"; $atiende=$ret[Dom]; if($atiende=='no'){ if($ret[Sab]=='si'){ if($diasumorest==1){ $horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horaproblema++; }if($cuentap>=1){$atiende='si'; $drt='Sab'; }}} if($ret[Lun]=='si'){ if($diasumorest==-1){ $horasproblema=$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;} for($i=$dzh;$i>=0;$i--){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++;}$horasproblema--;if($horasproblema<10){$horaproblema="_0".$horasproblema; }else{$horaproblema="_".$horasproblema;}}if($cuentap>=1){$atiende='si';}} }} else{ $cuentap=0; $cdias='no'; if($diasumorest==1){ $tope=24-$dzh; for($j=1;$j<$tope;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Sab]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Sab'; $drp='Dom';}else{ $drt='Dom'; $drp='Dom';}}else{$atiende='no';}} if($diasumorest==-1){ $inicio=abs($dzh); for($j=$inicio;$j<23;$j++){ $horasproblema=$j; if($horasproblema<10){ $horaproblema="_0".$horasproblema; }else{ $horaproblema="_".$horasproblema; } $horariop=$ret[$horaproblema]; if($horariop=='si'){ $cuentap++; }}if($ret[Lun]=='si'){$horasproblema=24-$dzh; if($horasproblema<10){$horaproblema="_0".$horasproblema;}else{$horaproblema="_".$horasproblema;} for($i=1;$i<=$dzh;$i++){$horariop=$ret[$horaproblema]; if($horariop=='si'){$cuentap++; $cdias='si';}$horaproblema++; }}if($cuentap>=1){ $atiende='si'; if($cdias=='si'){$drt='Lun'; $drp='Dom';}else{ $drt='Dom'; $drp='Dom';}}else{$atiende='no';}} } } //2 $day_num++; $day_count++; if ($day_count > 7) { echo ""; $day_count = 1; } } //1 final de impresion de tabla? while ( $day_count >1 && $day_count <=7 ) { echo ""; $day_count++; } $space=" "; echo "
$mes $year
DLMMJVS
"; echo "
"; if(isset($_POST['dianum'])){ $diasem=$_POST['diasem']; $dia=$_POST['dianum']; $mes=$_POST['mes']; $anio=$_POST['anio']; $atiende=$_POST['atiende']; $pantalla=$_POST['pantalla']; $dzh=$_POST['dzh']; $numzh=$_POST['numzh']; $zonahorariapaciente=$_POST['zonahorariapaciente']; $situacion=$_POST['situacion']; $drp=$_POST['drp']; $drt=$_POST['drt']; $idcita=$mes.$anio; switch($atiende){ case "si": echo "
"; echo "
El dia a reservar es: $diasem $dia $mes $anio el dia para el paciente es $drp y el dia para el terapeuta es $drt
"; break; case "no": echo "
El terapeuta no atiende este dia, elige otro
"; break; } //switch } }//2 si ya estaba puesto el post de pantalla es que ya se imprimo la tabla y se selecciono el dia }else{ //1?si reservar si esta puesto, ya se eligo fecha del calendario... //if(isset($_POST['dianum'])){ $diasem=$_POST['diasem']; $dia=$_POST['dia']; //echo "el dia elegido fue:".$dia; $mes=$_POST['mes']; $anio=$_POST['anio']; $atiende=$_POST['atiende']; $pantalla=$_POST['pantalla']; $idcita=$mes.$anio; $terapeuta=$_POST['fide']; $dzh=$_POST['dzh']; $numzh=$_POST['numzh']; $situacion=$_POST['situacion']; $drp=$_POST['drp']; //echo $drp; $drt=$_POST['drt']; //echo ""; $zonahorariapaciente=$_POST['zonahorariapaciente']; $username="vgorena"; $password = "Tramontina1014."; $hostname = "bateriaslth.netfirmsmysql.com"; $conectado=mysql_connect($hostname,$username,$password) or die ("Unable to connect"); mysql_select_db("chataux",$conectado); $consulta= "SELECT * FROM login WHERE (idcliente='$terapeuta' ) "; $hacerConsulta= mysql_query($consulta,$conectado); $numregistros=mysql_num_rows ($hacerConsulta); //echo "el numero de registros fue:".$numeroregistros; if($numregistros==1){ $ret = mysql_fetch_array($hacerConsulta); $ide=$ret[cvecliente]; } echo "
elige una hora:

"; echo "
"; $cont=0; $hora="_00"; $numhdispdia=0; $numhres=0; $acum=0; while ($acum<24){ $checo=$ret[$hora]; if ($checo="si"){ $numhdispdia++; } $acum++; } //aqui se debe de tomar el dia anterior que para el terapeuta es 23 por ejemplo aun cuando señalo el 24 si contador fue mayor que 1 significa restar un dia o sea buscar en el 23 y solo a partir de las 17 horas... las 16 pertenecen al dia anterior... while ($cont <24){ //while //echo $cont; //echo $hora; $checar=$ret[$hora]; //echo $checar; $horareservada="no"; if($checar=="si"){ //7 es hora habil? $mostrar='si'; //if($situacion==0){$diarp=$dia;} switch($situacion){ case 1: switch($drp){ case 'Lun': $hp=substr($hora,-2)+$dzh; if($hp<24){ if($ret['Lun']=='si'){$hp=substr($hora,-2)+$dzh; if($hp<24){$drt='Lun'; $hppac=abs(substr($hora,-2)+$dzh); $dnumt=$dia;}}else{} }else{ if($ret['Dom']=='si'){$hp=substr($hora,-2)+$dzh; if($hp>23){$drt='Dom';$hppac=abs(substr($hora,-2)+$dzh-24); $dnumt=$dia-1;}}else{$dnumt='';} }break; case 'Mar': $hp=substr($hora,-2)+$dzh; if($hp<24){ if($ret['Mar']=='si'){ $hp=substr($hora,-2)+$dzh; if($hp<24){$drt='Mar'; $hppac=abs(substr($hora,-2)+$dzh); $dnumt=$dia;}}else{} }else{ if($ret['Lun']=='si'){ $hp=substr($hora,-2)+$dzh; if($hp>23){$drt='Lun';$hppac=abs(substr($hora,-2)+$dzh-24); $dnumt=$dia-1;}}else{ $dnumt='';} }break; case 'Mier': $hp=substr($hora,-2)+$dzh; if($hp<24){ if($ret['Mier']=='si'){$hp=substr($hora,-2)+$dzh; if($hp<24){$drt='Mier'; $hppac=abs(substr($hora,-2)+$dzh); $dnumt=$dia;}}else{} }else{ if($ret['Mar']=='si'){$hp=substr($hora,-2)+$dzh; if($hp>23){$drt='Mar';$hppac=abs(substr($hora,-2)+$dzh-24); $dnumt=$dia-1;}}else{$dnumt='';} }break; case 'Jue': $hp=substr($hora,-2)+$dzh; if($hp<24){ if($ret['Jue']=='si'){$hp=substr($hora,-2)+$dzh; if($hp<24){$drt='Jue'; $hppac=abs(substr($hora,-2)+$dzh); $dnumt=$dia;}}else{} }else{ if($ret['Mier']=='si'){$hp=substr($hora,-2)+$dzh; if($hp>23){$drt='Mier';$hppac=abs(substr($hora,-2)+$dzh-24); $dnumt=$dia-1;}}else{$dnumt='';} }break; case 'Vie': $hp=substr($hora,-2)+$dzh; if($hp<24){ if($ret['Vie']=='si'){$hp=substr($hora,-2)+$dzh; if($hp<24){$drt='Vie'; $hppac=abs(substr($hora,-2)+$dzh); $dnumt=$dia;}}else{} }else{ if($ret['Jue']=='si'){$hp=substr($hora,-2)+$dzh; if($hp>23){$drt='Jue';$hppac=abs(substr($hora,-2)+$dzh-24); $dnumt=$dia-1;}}else{$dnumt='';} }break; case 'Sab': $hp=substr($hora,-2)+$dzh; if($hp<24){ if($ret['Sab']=='si'){$hp=substr($hora,-2)+$dzh; if($hp<24){$drt='Sab'; $hppac=abs(substr($hora,-2)+$dzh); $dnumt=$dia;}}else{} }else{ if($ret['Vie']=='si'){$hp=substr($hora,-2)+$dzh; if($hp>23){$drt='Vie';$hppac=abs(substr($hora,-2)+$dzh-24); $dnumt=$dia-1;}}else{$dnumt='';} }break; case 'Dom': $hp=substr($hora,-2)+$dzh; if($hp<24){ if($ret['Dom']=='si'){$hp=substr($hora,-2)+$dzh; if($hp<24){$drt='Dom'; $hppac=abs(substr($hora,-2)+$dzh); $dnumt=$dia;}}else{} }else{ if($ret['Sab']=='si'){$hp=substr($hora,-2)+$dzh; if($hp>23){$drt='Sab';$hppac=abs(substr($hora,-2)+$dzh-24); $dnumt=$dia-1;}}else{$dnumt='';} }break; } break; case -1: switch($drp){ //cambiar dias y formulas y todo.... case 'Lun': if(substr($hora,-2)>=abs($dzh)){ if($ret['Lun']=='si'){ $drt='Lun'; $hppac=abs(substr($hora,-2)-$dzh); $dnumt=$dia;}else{$dnumt='';} }else{ if($ret['Mar']=='si'){ $drt='Mar'; $hppac=abs(substr($hora,-2)+24-$dzh); $dnumt=$dia+1;}else{ $dnumt='';} }break; case 'Mar': if(substr($hora,-2)>=abs($dzh)){ if($ret['Mar']=='si'){ $drt='Mar'; $hppac=abs(substr($hora,-2)-$dzh); $dnumt=$dia;}else{$dnumt='';} }else{ if($ret['Mier']=='si'){ $drt='Mier'; $hppac=abs(substr($hora,-2)+24-$dzh); $dnumt=$dia+1;}else{ $dnumt='';} }break; case 'Mier': if(substr($hora,-2)>=abs($dzh)){ if($ret['Mier']=='si'){ $drt='Mier'; $hppac=abs(substr($hora,-2)-$dzh); $dnumt=$dia;}else{$dnumt='';} }else{ if($ret['Jue']=='si'){ $drt='Jue'; $hppac=abs(substr($hora,-2)+24-$dzh); $dnumt=$dia+1;}else{ $dnumt='';} }break; case 'Jue': if(substr($hora,-2)>=abs($dzh)){ if($ret['Jue']=='si'){ $drt='Jue'; $hppac=abs(substr($hora,-2)-$dzh); $dnumt=$dia;}else{$dnumt='';} }else{ if($ret['Vie']=='si'){ $drt='Vie'; $hppac=abs(substr($hora,-2)+24-$dzh); $dnumt=$dia+1;}else{ $dnumt='';} }break; case 'Vie': if(substr($hora,-2)>=abs($dzh)){ if($ret['Vie']=='si'){ $drt='Vie'; $hppac=abs(substr($hora,-2)-$dzh); $dnumt=$dia;}else{$dnumt='';} }else{ if($ret['Sab']=='si'){ $drt='Sab'; $hppac=abs(substr($hora,-2)+24-$dzh); $dnumt=$dia+1;}else{ $dnumt='';} }break; case 'Sab': if(substr($hora,-2)>=abs($dzh)){ if($ret['Sab']=='si'){ $drt='Sab'; $hppac=abs(substr($hora,-2)-$dzh); $dnumt=$dia;}else{$dnumt='';} }else{ if($ret['Dom']=='si'){ $drt='Dom'; $hppac=abs(substr($hora,-2)+24-$dzh); $dnumt=$dia+1;}else{ $dnumt='';} }break; case 'Dom': if(substr($hora,-2)>=abs($dzh)){ if($ret['Dom']=='si'){ $drt='Dom'; $hppac=abs(substr($hora,-2)-$dzh); $dnumt=$dia;}else{$dnumt='';} }else{ if($ret['Lun']=='si'){ $drt='Lun'; $hppac=abs(substr($hora,-2)+24-$dzh); $dnumt=$dia+1;}else{ $dnumt='';} }break; } break;//$hp=$dzh; if(substr($hora,-2)<=$hp){$eshp='si';$hppac=24-$dzh +subsr($hora,-2);} case 0: //ni dias ni formulas han sido tocados aun $drt=$drp; $hppac=abs(substr($hora,-2)); $dnumt=$dia; break; } //echo "nose"; $horainst=substr($hora,-2); //echo "el dia del terapeuta es: $drt $dnumt la hora del terapeuta es $horainst
"; //echo "el dia para el paciente es: $drp $dia la hora del paciente seria $hppac
"; //hay citas reservadas ese dia; //$dia=$drt; if($dnumt<>''){ $seis="SELECT * FROM citas WHERE idter='$terapeuta' AND diat='$dnumt' AND mest='$mes' AND aniot='$anio' AND hpter='$horainst' "; $seiscons=mysql_query ($seis,$conectado);$seisreg=mysql_num_rows ($seiscons); IF($seisreg>=1){ $horareservada="si"; } //$retseis = mysql_fetch_array($seiscons); /*$citas=$ide."/citas.xml"; $dom= new Domdocument(); $dom->formatOutput=true; $dom->load($citas); $root=$dom->documentElement; $as=$dom->getElementsbyTagName('cita'); foreach($as as $a){ //a for reviso cada nodo cita en su attr mes/año $attrmesanio=$a->getattribute('idcita'); if($attrmesanio==$idcita){ //b hay citas reservadas ese mes/año? si if //echo "si hay citas reservadas en ese mes anio $attrmesanio
"; $bes=$a->getElementsbyTagName('dia'); //voy a revisar cada nodo de dia foreach($bes as $be){ // b.5 leo cada dia de ese mes/año for $attriddia=$be->getattribute('iddia'); //echo "el attrdia es: ".$attriddia."
"; if($attriddia==$dnumt){ //b.5.5 si el dia es igual al dia que pretenden reservar //echo "hubo coincidencia entre el attriddia y el dtnum"; $ces=$be->getElementsbyTagName('hora'); //esta esa hora habil reservada? foreach($ces as $ce){ // b.6 leo cada hora habil reservada for $idhora=$ce->getattribute('idhora'); //$attrdiaanio=$ce->getattribute('idcita'); //$attrdia=$ce->getattribute('iddia'); //echo "la hora leida es: ".$idhora. "
"; //echo " y la hora parseada es ".$horainst."
"; //if($attrdiaanio==$idcita && $attrdia==$dnumt && $idhora==$horainst) if($idhora==$horainst) { //b.7 //echo "CAMI"; $horareservada="si"; $numhres++; //echo "el valor del xml es: ".$valorhora." el valor de la hora en el while es: ".$hora."
"; break; }//b.7 if } //b.6 for } //b.5.5 if si el dia fue igual } //b.5 for } //b hay citas reservadas ese mes/año? no } //a //echo "---------
"; */ switch($hppac){ case 0: $tipoh="de la madrugada"; $hppac="0".$hppac; break; case 1: $tipoh="de la madrugada"; $hppac="0".$hppac; break; case 2: $tipoh="de la madrugada"; $hppac="0".$hppac; break; case 3: $tipoh="de la madrugada"; $hppac="0".$hppac; break; case 4: $tipoh="de la madrugada"; $hppac="0".$hppac; break; case 5: $tipoh="de la madrugada"; $hppac="0".$hppac; break; case 6: $tipoh="de la mañana"; $hppac="0".$hppac; break; case 7: $tipoh="de la mañana"; $hppac="0".$hppac; break; case 8: $tipoh="de la mañana"; $hppac="0".$hppac; break; case 9: $tipoh="de la mañana"; $hppac="0".$hppac; break; case 10: $tipoh="de la mañana"; break; case 11: $tipoh="de la mañana"; break; case 12: $tipoh="del mediodia"; break; case 13: $tipoh="de la tarde"; break; case 14: $tipoh="de la tarde"; break; case 15: $tipoh="de la tarde"; break; case 16: $tipoh="de la tarde"; break; case 17: $tipoh="de la tarde"; break; case 18: $tipoh="de la tarde"; break; case 19: $tipoh="de la tarde"; break; case 20: $tipoh="de la noche"; break; case 21: $tipoh="de la noche"; break; case 22: $tipoh="de la noche"; break; case 23: $tipoh="de la noche"; break; } if($horareservada=="no"){ //I $hpter=substr($hora,-2); if($numzh=="sumar"){$horadesp=$horadesp+$dzh; if($horadesp>=24){$horadesp=$horadesp-24; if($horadesp<10){$horadesp="0".$horadesp;}}}else{$horadesp=$horadesp-$dzh;} echo " "; }else{ echo ""; } //I } } //7 $cont ++; $hora ++; //echo $hora; } //while echo "
".$hppac." hras ".$tipoh."
".$hppac." hras ".$tipoh."
"; echo "O si ninguna hora te acomoda:
"; } /*if($numhdispdia=$numhres){echo ""; echo "
El terapeuta ya tiene todas las citas de este dia reservadas
";} */ }else{ //0si si esta puesto reservarfin... añadir al xml el child $eleccion=$_POST['yaentro']; switch ($eleccion){ case 'no': $drp=$_POST['drp']; $dnump=$_POST['dnump']; $hppac=$_POST['hppac']; $drt=$_POST['drt']; $dnumt=$_POST['dnumt']; $hpter=$_POST['hpter']; $zonahorariapaciente=$_POST['zonahorariapaciente']; $dzh=$_POST['dzh']; // tiene la cantidad de horas de diferencia $numzh=$_POST['numzh']; //nos indica si hay que sumar o restar entre las zonas horarias $situacion=$_POST['situacion']; $mes=$_POST['mes']; $anio=$_POST['anio']; $atiende=$_POST['atiende']; $fide=$_POST['fide']; $terapeuta=$_POST['fide']; $pantalla=$_POST['pantalla']; $reservarfin=$_POST['reservarfin']; $yaentro=$_POST['yaentro']; $reservar=$_POST['reservar']; $mesanio=$mes.$anio; $dia=strval($drt); //$dia=strval($dia); //$dia=$_POST['dia']; //$horares=$_POST['horares']; //la hora del terapeuta reservada //$horadesp=$_POST['horadesp']; // la hora que es del paciente reservada //$diasem=$_POST['diasem']; //$diarp=$_POST['diarp']; //echo "hora r:".$horar." hora res:".$horares; echo "
La cita quedaria reservada para:

".$drp." ".$dnump." ".$mes." ".$anio." a las ".$hppac." horas


"; echo "
Accesa a tu cuenta en

Terapeutas en Linea

para Reservarla:


"; //CLIENTE YA REGISTRADO... // echo "

Escribe tu e-mail para reservar la cita:
Escribe tu nombre o pseudonimo:

"; // //CLIENTE QUE AUN NO TIENE CUENTA, PARA ABRIRLA... //*/ //----- break; case 'si': //revisar si la cuenta existe y añadir cita $drp=$_POST['drp']; $dnump=$_POST['dnump']; $hppac=$_POST['hppac']; $drt=$_POST['drt']; $dnumt=$_POST['dnumt']; $hpter=$_POST['hpter']; $zonahorariapaciente=$_POST['zonahorariapaciente']; $dzh=$_POST['dzh']; // tiene la cantidad de horas de diferencia $numzh=$_POST['numzh']; //nos indica si hay que sumar o restar entre las zonas horarias $situacion=$_POST['situacion']; $mes=$_POST['mes']; $anio=$_POST['anio']; $atiende=$_POST['atiende']; $fide=$_POST['fide']; //$terapeuta=$_POST['fide']; $pantalla=$_POST['pantalla']; $reservarfin=$_POST['reservarfin']; $yaentro=$_POST['yaentro']; $reservar=$_POST['reservar']; $paciente=$_POST['paciente']; $mesanio=$mes.$anio; $dia=strval($drt); $fmailcliente=$_POST['fmailcliente']; $fpasscliente=$_POST['fpasscliente']; $ftipocliente=$_POST['ftipocliente']; $fnombrecliente=$_POST['fnombrecliente']; $username="vgorena";$password = "Tramontina1014.";$hostname = "bateriaslth.netfirmsmysql.com"; $conexion=mysql_connect($hostname,$username,$password) or die ("Unable to connect"); $bd=mysql_select_db("chataux",$conexion) or die ("no se selecciono bien la base de datos"); //$uno="SELECT * FROM login WHERE mailcliente='$fmailcliente' "; //$unocons=mysql_query ($uno,$conexion);$unoreg=mysql_num_rows ($unocons); //IF($unoreg==1){ $ret = mysql_fetch_array($unocons); $pass = $ret[passcliente];$idp=$ret[idcliente]; $mailp=$ret[mailcliente];if($fpasscliente==$pass){ $registro="correcto";}else{ $registro="incorrecto"; $cosamal="password"; }}else{ $registro="incorrecto"; $cosamal="e-mail";} /*if($registro=="incorrecto"){ echo "
El e-mail o password son incorrectos


"; echo "
"; echo "
"; echo "
"; }*/ //else{ //if registro es correcto //$dos="SELECT * FROM datospac WHERE id='$idp' ";$doscons=mysql_query ($dos,$conexion);$dosreg=mysql_num_rows ($doscons); //$ret2=mysql_fetch_array($doscons); $paciente=$ret2[nomappapm]; echo "
La cita quedaria reservada para:
".$drp." ".$dnump." ".$mes." ".$anio."
a las ".$hppac." horas

Reservado con el mail: ".$fmailcliente."




"; $diacita=$dnump."/".$mes."/".$anio; $horapac=$hppac; $horater=$hpter; $tres="SELECT *FROM datospsi WHERE id='$fide' ";$trescons=mysql_query ($tres,$conexion);$tresreg=mysql_num_rows ($trescons); $ret3=mysql_fetch_array($trescons); $ctabco=$ret3[ctabco];$paypal=$ret3[paypal];$xoom=$ret3[xoom];$banco=$ret3[banco];$nombreterapeuta=$ret3[nomappapm];$nombredep=$ret3[beneficiario]; $costoc=$ret3[costoc]; $comentarios=$ret3[comentarios]; $cuatro="SELECT * FROM login WHERE idcliente='$fide' ";$cuatrocons=mysql_query ($cuatro,$conexion);$cuatroreg=mysql_num_rows ($cuatrocons); $ret4=mysql_fetch_array($cuatrocons); $zhter=$ret4[zh];$mailter=$ret4[mailcliente]; $hubocitaseneldia="no"; $hubocitasenelmesanio="no"; //$paciente="paciente"; $diacitater=$dnumt."/".$mes."/".$anio; $citanueva="INSERT INTO citas (idter, nomter, hpter, mailter, diacitater, aniot, mest, diat, idpac, nompac, hppac, mailpac, diacitapac, aniop, mesp, diap) VALUES ('$fide', '$nombreterapeuta', '$hpter', '$mailter', '$diacitater', '$anio', '$mes', '$dnumt', '$idp', '$paciente', '$hppac', '$fmailcliente', '$diacita', '$anio', '$mes', '$dnump' )"; $results = mysql_query($citanueva, $conexion); echo "
Elige una forma de pago para el(la)
terapeuta

$nombreterapeuta:


"; if($costoc !=""){ echo "
El costo por consulta es de: $costoc dlls.
"; } if($comentarios !=""){ echo "
Datos acerca de las citas:
$comentarios



"; } if($paypal !=""){ echo "
Pago mediante Pay Pal:


"; } if($xoom !=""){ echo "
Deposito o envio de dinero mediante XOOM con los datos siguientes:

"; echo "
".$xoom."

"; echo "


"; } if($ctabco != ""){ echo "
O deposito en su cuenta bancaria:
Banco: ".$banco."
Numero de cuenta: ".$ctabco. "
al nombre de: ".$nombredep."
"; } //} mandar_mailter($mailter,$nombreterapeuta,$paciente,$drt,$dnumt,$mes,$anio,$hpter); mandar_mailpac($fmailcliente,$nombreterapeuta,$paciente,$drp,$dnump,$mes,$anio,$hppac); break; //-- //----- case 'si_crearcuenta': //echo "entre en si crear cuenta "; $drp=$_POST['drp']; $dnump=$_POST['dnump']; $hppac=$_POST['hppac']; //echo "DIA REAL DEL PACIENTE ES $drp, $dnump HORA: $hppac " ; $drt=$_POST['drt']; $dnumt=$_POST['dnumt']; $hpter=$_POST['hpter']; //echo "DIA REAL DEL TERAPEUTA SERA: $drt, $dnumt HORA: $hpter "; $zonahorariapaciente=$_POST['zonahorariapaciente']; $dzh=$_POST['dzh']; // tiene la cantidad de horas de diferencia $numzh=$_POST['numzh']; //nos indica si hay que sumar o restar entre las zonas horarias $situacion=$_POST['situacion']; $mes=$_POST['mes']; $anio=$_POST['anio']; $atiende=$_POST['atiende']; $fide=$_POST['fide']; //$terapeuta=$_POST['fide']; $pantalla=$_POST['pantalla']; //echo "MES: $mes, $anio. TERAPEUTA: $fide, $pantalla. "; $reservarfin=$_POST['reservarfin']; $yaentro=$_POST['yaentro']; $reservar=$_POST['reservar']; $mesanio=$mes.$anio; //echo $mesanio; $dia=strval($drt); $diacita=$dnump."/".$mes."/".$anio; $horapac=$hppac; $horater=$hpter; $fmailcliente=$_POST['fmailcliente']; $fpasscliente=$_POST['fpasscliente']; $ftipocliente=$_POST['ftipocliente']; $fnombrecliente=$_POST['fnombrecliente']; //echo "DATOS INSCRIPCION: mail= $fmailcliente, pass=$fpasscliente, tipo=$ftipocliente, nombre=$fnombrecliente "; //$horares=substr(($_POST['horar']),-2); //$horadesp=$_POST['horadesp']; $mesanio=$mes.$anio; $dia=strval($dnumt); $error_encontrado=""; $error_encontrado2=""; $error_encontrado3=""; if ((validar_clave($_POST["fpasscliente"], $error_encontrado,$_POST["f2"])) && (validar_mail($_POST["fmailcliente"],$error_encontrado2)) && (validar_plan($_POST["ftipocliente"],$error_encontrado3)) ){ //1 if validar clave bien $ale=rand(100000,999999); $desdeletra="a"; $hastaletra="z"; $caracter=strpos($fmailcliente,"@"); //echo $caracter; $acum=0; if($caracter<=2){ while($acum<3){ $let=chr(rand(ord($desdeletra), ord($hastaletra))); $letras=$letras.$let; $acum=$acum+1; } $ale=$letras.$ale; }else{ $ale=substr($fmailcliente,0,2).$ale; } $username="vgorena"; $password = "Tramontina1014"; $hostname = "bateriaslth.netfirmsmysql.com"; $conexion=mysql_connect($hostname,$username,$password) or die ("Unable to connect"); $bd=mysql_select_db("chataux",$conexion) or die ("no se selecciono bien la base de datos"); $revisar="si"; while ($revisar=="si"){ $uno="SELECT * FROM login WHERE cvecliente='$ale' "; $unocons=mysql_query ($uno,$conexion); $unoreg=mysql_num_rows ($unocons); IF ($numregistros==1){ $ale=rand(100000,999999); $ale=substr($fmailcliente,0,2).$ale; $revisar="si"; }else{ $revisar="no"; } } $consulta= "SELECT * FROM login WHERE mailcliente='$fmailcliente' "; $hacerConsulta= mysql_query ($consulta,$conexion); $numregistros=mysql_num_rows ($hacerConsulta); IF ($numregistros==0){ // 2 if que no este inscrito antes $sql= "INSERT INTO login (mailcliente,passcliente,tipocliente,confirmacion,cvecliente,Lun, Mar,Mier,Jue,Vie,Sab,Dom,_00,_01,_02,_03,_04,_05,_06,_07,_08,_09,_10,_11,_12,_13,_14,_15,_16,_17,_18,_19,_20,_21,_22,_23,zh) VALUES ('$fmailcliente','$fpasscliente','2','0','$ale','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','no','0')"; $results = mysql_query($sql, $conexion); echo "
Los datos se han dado de alta en la base de datos de clientes,
Bienvenido


"; if ($results){ //consulto el id que le fue asignado al cliente nuevo $consultaclave="SELECT * FROM login WHERE mailcliente='$fmailcliente' "; $hacerConsulta2= mysql_query ($consultaclave,$conexion); $nr=mysql_num_rows($hacerConsulta2); $ret = mysql_fetch_array($hacerConsulta2); $seg = $ret[idcliente]; }//consulta del id nuevo asignado al cliente $fnomappapm=$fnombrecliente; $fnombrep=$ale; $fcuentapaypal="Cuenta Pay Pal"; $fipinscripcion=(isset($_SERVER['REMOTE_ADDR'])) ? $_SERVER['REMOTE_ADDR'] : "(Sin-IP)"; $ffechainscripcion=time(); $dos= "INSERT INTO datospac(id,nomappapm,nombreusuario,cuentapaypal,confirmacion,cpreguntashechas,ipinscripcion,fechainscripcion) values ('$seg','$fnombrecliente','$fnombrep','$fcuentapaypal',0,0,'$fipinscripcion','$ffechainscripcion')"; $resultados2=mysql_query($dos,$conexion); $usuario=str_replace("@","_",$fmailcliente); $usuario=str_replace(".","_",$usuario); $serv = $_SERVER['DOCUMENT_ROOT'] . "/" ; $ruta = $serv .$usuario; if(!file_exists($ruta)){ mkdir($ruta);} chdir($usuario); $regchats="regchats_".$usuario.".txt"; $sumador="sumador_".$usuario.".php"; $referer="referer_".$usuario.".txt"; $i_regchats="echo_regchats_".$usuario.".php"; $i_sumador="echo_sumador_".$usuario.".php"; $i_referer="echo_referer_".$usuario.".php"; $sumadorent="sumadorent_".$usuario.".php"; $chat="chat_".$ale.".txt"; $descperf="descperf_".$usuario.".txt"; $ltf="ltfotos.txt"; $textoscript= "
"; $newfile1=fopen($regchats, "a+"); fwrite($newfile1,"0 14567998 ".$serv.$usuario."/468_189.txt ".$serv.$usuario."/468_echo.php aaa bbb ccc\n"); fclose($newfile1); $newfile2=fopen($sumador, "a+"); fwrite($newfile2,0); fclose($newfile2); $newfile3=fopen($referer, "a+"); fwrite($newfile3,""); fclose($newfile3); $newfile4=fopen($i_regchats,"a+"); $cont4=""; fwrite($newfile4,$cont4); fclose($newfile4); $newfile5=fopen($i_sumador,"a+"); $cont5=""; fwrite($newfile5,$cont5); fclose($newfile5); $newfile6=fopen($i_referer,"a+"); $cont6=""; fwrite($newfile6,$cont6); fclose($newfile6); $newfile7=fopen($chat,"a+"); fwrite($newfile7,$textoscript); fclose($newfile7); $newfile8=fopen($descperf,"a+"); fwrite($newfile8,"Descripcion de tu perfil, es importante que aqui escribas la ayuda que buscas encontrar en tu terapeuta"); fclose($newfile8); $newfile9=fopen($sumadorent,"a+"); fwrite($newfile9,"0"); fclose($newfile9); //$serv = $_SERVER['DOCUMENT_ROOT'] . "/" ; //$directorio=$serv.$ale."/pperfilpaciente.php"; chdir($serv); $pyr='pyr/'.$seg.'.xml'; $newfile10=fopen($pyr,"a+"); fwrite($newfile10,""); fclose($newfile10); mkdir($ale); $nf9=fopen($ale."/ltfotos.txt","a+"); fwrite($nf9,"fotop.jpg\n"); fclose($nf9); $original="fotop.jpg"; $copia=$ale."/fotop.jpg"; copy ($original,$copia); //copy("pperfilpaciente.php",$ale."/pperfilpaciente.php"); //$file=$serv.$ale."/pperfilpaciente.php"; //$fh=fopen($file,'r+'); //$data=fread($fh,filesize($file)); //$new_data=str_replace("camilaforever",$ale,$data); //fclose($fh); //$fh=fopen($file,'r+'); //fwrite($fh,$new_data); //fclose($fh); //rename($directorio,$serv.$ale."/index.php"); $directorio66=$serv.$ale."/image66.PNG"; $directorio72=$serv.$ale."/image72.PNG"; $directorioback=$serv.$ale."/background.PNG"; $directorioconf=$serv.$ale."/confirmacionppac.php"; $directoriotabla=$serv.$ale."/tablachats.php"; $directoriotabla2=$serv.$ale."/tablavisitas.php"; $directoriofoto=$serv.$ale."/foto.php"; $dirchatm1=$serv.$usuario."/468_189.txt"; $dirchatm2=$serv.$usuario."/468_echo.php"; $directoriofotop=$serv.$ale."/fotop.php"; $citas=$serv.$ale."/citas.xml"; copy("image66.PNG",$directorio66); copy("image72.PNG",$directorio72); copy("background.PNG",$directorioback); copy("confirmacionppac.txt",$directorioconf); copy("tablachats.php",$directoriotabla); copy("tablavisitas.php",$directoriotabla2); copy("foto.php",$directoriofoto); copy("468_189.txt",$dirchatm1); copy("468_echo.php",$dirchatm2); copy("fotop.php",$directoriofotop); copy("citas.xml",$citas); $file2=$serv.$ale."/tablachats.php"; $fh2=fopen($file2,'r+'); $data2=fread($fh2,filesize($file2)); $new_data2=str_replace("rosita",$usuario,$data2); fclose($fh2); $fh2=fopen($file2,'r+'); fwrite($fh2,$new_data2); fclose($fh2); $file21=$serv.$ale."/tablavisitas.php"; $fh21=fopen($file21,'r+'); $data21=fread($fh21,filesize($file21)); $new_data21=str_replace("rosita",$usuario,$data21); fclose($fh21); $fh21=fopen($file21,'r+'); fwrite($fh21,$new_data21); fclose($fh21); $file3=$serv.$ale."/foto.php"; $fh3=fopen($file3,'r+'); $data3=fread($fh3,filesize($file3)); $new_data3=str_replace("camy",$ale,$data3); fclose($fh3); $fh3=fopen($file3,'r+'); fwrite($fh3,$new_data3); fclose($fh3); mandar_correo_conf($_POST["fmailcliente"],$ale); echo "
Se ha enviado un e-mail de confirmacion al usado en el registro favor de confirmarlo mas tarde, para que pueda entrar en Consulta.


"; $uno="SELECT * FROM login WHERE mailcliente='$fmailcliente' "; $unocons=mysql_query ($uno,$conexion); $unoreg=mysql_num_rows ($unocons); IF ($unoreg==1){ $ret = mysql_fetch_array($unocons); $idp=$ret[idcliente]; } $dos="SELECT * FROM datospac WHERE id='$idp' "; $doscons=mysql_query ($dos,$conexion); $dosreg=mysql_num_rows ($doscons); $ret2=mysql_fetch_array($doscons); //$paciente=$ret2[nomappapm]; echo "
La cita quedaria reservada para:

".$drp." ".$dnump." ".$mes." ".$anio."
a las ".$hppac." horas

A nombre de: ".$_POST['fnombrecliente']."


"; $tres="SELECT * FROM datospsi WHERE id='$fide' "; $trescons=mysql_query ($tres,$conexion); $tresreg=mysql_num_rows ($trescons); $ret3=mysql_fetch_array($trescons); $ctabco=$ret3[ctabco]; $paypal=$ret3[paypal]; $xoom=$ret3[xoom]; $banco=$ret3[banco]; $nombreterapeuta=$ret3[nomappapm]; $nombredep=$ret3[beneficiario]; $costoc=$ret3[costoc]; $comentarios=$ret3[comentarios]; $cuatro="SELECT * FROM login WHERE idcliente='$fide' "; $cuatrocons=mysql_query ($cuatro,$conexion); $cuatroreg=mysql_num_rows ($cuatrocons); $ret4=mysql_fetch_array($cuatrocons); $zhter=$ret4[zh]; $mailter=$ret4[mailcliente]; $hubocitaseneldia="no"; $hubocitasenelmesanio="no"; $citas=$pantalla."/citas.xml"; //echo $citas; //echo $pantalla; $dom= new Domdocument(); //$dom->preserveWhiteSpace=false; $dom->formatOutput=true; $dom->load($citas); $root=$dom->documentElement; $raiz=$dom->getElementsbyTagName('citas')->item(0); $as=$dom->getElementsbyTagName('cita'); $cont=0; $elemcita=0; foreach($as as $a){ $idcita=$a->getattribute('idcita'); if($idcita==$mesanio){$hubocitasenelmesanio="si"; $bes=$a->getElementsbyTagName('dia'); foreach($bes as $be){ $iddia=$be->getattribute('iddia');if($iddia==$dnumt){ $hubocitaseneldia="si"; $hubocitasenelmesanio='who';}} } } //echo "hubocitasenelmesanio= $hubocitasenelmesanio"; switch($hubocitasenelmesanio){ case "si": foreach($as as $a){ $idcita=$a->getattribute('idcita'); if($idcita==$mesanio){ $diac=$dom->createElement('dia'); $diac=$a->appendChild($diac); $diac->setAttribute('idcita',$mesanio); $diac->setAttribute('iddia',$dnumt); $horareservada=$dom->createElement('hora',$paciente); $horareservada=$diac->appendChild($horareservada); $horareservada->setAttribute('idcita',$mesanio); $horareservada->setAttribute('iddia',$dnumt); $horareservada->setAttribute('idhora',$hpter); $horareservada->setAttribute('paciente', $fnombrecliente); $horareservada->setAttribute('mailp', $fmailcliente); $horareservada->setAttribute('idp',$idp); $horareservada->setAttribute('formapago',$fp); $dom->save($citas); }} break; case "no": $cita=$dom->createElement('cita'); //$raiz->appendChild($cita); $cita=$root->appendChild($cita); $cita->setAttribute('idcita',$mesanio); $diac=$dom->createElement('dia'); $diac=$cita->appendChild($diac); $diac->setAttribute('idcita',$mesanio); $diac->setAttribute('iddia', $dnumt); $horareservada=$dom->createElement('hora',$paciente); $horareservada=$diac->appendChild($horareservada); $horareservada->setAttribute('idcita',$mesanio); $horareservada->setAttribute('iddia',$dnumt); $horareservada->setAttribute('idhora',$hpter); $horareservada->setAttribute('paciente', $fnombrecliente); $horareservada->setAttribute('mailp', $fmailcliente); $horareservada->setAttribute('idp',$idp); $horareservada->setAttribute('formapago',$fp); $dom->save($citas); break; case "who": //echo "entre a este if??"; //echo "el dia es:".$dia; foreach($as as $a){ $idcita=$a->getattribute('idcita'); if($idcita==$mesanio){$bes=$a->getElementsbyTagName('dia'); foreach($bes as $be){ $iddia=$be->getattribute('iddia');if($iddia==$dnumt){ $horareservada=$dom->createElement('hora',$paciente); $horareservada=$be->appendChild($horareservada); $horareservada->setAttribute('idcita',$mesanio); $horareservada->setAttribute('iddia',$dnumt); $horareservada->setAttribute('idhora',$hpter); $horareservada->setAttribute('paciente', $fnombrecliente); $horareservada->setAttribute('mailp', $fmailcliente); $horareservada->setAttribute('idp',$idp); $horareservada->setAttribute('formapago',$fp); $dom->save($citas); } } } } break; } $diacitater=$dnumt."/".$mes."/".$anio; $citanueva="INSERT INTO citas (idter, nomter, hpter, mailter, diacitater, idpac, nompac, hppac, mailpac, diacitapac) VALUES ('$fide', '$nombreterapeuta', '$hpter', '$mailter', '$diacitater', '$idp', '$fnombrecliente', '$hppac', '$fmailcliente', '$diacita')"; $results = mysql_query($citanueva, $conexion); echo "
Elige una forma de pago para el(la)
terapeuta

$nombreterapeuta:


"; if($costoc !=""){ echo "
El costo por consulta es de: $costoc dlls.
"; } if($comentarios !=""){ echo "
Datos acerca de las citas:
$comentarios



"; } if($paypal !=""){ echo "
Pago mediante Pay Pal:


"; } if($xoom !=""){ echo "
Deposito o envio de dinero mediante XOOM con los datos siguientes:

"; echo "
".$xoom."

"; echo "


"; } if($ctabco != ""){ echo "
O deposito en su cuenta bancaria:
Banco: ".$banco."
Numero de cuenta: ".$ctabco. "
al nombre de: ".$nombredep."
"; } mandar_mailter($mailter,$nombreterapeuta,$fnombrecliente,$drt,$dnumt,$mes,$anio,$hpter); mandar_mailpac($fmailcliente,$nombreterapeuta,$fnombrecliente,$drp,$dnump,$mes,$anio,$hppac); }else{ // 2 if que no este inscrito antes echo "
El usuario ya ha sido registrado


"; //sugerir si ha olvidado la contraseña de otra forma... con ya entro igual a olvide contraseña echo "
Olvide el password



"; } }else { // validar clave echo "




EMAIL/PASSWORD NO VALIDO:

" . $error_encontrado." ".$error_encontrado2." ". $error_encontrado3."

"; echo "
"; //VOLVER A INTENTAR PONER UNO CORRECTO... PONERLA FORMA DE NUEVO... FORM } //VALIDAR CLAVE break; case 'si_olvidopass': //echo "entre en si crear cuenta "; $drp=$_POST['drp']; $dnump=$_POST['dnump']; $hppac=$_POST['hppac']; //echo "DIA REAL DEL PACIENTE ES $drp, $dnump HORA: $hppac " ; $drt=$_POST['drt']; $dnumt=$_POST['dnumt']; $hpter=$_POST['hpter']; //echo "DIA REAL DEL TERAPEUTA SERA: $drt, $dnumt HORA: $hpter "; $zonahorariapaciente=$_POST['zonahorariapaciente']; $dzh=$_POST['dzh']; // tiene la cantidad de horas de diferencia $numzh=$_POST['numzh']; //nos indica si hay que sumar o restar entre las zonas horarias $situacion=$_POST['situacion']; $mes=$_POST['mes']; $anio=$_POST['anio']; $atiende=$_POST['atiende']; $fide=$_POST['fide']; //$terapeuta=$_POST['fide']; $pantalla=$_POST['pantalla']; //echo "MES: $mes, $anio. TERAPEUTA: $fide, $pantalla. "; $reservarfin=$_POST['reservarfin']; $yaentro=$_POST['yaentro']; $reservar=$_POST['reservar']; $mesanio=$mes.$anio; //echo $mesanio; $dia=strval($drt); $diacita=$dnump."/".$mes."/".$anio; $horapac=$hppac; $horater=$hpter; $fmailcliente=$_POST['fmailcliente']; $fpasscliente=$_POST['fpasscliente']; $ftipocliente=$_POST['ftipocliente']; $fnombrecliente=$_POST['fnombrecliente']; //echo "DATOS INSCRIPCION: mail= $fmailcliente, pass=$fpasscliente, tipo=$ftipocliente, nombre=$fnombrecliente "; //$horares=substr(($_POST['horar']),-2); //$horadesp=$_POST['horadesp']; $mesanio=$mes.$anio; $dia=strval($dnumt); if ($_POST){ $username="vgorena"; $password = "Tramontina1014"; $hostname = "bateriaslth.netfirmsmysql.com"; $conexion=mysql_connect($hostname,$username,$password) or die ("Unable to connect"); $bd=mysql_select_db("chataux",$conexion) or die ("no se selecciono bien la base de datos"); $consulta= "SELECT * FROM login WHERE mailcliente='$fmailcliente' "; $hacerConsulta= mysql_query ($consulta,$conexion); $numregistros=mysql_num_rows ($hacerConsulta); if($numregistros==1){ $ret = mysql_fetch_array($hacerConsulta); $idcliente = $ret[idcliente]; //echo $idcliente; $passactual=$ret[passcliente]; //echo $passactual; $fecha="abc"; //echo $fmailcliente; //echo $fecha; $sql= "INSERT INTO recpass (idcliente,mailcliente,passcliente,fecha,passnuevo) VALUES ('$idcliente','$fmailcliente','$passactual','$fecha','0')"; //tendra un numero de control asignado... autoincrement de clave inicial $results = mysql_query($sql, $conexion); mandar_correo_olvido($_POST['fmailcliente']); echo "
Ha sido enviado un email a

la cuenta de correo que nos indicaste,

con los pasos para la recuperacion

de la misma,

ve a tu buzon para seguirlos

"; }else echo "

No se encuentra registrado ese mail en nuestra base de datos.
Favor de contactar a terapeutasenlinea.com
por medio de facebook, twitter o whatsapp
"; } else{ ?>
Escribe el e-mail que usaste en la inscripcion: