Agregar Crédito
select($ls_sql); if($rs==false) { $io_msg->message($io_fun->uf_convertirmsg($io_sql->message)); } else { $data=$rs; if($row=$io_sql->fetch_row($rs)) { $data=$io_sql->obtener_datos($rs); $arrcols=array_keys($data); $totcol=count($arrcols); $io_ds->data=$data; $totrow=$io_ds->getRowCount("codcar"); if ($totrow>0) { for ($z=1;$z<=$totrow;$z++) { $ls_codcar=$data["codcar"][$z]; $ls_dencar=$data["dencar"][$z]; $ld_porcar=$data["porcar"][$z]; $ls_forcar=$data["formula"][$z]; $ld_porcar=number_format($ld_porcar,2,",","."); $object[$z][1]=""; $object[$z][2]=""; $object[$z][3]=""; $object[$z][4]=""; $object[$z][5]=""; } } else { $object[$z][1]=""; $object[$z][2]=""; $object[$z][3]=""; $object[$z][4]=""; $object[$z][5]=""; $totrow=1; } $grid->makegrid($totrow,$title,$object,600,'Catálogo de Créditos',$grid1); print ""; } else { ?>