function CargarTipo($concurso = true, $value = '', $IdItem = 0)
{
    global $conn;
    $sql = "SELECT TB_CODIGO, TB_DESCRIPCION \n\t  FROM ctb_tablas \n\t WHERE tb_fechabaja IS NULL \n\t   AND tb_clave = 'TACYQ' ";
    if ($concurso == true) {
        $sql .= " AND( tb_especial1 = 'Q' ";
    } else {
        $sql .= " AND( tb_especial1 = 'C' ";
    }
    if ($value != '') {
        $sql .= " OR tb_codigo = ' +SqlValue(value) .' ) ";
    } else {
        $sql .= " ) ";
    }
    $sql .= " ORDER BY TB_DESCRIPCION ";
    $result = FL_AddComboOption('0', '', true);
    $params = array();
    @($stmt = DBExecSql($conn, $sql, $params));
    while ($row = DBGetQuery($stmt, 1, false)) {
        $result .= CargarComboOpt($row["TB_CODIGO"], $row["TB_DESCRIPCION"], $IdItem, true);
    }
    return $result;
}
function CargarComboOpt($id, $value, $idComp, $selectedId)
{
    /*Parametros (funcion arma option de un select)
      	$id,  el id del option
      	$value,  el valor del option
      	$idComp,  el id que debe aparecer seleccionado
      	$selectedId si es true muestra el id seleccionado
      */
    /*
            $selectOpt = FALSE;                             
            if($selectedId) {            
    	$selectOpt = FL_ComparaInt($id, $idComp);
            }           
    
    Si envia un codigo ese se usa como el default
    */
    $selectOpt = false;
    if (is_numeric($idComp)) {
        $selectOpt = FL_ComparaInt($id, $idComp);
    } else {
        //si no son enteros compara como string las claves
        if (strcmp(strtoupper($id), strtoupper($idComp))) {
            $selectOpt = true;
        }
    }
    $result = FL_AddComboOption($id, $value, $selectOpt);
    return $result;
}