uf_conectar();
$io_dsotroscre = new class_datastore();
$io_sql = new class_sql($con);
$io_funciones_cfg= new class_funciones_cfg();
$arr = $_SESSION["la_empresa"];
$ls_codemp = $arr["codemp"];
$li_estmodest = $arr["estmodest"];
$ls_confiva = $_GET["confiva"];
$ls_sql = "SELECT * FROM sigesp_cargos WHERE codemp='".$ls_codemp."' ORDER BY codcar ASC";
$rs_otroscre = $io_sql->select($ls_sql);
$data = $rs_otroscre;
if ($row=$io_sql->fetch_row($rs_otroscre))
{
$data = $io_sql->obtener_datos($rs_otroscre);
$arrcols = array_keys($data);
$totcol = count($arrcols);
$io_dsotroscre->data = $data;
$totrow = $io_dsotroscre->getRowCount("codcar");
print "
";
print "";
print "| Código | ";
print "Denominación | ";
if($ls_confiva=='P')
{
print "Programática | ";
}
print "Porcentaje | ";
print "Fórmula | ";
print "Cuenta Contable | ";
print "
";
for ($z=1;$z<=$totrow;$z++)
{
print "";
$codigo = $data["codcar"][$z];
$denominacion = $data["dencar"][$z];
$codestpro = $data["codestpro"][$z];
$ls_estcla = $data["estcla"][$z];
$ls_tipoiva = $data["tipo_iva"][$z];
$io_funciones_cfg->uf_formato_estructura($codestpro,$ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_codestpro5);
$as_codestpro1= substr($codestpro,0,25);
$as_codestpro2= substr($codestpro,25,25);
$as_codestpro3= substr($codestpro,50,25);
$as_codestpro4= substr($codestpro,75,25);
$as_codestpro5= substr($codestpro,100,25);
if ($li_estmodest=='1')
{
$codestpro = $ls_codestpro1.$ls_codestpro2.$ls_codestpro3;
}
else
{
$codestpro = $ls_codestpro1.$ls_codestpro2.$ls_codestpro3.$ls_codestpro4.$ls_codestpro5;
}
$porcentaje = $data["porcar"][$z];
$formula = $data["formula"][$z];
$estlibcom = $data["estlibcom"][$z];
$spg_cuenta = $data["spg_cuenta"][$z];
$scg_cuenta =$data["scg_cuenta"][$z];
$estfac =$data["estfac"][$z];
$spicta =$data["spicta"][$z];
print "| ".$codigo." | ";
print "".$denominacion." | ";
if($ls_confiva=='P')
{
print "".$codestpro." | ";
}
print "".$porcentaje." | ";
print "".$formula." | ";
print "".$scg_cuenta." | ";
print "
";
}
print "
";
$io_sql->free_result($rs_otroscre);
}
else
{
?>