Exemplo n.º 1
0
     $ls_nit = $la_provben["ced_bene"];
     $ls_dir = $la_provben["dirbene"];
     $ls_nombre = $la_provben["nombene"] . " " . $la_provben["apebene"];
 }
 $ls_titulo = $ls_titulo . $ls_tipo;
 uf_print_encabezado_pagina($ls_titulo, $ls_numnota, $ls_fecha, $ls_tipo, $io_pdf);
 // Imprimimos el encabezado de la página
 uf_print_cabecera($ls_nombre, $ls_nit, $ls_dir, $ls_tipo, $ls_estatusnota, $ls_tipproben, $io_pdf);
 // Imprimimos la cabecera del registro
 $ls_tipoencabenzadosol = "";
 uf_print_cabecera_detalle($ls_tipoencabenzadosol, $io_pdf);
 $ldec_monto = number_format($ldec_monto, 2, ",", ".");
 $la_data[1] = array('denominacion' => $ls_descripcion, 'monto' => $ldec_monto);
 uf_print_concepto_nc($la_data, &$io_pdf);
 //**************************************************************************************************************************
 $lb_valido = $io_report->uf_select_dt_spg_nota($ls_numnota, $ls_numord, $ls_numrecdoc, $ls_codtipdoc, $ls_tipproben, $ls_codproben, &$rs_data);
 if ($lb_valido) {
     $b = 0;
     while ($row = $io_report->io_sql->fetch_row($rs_data)) {
         $b++;
         $ls_cuentaspg = trim($row["spg_cuenta"]);
         $ls_codestpro = $row["codestpro"];
         $ls_modalidad = $_SESSION['la_empresa']['estmodest'];
         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);