select($ls_sql); if($rs==false) { $io_msg->message($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_formula=$data["formula"][$z]; $object[$z][1]=" "; $object[$z][2]=""; $object[$z][3]=""; $object[$z][4]=""; $object[$z][5]=""; $object[$z][6]=""; $object[$z][7]=""; } } else { $object[1][1]=""; $object[1][2]=""; $object[1][3]=""; $object[1][4]=""; $object[1][5]=""; $object[1][6]=""; $object[1][7]=""; $totrow=1; } } else { $io_msg->message("No se han definido deducciones"); } } } elseif("EVALUAR") { require_once("class_folder\evaluate_formula.php"); $io_evaluate=new evaluate_formula(); $totrow=$_POST["total"]; for($z=1;$z<=$totrow;$z++) { $ls_codcar=$_POST["txtcodcar".$z]; $ls_dencar=$_POST["txtdencar".$z]; $ld_porcar=$_POST["txtporcar".$z]; $ls_formula=$_POST["formula".$z]; $ls_documento=$_POST["txtdoc".$z]; $ldec_montoobjret=$_POST["txtmonobjret".$z]; $ldec_montoobjret=str_replace('.','',$ldec_montoobjret); $ldec_montoobjret=str_replace(',','.',$ldec_montoobjret); if(array_key_exists("chk".$z,$_POST)) { $ldec_montoret=$io_evaluate->uf_evaluar($ls_formula,$ldec_montoobjret); $lb_sel="checked"; } else { $ldec_montoret=0; $lb_sel=""; } $object[$z][1]=" "; $object[$z][2]=""; $object[$z][3]=""; $object[$z][4]=""; $object[$z][5]=""; $object[$z][6]=""; $object[$z][7]=""; } } $grid->makegrid($totrow,$title,$object,520,'Catalogo de Retenciones',$grid1); print ""; ?>