Apertura de Contrato


0) { $ID_CTR = $rowContrato[CTRCant2]; $ElaboradoPor = $rowContrato[$fldIdElaboradoPor_Contrato_O]; $EstacionEntrega = $rowContrato[$fldIdEstacionEntrega_Contrato_O]; $FechaEntrega = ConvertFecha($rowContrato[$fldFechaDevEstimada_Contrato_O], 1, "/"); $DiasAlquiler = $rowContrato[$fldDiasAlquiler_Contrato_O]; $Observaciones = $rowContrato[$fldObservacion_Contrato_O]; $CodUnidad=$rowContrato[CTRLink1_UND]; $Carro = ObtenerUno("410UND",$CodUnidad,"UNDNombre",""); $CantCarro = LeerStd($unidadBD, "410UND", "*", "UNDCodigo = '$CodUnidad'", "", "", "", ""); $rowCar=mysql_fetch_array($unidadBD); $marcaUnid =ObtenerUno("410MAR",$rowCar[UNDLink1_MAR],"MARNombre",""); $subGUnid =ObtenerUno("410SUB",$rowCar[UNDLink1_SUB],"SUBNombre",""); $placaUnid = $rowCar[UNDLinea2]; $colorUnid = $rowCar[UNDLinea3]; $statusUnid = $rowCar[UNDLista8]; $kmsUnid = $rowCar[UNDMonto9]; $combustibleUnid = $rowCar[UNDLista7]; $clientePersona = $rowContrato[CTRLink1_PER]; $clienteEmpresa = $rowContrato[CTRLink1_AR1]; if($clientePersona != '' && $clientePersona != 0) $EsEmpresa = 0; else $EsEmpresa = 1; } } // Trabajador que ingresa el contrato LeerStd($rsUsuario, '410AGE', "AGELinea1", "AGECodigo = $ElaboradoPor", "", "", "", ""); $rowUsuario = mysql_fetch_array($rsUsuario); /********************************************************************************************************************/ /* CLIENTE: BÚSQUEDA ************************************************************************************************/ /********************************************************************************************************************/ $tblClienteN='410PER'; $tblClienteJ='410AR1'; if ($hClienteSelId != "") { $EsEmpresa = $hClienteSelEsEmpresa; if ($EsEmpresa) { $countClientes = LeerStd($rsClientes, '410AR1', "*", "$fldId_ClienteJ = '$hClienteSelId'", "", "", "", ""); } else { $countClientes = LeerStd($rsClientes, '410PER', "*", "PERCodigo= '$hClienteSelId'", "", "", "", ""); } $hClienteSelId = ""; } elseif ($tBuscarCliente != "") { switch ($cClienteCriterio) { case "CI-V": $paginaIngresoCliente = "ClienteNatural.htm"; $EsEmpresa = 0; $countClientes = LeerStd($rsClientes, $tblClienteN, "*", "$fldTipoCI_ClienteN = 'V' AND $fldCI_ClienteN = '$tBuscarCliente'", "", "", "", ""); //BUSCANDO EN LISTA NEGRA SI NO ES RELACIONADAO. AGREGADO EL 05/05/06 //$countRecord = LeerStd($rsRecord, "410AR5", "*", "AR5Linea4 = '$tBuscarCliente'", "", "", "", "ECHO"); $countRecord = LeerStd($rsRecord, "410AR5", "*", "AR5Linea4 = '$tBuscarCliente'", "", "", "", ""); //die; break; case "CI-E": $paginaIngresoCliente = "ClienteNatural.htm"; $EsEmpresa = 0; $countClientes = LeerStd($rsClientes, $tblClienteN, "*", "$fldTipoCI_ClienteN = 'E' AND $fldCI_ClienteN = '$tBuscarCliente'", "", "", "", ""); //BUSCANDO EN LISTA NEGRA SI NO ES RELACIONADAO. AGREGADO EL 05/05/06 $countRecord = LeerStd($rsRecord, "410AR5", "*", "AR5Linea4 = '$tBuscarCliente'", "", "", "", ""); break; case "Pasaporte": $paginaIngresoCliente = "ClienteNatural.htm"; $EsEmpresa = 0; $countClientes = LeerStd($rsClientes, $tblClienteN, "*", "$fldPasaporte_ClienteN = '$tBuscarCliente'", "", "", "", ""); //BUSCANDO EN LISTA NEGRA SI NO ES RELACIONADAO. AGREGADO EL 05/05/06 $countRecord = LeerStd($rsRecord, "410AR5", "*", "AR5Linea4 = '$tBuscarCliente'", "", "", "", ""); break; case "Localizador":$paginaIngresoCliente = "ClienteNatural.htm"; $EsEmpresa = 0; $countClientes = LeerStd($rsClientes, "410AR7", "*", "AR7Linea13 = '$tBuscarCliente'", "AR7Cant3 DESC", "", "", ""); break; case "Nombre": $paginaIngresoCliente = "ClienteNatural.htm"; $EsEmpresa = 0; $countClientes = LeerStd($rsClientes, $tblClienteN, "*", "$fldPrimerNombre_ClienteN LIKE '%$tBuscarCliente%' OR $fldSegundoNombre_ClienteN LIKE '%$tBuscarCliente%' OR PERNombre LIKE '%$tBuscarCliente%'", "", "", "", ""); if($countClientes != 0) $countClientes++; //Para ir a la lista de cliente si desea ingresar otra persona con el mismo nombre //BUSCANDO EN LISTA NEGRA SI NO ES RELACIONADAO. AGREGADO EL 05/05/06 $countRecord = LeerStd($rsRecord, "410AR5", "*", "AR5Linea2 = '$tBuscarCliente'", "", "", "", ""); break; case "Apellido": $paginaIngresoCliente = "ClienteNatural.htm"; $EsEmpresa = 0; $countClientes = LeerStd($rsClientes, $tblClienteN, "*", "$fldPrimerApellido_ClienteN LIKE '%$tBuscarCliente%' OR $fldSegundoApellido_ClienteN LIKE '%$tBuscarCliente%' OR PERNombre LIKE '%$tBuscarCliente%'", "", "", "", ""); if($countClientes != 0) $countClientes++; //Para ir a la lista de cliente si desea ingresar otra persona con el mismo apellido //BUSCANDO EN LISTA NEGRA SI NO ES RELACIONADAO. AGREGADO EL 05/05/06 $countRecord = LeerStd($rsRecord, "410AR5", "*", "AR5Linea2 = '$tBuscarCliente'", "", "", "", ""); break; case "RIF": $paginaIngresoCliente = "ClienteJuridico.htm"; $EsEmpresa = 1; $countClientes = LeerStd($rsClientes, $tblClienteJ, "*", "$fldRIF_ClienteJ = '$tBuscarCliente'", "", "", "", ""); break; case "Nombre Comercial": $paginaIngresoCliente = "ClienteJuridico.htm"; $EsEmpresa = 1; $countClientes = LeerStd($rsClientes, $tblClienteJ, "*", "$fldNombreComercial_ClienteJ LIKE '%$tBuscarCliente%'", "$fldNombreComercial_ClienteJ", "", "", ""); break; } } if ($countClientes > 0) { if ($countClientes == 1) { if ($cClienteCriterio=="Localizador"){ $rowCliente = mysql_fetch_array($rsClientes); $CodRes=$rowCliente[AR7Codigo]; $bandera="no"; } else{ $rowCliente = mysql_fetch_array($rsClientes); if ($EsEmpresa) { $ClienteId = $rowCliente[$fldId_ClienteJ]; //PARA ADVERTIR QUE EL CLIENTE ES VIP $CantVIP = LeerStd($VIP, '410AR3', "*", "AR3Checkbox4 = 1 AND AR3Enlace1 = '$ClienteId'", "", "", "", ""); if($CantVIP > 0){ ?> "; $MsgCliente = $MsgCliente.$rowCliente[$fldNombreComercial_ClienteJ]; // BUSCANDO LISTA NEGRA ... $countRecord = LeerStd($rsRecord, "410AR5", "*", "AR5Enlace1 = $ClienteId", "", "", "", ""); $bandera ='si'; $existeCliente=1; $editable = 'si'; } else { $ClienteId = $rowCliente[$fldId_ClienteN]; //PARA ADVERTIR QUE EL CLIENTE ES VIP $CantVIP = LeerStd($VIP, '410AR3', "*", "AR3Checkbox4 = 1 AND AR3EnlaceP = '$ClienteId'", "", "", "", ""); if($CantVIP > 0){ ?> 0) { echo ""; } if ($rowCliente[$fldCI_ClienteN] != '') { $ClienteCodigo = $rowCliente[$fldTipoCI_ClienteN]." - ".$rowCliente[$fldCI_ClienteN]; $ClienteCodigoEtiqueta = "C.I."; } else { $ClienteCodigo = $rowCliente[$fldPasaporte_ClienteN]; $ClienteCodigoEtiqueta = "Pasaporte"; } $MsgCliente = "".$ClienteCodigoEtiqueta." ".$ClienteCodigo." "; $MsgCliente = $MsgCliente.$rowCliente[$fldPrimerNombre_ClienteN]." ".$rowCliente[$fldSegundoNombre_ClienteN]." ".$rowCliente[$fldPrimerApellido_ClienteN]." ".$rowCliente[$fldSegundoApellido_ClienteN]; //Aqui se agregó el 23/02/2006 el CALCULO DE FECHA NACIMINETO $fechaauxiliarF=explode("-", $rowCliente[PERFecha1]); $TemporalNacimiento =$fechaauxiliarF[2]."/".$fechaauxiliarF[1]."/".$fechaauxiliarF[0]; if($TemporalNacimiento == '//' OR $TemporalNacimiento == '00/00/0000') $TemporalNacimiento = ''; $MsgCliente = $MsgCliente."
Fecha Nacimiento "; $MsgCliente = $MsgCliente."                           dd/mm/aaaa
Buscar en: CANAVE | Seguro Social | CNE | INTTT"; $bandera ='si'; $existeCliente=1; $editable = 'si'; // BUSCANDO LISTA NEGRA ... //$countRecord = LeerStd($rsRecord, "410AR5", "*", "AR5EnlaceP = '$ClienteId' AND AR5EnlaceP != ''", "", "", "", "ECHO"); // AGREGADO 23/02/2006 BUSCANDO MALTRATA VEHICULO ... $maltraVehi = LeerStd($rsMaltraVehi, "410PER", "*", "PERCodigo = '$ClienteId' AND PERCheckbox9 = '1'", "", "", "", ""); } if ($countRecord > 0) { $MsgCliente = $MsgCliente."
Debe contactar al gerente de estación."; } // AGREGADO 23/02/2006 BUSCANDO MALTRATA VEHICULO ... if ($maltraVehi > 0) { $MsgCliente = $MsgCliente."
El cliente maltrata vehiculo."; } } } elseif ($countClientes > 1) { $MsgCliente = "Existen $countClientes registros. Verlos."; } } else if ($countClientes == 0 && $tBuscarCliente !='') { if ($cClienteCriterio=="Localizador"){ $rowCliente = mysql_fetch_array($rsClientes); $CodRes=$rowCliente[AR7Codigo]; $bandera="no"; } else{ $MsgCliente = "El cliente no existe."; if ($countRecord > 0) { $MsgCliente = "Debe contactar al gerente de estación.
"; } if(!$EsEmpresa){ //Aqui se agregó el 23/02/2006 el CALCULO DE FECHA NACIMINETO $fechaauxiliarF=explode("-", $rowCliente[PERFecha1]); $TemporalNacimiento =$fechaauxiliarF[2]."/".$fechaauxiliarF[1]."/".$fechaauxiliarF[0]; if($TemporalNacimiento == '//' OR $TemporalNacimiento == '00/00/0000') $TemporalNacimiento = ''; $MsgCliente = $MsgCliente."
Fecha Nacimiento "; $MsgCliente = $MsgCliente."                           dd/mm/aaaa
Buscar en: CANAVE | Seguro Social | CNE | INTTT"; } $bandera ='si'; $existeCliente=0; $editable = 'si'; } } else if($CodigoContrato != '' ) { if($clientePersona != ''){ $CantClie = LeerStd($Clien, '410PER', "*", "PERCodigo = '$clientePersona' AND PERCodigo != ''", "", "", "", ""); $rowClie = mysql_fetch_array($Clien); $ClienteId =$clientePersona; //PARA ADVERTIR QUE EL CLIENTE ES VIP $CantVIP = LeerStd($VIP, '410AR3', "*", "AR3Checkbox4 = 1 AND AR3EnlaceP = '$rowClie[PERCodigo]'", "", "", "", ""); if($CantVIP > 0){ ?> Fecha Nacimiento "; $MsgCliente = $MsgCliente."                           dd/mm/aaaa
Buscar en: CANAVE | Seguro Social | CNE | INTTT"; } else if($clienteEmpresa != ''){ $CantClie = LeerStd($CantClie, '410AR1', "*", "AR1Codigo = $clienteEmpresa", "", "", "", ""); $rowClie = mysql_fetch_array($CantClie); $MsgCliente = "RIF  ".$rowClie[AR1Linea1]." "; $MsgCliente = $MsgCliente.$rowClie[AR1Linea3]; $ClienteId =$clienteEmpresa; //PARA ADVERTIR QUE EL CLIENTE ES VIP $CantVIP = LeerStd($VIP, '410AR3', "*", "AR3Checkbox4 = 1 AND AR3Enlace1 = '$rowClie[AR1Codigo]'", "", "", "", ""); if($CantVIP > 0){ ?> "; //Buscando el cargo de quien elaboró el contrato /*$cargo= ObtenerUno("410AGE",$ElaboradoPor,"AGELinea4","");*/ //Parametro que identifica la edad menor y se pasa a la funcion Agregado 24/06/2006 $FechaHoy=date('Y-m-d'); $CantPRM=LeerStd($LecturaPRM,"410PRM","*", "PRMNombre = 'EDAD' AND (PRMFecha1='' OR PRMFecha1='0000-00-00' OR '$FechaHoy' < PRMFecha1) ","","","",""); $rowPRM= mysql_fetch_array($LecturaPRM); $ValorEdad = $rowPRM[PRMLinea2]; ?> "> " class='camposform1' > "){ ?>
Elaborado por   |  


