query("SET NAMES 'utf8'");
//------------------------FUNCION DATOS DEL DOCUMENTO---------------------------------------
$desc_esq = descEsquemaDoc($id_esq);
//------------------------ASIGNO ICONO POR EXT DE DOCUMENTO-------------------------------
//$ext = $result['EXTENSION'];
//------------------------LIB DE SELECCION DE ICONOS---------------------------------------
//include("ico_dir.php");
//-----------------------------------------------------------------------------------------
//-----------------------------CARGO EL HTML MODAL DEL ETQ---------------------------------
//-----------------------------------------------------------------------------------------
echo "
";
//crear tablas por cada etiqueta del doc
//armo los encabezados de las etiquetas
echo "
".F_ETQ_ESQ." :
".$desc_esq."
".$id_esq."
";
//armo el detalle de cada etiqueta
$detalle = esquemasDoc($id_esq);
while ($row2 = $detalle->fetch_object()){
//============================================
//VALIDO EL TIPO DE CAMPO A UTILIZAR==========
$tipo_campo = str_split($row2->TIPO);
//VALIDO SI EL CAMPO ES REQUERIDO=============
if ($row2->REQUERIDO == 1) {
//el campo es requerido---------------------
$marc_requerido = "";
$requerido = "requerido";
}elseif ($row2->REQUERIDO == 0) {
//el campo no es requerido------------------
$marc_requerido = "";
$requerido = "";
}
//valido que el campo sea editable============
if ($row2->EDITABLE == 1) {
//el campo es editable---------------------
$editable = "";
}elseif ($row2->EDITABLE == 0) {
//el campo no es requerido------------------
$editable = "disabled";
}
//EVALUO EL TIPO DE CAMPO---------------------
switch ($tipo_campo[0]) {
case 'S':
$campo = "
";
$l = 0;
break;
case 'D':
$campo = "
";
$l = 0;
break;
case 'N':
$campo = "
";
$l = 0;
break;
case 'T':
$campo = "
";
$l = 0;
break;
case 'L':
case 'C':
//VALIDO SI PROVIENE DE UNA LISTA ODBC===========================================
if ($row2->CONEX_ODBC != 0) {
//ES POR ODBC==================================================================
$odbc = 1;
}else{
//NO ES POR ODBC===============================================================
$odbc = 0;
//VALIDO QUE ES UNA LISTA DE CONTACTOS-----------------------------------------
if ($row2->LISTA < 0) {
//AL SER TIPO CLIENTES LISTO CARGO LOS LISBOX CON LA LISTA CORRESPONDIENTE
$item_lista = itemContactos($bd, $row2->LISTA, $user);
}
//VALIDO QUE ES UNA LISTA PERSONALIZADA-----------------------------------------
if ($row2->LISTA >= 0) {
//AL SER TIPO LISTO CARGO LOS LISBOX CON LA LISTA CORRESPONDIENTE
$item_lista = itemLista($row2->LISTA);
}
}
$l = 1;
break;
default:
$campo = "
";
$l = 0;
break;
}
//====================================================================================================================
//ESCRIBO LAS ROWS DE LOS ITEMS DEL ESQUEMA===========================================================================
echo "
".$row2->DESCRIPCION." ".$marc_requerido." :
";
//==================================================================================================================
//VALIDO QUE NO SEA UN LISTADO--------------------------------------------------------------------------------------
//==================================================================================================================
if ($l == 0) {
echo "
".$campo."
";
}
//==================================================================================================================
//VALIDO QUE SEA UN LISTADO-----------------------------------------------------------------------------------------
//==================================================================================================================
if ($l == 1 AND $odbc == 0) {
//============================================================================================================
//VALIDO SI ESTA RELACIONADO A UNA SUBLISTA===================================================================
//NO POSEE UNA SUBLISTA---------------------------------------------------------------------------------------
if ($row2->SUBLISTA_CON == 0) {
//VALIDO SI TRAE UN VALOR POR DEFECTO---------------------------------------------------------------------
if ($row2->DEFECTO == "##USER##") {
//Trae por defecto el valor del usuario actual----------------------------------------------------------
$val_defect_list = $_SESSION['mostrar'];
}elseif ($row2->DEFECTO == "") {
//No trae nada por defecto lo dejo en blanco------------------------------------------------------------
$val_defect_list = "";
}
//============================================================================================================
//ESCRIBO EL HTML DEL LISTBOX=================================================================================
//EVALUO SI ES CERRADO O ABIERTA------------------------------------------------------------------------------
if ($tipo_campo[0] == 'C') {
//ES DEL TIPO CERRADA-------------------------------------------------------------------------------------
echo "
";
}elseif ($tipo_campo[0] == 'L') {
//ES DEL TIPO ABIERTA---------------------------------------------------------------------------------------
//VAlido que no este relacionada a contacto u organizaciones================================================
if ($row2->LISTA < 0) {
//SE ALIMENTA DE CONTACTOS============================================================================
//ES DEL TIPO CERRADA------------------------------------------------------
echo "
";
}
//VALIDO QUE SEA UNA LISTA PERSONALIZADA====================================================================
if ($row2->LISTA >= 0) {
//EL div del listado----------------------------------------------------------------------------------
echo "
";
//Evaluo si es editable el campo------------------------------------------------------------
if ($editable == '' ) {
//Se puede manipular la caja------------------------------------------------------------
echo "";
}elseif ($editable != '') {
//No se puede manipular la caja---------------------------------------------------------
echo "";
}
echo"
";
//El div del crear nuevo item----------------------------------------------------
echo"
";
}
}
//============================================================================================================
//POSEE UNA SUBLISTA------------------------------------------------------------------------------------------
}elseif ($row2->SUBLISTA_CON != 0) {
//VALIDO SI TRAE UN VALOR POR DEFECTO---------------------------------------------------------------------
if ($row2->DEFECTO == "##USER##") {
//Trae por defecto el valor del usuario actual----------------------------------------------------------
$val_defect_list = $_SESSION['mostrar'];
}elseif ($row2->DEFECTO == "") {
//No trae nada por defecto lo dejo en blanco------------------------------------------------------------
$val_defect_list = "";
}
//Con el valor de SUBLITA_CON buscar EL VALOR DE LA LISTA RELACIONADA---------------------------------------
$sub_lista_rel = listaRelacionada($id_esq, $row2->SUBLISTA_CON);
//EVALUO SI LA SUB-LISTA ESTA RELACIONADA CON UN USUARIO Y A SU VEZ CON UNA ORGANIZACION--------------------
if ($sub_lista_rel == "##USER##" AND $row2->LISTA == -2 ) {
//====================================================================================================
//SE ESTA RELACIONANDO UN USUARIO CON UNA ORGANIZACION------------------------------------------------
//VARIABLE DEL CONTACTO ACTUAL
$contact = $_SESSION["contacto"];
//BUSCO LOS CONTACTOS Y ORGANIZACIONES RELACIONADAS---------------------------------------------------
$base = contacRelacionados($bd, $contact);
//ESCRIBO EL INICIO DEL HTML DEL LISTBOX--------------------------------------------------------------
echo "
";
}else{
//====================================================================================================
//NO ESTA RELACIONANDO UN USUARIO CON UNA ORGANIZACION------------------------------------------------
//Con el valor de SUBLITA_CON buscar EL VALOR DE LA LISTA RELACIONADA---------------------------------
$item_lista = itemContactos($bd, $row2->LISTA, $user);
//ESCRIBO EL INICIO DEL HTML DEL LISTBOX--------------------------------------------------------------
echo "
";
}
}
}elseif ($l == 1 AND $odbc == 1) {
//HAGO EL INCLUDE PARA EVALUAR Y OBTENER EL LISTADO ODBC===============================
include("qry_listado_odbc_plant.php");
}
echo "
";
}
unset($detalle);
echo "
";
mysqli_close($bd);
unset($sql, $result, $bd, $user, $grupo, $id_doc, $ext, $ico);
//==========================================================================================
//==============================FUNCIONES==================================================
//=========================================================================================
//FUNCION PARA OBTENER LOS ITEMS DE LA LISTA CLIENTES O CONTACTOS------------------------
function itemContactos($bd, $id, $user){
//DETERMINO EL TIPO DE CONTACTO BUSCADO
switch ($id) {
case -1:
//CONTACTO
$tipo = "C.CONTACTO = 1";
break;
case -2:
//ORGANIZACION
$tipo = "C.ORGANIZACION = 1";
break;
case -5:
//ORGANIZACION Y CONTACTO
$tipo = "( C.ORGANIZACION = 1 OR C.CONTACTO = 1 )";
break;
}
//SQL
$sql = " SELECT DISTINCT C.MOSTRAR AS DESCRIPCION
FROM CONTACTOS C
LEFT JOIN CONTACTOS_RELACIONES R
ON R.CONTACTO = C.CODIGO
LEFT JOIN CONTACTOS_GRUPOS G
ON R.GRUPO = G.CODIGO
WHERE $tipo AND C.ACTIVO = 1 AND (( G.AMBITO = '' OR G.AMBITO = 'PUB' )
OR ( G.AMBITO = 'PRV' AND G.USUARIO = '$user' ) OR G.AMBITO IS NULL) ORDER BY MOSTRAR ASC";
$base = $bd->query($sql);
return $base;
$base->close();
}
//FUNCION PARA OBTENER LOS ITEMS DE LA LISTA---------------------------------------------
function itemLista($lista){
global $bd;
$sql = " SELECT E.DESCRIPCION
FROM ETIQUETAS E
WHERE E.GRUPO = $lista ORDER BY E.DESCRIPCION ASC";
$base = $bd->query($sql);
return $base;
$base->close();
}
//FUNCION PARA OBTENER TIPO DE IMPUT DEL CAMPO DEL ETIQUETADO------------------------------
function tipoCampoEtq(){
global $bd;
$sql = " SELECT E.CLAVE, E.NOMBRE, E.EXTENSION
FROM BIBLIOTECA_ELEMENTOS E
WHERE E.CLAVE = $id_doc";
$base = $bd->query($sql);
$result = mysqli_fetch_array($base);
$base->close();
return $result;
}
//FUNCION PARA OBTENER DATOS DEL DOCUMENTO-------------------------------------------------
function datosDoc($id_doc){
global $bd;
$sql = " SELECT E.CLAVE, E.NOMBRE, E.EXTENSION
FROM BIBLIOTECA_ELEMENTOS E
WHERE E.CLAVE = $id_doc";
$base = $bd->query($sql);
$result = mysqli_fetch_array($base);
$base->close();
return $result;
}
//FUNCION PARA OBTENER LOS CAMPOS DEL ESQUEMAS DEL DOCUMENTO------------------------------------
function esquemasDoc($id_esq){
global $bd;
$sql = " SELECT E.DESCRIPCION, E.TIPO, E.LISTA, E.CODIGO, E.REQUERIDO, E.EDITABLE, E.DEFECTO, E.SUBLISTA_CON, E.CONEX_ODBC, E.DESCRIP_ODBC
FROM ESQUEMAS_ESTRUCTURA E
WHERE E.ESQUEMA = $id_esq AND E.DESCRIPCION <> 'CODIGO' AND ACTIVO = 1 ORDER BY E.ORDEN ASC";
$base = $bd->query($sql);
return $base;
$base->close();
}
//FUNCION PARA OBTENER DETALLE DEL ESQUEMA DEL DOCUMENTO----------------------------------------
function descEsquemaDoc($id_esq){
global $bd;
$sql = " SELECT E.DESCRIPCION
FROM ESQUEMAS E
WHERE E.CODIGO = $id_esq";
$base = $bd->query($sql);
$result = mysqli_fetch_array($base);
return $result['DESCRIPCION'];
$base->close();
}
//FUNCION PARA OBTENER EL VALOR DE LA LISTA RELACIONADA A UN CAMPO----------------------------------------
function listaRelacionada($id_esq, $id_cod){
global $bd;
$sql = " SELECT E.DEFECTO
FROM ESQUEMAS_ESTRUCTURA E
WHERE E.ESQUEMA = $id_esq AND E.CODIGO = $id_cod";
$base = $bd->query($sql);
$result = mysqli_fetch_array($base);
return $result['DEFECTO'];
$base->close();
}
//FUNCION PARA EL ARRAY DE LOS CONTACTOS RELACIONADOS AL CONTACTO
function contacRelacionados($bd, $contact)
{
$sql = "SELECT CO.CONTACTO, CO.ORGANIZACION
FROM CONTACTOS_ORGANIZACIONES CO
WHERE CO.CONTACTO = $contact OR CO.ORGANIZACION = $contact ";
$base = $bd->query($sql);
return $base;
$base->close();
}
//FUNCION PARA EL ARRAY DE LOS DATOS DE LOS CONTATOS RELACIONADOS AL CONTACTO
function datosContacRelacionados($bd, $id_contac_rel, $user)
{
$sql = "SELECT C.MOSTRAR
FROM CONTACTOS C
LEFT JOIN CONTACTOS_RELACIONES R
ON R.CONTACTO = C.CODIGO
LEFT JOIN CONTACTOS_GRUPOS G
ON R.GRUPO = G.CODIGO
WHERE C.CODIGO = $id_contac_rel AND C.ORGANIZACION = 1 AND C.ACTIVO = 1 AND (( G.AMBITO<>'PRV' ) OR ( G.AMBITO = 'PRV' AND G.USUARIO = '$user' ) OR G.AMBITO IS NULL ) ORDER BY C.MOSTRAR ASC";
$base = $bd->query($sql);
$row = mysqli_fetch_array($base);
return $row;
$base->close();
}
//funcion para obtener los datos de la conecion externa--------------------------------------------------
function datosConexExterna($bd, $cod_odbc, $id_esq, $cod_campo)
{
$sql = " SELECT E.CODIGO, E.DESCRIPCION, E.CONEXION, E.TABLA, E.CAMPOCLAVE, E.TIPOCLAVE, E.DRIVER, EE.DESCRIP_ODBC
FROM CONEXIONES_EXTERNAS E
INNER JOIN ESQUEMAS_ESTRUCTURA EE
ON EE.CONEX_ODBC = E.CODIGO
WHERE E.CODIGO = $cod_odbc AND EE.CODIGO = $cod_campo AND EE.ESQUEMA = $id_esq";
$base = $bd->query($sql);
$result = mysqli_fetch_array($base);
$base->close();
return $result;
}
?>