function TipoProyectos($arg)
{
    global $enlace, $vConex;
    switch ($arg) {
        case "Tipos":
            $btn = "Crear Tipo Proyecto]{$enlace}?TipoProyectos=formProyecto]panelB-R}";
            $btn = Botones($btn, 'botones1');
            $subMenu = tituloBtnPn("Listado <p>Tipos de Proyectos</p>", $btn, "auto", "TituloA");
            $_Q = "SELECT  Codigo   as CodigoAjax,  \n\t\t\t\t\t\t\t\t\tTipo,\ttitulo,\tsubtitulo,\tsubtituloLogin,\tsubtituloDetalle,\tInternoSubtitulo1,\tInternoSubtitulo2,\t\n\t\t\t\t\t\t\t\t\tAulaTitulo1,\tAulaTitulo2,\ttituloSesion,   MenuLateral_Sesion, formCrearTitulo1, formCrearTitulo2, TituloPrincipal,\n\t\t\t\t\t\t\t\t\tTituloEncabezado1,  TituloEncabezado2,DetalleBoton, TituloPrincipal2,TituloMenuPrincipal, GeneralTitulo,\n\t\t\t\t\t\t\t\t\tConfigTitulo, menuPrincipalInterno, DetalleBoton2, TituloPrincipal3, GeneralTitulo2, ConfigTitulo2,\n\t\t\t\t\t\t\t\t\tDetalleBotonInterno1, DetalleBotonInterno2, DetalleBotonInterno3, TituloFormInterno1, TituloFormInterno2,\n\t\t\t\t\t\t\t\t\tTituloPresentacion, TituloListadoTemas, TituloBuscarContenido, AulaTituloEditar, AulaTituloEditar2,\n\t\t\t\t\t\t\t\t\tTituloEliminar, MensajeMenuLatera1,MensajeMenuLatera2,MensajeMenuLatera3 \n\t\t\t\t\n\t\t\t\t\t\tFROM \n\t\t\t\t\t\t            tipo_proyecto  ";
            $clase = "reporteA";
            $enlaceCod = "Codigo";
            $url = "{$enlace}?TipoProyectos=editProyectos";
            $panel = "panelB-R";
            $reporte = ListR2("", $_Q, $vConex, $clase, '', $url, $enlaceCod, $panel, "", "");
            $s = LayoutMHrz($subMenu, $reporte);
            WE($s);
            break;
        case "formProyecto":
            $btn = "<i class='icon-arrow-left'></i> Atrás]{$enlace}?TipoProyectos=Tipos]panelB-R}";
            $btn = Botones($btn, 'botones1', '');
            $titulo = "<span>Crear</span><p>Tipo de Proyecto</p>";
            $btn_titulo = tituloBtnPn($titulo, $btn, "auto", "TituloA");
            // $uRLForm = "Guardar]{$enlace}?metodo=empresa_corporacion&transaccion=INSERT]panelB-R]F}";
            $uRLForm = "Guardar]{$enlace}?metodo=empresa_TipoProyecto&transaccion=INSERT]panelB-R]F}";
            $path = array('path' => '../_files/');
            $form = FormR1("", $vConex, "empresa_TipoProyecto", "CuadroA", $path, $uRLForm, "", "");
            WE("<div style='width: 800px;'>{$btn_titulo}{$form}</div>");
            break;
        case "editProyectos":
            $Codigo = get("Codigo");
            $btn = "<i class='icon-arrow-left'></i> Atrás]{$enlace}?TipoProyectos=Tipos]panelB-R}";
            $btn = Botones($btn, 'botones1', '');
            $titulo = "<span>Editar</span><p>Tipo de Proyecto</p>";
            $btn_titulo = tituloBtnPn($titulo, $btn, "auto", "TituloA");
            $uRLForm = "Guardar]{$enlace}?metodo=empresa_TipoProyecto&transaccion=UPDATE&Codigo={$Codigo}]panelB-R]F}";
            $uRLForm .= "Eliminar]{$enlace}?TipoProyectos=delete&Codigo={$Codigo}]panelB-R]F}";
            $form = FormR1("", $vConex, "empresa_TipoProyecto", "CuadroA", $path, $uRLForm, $Codigo, $SDinamico, "Codigo");
            WE("<div style='width: 800px;'>{$btn_titulo}{$form}</div>");
            break;
        case "delete":
            $Codigo = get('Codigo');
            // vd($_GET);
            // vd($_POST);
            $SQL = "DELETE  FROM  tipo_proyecto  WHERE  Codigo={$Codigo} ";
            xSQL($SQL, $vConex);
            W(" <p style='color : red'>  Se ha eliminado un tipo de Poryecto </h1>");
            // delete("empresa_TipoProyecto", $Codigo);
            TipoProyectos("Tipos");
            break;
    }
}
function MontoVenta($Codigo)
{
    global $ConexionEmpresa, $enlace;
    $uRLForm = "Crear Detalle]" . $enlace . "?metodo=FMontoDoc&transaccion=UPDATE&codAsi=" . $Codigo . "]PanelB1]F]}";
    $form = FormR1('', $ConexionEmpresa, "FMontoDoc", "CuadroB", $path, $uRLForm, '', $tSelectD, 'Codigo');
    $panelA = layoutV2($mHrz, $btn . $form);
    $panel = array(array('PanelTA', '100%', $panelA));
    $html = LayoutPage($panel);
    $html = "<div style='height: 100%;padding: 10px;'  >" . $html . "</div>";
    return $html;
}