Cliente 
> >
Residente: >
Datos del Cliente 
0) die; ?>
Añadir/Modificar Cliente
 
 
Contingencia 
En Contingencia 
 
 
Unidad 
Nro. Unidad 
Datos Unidad 
Nro     Subgrupo
Marca     Color  
Status     Placa
Kms     Combust.
 
Actividades de Choferes 
Lavado por: Preparado por:
 
Entregado por:
 
Alquiler 
Fecha Desde: dd/mm/aaaa Hora: " class='camposform1' onBlur="ValidaHora(this);"> Estación de Apertura:
Fecha Hasta: dd/mm/aaaa Hora: " class='camposform1' onBlur="ValidaHora(this);"> Estación de Cierre:
 
Pago
 
Cheque Depósito Transferencia Tarjeta de Crédito Tarjeta de Débito Efectivo Carta Orden      
Monto 
   
       


0){ $rowCliente = mysql_fetch_array($reser); $CodRes=$rowCliente[AR7Codigo]; echo ""; } else{ echo ""; } } function ListaInicializada($lista,$valorInicial,$Aplic,$papa){ $resultado=""; $queryA="SELECT * FROM $Aplic"."LIS WHERE LISValor='$papa'"; //$resultado=$queryA; $resultA=mysql_query($queryA); $rowA=mysql_fetch_assoc($resultA); $queryL="SELECT * FROM $Aplic"."LIS WHERE LISNombre='$lista'"; $queryCod="SELECT * FROM $Aplic"."LIS WHERE LISValor='".$papa."' and LISNombre='PERLista31'"; $resultCod=mysql_query($queryCod); $rowCod=mysql_fetch_array($resultCod); $cod_Papa=$rowCod["LISCodigo"]; switch($lista){ case "PERLista32" :{ $queryL="SELECT * FROM $Aplic"."LIS WHERE LISNombre='PERLista32' and LISPadre=".$cod_Papa.""; break; } case "PERLista33" :{ $queryL="SELECT * FROM $Aplic"."LIS WHERE LISNombre='PERLista33' and LISPadre=".$cod_Papa.""; break; } }//fin del switch $resultL=mysql_query($queryL); $numRegistros=mysql_num_rows($resultL); for ($contador=0;$contador<$numRegistros;$contador++){ $rowL=mysql_fetch_array($resultL); $valorActual=$rowL["LISValor"]; $seleccion=""; if(strpos($valorActual,"@=@=")===false){ if ($valorActual==$valorInicial){ //echo "Algo $valorActual"; $seleccion=" selected"; } $resultado=$resultado.""; } } return $resultado; } die(); ?>