echo " "; ?>
$FechaHoy=date('Y-m-d'); $HoraHoy = date('H:i'); $Estacion=$cok["COKGlobal2"]; $AGECodigo = $cok["COKAgente"]; $Status = "Preingreso"; $FechaPre = explode("/",$UNDFecha3); $UNDFecha3 =$FechaPre[2]."-".$FechaPre[1]."-".$FechaPre[0]; if ($UNDFecha3 == '--') $UNDFecha3= ''; $FechaPre = explode("/",$UNDFecha4); $UNDFecha4 =$FechaPre[2]."-".$FechaPre[1]."-".$FechaPre[0]; if ($UNDFecha4 == '--') $UNDFecha4= ''; //Insertar PreIngreso Unidad $queryUND= "INSERT INTO 410UND (UNDNombre,UNDCodAgente,UNDLista1,UNDLink1_SUB,UNDLink1_EST,UNDFecha3,UNDLinea1,UNDLink1_MAR,UNDLink1_MOD,UNDLinea2,UNDLinea3,UNDLista4,UNDCant1,UNDCant2,UNDCheckbox2,UNDCheckbox1,UNDLinea4,UNDLinea5,UNDCant3,UNDLista5,UNDMonto1,UNDMonto2,UNDMonto7,UNDLinea6,UNDLinea12,UNDFecha4,UNDCant4,UNDLista8) VALUES ('$UNDNombre','$AGECodigo','$UNDLista1','$UNDLink1_SUB','$UNDLink1_EST','$UNDFecha3','$UNDLinea1','$UNDLink1_MAR','$UNDLink1_MOD','$UNDLinea2','$UNDLinea3','$UNDLista4','$UNDCant1','$UNDCant2','$UNDCheckbox2','$UNDCheckbox1','$UNDLinea4','$UNDLinea5','$UNDCant3','$UNDLista5','$UNDMonto1','$UNDMonto2','$UNDMonto7','$UNDLinea6','$UNDLinea12','$UNDFecha4','$UNDCant4','$Status')"; mysql_query($queryUND); //Buscando UNDCodigo en UND que se acaba de guardar $cantUND = LeerStd($PreUnidad,"410UND","*","UNDNombre = '$UNDNombre'","","","",""); $rowUND= mysql_fetch_array($PreUnidad); //Insertar en TRK el PreIngreso $TipoAccionTRK = "Orden Compra"; //ilander - Ticket 4286 /* $queryTRK= "INSERT INTO 410TRK (TRKCodAgente,TRKLink1_UND,TRKLista1,TRKLinea1,TRKLista2,TRKLink1_EST,TRKLink2_EST,TRKFecha1,TRKHora1) VALUES ('$AGECodigo','$rowUND[UNDCodigo]','$TipoAccionTRK','$rowUND[UNDCodigo]','$Status','$Estacion','$UNDLink1_EST','$FechaHoy','$HoraHoy')"; mysql_query($queryTRK); */ $TRKNombre="PreIngreso Unidad ".$UNDNombre; $KmSal = 0; $KmEnt = 0; $Motivo = 'Sin definir'; $Operacion = 'PreIngreso Unidad'; $aa= "INSERT INTO 410TRK (TRKLink1_UND, TRKNombre, TRKLista1, TRKLinea1, TRKLista2, TRKFecha1, TRKHora1, TRKCodAgente, TRKLink1_EST, TRKLink2_EST, TRKMonto1, TRKMonto2, TRKLinea8, TRKLinea9) VALUES ('$rowUND[UNDCodigo]', '$TRKNombre', '$TipoAccionTRK', '$rowUND[UNDCodigo]', '$Status', '$UNDFecha3', '$HoraHoy', '$AGECodigo', '$Estacion','$UNDLink1_EST', '$KmEnt', '$KmSal', '$Motivo', '$Operacion')"; //echo "aa:$aa$aa
"); //fin - ilander - Ticket 4286 $Subgrupo = ObtenerUno("410SUB",$UNDLink1_SUB,"",""); $Estacion = ObtenerUno("410EST",$UNDLink1_EST,"",""); $Marca = ObtenerUno("410MAR",$UNDLink1_MAR,"",""); $Modelo = ObtenerUno("410MOD",$UNDLink1_MOD,"",""); //Envio de Email $rutaLogo="http://".$_SERVER[HTTP_HOST] ."/".$TOimg; $Texto = "Buenas, | |
".$PRM['LEMP']." le informa que en este momento se acaba de Preingresar una unidad. | |
Datos: | |
Nombre de la Unidad: $UNDNombre Grupo: $UNDLista1 Subgrupo: $Subgrupo Estación: $Estacion Marca: $Marca Modelo: $Modelo | |
".$PRM['LEMP']." | |