"; print_r($_POST); echo "";
include('numeroNoches.php');
//Buscar el codigo de contrato proveniente de un BACK
$CodigoContrato =$cok["COKGlobal4"];
//echo "Codigo Contrato".$CodigoContrato;
//Haciendo una lectura en caso de que el código de contrato provenga de un BACK
if($CodigoContrato !=''){
$CantContratoBack= LeerStd($contratoBack, '410CTR', "*", "CTRCodigo = '$CodigoContrato'", "", "", "", "");
$rowContratoBack= mysql_fetch_array($contratoBack);
$nroContrato =$rowContratoBack[CTRCant2];
$nroContratoN2C = $CodigoContrato;
$nroUnidadBack = $rowContratoBack[CTRLink1_UND];
$tCliCodigoPER = $rowContratoBack[CTRLink1_PER];
$tCliCodigoAR1 = $rowContratoBack[CTRLink1_AR1];
if($tCliCodigoPER !=''){
$tCliCodigo = $tCliCodigoPER;
}
else if($tCliCodigoAR1 !=''){
$tCliCodigo = $tCliCodigoAR1;
}
}
$ParamLoc = LeerStd($buscarParam, '410PRM', "*", "PRMNombre='DIA'", "", "", "", "");
$rowParam = mysql_fetch_array($buscarParam);
$horaParaDiaAdicional =$rowParam[PRMLinea2];
//Calcular días de contrato
$diasAlquiler = numeroNoches($fechaAlquiler, $tFechaEstimada);
if ($diasAlquiler==0){
$diasAlquiler=1;
}
else{
if (strtotime ($horaEntrega)> strtotime ($horaAlquiler)){
$cantHoras =$horaEntrega-$horaAlquiler;
if($cantHoras>=$horaParaDiaAdicional){
$diasAlquiler=$diasAlquiler+1;
}
}
}
//Cambio del formato de Fecha para Ingresar en la BD
$fechaauxiliar=explode("/", $fechaAlquiler);
$fechaauxiliar2=explode("/", $tFechaEstimada);
$fechaAlquiler =$fechaauxiliar[2]."-".$fechaauxiliar[1]."-".$fechaauxiliar[0];
$tFechaEstimada =$fechaauxiliar2[2]."-".$fechaauxiliar2[1]."-".$fechaauxiliar2[0];
//----------------------------------------------------------------------------- [Insertar o actualizar el cliente]---------------------------------------------------------------------//
//Ver si el cliente es una Persona Natural o Jurídica
//-----------------------------------------------------------------------------------------------/
//---------------------------[CLIENTE EMPRESA]------------------------------------/
//-----------------------------------------------------------------------------------------------/
if($CodigoContrato ==''){
if($EsEmpresa == '1'){
//Si la Empresa NO Existe
if($existeCliente==0){
$queryEmpresasNE= "
INSERT INTO 410AR1 (AR1CodAgente,AR1Linea12,AR1Linea13,AR1Linea13,AR1Linea33,AR1Linea10,AR1Lista8,AR1Lista7,AR1Linea34,AR1Lista2,AR1Lista1,AR1Linea22,AR1Linea23,AR1Tel1,AR1Linea24,AR1Linea25,AR1Tel2,AR1Nombre, AR1Linea1,AR1Linea3,AR1Email1)
VALUES ('$elaboradoPor','$AvJur','$edifJur','$pisoJur','$nroJur','$sectorJur','$muniJur','$cCiudadJ', '$tCiudadJ', '$cEstadoJ','$cPaisJ','$tTlfOficPaisJ','$tTlfOficAreaJ','$tTlfOficNroJ','$tTlfFaxPaisJ','$tTlfFaxAreaJ','$tTlfFaxNroJ','$nombreCom','$rif','$razonSocial','$emailJur')";
mysql_query($queryEmpresasNE);
$codigoClienteJuri = mysql_insert_id();
//Buscar el Cliente Creado
$CantCli= LeerStd($ClienteCreado, '410AR1', "*", "AR1Codigo = '$codigoClienteJuri'", "", "", "", "");
$rowCliente = mysql_fetch_array($ClienteCreado);
//Crear su Relación de Cliente Potencial con AMIGOS
$queryRelacion= "INSERT INTO 410AR3 (AR3CodAgente,AR3Enlace1,AR3Fecha1,AR3Lista1,AR3Lista3,AR3Lista5) VALUES ('$elaboradoPor','$rowCliente[AR1Codigo]','$fechaAlquiler','Cliente','$Potencial','Espontáneo')";
mysql_query($queryRelacion);
//Codigo del Cliente. Esta variable se utiliza al momento de ingresar el contrato
$tCliCodigo=$rowCliente[AR1Codigo];
}
//Si la Empresa Existe
else{
$CantCli= LeerStd($ClienteCreado, '410AR1', "*", "AR1Codigo = '$clienteId'", "", "", "", "");
$rowCliente = mysql_fetch_array($ClienteCreado);
//echo " GUARDAR JURIDICA".$guardarJuridica;
if($guardarJuridica == 1){
$queryEmpresasE= "UPDATE 410AR1 SET
AR1Linea12 = '$AvJur',
AR1Linea13 = '$edifJur',
AR1Linea33 = '$pisoJur',
AR1Linea20 = '$nroJur',
AR1Linea10 = '$sectorJur',
AR1Lista8 = '$muniJur',
AR1Lista7 = '$cCiudadJ',
AR1Linea34 = '$tCiudadJ',
AR1Lista2 = '$cEstadoJ',
AR1Lista1 = '$cPaisJ',
AR1Linea22 = '$tTlfOficPaisJ',
AR1Linea23 = '$tTlfOficAreaJ',
AR1Tel1 = '$tTlfOficNroJ',
AR1Linea24 = '$tTlfFaxPaisJ',
AR1Linea25 = '$tTlfFaxAreaJ',
AR1Tel2 = '$tTlfFaxNroJ',
AR1Nombre = '$nombreCom',
AR1Linea1 = '$rif',
AR1Linea3 = '$razonSocial',
AR1Email1 = '$emailJur'
WHERE AR1Codigo = '$clienteId'";
//echo " ".$queryEmpresasE;
mysql_query($queryEmpresasE);
//echo " ERROR".mysql_error();
}
//Buscar si el cliente tiene una Relación con AMIGOS
$CantRel1= LeerStd($Rel1, '410AR3', "*", "AR3Enlace1 = '$clienteId' AND AR3Enlace2 = '7'", "", "", "", "");
$rowRel1 = mysql_fetch_array($Rel1);
if($CantRel1 ==0){
//Crear su Relación de Cliente Potencial con AMIGOS
$queryRelacion3= "INSERT INTO 410AR3 (AR3CodAgente,AR3Enlace1,AR3Enlace2,AR3Fecha1,AR3Lista1,AR3Lista3,AR3Lista5) VALUES ('$elaboradoPor','$rowCliente[AR1Codigo]','7','$fechaAlquiler','Cliente','Potencial','Espontáneo')";
mysql_query($queryRelacion3);
}
else{
//Buscar todos los contratos que el Cliente ha realizado en AMIGOS. Si son 2 o más actualizar su relación con AMIGOS como Activo
$CantCtr2= LeerStd($Ctrs2, '410CTR', "*", "CTRLink1_AR1 = '$clienteId' ", "", "", "", "");
$rowRel2 = mysql_fetch_array($Ctrs2);
if($CantCtr2=='2'){
$queryRelacion4= "UPDATE 410AR3 SET AR3Lista3='Activo', AR3Lista5='Frecuente' WHERE AR3Enlace1 = '$rowCliente[AR1Codigo]' ";
mysql_query($queryRelacion4);
}
}
//Codigo del Cliente. Esta variable se utiliza al momento de ingresar el contrato
$tCliCodigo=$rowCliente[AR1Codigo];
}
}
//---------------------------------------------------------------------------------------------------------------/
//---------------------------[CLIENTE PERSONA NATURAL]------------------------------------/
//----------------------------------------------------------------------------------------------------------------/
else{
$fechaauxiliar3=explode("/", $tCliLicVenc);
$fechaauxiliar4=explode("/", $tCliCertifVenc);
$tCliLicVenc =$fechaauxiliar3[2]."-".$fechaauxiliar3[1]."-".$fechaauxiliar3[0];
$tCliCertifVenc =$fechaauxiliar4[2]."-".$fechaauxiliar4[1]."-".$fechaauxiliar4[0];
//echo "Es persona Natural";
//---------------------------------------------------Si la Persona Nat NO Existe
if($existeCliente==0){
//Si el documento es Pasaporte
if ($cDocTipo == 'pasaporte'){
$cDocTipo ='---';
$ced='';
}
else{
$ced =$tCliCodigo;
$tCliCodigo='';
}
//Concatenación de Nombres y apellidos
if($tCliSegundoApellido !='')
$nombreCompleto= $tCliPrimerApellido." ".$tCliSegundoApellido.",".$tCliPrimerNombre." ".$tCliSegundoNombre;
else
$nombreCompleto= $tCliPrimerApellido.",".$tCliPrimerNombre." ".$tCliSegundoNombre;
//Fecha de nacimiento Agregada el 24/02/2006 en el INSERT y el UPDATE
$fechaauxiliarM=explode("/", $menorCliente);
$menorCliente =$fechaauxiliarM[2]."-".$fechaauxiliarM[1]."-".$fechaauxiliarM[0];
//QUERY DE INGRESO
$queryPerNE= "
INSERT INTO 410PER (PERNombre,PERCodAgente,PERLista11,PERLinea51,PERLinea4,PERLinea48,PERLinea1,PERLinea2,PERLinea3,PERCant2,PERFecha5,PERFecha6,PEREmail1,PERLinea12,PERLinea13,PERLinea62,PERLinea11,PERLinea14,PERLista33,PERLinea64,PERLista31,PERLista16,PERLinea52,PERLinea53,PERTel1,PERLinea54,PERLinea55,PERTel3,PERLinea27,PERLinea28,PERLinea63,PERLinea29,PERLinea26,PERLista36,PERLista35,PERLinea65,PERLista34,PERLista18,PERLinea56,PERLinea57,PERTel5,PERLinea60,PERLinea61,PERTel7,PERFecha1,PERLinea67) VALUES ('$nombreCompleto','$elaboradoPor','$cDocTipo','$ced','$tCliCodigo','$tCliPrimerNombre','$tCliSegundoNombre','$tCliPrimerApellido','$tCliSegundoApellido', '$tCliGrado', '$tCliLicVenc','$tCliCertifVenc','$tCliEmail','$tAvenida','$tEdificio','$tPiso','$tSector','$tApto','$tMunicipio','$ciudadExt','$cEstadoH','$cPaisH','$tTlfPais','$tTlfArea','$tTlfNro','$tTlfCelPais','$tTlfCelArea','$tTlfCelNro','$tOficAvCalle','$tOficEdificio','$tOficPiso','$tOficNroAptoCasa','$tOficSectorUrb','$tOficMunicipio','$cOficCiudad','$ciudadExtOfic','$cOficEstado','$cOficPais','$tTlfOficPais','$tTlfOficArea','$tTlfOficNro','$tTlfFaxPais','$tTlfFaxArea','$tTlfFaxNro','$menorCliente','$numeroLicencia')";
$resultado = mysql_query($queryPerNE);
//echo "ERROR".mysql_error();
//echo "
QUERY PER: $queryPerNE";
//Buscar el Cliente Creado
if($ced != '')
$CantCli= LeerStd($ClienteCreado, '410PER', "*", "PERLinea51 = '$ced' AND PERLista11 = '$cDocTipo'", "", "", "", "");
else
$CantCli= LeerStd($ClienteCreado, '410PER', "*", "PERLinea4 = '$tCliCodigo' ", "", "", "", "");
$rowCliente = mysql_fetch_array($ClienteCreado);
//echo"Codigo del cliente: $rowCliente[PERCodigo]";
//Crear su Relación de Cliente Potencial con AMIGOS
$queryRelacion= "INSERT INTO 410AR3 (AR3CodAgente,AR3EnlaceP,AR3Enlace2,AR3Fecha1,AR3Lista1,AR3Lista3,AR3Lista5) VALUES ('$elaboradoPor','$rowCliente[PERCodigo]','7','$fechaAlquiler','Cliente','Potencial','Espontáneo')";
mysql_query($queryRelacion);
//Codigo del Cliente. Esta variable se utiliza al momento de ingresar el contrato
$tCliCodigo=$rowCliente[PERCodigo];
}
//-----------------------------------------------Si la Persona Nat Existe
else{
$CantCli= LeerStd($ClienteCreado, '410PER', "*", "PERCodigo = '$clienteId'", "", "", "", "");
$rowCliente = mysql_fetch_array($ClienteCreado);
//Concatenación de Nombres y apellidos
if($tCliSegundoApellido !='')
$nombreCompleto= $tCliPrimerApellido." ".$tCliSegundoApellido.",".$tCliPrimerNombre." ".$tCliSegundoNombre;
else
$nombreCompleto= $tCliPrimerApellido.",".$tCliPrimerNombre." ".$tCliSegundoNombre;
//Si el documento es Pasaporte
if ($cDocTipo == 'pasaporte'){
$cDocTipo ='---';
$ced='';
}
else{
$ced =$tCliCodigo;
$tCliCodigo='';
}
if($guardarNatural == 1){
$queryPerE= "
UPDATE 410PER SET
PERLista11 = '$cDocTipo',
PERLinea51 = '$ced',
PERLinea4 = '$tCliCodigo',
PERLinea48 = '$tCliPrimerNombre',
PERLinea1 = '$tCliSegundoNombre',
PERLinea2 = '$tCliPrimerApellido',
PERLinea3 = '$tCliSegundoApellido',
PERCant2 = '$tCliGrado',
PERFecha5 = '$tCliLicVenc',
PERFecha6 = '$tCliCertifVenc',
PEREmail1 = '$tCliEmail',
PERLinea12 = '$tAvenida',
PERLinea13 = '$tEdificio',
PERLinea62 = '$tPiso',
PERLinea11 = '$tSector',
PERLinea14 = '$tApto',
PERLista33 = '$tMunicipio',
PERLista32 = '$cCiudadH',
PERLinea64 = '$ciudadExt',
PERLista31 = '$cEstadoH',
PERLista16 ='$cPaisH',
PERLinea52 = '$tTlfPais',
PERLinea53 ='$tTlfArea',
PERTel1 = '$tTlfNro',
PERLinea54 = '$tTlfCelPais',
PERLinea55 = '$tTlfCelArea',
PERTel3 ='$tTlfCelNro',
PERLinea27 ='$tOficAvCalle',
PERLinea28 = '$tOficEdificio',
PERLinea63 = '$tOficPiso',
PERLinea29 = '$tOficNroAptoCasa',
PERLinea26 = '$tOficSectorUrb',
PERLista36 = '$tOficMunicipio',
PERLista35 = '$cOficCiudad',
PERLinea65 = '$ciudadExtOfic',
PERLista34 = '$cOficEstado',
PERLista18= '$cOficPais',
PERLinea56 = '$tTlfOficPais',
PERLinea57 = '$tTlfOficArea',
PERTel5 = '$tTlfOficNro',
PERLinea60 = '$tTlfFaxPais',
PERLinea61 = '$tTlfFaxArea',
PERTel7 = '$tTlfFaxNro',
PERFecha1 = '$menorCliente',
PERLinea67 = '$numeroLicencia'
WHERE PERCodigo = '$clienteId'";
//echo " ".$queryPerE;
mysql_query($queryPerE);
//echo " ERROR".mysql_error();
}
//echo "ERROR".mysql_error();
//Buscar si el cliente tiene una Relación con AMIGOS
$CantRel= LeerStd($Rel, '410AR3', "*", "AR3EnlaceP = '$clienteId' AND AR3Enlace2 = '7'", "", "", "", "");
$rowRel = mysql_fetch_array($Rel);
if($CantRel ==0){
//Crear su Relación de Cliente Potencial con AMIGOS
$queryRelacion1=
"INSERT INTO 410AR3 (AR3CodAgente,AR3EnlaceP,AR3Enlace2,AR3Fecha1,AR3Lista1,AR3Lista3,AR3Lista5)
VALUES ('$elaboradoPor','$rowCliente[PERCodigo]','7','$fechaAlquiler','Cliente','Potencial','Espontáneo')";
mysql_query($queryRelacion1);
}
else{
//Buscar todos los contratos que el Cliente ha realizado en AMIGOS. Si son 2 o más actualizar su relación con AMIGOS como Activo
$CantCtr= LeerStd($Ctrs, '410CTR', "*", "CTRLink1_PER = '$clienteId' ", "", "", "", "");
$rowRel = mysql_fetch_array($Ctrs);
if($CantCtr=='2'){
$queryRelacion2= "UPDATE 410AR3 SET AR3Lista3='Activo', AR3Lista5='Frecuente' WHERE AR3EnlaceP = '$clienteId' ";
mysql_query($queryRelacion2);
}
}
//Codigo del Cliente. Esta variable se utiliza al momento de ingresar el contrato
$tCliCodigo=$rowCliente[PERCodigo];
}
}
}
//-----------------------------[Crear el CONTRATO con Nro de secuencia según la estación]---------------------------------------//
//Ver si el cliente es una Persona Natural o Jurídica
if($CodigoContrato == ''){
if($EsEmpresa == '1'){
$campoCliente = $tCliCodigo;
$tCliCodigo='';
$direcAlternativa = $direcAlternativaP;
}
else {
$campoCliente ='';
$direcAlternativa = $direcAlternativaE;
}
//Para guardar si el cliente es menor o mayor de edad AGREGADO EL 24/02/2006
if($mesajeMenor == 'Menor edad'){
$mesajeMenor = '1';
} else {
$mesajeMenor = '0';
}
//echo " Dirección Alternativa".$direcAlternativa;
//echo " Zona de Cobro".$zonaCobro;
$queryContrato= "
INSERT INTO 410CTR (CTRCant2,CTRCodAgente,CTRFecha1,CTRHora1,CTRLink1_EST,CTRLink1_PER,CTRLink1_AR1,CTRCant1,CTRFecha2,CTRLink2_EST,CTRLink1_UND,CTRMonto1, CTRLista2,CTRLista6, CTRBloque2,CTRLink3_EST,CTRCheckbox7,CTRHora2,CTRLinea4,CTRLinea5) VALUES ('$nroContrato','$elaboradoPor','$fechaAlquiler','$horaAlquiler','$estEntrada','$tCliCodigo','$campoCliente','$diasAlquiler', '$tFechaEstimada', '$cEstacion','$nron2cUnid','$KmsInic','$combust','Abierto','$direcAlternativa','$zonaCobro','$mesajeMenor','$horaEntrega','$gerente','$cargo')";
mysql_query($queryContrato);
$nroContratoN2C = mysql_insert_id();
//GRABAR COKIE
GrabarCokie("COKGlobal4","$nroContratoN2C");
}
else {
if($tCliCodigoAR1 != ''){
$campoCliente = $tCliCodigo;
$tCliCodigo='';
}
else {
$campoCliente ='';
}
$queryContratoUPT= "
UPDATE 410CTR SET
CTRFecha1 = '$fechaAlquiler',
CTRHora1 = '$horaAlquiler',
CTRCant1 = '$diasAlquiler',
CTRFecha2 = '$tFechaEstimada',
CTRLink1_UND = '$nron2cUnid',
CTRMonto1 = '$KmsInic',
CTRLista2 = '$combust',
CTRLista6 = 'Abierto',
CTRLink3_EST='$zonaCobro'
WHERE CTRCodigo = '$nroContratoN2C' ";
mysql_query($queryContratoUPT);
}
//echo " Query: $queryContrato";
//echo "ERROR".mysql_error();
//-----------------------------------------------------------------------Actualizar la estación con el último número de contrato ingresado en la misma
if($CodigoContrato == ''){
$queryEstacion= "UPDATE 410EST SET ESTCant3 = '$nroContrato' WHERE ESTCodigo = '$estEntrada'";
mysql_query($queryEstacion);
}
if($CodigoContrato != ''){
if($EsEmpresa == 0){
$nombreCompleto = ObtenerUno("410PER",$tCliCodigoPER,"PERNombre","");
}
else{
$nombreCom = ObtenerUno("410AR1",$tCliCodigoAR1,"AR1Nombre","");
$razonSocial = ObtenerUno("410AR1",$tCliCodigoAR1,"AR1Linea3","");
}
}
//-----------------------------------------------------------------------Ingresando la Unidad en Tracking
if($CodigoContrato == ''){
$queryIngresoTracking= "
INSERT INTO 410TRK
(TRKLink1_UND,TRKLista1,TRKLinea1,TRKLista2,TRKLink1_EST,TRKFecha1,TRKHora1)
VALUES ('$nron2cUnid','Contrato','$nroContrato','Alquilado','$estEntrada','$fechaAlquiler','$horaAlquiler')";
mysql_query($queryIngresoTracking);
}
else{
if($nron2cUnid != $nroUnidadBack){ //Si la Unidad cambió
$CantTrack= LeerStd($track, '410TRK', "*", "TRKLink1_UND = '$nroUnidadBack' AND TRKLinea1 = '$nroContrato' AND TRKLista2 = 'Alquilado' ", "", "", "", "");
$rowTrack = mysql_fetch_array($track);
//Borro el registro de la Unidad Anterior
$queryDeleteTrack = "DELETE FROM 410TRK WHERE TRKCodigo = '$rowTrack[TRKCodigo]' ";
mysql_query($queryDeleteTrack);
//Inserto el registro de la Unidad Actual
$queryIngresoTracking= "
INSERT INTO 410TRK
(TRKLink1_UND,TRKLista1,TRKLinea1,TRKLista2,TRKLink1_EST,TRKFecha1,TRKHora1)
VALUES ('$nron2cUnid','Contrato','$nroContrato','Alquilado','$estEntrada','$fechaAlquiler','$horaAlquiler')";
mysql_query($queryIngresoTracking);
}
}
//----------------------------------------------------------------------Actualizando Status de la Unidad
if($CodigoContrato == '' ){
$queryEstacion= "UPDATE 410UND SET UNDLista8 = 'Alquilado' WHERE UNDCodigo = '$nron2cUnid'";
mysql_query($queryEstacion);
}
else{
//Colocar la Unidad Anterior como Disponible
$queryEstacion1= "UPDATE 410UND SET UNDLista8 = 'Disponible' WHERE UNDCodigo = '$nroUnidadBack'";
mysql_query($queryEstacion1);
//Colocar la Unidad Nueva como Alquilada
$queryEstacion2= "UPDATE 410UND SET UNDLista8 = 'Alquilado' WHERE UNDCodigo = '$nron2cUnid'";
mysql_query($queryEstacion2);
}
//---------------------------------------------------------------------------------- [NUEVO INGRESO de GARANTÍAí de Pago] --------------------------------------------------------------------------------//
$cantPagoIngresos = count($hActivo);
if($CodigoContrato == ''){
for($i=1;$i<=$cantPagoIngresos; $i++){
if($hActivo[$i]==1){
//Variables
$montoPago = $hMonto[$i];
$numeroPago = $tNro[$i];
$bancoEmisorPago=$tBancoA[$i];
$bancoOtroEmisorPago=$totroBancoA[$i];
$bancoReceptorPago=$tBancoB[$i];
$tarjetahabientePago=$tCliente[$i];
$companiaPago=$tCompania[$i];
$fechaEmisionPago=$tFechaEmision[$i];
$fechaInicioVigenciaPago=$tFechaDesde[$i];
$fechaFinVigenciaPago=$tFechaHasta[$i];
$personaAutorizaPago=$tautorizador[$i];
$nroCartaPago=$tNroCarta[$i];
$tipoTDCPago=$tTDCTipo[$i];
$mesPago=$tVencMes[$i];
$anoPago=$tVencAno[$i];
$idOP=$tIdOp[$i];
$nroLote=$tNroLote[$i];
$clave=$tClaveAut[$i];
//El siguiente check $checkGarantia es para dejar acentado en PAGCheckbox4 que se registro una "Garantia de Pago"
//asi se cambie luego el tipo a "Pago" ,agregado el 06/03/2006
$checkGarantia = "1";
if($hPagoForma[$i] == 'Cheque' ){
$queryPago= "
INSERT INTO 410PAG (PAGCodAgente,PAGLink1_CTR,PAGLista2,PAGLista10,PAGMonto1,PAGLinea1,PAGLista9, PAGLinea15, PAGCheckbox4)
VALUES ('$elaboradoPor','$nroContratoN2C','Cheque','Autorización de Garantía','$montoPago','$numeroPago','$bancoEmisorPago', '$bancoOtroEmisorPago', '$checkGarantia')";
}
else if($hPagoForma[$i] == 'Depósito' ){
$queryPago= "
INSERT INTO 410PAG (PAGCodAgente,PAGLink1_CTR,PAGLista2,PAGLista10,PAGMonto1,PAGLinea1,PAGLista9, PAGLinea15, PAGLista4,PAGCheckbox4)
VALUES ('$elaboradoPor','$nroContratoN2C','Depósito','Autorización de Garantía','$montoPago','$numeroPago','$bancoEmisorPago', '$bancoOtroEmisorPago', '$bancoReceptorPago','$checkGarantia')";
}
else if($hPagoForma[$i] == 'Tarjeta de Crédito' ){
$queryPago= "
INSERT INTO 410PAG (PAGCodAgente,PAGLink1_CTR,PAGLista2,PAGLista10,PAGMonto1,PAGLinea1,PAGLista9, PAGLinea15, PAGLinea12,PAGLista5,PAGLista8,PAGLista7,PAGCheckbox4,PAGLinea7,PAGCant3,PAGCant2)
VALUES ('$elaboradoPor','$nroContratoN2C','Tarjeta de Crédito','Autorización de Garantía','$montoPago','$numeroPago','$bancoEmisorPago', '$bancoOtroEmisorPago', '$tarjetahabientePago','$tipoTDCPago','$mesPago','$anoPago','$checkGarantia','$idOP','$nroLote','$clave')";
}
else if($hPagoForma[$i] == 'Carta Orden' ){
$queryPago= "
INSERT INTO 410PAG (PAGCodAgente,PAGLink1_CTR,PAGLista2,PAGLista10,PAGMonto1,PAGLinea8,PAGFecha3,PAGFecha4,PAGFecha5,PAGLinea9,PAGLinea10,PAGCheckbox4)
VALUES ('$elaboradoPor','$nroContratoN2C','Carta Otto','Autorización de Garantía','$montoPago','$companiaPago','$fechaEmisionPago','$fechaInicioVigenciaPago','$fechaFinVigenciaPago','$personaAutorizaPago','$nroCartaPago','$checkGarantia')";
}
else if($hPagoForma[$i] == 'Carta Otto' ){
$queryPago= "
INSERT INTO 410PAG (PAGCodAgente,PAGLink1_CTR,PAGLista2,PAGLista10,PAGMonto1,PAGLinea8,PAGFecha3,PAGFecha4,PAGFecha5,PAGLinea9,PAGLinea10,PAGLinea1,PAGLista9, PAGLinea15, PAGLinea12PAGLista5,PAGLista8,PAGLista7,PAGCheckbox4)
VALUES ('$elaboradoPor','$nroContratoN2C','Carta Otto','Autorización de Garantía','$montoPago','$companiaPago','$fechaEmisionPago','$fechaInicioVigenciaPago','$fechaFinVigenciaPago','$personaAutorizaPago','$nroCartaPago','$numeroPago','$bancoEmisorPago', '$bancoOtroEmisorPago', '$tarjetahabientePago','$tipoTDCPago','$mesPago','$anoPago','$checkGarantia')";
}
else if($hPagoForma[$i] == 'Efectivo' ){
$queryPago= "
INSERT INTO 410PAG (PAGCodAgente,PAGLink1_CTR,PAGLista2,PAGLista10,PAGMonto1,PAGCheckbox4)
VALUES ('$elaboradoPor','$nroContratoN2C','Efectivo','Autorización de Garantía','$montoPago','$checkGarantia')";
}
mysql_query($queryPago);
}
}
}
//----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------//
//Cantidad Máxima de Comductores adicionales
if($EsEmpresa =='1') $cantConductores =3;
else $cantConductores =2;
/*Cambio Lore 17/02 */
//------------------------------------------------------------------------------------------------------[LISTA DE PRECIOS]----------------------------------------------------------------------------------------------------//
//---Para Clientes Nacionales
if($Procedencia == 'Nacional'){
// De Empleados Vigentes en General
$CantCli= LeerStd($ClienteCreado, '410PER', "*", "PERCodigo = '$clienteId'", "", "", "", "");
$rowCliente = mysql_fetch_array($ClienteCreado);
if($rowCliente[PERCheckbox8] == 1){
$CantLPE= LeerStd($ListasPreciosE, '410EVE', "*", "EVELista2 = 'Empleados' AND EVELista5 = 'Nacional' AND EVEFecha1<='$fechaAlquiler' AND (EVEFecha2 = '0000-00-00' OR EVEFecha2>='$fechaHoy' OR EVEFecha2= '' OR EVEFecha2>='$fechaAlquiler' )", "", "", "", "");
}
//Mostrador Vigentes por estación, ciudad o general
$CantLPM= LeerStd($ListasPreciosM, '410EVE', "*", "EVELista2 = 'Mostrador' AND EVELista5 = 'Nacional' AND EVELink1_EST = '$estEntrada' AND EVEFecha1<='$fechaAlquiler' AND (EVEFecha2 = '0000-00-00' OR EVEFecha2>='$fechaAlquiler' OR EVEFecha2= '' OR EVEFecha2>='$fechaAlquiler' )", "", "", "", "");
//echo " Cantidad de LP Mostrador".$CantLPM;
if($CantLPM==0){
$CantLPM= LeerStd($ListasPreciosM, '410EVE', "*", "EVELista2 = 'Mostrador' AND EVELista5 = 'Nacional' AND EVELista4 ='$ciudad' AND EVEFecha1<='$fechaAlquiler' AND (EVEFecha2 = '0000-00-00' OR EVEFecha2>='$fechaAlquiler' OR EVEFecha2= '' OR EVEFecha2>='$fechaAlquiler' )", "", "", "", "");
//echo " Cantidad de LP Mostrador".$CantLPM;
if($CantLPM==0){
$CantLPM= LeerStd($ListasPreciosM, '410EVE', "*", "EVELista2 = 'Mostrador' AND EVELista5 = 'Nacional' AND EVEFecha1<='$fechaAlquiler' AND (EVEFecha2 = '0000-00-00' OR EVEFecha2>='$fechaAlquiler' OR EVEFecha2= '' OR EVEFecha2>='$fechaAlquiler' )", "", "", "", "");
//echo " Cantidad de LP Mostrador".$CantLPM;
}
}
//Promocionales Vigentes por estación, ciudad o general
$CantLPP= LeerStd($ListasPreciosP, '410EVE', "*", "EVELista2 = 'Promocionales' AND EVELista5 = 'Nacional' AND EVELink1_EST = '$estEntrada' AND EVEFecha1<='$fechaAlquiler' AND (EVEFecha2 = '0000-00-00' OR EVEFecha2= '' OR EVEFecha2>='$fechaAlquiler' ) ", "", "", "", "");
if($CantLPP==0){
$CantLPP= LeerStd($ListasPreciosP, '410EVE', "*", "EVELista2 = 'Promocionales' AND EVELista5 = 'Nacional' AND EVELista4 ='$ciudad' AND EVEFecha1<='$fechaAlquiler' AND (EVEFecha2 = '0000-00-00' OR EVEFecha2= '' OR EVEFecha2>='$fechaAlquiler' )", "", "", "", "");
if($CantLPP==0){
$CantLPP= LeerStd($ListasPreciosP, '410EVE', "*", "EVELista2 = 'Promocionales' AND EVELista5 = 'Nacional' AND EVEFecha1<='$fechaAlquiler' AND (EVEFecha2 = '0000-00-00' OR EVEFecha2>='$fechaAlquiler' OR EVEFecha2= '' OR EVEFecha2>='$fechaAlquiler' )", "", "", "", "");
}
}
//Buscar si el cliente es una Empresa Gubernamental
$CantCli= LeerStd($ClienteCreado, '410AR1', "*", "AR1Codigo = '$clienteId' AND AR1Lista15='Gubernamentales'", "", "", "", "");
$rowCliente = mysql_fetch_array($ClienteCreado);
if($CantCli == 1){
//Gubernamentales Vigentes por estación, ciudad o general
$CantLPG= LeerStd($ListasPreciosG, '410EVE', "*", "EVELista2 = 'Gubernamentales' AND EVELista5 = 'Nacional' AND EVELink1_EST = '$estEntrada' AND EVEFecha1<='$fechaAlquiler' AND (EVEFecha2 = '0000-00-00' OR EVEFecha2= '' OR EVEFecha2>='$fechaAlquiler')", "", "", "", "");
if($CantLPG==0){
$CantLPG= LeerStd($ListasPreciosG, '410EVE', "*", "EVELista2 = 'Gubernamentales' AND EVELista5 = 'Nacional' AND EVELista4 ='$ciudad' AND EVEFecha1<='$fechaAlquiler' AND (EVEFecha2 = '0000-00-00' OR EVEFecha2= '' OR EVEFecha2>='$fechaAlquiler')", "", "", "", "");
if($CantLPG==0){
$CantLPG= LeerStd($ListasPreciosG, '410EVE', "*", "EVELista2 = 'Gubernamentales' AND EVELista5 = 'Nacional' AND EVEFecha1<='$fechaAlquiler' AND (EVEFecha2 = '0000-00-00' OR EVEFecha2= '' OR EVEFecha2>='$fechaAlquiler')", "", "", "", "");
}
}
}
//Buscar si el cliente No tiene Convenio y es empresa
$CantConvCli= LeerStd($ClienteConv, '410AR6', "*", "AR6Enlace1 = '$clienteId' ", "", "", "", "");
$rowClienteConv = mysql_fetch_array($ClienteConv);
if($EsEmpresa == 1 && $CantConvCli == 0){
//Corporativas Vigentes por estación, ciudad o general
$CantLPCor= LeerStd($ListasPreciosCor, '410EVE', "*", "EVELista2 = 'Corporativas' AND EVELista5 = 'Nacional' AND EVELink1_EST = '$estEntrada' AND EVEFecha1<='$fechaAlquiler' AND (EVEFecha2 = '0000-00-00' OR EVEFecha2= '' OR EVEFecha2>='$fechaAlquiler')", "", "", "", "");
if($CantLPC==0){
$CantLPCor= LeerStd($ListasPreciosCor, '410EVE', "*", "EVELista2 = 'Corporativas' AND EVELista5 = 'Nacional' AND EVELista4 ='$ciudad' AND EVEFecha1<='$fechaAlquiler' AND (EVEFecha2 = '0000-00-00' OR EVEFecha2= '' OR EVEFecha2>='$fechaAlquiler')", "", "", "", "");
if($CantLPCor==0){
$CantLPCor= LeerStd($ListasPreciosCor, '410EVE', "*", "EVELista2 = 'Corporativas' AND EVELista5 = 'Nacional' AND EVEFecha1<='$fechaAlquiler' AND (EVEFecha2 = '0000-00-00' OR EVEFecha2= '' OR EVEFecha2>='$fechaAlquiler')", "", "", "", "");
}
}
}
//Buscar si la estación para ver si está ubicada enun Hotel
$EsHotel= ObtenerUno("410EST",$estEntrada,"ESTCheckbox2","");
if($EsHotel == '1'){
//Room-Car
$CantLPRC= LeerStd($ListasPreciosRC, '410EVE', "*", "EVELista2 = 'Room-Car' AND EVELista5 = 'Nacional' AND EVEFecha1<='$fechaAlquiler' AND (EVEFecha2 = '0000-00-00' OR EVEFecha2>='$fechaAlquiler' OR EVEFecha2= '' OR EVEFecha2>='$fechaAlquiler' )", "", "", "", "");
}
}
else{
$CantLPI= LeerStd($ListasPreciosI, '410EVE', "*", " EVELista5 = 'Internacional' AND EVEFecha1<='$fechaAlquiler' AND (EVEFecha2 = '0000-00-00' OR EVEFecha2>='$fechaAlquiler' OR EVEFecha2= '' OR EVEFecha2>='$fechaAlquiler' ) ", "", "", "", "");
}
//Buscar el Subgrupo de la Unidad
$CantCarro= LeerStd($sub, '410UND', "*", " UNDCodigo = '$nron2cUnid' ", "", "", "", "");
$rowCarro = mysql_fetch_array($sub);
$subgrupo =$rowCarro[UNDLink1_SUB];
$capacidadTanque = $rowCarro[UNDCant3];
?>
Apertura de Contrato (Precios y Conductores Adicionales)