Catálogo de Toma de Almacén

   
Número de Toma
Almacén
 

uf_conectar(); $io_msg =new class_mensajes(); $ds =new class_datastore(); $io_sql =new class_sql($con); $io_fun =new class_funciones($con); $ls_codemp=$_SESSION["la_empresa"]["codemp"]; $ls_codusu=$_SESSION["la_logusr"]; if (array_key_exists("linea",$_GET)) { $li_linea=$_GET["linea"]; } else { if(array_key_exists("hidlinea",$_POST)) { $li_linea=$_POST["hidlinea"]; } else { $li_linea=""; } } if(array_key_exists("operacion",$_POST)) { $ls_operacion=$_POST["operacion"]; $ls_codalm="%".$_POST["txtcodalm"]."%"; $ls_numtom="%".$_POST["txtnumtom"]."%"; $ls_status="%".$_POST["hidstatus"]."%"; } else { $ls_operacion="BUSCAR"; $ls_codalm="%%"; $ls_numtom="%%"; $ls_status="%%"; } print ""; print ""; print ""; print ""; print ""; print ""; if($ls_operacion=="BUSCAR") { $ls_sql="SELECT siv_toma.numtom,siv_toma.codalm,siv_toma.fectom,siv_toma.estpro,siv_toma.obstom,". " (SELECT nomfisalm FROM siv_almacen". " WHERE siv_toma.codalm=siv_almacen.codalm) AS nomfisalm". " FROM siv_toma". " WHERE codemp = '".$ls_codemp."'". " AND codalm LIKE '".$ls_codalm."'". " AND numtom LIKE '".$ls_numtom."'". " AND codalm IN". " (SELECT codintper FROM sss_permisos_internos". " WHERE sss_permisos_internos.codemp =siv_toma.codemp". " AND codsis='SIV'". " AND codusu ='".$ls_codusu."' AND enabled=1) "; $rs_cta=$io_sql->select($ls_sql); $data=$rs_cta; if(!$rs_cta->EOF) { while(!$rs_cta->EOF) { print ""; $ls_numtom= $rs_cta->fields["numtom"]; $ls_codalm= $rs_cta->fields["codalm"]; $ls_nomfisalm= $rs_cta->fields["nomfisalm"]; $ls_estpro= $rs_cta->fields["estpro"]; $ld_fectom= $rs_cta->fields["fectom"]; $ls_obstom= $rs_cta->fields["obstom"]; $ld_fectom=$io_fun->uf_convertirfecmostrar($ld_fectom); print ""; print ""; print ""; print ""; $rs_cta->MoveNext(); } } else { $io_msg->message("No hay registros"); } } print "
Numero de TomaNombre AlmacenFecha
".$ls_numtom."".$ls_nomfisalm."".$ld_fectom."
"; ?>