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
>
CI-V
CI-E
Pasaporte
Localizador
Nombre
Apellido
RIF
Nombre Comercial
>
>
Residente:
>
No Residente:
>
Datos del Cliente
0) die; ?>
Añadir/Modificar Cliente
Cliente
Guardar Cambios
CI-V
CI-E
Pasaporte
value="">
Primer nombre
Segundo nombre
Primer apellido
Segundo apellido
Grado Licencia
Número Licencia
Vencimiento Licencia
Vencimiento Certificado
Correo Electrónico
Trabaja en
Dirección Habitación
Dirección Oficina
País
---Seleccione---"; echo CajaLista(PERLista16); }else{ $listaInic=ListaInicializada("PERLista16","$rowCliente[PERLista16]","410",""); echo $listaInic; } }else{ echo "
---Seleccione---
"; echo CajaLista(PERLista16); } ?>
>
Estado
---Seleccione---"; }else{ $listaInic=ListaInicializada("PERLista31","$rowCliente[PERLista31]","410",""); echo $listaInic; } }else{ echo "
---Seleccione---
"; } ?>
>
Ciudad
---Seleccione---"; }else{ $listaInic=ListaInicializada("PERLista32","$rowCliente[PERLista32]","410","$rowCliente[PERLista31]"); echo $listaInic; } }else{ echo "
---Seleccione---
"; } ?>
>
Ciudad Extranjera
>
Municipio
---Seleccione---"; }else{ $listaInic=ListaInicializada("PERLista33","$rowCliente[PERLista33]","410","$rowCliente[PERLista31]" ); echo $listaInic; } }else{ echo "
---Seleccione---
"; } ?>
Sector / Urb.
Av. / Calle
Residencia
Piso
Número Apto.
Teléfono
+
Tlf. celular
+
País
---Seleccione---"; echo CajaLista(PERLista18); }else{ $listaInic=ListaInicializada("PERLista16","$rowCliente[PERLista18]","410",""); echo $listaInic; } }else{ echo "
---Seleccione---
"; echo CajaLista(PERLista18); } ?>
>
Estado
---Seleccione---"; }else{ $listaInic=ListaInicializada("PERLista31","$rowCliente[PERLista34]","410",""); echo $listaInic; } }else{ echo "
---Seleccione---
"; } ?>
>
Ciudad
---Seleccione---"; }else{ $listaInic=ListaInicializada("PERLista32","$rowCliente[PERLista35]","410","$rowCliente[PERLista34]"); echo $listaInic; } }else{ echo "
---Seleccione---
"; } ?>
>
Ciudad Extranjera
>
Municipio
---Seleccione---"; }else{ $listaInic=ListaInicializada("PERLista33","$rowCliente[PERLista36]","410","$rowCliente[PERLista34]" ); echo $listaInic; } }else{ echo "
---Seleccione---
"; } ?>
Sector / Urb.
Av. / Calle
Edificio
Piso
Número Ofic.
Teléfono
+
Tlf. fax
+
Dirección Alternativa
} else {?>
Cliente
Guardar Cambios
Nombre Comercial
RIF
value=' echo $rowCliente[AR1Linea1]; ?>' size='20'>
Razón Social
Email
Dirección
País
---Seleccione---"; echo CajaLista(AR1Lista1); }else{ $listaInic=ListaInicializada("PERLista16","$rowCliente[AR1Lista1]","410",""); echo $listaInic; } }else{ echo "
---Seleccione---
"; echo CajaLista(AR1Lista1); } ?>
>
Estado
---Seleccione---"; }else{ $listaInic=ListaInicializada("PERLista31","$rowCliente[AR1Lista2]","410",""); echo $listaInic; } }else{ echo "
---Seleccione---
"; } ?>
>
Ciudad
---Seleccione---"; }else{ $listaInic=ListaInicializada("PERLista32","$rowCliente[AR1Lista7]","410","$rowCliente[AR1Lista2]"); echo $listaInic; } }else{ echo "
---Seleccione---
"; } ?>
>
Ciudad Extranjera
>
Municipio
---Seleccione---"; }else{ $listaInic=ListaInicializada("PERLista33","$rowCliente[AR1Lista8]","410","$rowCliente[AR1Lista2]" ); echo $listaInic; } }else{ echo "
---Seleccione---
"; } ?>
Sector / Urb.
Av. / Calle
Edificio
Piso
Número Ofic.
Teléfono
+
Tlf. fax
+
Dirección Alternativa
}?>
Contingencia
En Contingencia
Unidad
Nro. Unidad
Datos Unidad
Nro
Subgrupo
Marca
Color
Status
Placa
Kms
Combust.
Actividades de Choferes
Lavado por:
---
$CantAges=LeerStd($Ages,'410AGE','*',"AGECheckbox1 != '1'",'AGELinea1','','',''); for($i=0; $i<$CantAges; $i++){ $rowA=mysql_fetch_array($Ages); echo "
".$rowA[AGELinea1]."
"; } ?>
Preparado por:
---
$CantAges=LeerStd($Ages,'410AGE','*',"AGECheckbox1 != '1'",'AGELinea1','','',''); for($i=0; $i<$CantAges; $i++){ $rowA=mysql_fetch_array($Ages); echo "
".$rowA[AGELinea1]."
"; } ?>
Entregado por:
---
$CantAges=LeerStd($Ages,'410AGE','*',"AGECheckbox1 != '1'",'AGELinea1','','',''); for($i=0; $i<$CantAges; $i++){ $rowA=mysql_fetch_array($Ages); echo "
".$rowA[AGELinea1]."
"; } ?>
Alquiler
Fecha Desde:
Hora:
" class='camposform1' onBlur="ValidaHora(this);">
Estación de Apertura: echo $rowEstacion[$fldNombre_Estacion_O]; ?>
Fecha Hasta:
Hora:
" class='camposform1' onBlur="ValidaHora(this);">
Estación de Cierre:
echo CajaTabla($tblEstacion)?>
Pago
Cheque
Depósito
Transferencia
Tarjeta de Crédito
Tarjeta de Débito
Efectivo
Carta Orden
Monto
Número
Tarjetahabiente
Banco emisor
---
echo CajaLista($fldBancoEmisor_Pago_O) ?>
Otro banco
Banco receptor
---
echo CajaLista($fldBancoEmisor_Pago_O) ?>
Tipo
=CajaLista(PAGLista5)?>
Fecha de Vencimiento
=CajaLista(PAGLista8)?>
=CajaLista(PAGLista7)?>
Cod. de Seguridad
Fecha de Vencimiento
=CajaLista(PAGLista8)?>
=CajaLista(PAGLista7)?>
Cod. de Seguridad
Clave de Autorización
ID de Operador
Nro. Lote
Fecha de Autorización
Fecha Emisión
Nro. Carta
Autorizador