function GeneraScript($form)
{
    global $vConex;
    $resultado = "";
    //agregamos condiciones de busqueda donde cada es un elemnto del array condiciones
    $condiciones[0] = "codigo='{$form}'";
    //Genera script del formulario Cabecera
    $resultado .= GeneraScriptGen($vConex, "sys_form", $condiciones) . "<br/>";
    //Consulta para obtener todas los detalles de un determinado formulario cabecera en $codForm
    $sql = "SELECT * FROM sys_form_det WHERE Form='{$form}'";
    $rg = rGMX($vConex, $sql);
    $codForm = array();
    for ($i = 0; $i < count($rg); $i++) {
        $codForm[$i] = $rg[$i]['Codigo'];
    }
    //generar scripts de todos los detalles del formulario cabecera
    for ($i = 0; $i < count($codForm); $i++) {
        $condiciones[0] = "Codigo='{$codForm[$i]}'";
        $resultado .= GeneraScriptGen($vConex, "sys_form_det", $condiciones) . "<br/>";
    }
    WE($resultado);
}
function EstadoMayorizado($Asiento)
{
    global $ConexionEmpresa;
    $Sql = "SELECT sum(Cargo_MO) Cargo,sum(Abono_MO)Abono\n              FROM ct_asiento_det\n              WHERE Asiento = " . $Asiento . "";
    # W($Sql."<br>");
    $r = rGMX($ConexionEmpresa, $Sql);
    $Cargo = $r[0]["Cargo"];
    $Abono = $r[0]["Abono"];
    if ($Cargo == $Abono) {
        $M = 1;
    } else {
        $M = 0;
    }
    return $M;
}