uf_conectar();
$io_ds=new class_datastore();
$io_sql=new class_sql($con);
$arr=$_SESSION["la_empresa"];
$ls_sql=" SELECT codtipdoc,dentipdoc,estpre,estcon ".
" FROM cxp_documento ".
" ORDER BY codtipdoc ASC";
$rs_doc=$io_sql->select($ls_sql);
$data=$rs_doc;
if($row=$io_sql->fetch_row($rs_doc))
{//1
$data=$io_sql->obtener_datos($rs_doc);
$arrcols=array_keys($data);
$totcol=count($arrcols);
$io_ds->data=$data;
$totrow=$io_ds->getRowCount("codtipdoc");
print "
";
print "";
print "| Código | ";
print "Denominación | ";
print "
";
for($z=1;$z<=$totrow;$z++)
{//2
print "";
$codigo=$data["codtipdoc"][$z];
$denominacion=$data["dentipdoc"][$z];
$ls_presu=$data["estpre"][$z];
$ls_conta=$data["estcon"][$z];
if ($ls_conta==1)
{//3
$contable="D";
}//3
if ($ls_conta==2)
{//4
$contable="C";
}//4
if ($ls_conta==3)
{//5
$contable="N";
}//5
if ($ls_conta==4)
{//6
$contable="S";
}//6
if ($ls_presu==1)
{//7
$presupuest="C";
}//7
if ($ls_presu==2)
{//8
$presupuest="P";
}//8
if ($ls_presu==3)
{//9
$presupuest="N";
}//9
if ($ls_presu==4)
{//10
$presupuest="S";
}//10
print "| ".$codigo." | ";
print "".$denominacion." | ";
print "
";
}//2
print "
";
$io_sql->free_result($rs_doc);
}//1
else
{//11
?>