function uf_print_dtcargos()
{
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_dtcargos
// Access: private
// Arguments:
// Description: Funcin que obtiene e imprime los resultados de la busqueda del detalle de los cargos de la recepcion
// Creado Por: Ing. Nelson Barraez
// Fecha Creacin: 02/06/2007 Fecha ltima Modificacin : 03/06/2007
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
global $io_funciones_cxp;
require_once "../../shared/class_folder/sigesp_include.php";
$io_include = new sigesp_include();
$io_conexion = $io_include->uf_conectar();
require_once "../../shared/class_folder/class_sql.php";
$io_sql = new class_sql($io_conexion);
require_once "../../shared/class_folder/class_mensajes.php";
$io_mensajes = new class_mensajes();
require_once "../../shared/class_folder/class_funciones.php";
$io_funciones = new class_funciones();
require_once "../../shared/class_folder/grid_param.php";
$io_grid = new grid_param();
require_once "../../shared/class_folder/class_datastore.php";
$io_ds_cargos = new class_datastore();
// Datastored de cuentas contables
require_once "sigesp_cxp_c_ncnd.php";
$io_ncnd = new sigesp_cxp_c_ncnd('../../');
$io_ds_cargos->data = "";
$ls_codemp = $_SESSION['la_empresa']['codemp'];
$ls_modalidad = $_SESSION['la_empresa']['estmodest'];
$ls_numncnd = $io_funciones_cxp->uf_obtenervalor("numnot", "");
$ls_numrecdoc = $io_funciones_cxp->uf_obtenervalor("numrecdoc", "");
$ls_numrecdoc = $io_funciones_cxp->uf_obtenervalor("numrecdoc", "");
$ls_codtipdoc = $io_funciones_cxp->uf_obtenervalor("codtipdoc", "");
$ls_tipproben = $io_funciones_cxp->uf_obtenervalor("tipproben", "");
$ls_codproben = $io_funciones_cxp->uf_obtenervalor("codproben", "");
$ls_tiponota = $io_funciones_cxp->uf_obtenervalor("tiponota", "");
$ls_numordpag = $io_funciones_cxp->uf_obtenervalor("numord", "");
$ldec_montodoc = $io_funciones_cxp->uf_obtenervalor("montodoc", "0,00");
$li = 0;
$ls_aux = "";
$ls_codpro = "";
$ls_cedbene = "";
if ($ls_tipproben == "P") {
$ls_destino = "Proveedor";
$ls_cedbene = "";
$ls_codpro = $ls_codproben;
$ls_aux = " AND rd.cod_pro='" . $ls_codproben . "' ";
} elseif ($ls_tipproben == "B") {
$ls_destino = "Beneficiario";
$ls_codpro = "";
$ls_cedbene = $ls_codproben;
$ls_aux = " AND rd.ced_bene='" . $ls_codproben . "' ";
}
$ls_aux_estpro = " rd.codestpro1,rd.codestpro2,rd.codestpro3,rd.codestpro4,rd.codestpro5,rd.estcla";
$ls_confiva = $_SESSION["la_empresa"]["confiva"];
if ($ls_confiva == "C") {
$ls_sql = "SELECT rd.codemp, rd.numrecdoc, rd.codtipdoc, rd.ced_bene, rd.cod_pro, rd.procede_doc, rd.numdoccom,\n\t\t\t\t\t rd.spg_cuenta, \n\t\t\t\t\t '-------------------------' as codestpro1, \n\t\t\t\t\t '-------------------------' as codestpro2, \n\t\t\t\t\t\t\t '-------------------------' as codestpro3,\n\t\t\t\t\t '-------------------------' as codestpro4,\n\t\t\t\t\t '-------------------------' as codestpro5,\n\t\t\t\t\t\t\t '-' as estcla,\t\t\t\t\t\t\t \n\t\t\t\t\t scg.denominacion as denscg,rd.formula ,rd.monret,CAR.dencar,CAR.codcar,CAR.porcar\n\t\t\t\t\t FROM cxp_rd_cargos rd,scg_cuentas scg ,sigesp_cargos CAR\n\t\t\t\t\t WHERE rd.codemp='" . $ls_codemp . "'\n\t\t\t\t\t AND rd.numrecdoc='" . $ls_numrecdoc . "' \n\t\t\t\t\t AND rd.codtipdoc='" . $ls_codtipdoc . "' {$ls_aux}\n\t\t\t\t\t AND rd.codemp=scg.codemp\n\t\t\t\t\t AND rd.spg_cuenta=scg.sc_cuenta\n\t\t\t\t\t AND rd.codemp=scg.codemp\n\t\t\t\t\t AND rd.codcar=CAR.codcar\n\t\t\t\t\t AND rd.codemp=CAR.codemp";
} elseif ($ls_confiva == "P") {
$ls_sql = " SELECT rd.codemp, rd.numrecdoc, rd.codtipdoc, rd.ced_bene, rd.cod_pro, rd.procede_doc, rd.numdoccom, {$ls_aux_estpro},\n\t\t\t\t\t\t\t rd.spg_cuenta, spg.denominacion ,spg.sc_cuenta,scg.denominacion as denscg,rd.formula ,rd.monret,CAR.dencar,CAR.codcar,CAR.porcar\n\t\t\t\t\t\t FROM cxp_rd_cargos rd,spg_cuentas spg,scg_cuentas scg ,sigesp_cargos CAR\n\t\t\t\t\t WHERE rd.codemp='" . $ls_codemp . "'\n\t\t\t\t\t\t AND rd.numrecdoc='" . $ls_numrecdoc . "' \n\t\t\t\t\t\t AND rd.codtipdoc='" . $ls_codtipdoc . "' {$ls_aux} \n\t\t\t\t\t\t AND rd.codemp=spg.codemp \n\t\t\t\t\t\t AND rd.spg_cuenta=spg.spg_cuenta \n\t\t\t\t\t\t AND rd.codemp=scg.codemp\n\t\t\t\t\t\t AND spg.sc_cuenta=scg.sc_cuenta \n\t\t\t\t\t\t AND rd.codestpro1=spg.codestpro1 \n\t\t\t\t\t\t AND rd.codestpro2=spg.codestpro2\n\t\t\t\t\t\t AND rd.codestpro3=spg.codestpro3 \n\t\t\t\t\t\t AND rd.codestpro4=spg.codestpro4 \n\t\t\t\t\t\t AND rd.codestpro5=spg.codestpro5\n\t\t\t\t\t\t AND rd.estcla=spg.estcla\n\t\t\t\t\t\t AND rd.codcar=CAR.codcar \n\t\t\t\t\t\t AND rd.codemp=CAR.codemp";
}
$rs_data = $io_sql->select($ls_sql);
if ($rs_data === false) {
$io_mensajes->uf_mensajes_ajax("Error al cargar detalles presupuestarios", "ERROR->" . $io_funciones->uf_convertirmsg($io_sql->message) . " SQL: " . $ls_sql, true, "javascript: ue_close();");
} else {
$io_funciones_cxp->uf_loadmodalidad(&$li_len1, &$li_len2, &$li_len3, &$li_len4, &$li_len5, &$ls_titulo);
if (array_key_exists("la_crenotas", $_SESSION)) {
if (!empty($_SESSION["la_crenotas"])) {
$io_ds_cargos->data = $_SESSION["la_crenotas"];
}
} else {
$io_ncnd->uf_load_creditos_nota($ls_codemp, $ls_numncnd, $ls_numrecdoc, $ls_codtipdoc, $ls_numordpag, $ls_tiponota, $ls_tipproben, $ls_codproben);
if (array_key_exists("la_crenotas", $_SESSION) && !empty($_SESSION["la_crenotas"])) {
$io_ds_cargos->data = $_SESSION["la_crenotas"];
}
}
while ($row = $io_sql->fetch_row($rs_data)) {
$ls_activo = "";
$ls_codestpro1 = $row["codestpro1"];
$ls_codestpro2 = $row["codestpro2"];
$ls_codestpro3 = $row["codestpro3"];
$ls_codestpro4 = $row["codestpro4"];
$ls_codestpro5 = $row["codestpro5"];
$ls_codestpro = $ls_codestpro1 . $ls_codestpro2 . $ls_codestpro3 . $ls_codestpro4 . $ls_codestpro5;
$io_funciones_cxp->uf_formatoprogramatica($ls_codestpro, &$ls_programatica);
$ls_spgcuenta = $row["spg_cuenta"];
$ldec_baseimp = $ldec_montodoc;
$ldec_montodoc = str_replace(".", "", $ldec_montodoc);
$ldec_montodoc = str_replace(",", ".", $ldec_montodoc);
if ($ldec_montodoc > 0) {
$li++;
$ldec_monto = "0,00";
$ls_codcar = $row["codcar"];
$li_porcar = $row["porcar"];
$ls_dencuenta = utf8_encode($row["dencar"]);
if ($ls_confiva == "C") {
$ls_scgcuenta = trim($row["spg_cuenta"]);
} else {
$ls_scgcuenta = trim($row["sc_cuenta"]);
}
$ls_denscg = utf8_encode($row["denscg"]);
$ls_formula = $row["formula"];
$ls_estcla = $row["estcla"];
$li_totrowcar = $io_ds_cargos->getRowCount("codcar");
if ($li_totrowcar > 0) {
$li_row = $io_ds_cargos->findValues(array('codcar' => $ls_codcar, 'spg_cuenta' => $ls_spgcuenta, 'estcla' => $ls_estcla, 'codestpro' => $ls_codestpro), "codcar");
if ($li_row > 0) {
$ls_activo = "checked";
$ldec_baseimp = $io_ds_cargos->getValue("monobjret", $li_row);
$ldec_monto = $io_ds_cargos->getValue("monret", $li_row);
}
}
$ls_estatus = '-';
switch ($ls_estcla) {
case "A":
$ls_estatus = utf8_encode("Acción");
break;
case "P":
$ls_estatus = utf8_encode("Proyecto");
break;
}
$lo_object[$li][1] = "<input type=checkbox name=chk" . $li . " id=chk" . $li . " class=sin-borde onClick='javascript:ue_calcular({$li});' {$ls_activo}>";
$lo_object[$li][2] = "<input type=text name=txtcodestpro" . $li . " class=sin-borde style=text-align:center size=37 value='" . $ls_programatica . "' readonly><input type=hidden name=txtformula" . $li . " value='" . $ls_formula . "'><input type=hidden name=codpro" . $li . " size=37 value='" . $ls_codestpro . "' readonly>";
$lo_object[$li][3] = "<input type=text name=txtestclaaux" . $li . " class=sin-borde style=text-align:center size=10 value='{$ls_estatus}' readonly><input name=txtestcla" . $li . " type=hidden id=txtestcla" . $li . " value='" . $ls_estcla . "'>";
$lo_object[$li][4] = "<input type=text name=txtspgcuenta" . $li . " class=sin-borde style=text-align:center size=16 value='" . $ls_spgcuenta . "' readonly><input type=hidden name=txtscgcuenta" . $li . " value='" . $ls_scgcuenta . "'><input type=hidden name=txtdenscgcuenta" . $li . " value='" . $ls_denscg . "'>";
$lo_object[$li][5] = "<input type=text name=txtbaseimp" . $li . " class=sin-borde style=text-align:right size=20 value='" . $ldec_baseimp . "' onBlur='javascript:uf_format(this,true,{$li});uf_valida_monto({$li});' onKeyPress=return(ue_formatonumero(this,'.',',',event));>";
$lo_object[$li][6] = "<input type=text name=txtmonto" . $li . " class=sin-borde style=text-align:right size=20 value='" . $ldec_monto . "' readonly>";
$lo_object[$li][7] = "<input type=text name=txtdencuenta" . $li . " class=sin-borde style=text-align:left size=50 value='" . $ls_dencuenta . "' readonly><input name=txtcodcar" . $li . " type=hidden id=txtcodcar" . $li . " value='" . $ls_codcar . "' readonly><input name=txtporcar" . $li . " type=hidden id=txtporcar" . $li . " class=sin-borde style=text-align:left size=50 value='" . $li_porcar . "' readonly>";
}
}
if ($li == 0) {
$io_mensajes->uf_mensajes_ajax("Informacion", "No hay datos para mostrar", true, "javascript: ue_close();");
$lo_object = array();
}
//Titulos del Grid de Bienes
$lo_title[1] = " ";
$lo_title[2] = "Codigo Programatico";
$lo_title[3] = "Estatus";
$lo_title[4] = "Codigo Estadistico";
$lo_title[5] = "Base Imponible";
$lo_title[6] = "Monto";
$lo_title[7] = "Denominación";
print "<input name=totalrows type=hidden id=totalrows value={$li}>";
$io_grid->makegrid($li, $lo_title, $lo_object, 758, "Catalogo de Cargos", "grid");
$io_sql->free_result($rs_data);
}
unset($io_include, $io_conexion, $io_sql, $io_mensajes, $io_funciones, $ls_codemp);
}
function uf_cargar_dt_nota()
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_cargar_dt_nota
// Access: public
// Description: Funcion que carga los detalles de la nota
// Creado Por: Ing. Nelson Barraez
// Fecha Creacin: 29/05/2007 Fecha Última Modificación : 03/06/2007
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
require_once "sigesp_cxp_c_ncnd.php";
$io_ncnd = new sigesp_cxp_c_ncnd('../../');
require_once "../../shared/class_folder/sigesp_include.php";
$io_include = new sigesp_include();
$io_conexion = $io_include->uf_conectar();
require_once "../../shared/class_folder/class_sql.php";
$io_sql = new class_sql($io_conexion);
require_once "../../shared/class_folder/class_mensajes.php";
$io_mensajes = new class_mensajes();
require_once "../../shared/class_folder/class_funciones.php";
$io_funciones = new class_funciones();
require_once "../../shared/class_folder/grid_param.php";
$io_grid = new grid_param();
$ds_detscg = new class_datastore();
global $io_funciones_cxp;
$ls_modalidad = $_SESSION["la_empresa"]["estmodest"];
$ls_confiva = $_SESSION["la_empresa"]["confiva"];
$ls_codemp = $io_funciones_cxp->uf_obtenervalor("codemp", "");
$ls_numncnd = trim($io_funciones_cxp->uf_obtenervalor("numncnd", ""));
$ls_numord = $io_funciones_cxp->uf_obtenervalor("numord", "");
$ls_numrecdoc = trim($io_funciones_cxp->uf_obtenervalor("numrecdoc", ""));
$ls_codtipdoc = $io_funciones_cxp->uf_obtenervalor("codtipdoc", "");
$ls_tipproben = $io_funciones_cxp->uf_obtenervalor("tipproben", "");
$ls_codproben = trim($io_funciones_cxp->uf_obtenervalor("codproben", ""));
$ld_fecha = $io_funciones_cxp->uf_obtenervalor("fecha", "");
$ls_tiponota = $io_funciones_cxp->uf_obtenervalor("tiponota", "");
$ldec_totaldebe = 0;
$ldec_totalhaber = 0;
$ldec_totalcargo = $ld_montotcre = 0;
if (isset($_SESSION["la_crenotas"])) {
unset($_SESSION["la_crenotas"]);
}
$ld_montotcre = $io_ncnd->uf_load_creditos_nota($ls_codemp, $ls_numncnd, $ls_numrecdoc, $ls_codtipdoc, $ls_numord, $ls_tiponota, $ls_tipproben, $ls_codproben);
if ($ls_confiva == 'C') {
$ldec_totalcargo = $ld_montotcre;
}
if ($ls_tipproben == 'P') {
$ls_aux = " AND cxp.cod_pro='" . $ls_codproben . "' ";
} elseif ($ls_tipo == 'B') {
$ls_aux = " AND cxp.ced_bene='" . $ls_codproben . "' ";
} else {
$ls_aux = " AND cxp.cod_pro='----------' ";
}
if ($_SESSION["ls_gestor"] == "MYSQLT") {
$ls_codestpro = " CONCAT(spg.codestpro1,spg.codestpro2,spg.codestpro3,spg.codestpro4,spg.codestpro5)";
} else {
$ls_codestpro = " (spg.codestpro1||spg.codestpro2||spg.codestpro3||spg.codestpro4||spg.codestpro5)";
}
$ls_sql = " SELECT cxp.*,spg.denominacion as dencta,spg.sc_cuenta,scg.denominacion as den_scg,DOC.estcon,DOC.estpre\n\t\t\t\t FROM cxp_dc_spg cxp,spg_cuentas spg,scg_cuentas scg,cxp_documento DOC\n\t\t\t\t WHERE cxp.codemp = '" . $ls_codemp . "'\n\t\t\t\t AND cxp.numdc = '" . $ls_numncnd . "' \n\t\t\t\t\t AND trim(cxp.numrecdoc) = '" . trim($ls_numrecdoc) . "' \n\t\t\t\t AND cxp.numsol = '" . $ls_numord . "'\n\t\t\t\t\t AND cxp.codtipdoc='" . $ls_codtipdoc . "' {$ls_aux} \n\t\t\t\t\t AND cxp.codope='" . $ls_tiponota . "' \n\t\t\t\t AND cxp.spg_cuenta=spg.spg_cuenta \n\t\t\t\t\t AND cxp.codestpro=" . $ls_codestpro . " \n\t\t\t\t\t AND cxp.codemp=scg.codemp \n\t\t\t\t\t AND spg.sc_cuenta=scg.sc_cuenta\n\t\t\t\t\t AND cxp.codtipdoc=DOC.codtipdoc";
$rs_data = $io_sql->select($ls_sql);
if ($rs_data === false) {
$lb_valido = false;
} else {
$li = 0;
$ldec_total = 0;
$ldec_totalsincargo = 0;
while ($row = $io_sql->fetch_row($rs_data)) {
$li++;
$ls_cuenta = trim($row["spg_cuenta"]);
$ls_codestpro = $row["codestpro"];
$ls_codestproaux = $ls_codestpro;
$io_funciones_cxp->uf_formatoprogramatica($ls_codestpro, &$ls_programatica);
switch ($ls_modalidad) {
case "1":
// Modalidad por Proyecto
$ls_codestpro = substr($ls_codestpro, 0, 29);
break;
case "2":
// Modalidad por Programa
$ls_codestpro1 = substr(substr($ls_codestpro, 0, 20), -2);
$ls_codestpro2 = substr(substr($ls_codestpro, 20, 6), -2);
$ls_codestpro3 = substr(substr($ls_codestpro, 26, 3), -2);
$ls_codestpro4 = substr($ls_codestpro, 29, 2);
$ls_codestpro5 = substr($ls_codestpro, 31, 2);
$ls_codestpro = $ls_codestpro1 . "-" . $ls_codestpro2 . "-" . $ls_codestpro3 . "-" . $ls_codestpro4 . "-" . $ls_codestpro5;
break;
}
$ls_dencuenta = utf8_encode($row["dencta"]);
$ldec_monto = $row["monto"];
$ldec_total = $ldec_total + abs($ldec_monto);
if ($ls_tiponota == 'NC') {
$ldec_monto = $ldec_monto * -1;
}
$ldec_monto = number_format($ldec_monto, 2, ",", ".");
$ls_scgcuenta = trim($row["sc_cuenta"]);
$ls_denctascg = $row["den_scg"];
if ($ls_confiva == 'P') {
if (uf_check_cargo($ls_numrecdoc, $ls_codtipdoc, $ls_codestproaux, $ls_cuenta, $ls_tipproben, $ls_codproben)) {
$ls_cargo = 'C';
$ldec_totalcargo += abs($row["monto"]);
} else {
$ls_cargo = '';
$ldec_totalsincargo += abs($row["monto"]);
}
} elseif ($ls_confiva == 'C') {
$ls_cargo = '';
$ldec_totalsincargo += abs($row["monto"]);
}
$li_estcon = $row["estcon"];
$li_estpre = $row["estpre"];
$ls_estcla = $row["estcla"];
$ls_estatus = "";
switch ($ls_estcla) {
case "A":
$ls_estatus = utf8_encode("Acción");
break;
case "P":
$ls_estatus = utf8_encode("Proyecto");
break;
}
$lo_object2[$li][1] = "<input type=text name=txtcuentaspgncnd" . $li . " id=txtcuentaspgncnd" . $li . " class=sin-borde style=text-align:center size=22 value='{$ls_cuenta}' readonly onClick='javascript:uf_select_filadelete({$li});'><input type=hidden name=txtscgcuentadt" . $li . " id=txtscgcuentadt" . $li . " value='{$ls_scgcuenta}'><input type=hidden name=txtdenscgcuentadt" . $li . " id=txtdenscgcuentadt" . $li . " value='{$ls_denctascg}'><input type=hidden name=txtestcargo" . $li . " id=txtestcargo" . $li . " value='{$ls_cargo}'>";
$lo_object2[$li][2] = "<input type=text name=txtcodestproncnd" . $li . " id=txtcodestproncnd" . $li . " class=sin-borde style=text-align:center size=40 value='{$ls_programatica}' readonly onClick='javascript:uf_select_filadelete({$li});'><input name=txtcodpro" . $li . " type=hidden id=txtcodpro" . $li . " value='" . $ls_codestproaux . "'>";
$lo_object2[$li][3] = "<input type=text name=txtestclaaux" . $li . " id=txtestclaaux" . $li . " class=sin-borde style=text-align:center size=20 value='{$ls_estatus}' readonly onClick='javascript:uf_select_filadelete({$li});'><input name=txtestclancnd" . $li . " type=hidden id=txtestclancnd" . $li . " value='" . $ls_estcla . "'>";
$lo_object2[$li][4] = "<input type=text name=txtdencuentancnd" . $li . " id=txtdencuentancnd" . $li . " class=sin-borde style=text-align:left size=39 value='{$ls_dencuenta}' readonly onClick='javascript:uf_select_filadelete({$li});'>";
$lo_object2[$li][5] = "<input type=text name=txtmontoncnd" . $li . " id=txtmontoncnd" . $li . " class=sin-borde style=text-align:right size=20 value='" . $ldec_monto . "' readonly onClick='javascript:uf_select_filadelete({$li});uf_mostrar_alerta();'>";
if ($li_estcon == 1 && ($li_estpre == 3 || $li_estpre == 4)) {
} else {
$lo_object2[$li][6] = "<a href=javascript:uf_delete_dtnota('" . $li . "');><img src=../shared/imagebank/tools15/eliminar.gif title=Eliminar width=15 height=10 border=0></a>";
}
}
$io_sql->free_result($rs_data);
}
if ($ls_confiva == 'C') {
$ldec_total += $ldec_totalcargo;
}
$ldec_total = number_format($ldec_total, 2, ",", ".");
$ldec_totalsincargo = number_format($ldec_totalsincargo, 2, ",", ".");
$ls_sql = " SELECT cxp.*,scg.denominacion as dencta,DOC.estcon,DOC.estpre\n\t\t\t\t FROM cxp_dc_scg cxp,scg_cuentas scg,cxp_documento DOC\n\t\t\t\t WHERE cxp.codemp = '" . $ls_codemp . "'\n\t\t\t\t AND trim(cxp.numdc) = '" . trim($ls_numncnd) . "'\n\t\t\t\t\t AND trim(cxp.numrecdoc) = '" . trim($ls_numrecdoc) . "' \n\t\t\t\t AND cxp.numsol='" . $ls_numord . "'\n\t\t\t\t\t AND cxp.codtipdoc='" . $ls_codtipdoc . "' {$ls_aux} \n\t\t\t\t\t AND cxp.codope='" . $ls_tiponota . "' \n\t\t\t\t AND cxp.sc_cuenta=scg.sc_cuenta \n\t\t\t\t\t AND cxp.codtipdoc=DOC.codtipdoc \n\t\t\t\t ORDER BY cxp.estgenasi";
$rs_data = $io_sql->select($ls_sql);
if ($rs_data === false) {
$lb_valido = false;
} else {
$la = 0;
while ($row = $io_sql->fetch_row($rs_data)) {
$la++;
$ls_scgcuenta = trim($row["sc_cuenta"]);
$ls_dencuenta = utf8_encode($row["dencta"]);
$ls_debhab = $row["debhab"];
$ldec_monto = number_format($row["monto"], 2, ",", ".");
if ($ls_debhab == 'D') {
$ldec_mondebe = $ldec_monto;
$ldec_totaldebe = $ldec_totaldebe + $row["monto"];
$ldec_monhaber = "0,00";
} else {
$ldec_monhaber = $ldec_monto;
$ldec_totalhaber = $ldec_totalhaber + $row["monto"];
$ldec_mondebe = "0,00";
}
$li_estcon = $row["estcon"];
$li_estpre = $row["estpre"];
$lo_object[$la][1] = "<input type=text name=txtscgcuentancnd" . $la . " id=txtscgcuentancnd" . $la . " class=sin-borde style=text-align:center size=22 value='{$ls_scgcuenta}' readonly>";
$lo_object[$la][2] = "<input type=text name=txtdencuentascgncnd" . $la . " class=sin-borde style=text-align:left size=59 value='{$ls_dencuenta}' readonly>";
$lo_object[$la][3] = "<input type=text name=txtdebencnd" . $la . " class=sin-borde style=text-align:right size=20 value='{$ldec_mondebe}' readonly onClick='javascript:uf_mostrar_alerta();'>";
$lo_object[$la][4] = "<input type=text name=txthaberncnd" . $la . " class=sin-borde style=text-align:right size=20 value='{$ldec_monhaber}' readonly onClick='javascript:uf_mostrar_alerta();'>";
if ($li_estcon == 1 && ($li_estpre == 3 || $li_estpre == 4)) {
$lo_object2[$li][5] = "<a href=javascript:uf_delete_dtnota('" . $li . "');><img src=../shared/imagebank/tools15/eliminar.gif title=Eliminar width=15 height=10 border=0></a>";
}
}
}
$lo_title[1] = "Código Estadístico";
$lo_title[2] = "Código Programático ";
$lo_title[3] = "Estatus";
$lo_title[4] = "Denominación";
$lo_title[5] = "Monto";
if ($li_estcon == 1 && ($li_estpre == 3 || $li_estpre == 4)) {
} else {
$lo_title[6] = "\t";
}
$io_grid->make_gridScroll($li, $lo_title, $lo_object2, 758, "Detalle Presupuestario de la Nota", "grid", 120);
$lo_titlesc[1] = "Cuenta";
$lo_titlesc[2] = "Denominación";
$lo_titlesc[3] = "Monto Debe";
$lo_titlesc[4] = "Monto Haber";
if ($li_estcon == 1 && ($li_estpre == 3 || $li_estpre == 4)) {
$lo_titlesc[5] = "\t";
}
$io_grid->make_gridScroll($la, $lo_titlesc, $lo_object, 758, "Detalle Contable de la Nota", "gridscg", 120);
echo "<input type=hidden name=numrowsprenota id=numrowsprenota value=" . $li . ">";
echo "<input type=hidden name=numrowsconnota id=numrowsconnota value=" . $la . ">";
echo "<table width='758' border='0' align='center' cellpadding='0' cellspacing='0' class='celdas-blancas'>";
echo " <tr>";
echo " <td width='508' height='22' align='right'><div align='right'><strong>Total Debe</strong></div></td>";
echo " <td width='80' height='22' align='right'><input name='txtmontodeb' type='text' id='txtmontodeb' style='text-align:right' value=" . number_format($ldec_totaldebe, 2, ",", ".") . " size='22' maxlength='20' readonly align='right' class='letras-negrita'></td>";
echo " <td width='90' height='22' align='right'><div align='right'><strong>Total Haber</strong></div></td>";
echo " <td width='80' height='22' align='right'><input name='txtmontohab' type='text' id='txtmontohab' style='text-align:right' value=" . number_format($ldec_totalhaber, 2, ",", ".") . " size='22' maxlength='20' readonly align='right' class='letras-negrita'></td>";
echo " </tr>";
echo " <tr>";
echo " <td width='508' height='22' align='right'> </td>";
echo " <td width='80' height='22' align='right'> </td>";
echo " <td width='90' height='22' align='right'> </td>";
echo " <td width='80' height='22' align='right'> </td>";
echo " </tr>";
echo "</table>";
echo "<table width=780 border=0 cellpadding=0 cellspacing=0 class=formato-blanco>";
echo " <tr class=titulo-ventana>";
echo " <td height=23 colspan=4><div align=center class=Estilo1><b>TOTALES</b></div></td>";
echo " </tr>";
echo "<tr height=20>";
echo " <td width=49> </td>";
echo " <td width=413> </td>";
echo " <td width=167><div align=right><b>SUBTOTAL</b></div></td>";
echo " <td width=151><input name=txtmontosincargo type=text id=txtmontosincargo value=" . $ldec_totalsincargo . " style='text-align:right' class='letras-negrita' size='22' maxlength='20' readonly></td>";
echo "</tr>";
echo "<tr height=20>";
echo " <td width=49> </td>";
echo " <td width=413> </td>";
echo " <td width=167><div align=right><input name='btnotroscreditos' type='button' class='boton' id='btnotroscreditos' value='Otros Créditos' onClick='javascript:uf_agregar_dtcargos(\"\",\"\",\"\",\"\",\"\");'></div></td>";
echo " <td width=151><input name=txtmontocargo type=text id=txtmontocargo value=" . number_format($ldec_totalcargo, 2, ",", ".") . " style='text-align:right' class='letras-negrita' size='22' maxlength='20' readonly></td>";
echo "</tr>";
echo "<tr height=20>";
echo " <td width=49> </td>";
echo " <td width=413> </td>";
echo " <td width=147><div align=right><b>MONTO TOTAL</b></div></td>";
echo " <td width=171><input name=txtmonto type=text class=texto-rojo id=txtmonto value=" . $ldec_total . " style='text-align:right' size='22' maxlength='20' readonly></td>";
echo "</tr>";
echo "</table>";
}
#Layer1 {
position:absolute;
left:9px;
top:151px;
width:214px;
height:28px;
z-index:1;
}
.Estilo1 {font-size: 10px}
-->
</style>
</head>
<body>
<?php
require_once "class_folder/sigesp_cxp_c_ncnd.php";
$io_cxp = new sigesp_cxp_c_ncnd("../");
uf_limpiarvariables();
switch ($ls_operacion) {
case "GUARDAR":
uf_load_variables();
$lb_valido = $io_cxp->uf_guardar($la_seguridad);
uf_load_data($as_parametros);
switch ($ls_estsol) {
case "R":
$ls_estatus = "REGISTRO";
break;
case "C":
$ls_estatus = "CONTABILIZADA";
break;
}
if ($lb_valido) {
