conn->SetFetchMode(ADODB_FETCH_ASSOC); $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC; $db->conn->debug=true; $phpsession = session_name()."=".session_id(); $params=$phpsession."&krd=$krd&codusua=$codusua&coddepe=$coddepe&arch=$arch"; echo "prueba2 $params"; $hora=date("H")."_".date("i"); // var que almacena el dia de la fecha $ddate=date('d'); // var que almacena el mes de la fecha $mdate=date('m'); // var que almacena el a?o de la fecha $adate=date('Y'); // var que almacena la fecha formateada $fecha=$adate."_".$mdate."_".$ddate; $arcCsv=$fecha."_".$hora; $p=1; ?> Cargar en CSV
= 10000000 ) { echo "el tamańo de los archivos no es correcto.

  • se permiten archivos de 100 Kb máximo.
  • "; } include ("$ruta_raiz/include/upload/upload_class.php"); $max_size = return_bytes(ini_get('upload_max_filesize')); // the max. size for uploading $my_upload = new file_upload; $my_upload->language="es"; $my_upload->upload_dir = "$ruta_raiz/bodega/tmp/"; // "files" is the folder for the uploaded files (you have to create this folder $my_upload->extensions = array(".csv"); // specify the allowed extensions here //$my_upload->extensions = "de"; // use this to switch the messages into an other language (translate first!!!) $my_upload->max_length_filename = 50; // change this value to fit your field length in your database (standard 100) $my_upload->rename_file = true; $archivoCsv = $_POST['cargarArchivo']; if(isset($archivoCsv)) { $tmpFile = trim($_FILES['archivoCsv']['name']); $newFile = $arcCsv; $uploadDir = "$ruta_raiz/bodega/tmp/"; $fileGrb = $arcCsv; $my_upload->upload_dir = $uploadDir; $my_upload->the_temp_file = $_FILES['archivoCsv']['tmp_name']; $my_upload->the_file = $_FILES['archivoCsv']['name']; $my_upload->http_error = $_FILES['archivoCsv']['error']; $my_upload->replace = (isset($_POST['replace'])) ? $_POST['replace'] : "n"; // because only a checked checkboxes is true $my_upload->do_filename_check = (isset($_POST['check'])) ? $_POST['check'] : "n"; // use this boolean to check for a valid filename //$new_name = (isset($_POST['name'])) ? $_POST['name'] : ""; if ($my_upload->upload($newFile)) { // new name is an additional filename information, use this to rename the uploaded file $full_path = $my_upload->upload_dir.$my_upload->file_copy; $info = $my_upload->get_uploaded_file_info($full_path); // ... or do something like insert the filename to the database $h = fopen($full_path,"r") ; if (!$h) { echo "
    No hay un archivo csv llamado *". $full_path."*"; } else { //echo "Subio CSV ".$full_path; $alltext_csv = ""; $encabezado = array(); $datos = array(); //$j=-1; $j=0; // Comentariada por HLP. Para puebas de arhivo csv delimitado por ; //while ($line=fgetcsv ($h, 10000, ";")) //while ($line=fgetcsv ($h, 10000, ",")) while ($line=fgetcsv ($h, 10000, "|")) { $num= count($line); if($num==10) { //echo "

    $num fields in line $j:

    \n"; $j++; if ($j==0) $encabezado = array_merge ($encabezado,array($line)); else $datos= array_merge ($datos,array($line)); /*for ($c=0; $c < $num; $c++) { echo $line[$c] . "
    \n"; } */ //Asigno variables $rm=$line[0]; $asunto=$line[1]; $nombre=$line[2]; $dir=$line[3]; $tel=$line[4]; $mail=$line[5]; $fecha=$line[6]; $ruta=$line[7]; $rnc=$line[8];// esta linea se utilizará para asignar el consecutivo del radicado. $ciudad=$line[9]; //Verifico vacios /*if($asunto=='') die ("El asunto no puede estar en blanco"); if($dir=='') die ("La direccion no puede estar en blanco"); if($ciudad=='') die ("La ciudad no puede estar en blanco"); if($nombre=='') die ("El nombre no puede estar en blanco"); */ /*if($tel=='') $tel='""'; if($mail=='') $mail='""'; if($rnc=='') $rnc='""';*/ //Busco si el RM existe, si no inserto la empresa //+$sql_doc="select nit_de_la_empresa from bodega_empresas where nit_de_la_empresa='$rm'"; //+$rs_doc=$db->conn->Execute($sql_doc); $rs_doc->EOF=true; if($rs_doc->EOF){ //busco id del municipio $sql_muni="select muni_codi,dpto_codi from municipio where muni_nomb='$ciudad'"; $db->conn->SetFetchMode(ADODB_FETCH_ASSOC); $rs_muni=$db->conn->Execute($sql_muni); $muni=$rs_muni->fields["MUNI_CODI"]; $dpto=$rs_muni->fields["DPTO_CODI"]; //echo " muni $muni dpto $dpto"; if(!$muni or $muni=='') $muni=1; if(!$dpto or $dpto=='') $dpto=11; //antes 101 $id_bod=$db->conn->nextId('sec_ciu_ciudadano'); $sql_ciudadano="Insert into sgd_ciu_ciudadano (tdid_codi,sgd_ciu_codigo,sgd_ciu_nombre,sgd_ciu_direccion, sgd_ciu_apell1,sgd_ciu_apell2,sgd_ciu_telefono,sgd_ciu_email,muni_codi,dpto_codi,sgd_ciu_cedula,id_cont,id_pais) values (2,$id_bod,'$nombre','','','','','',$muni,$dpto,01,1,170)"; //echo "$sql_ciudadano; "; $rs_bod=$db->conn->Execute($sql_ciudadano); //if($rs_bod) echo "

    Subo empresa nueva $line[0]"; //Inserto direccion para el radicado por cada empresa //$secNew=$db->conn->nextId('SECR_TP1_998'); //$radicado=date("Y")."998".str_pad($rnc,6,"0",STR_PAD_LEFT)."1"; $radicado=$var3."$var2".str_pad($rnc,6,"0",STR_PAD_LEFT)."$var1"; //$rm='1sd'; //$radicado='2011998005031'; //Busco TRD $sql_tdoc="select sgd_tpr_codigo from sgd_tpr_tpdcumento where sgd_tpr_descrip like '%$asunto%'"; $db->conn->SetFetchMode(ADODB_FETCH_ASSOC); $rs_tdoc=$db->conn->Execute($sql_tdoc); if($rs_tdoc->EOF){ $tipo_doc=0; //echo "

    No encontre el tipo documental"; } else { $tipo_doc=$rs_doc->fields["SGD_TPR_CODIGO"]; //if (!$tipo_doc or $tipo_doc=='') $tipo_doc=0; //echo "

    Encontre el tipo documental $tipo_doc"; } //Inserto radicado $sql_rad="INSERT INTO RADICADO( RADI_NUME_RADI,RADI_FECH_OFIC,RADI_FECH_RADI, TDOC_CODI,TRTE_CODI, ID_CONT, radi_pais, muni_codi, DPTO_CODI, CARP_CODI, RADI_USUA_ACTU, RADI_DEPE_ACTU, RADI_DEPE_RADI, RADI_USUA_RADI, CODI_NIVEL, RA_ASUN, RADI_LEIDO, FLAG_NIVEL, CARP_PER, esta_codi,sgd_spub_codigo,radi_path) VALUES ($radicado,'$fecha','$fecha',$tipo_doc,0,1,170,$muni,$dpto,1,1,999,$var2,1,1,'$asunto',0,1,0,9,0,'$ruta')"; //echo "$sql_rad; "; // echo "$sql_dir; "; $rs_rad=$db->conn->Execute($sql_rad); $secdir=$db->conn->nextId('SEC_DIR_DIRECCIONES'); $sql_dir="INSERT INTO SGD_DIR_DRECCIONES (SGD_DIR_CODIGO,SGD_DIR_TIPO,SGD_CIU_CODIGO,RADI_NUME_RADI, ID_CONT, ID_PAIS, MUNI_CODI, DPTO_CODI, SGD_DIR_DIRECCION,SGD_DIR_TELEFONO, SGD_DIR_NOMREMDES,SGD_DIR_MAIL,SGD_DIR_DOC,SGD_TRD_CODIGO) VALUES ($secdir,1,$id_bod,$radicado,1,170,$muni,$dpto,'$dir','$tel','$nombre','$mail','$rm',1)"; /*$sql_dir= "insert into sgd_dir_drecciones (sgd_dir_codigo,sgd_dir_tipo,sgd_ciu_codigo,radi_nume_radi) values ($secdir,1,$id_bod,$radicado)";*/ /*$sql_dir="INSERT INTO SGD_DIR_DRECCIONES (SGD_DIR_CODIGO,SGD_DIR_TIPO,SGD_CIU_CODIGO,RADI_NUME_RADI, ID_CONT, ID_PAIS, MUNI_CODI, DPTO_CODI, SGD_DIR_DIRECCION,SGD_DIR_TELEFONO, SGD_DIR_NOMREMDES,SGD_DIR_MAIL,SGD_DIR_DOC,SGD_TRD_CODIGO) VALUES ($secdir,1,$id_bod,$radicado,1,170,$muni,$dpto,'$dir','$tel','$nombre','$mail','$rm',1)"; */ //echo "$sql_dir; "; $rs_dir=$db->conn->Execute($sql_dir); if(!$rs_rad and !$rs_dir) echo "

    No pude insertar radicado $radicado"; }//fin si existe rm //Ya existe la empresa, busco el radicado creado //echo "
    Ya existe la empresa $rm - $nombre busco los datos para el expediente"; $sql_brad="select radi_nume_radi,radi_path from radicado where radi_nume_radi='123'"; $rs_brad=$db->conn->Execute($sql_brad); $radicado=$rs_brad->fields['RADI_NUME_RADI']; $radi_path=$rs_brad->fields['RADI_PATH']; if ($radicado){ //Los anexos los ingreso uno a uno, si ya existe una ruta para el radicado principal if($radi_path and $radi_path!=''){ $isql_max= "select max(anex_codigo) as NUM from anexos where anex_radi_nume=$radicado "; $db->conn->SetFetchMode(ADODB_FETCH_ASSOC); $sw=0; $rs_max=$db->conn->query($isql_max); if (!$rs_max->EOF) $auxnumero=$rs_max->fields["NUM"]; else $auxnumero=0; $auxnumero = substr ($auxnumero, strlen($auxnumero)-4, 4); $uxnumeroSig = $auxnumero + 1; $anexo= $radicado . str_pad($uxnumeroSig,5,"0", STR_PAD_LEFT) ; echo "siguiente anexo $uxnumeroSig $radicado anex $anexo"; $sql_anex="INSERT INTO ANEXOS(ANEX_RADI_NUME, ANEX_CODIGO, ANEX_TIPO, ANEX_SOLO_LECT, ANEX_CREADOR, ANEX_DESC, ANEX_NUMERO, ANEX_NOMB_ARCHIVO, ANEX_BORRADO, ANEX_ESTADO, USUA_DOC, SGD_DIR_TIPO, ANEX_DEPE_CREADOR, ANEX_FECH_ANEX, SGD_EXP_NUMERO) VALUES ($radicado,$anexo,7,'S','DSALIDA','$asunto',$uxnumeroSig,'$ruta','N',0,'12345678909',1,$var2,current_timestamp,'$expediente')"; }else { //$sql_anex="update radicado set radi_path='$ruta' where radi_nume_radi=$radicado"; }//fin del if path vacio //echo $sql_anex."
    "; //$rs_anex=$db->conn->Execute($sql_anex); $rs_anex=true; if($rs_anex) echo "

    Subo anexo nuevo $anexo"; }else{ //echo "
    No encontre radicado para insertar expediente y anexo"; } //fin if radicado }else{ echo ("

    Deben ser 10 campos en cada linea, hay $num en la linea $j"); }//fin if nume>10 } // while get } } else { die("
    Ocurrio un Error la Fila no fue cargada Correctamente

    ".$my_upload->show_error_string()."

    ".nl2br($info)."
    "); } } ?>
    Inserte el Nombre del Archivo CSV