message('Tipee la Otra Fecha !!!');
}
else
{
$ls_numrec ="%".$_POST["txtnumrec"]."%";
if((!($ls_fecemi=="")) && (!($ls_fecemi=="")))
{
$ls_fecemi =$_POST["txtfecdes"];
$ls_fecdes =$io_fun->uf_convertirdatetobd($ls_fecemi);
$ls_fechat =$_POST["txtfechas"];
$ls_fechas =$io_fun->uf_convertirdatetobd($ls_fechat);
}
$ls_prov=$_POST["prov"];
if($ls_prov=="P")
{
$ls_proveedor="%".$_POST["txtcodproben"]."%";
}
else
{
if($ls_prov=="B")
{
$ls_beneficiario="%".$_POST["txtcodproben"]."%";
}
}
$ls_codemp=$la_emp["codemp"];
if($ls_prov=="P")
{
if(($ls_fecdes=="") && ($ls_fechas==""))
{
$ls_sql=" SELECT * ".
" FROM cxp_rd c, rpc_proveedor p ".
" WHERE (c.codemp='".$ls_codemp."' AND c.codemp=P.codemp AND ".
" c.numrecdoc like '".$ls_numrec."' AND ".
" p.cod_pro like '".$ls_proveedor."' AND c.cod_pro=P.cod_pro AND ".
" c.estaprord = ".$li_rdapro." AND c.estprodoc = 'R' )";
}
else
{
$ls_sql=" SELECT * ".
" FROM cxp_rd c, rpc_proveedor p ".
" WHERE (c.codemp='".$ls_codemp."' AND c.codemp=p.codemp AND ".
" c.numrecdoc like '".$ls_numrec."' AND c.cod_pro=p.cod_pro AND ".
" p.cod_pro like '".$ls_proveedor."' AND ".
" c.fecregdoc>='".$ls_fecdes."' AND c.fecregdoc<='".$ls_fechas."' AND ".
" c.estaprord = ".$li_rdapro." AND c.estprodoc = 'R' AND c.tipproben='P' )";
}
}
if ($ls_prov=="B")
{
if(($ls_fecdes=="") && ($ls_fechas==""))
{
$ls_sql=" SELECT * ".
" FROM cxp_rd c, rpc_beneficiario b ".
" WHERE (c.codemp='".$ls_codemp."' AND c.codemp=B.codemp AND ".
" c.numrecdoc like '".$ls_numrec."' AND ".
" c.ced_bene like '%".$ls_beneficiario."%' AND c.ced_bene=b.ced_bene AND ".
" c.estaprord = ".$li_rdapro." AND c.estprodoc = 'R' )";
}
else
{
$ls_sql=" SELECT * ".
" FROM cxp_rd c, rpc_beneficiario b ".
" WHERE (c.codemp='".$ls_codemp."' AND c.codemp=b.codemp AND ".
" c.numrecdoc like '".$ls_numrec."' AND ".
" c.ced_bene like '%".$ls_beneficiario."%' AND c.ced_bene=b.ced_bene AND ".
" b.nombene like '%".$ls_nombre."%' AND c.fecregdoc BETWEEN '".$ls_fecdes."' AND ".
" '".$ls_fechas."' AND ".
" c.estaprord = ".$li_rdapro." AND c.estprodoc = 'R' )";
}
}
if($ls_prov=="T")
{
if(($ls_fecdes=="") && ($ls_fechas==""))
{
$ls_sql=" SELECT * FROM cxp_rd ".
" WHERE (codemp='".$ls_codemp."' AND numrecdoc like '".$ls_numrec."' AND ".
" estaprord = ".$li_rdapro." AND estprodoc = 'R' )";
}
else
{
$ls_sql=" SELECT * FROM cxp_rd ".
" WHERE (codemp='".$ls_codemp."' AND numrecdoc like '".$ls_numrec."' AND ".
" fecregdoc>='".$ls_fecdes."' AND fecregdoc<='".$ls_fechas."' AND ".
" estaprord = ".$li_rdapro." AND estprodoc = 'R' )";
}
}
}
$rs=$io_sql->select($ls_sql);
$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("numrecdoc");
for ($z=1;$z<=$totrow;$z++)
{
$ls_numrecdoc = $data["numrecdoc"][$z];
$ls_fecha = $data["fecaprord"][$z];
$ls_fecha = substr($ls_fecha,8,2)."/".substr($ls_fecha,5,2)."/".substr($ls_fecha,0,4);
$ld_monto = $data["montotdoc"][$z];
$ls_estatus = $data["estaprord"][$z];
$ls_tiproben = $data["tipproben"][$z];
$ls_nomproben = "";
if ($ls_tiproben=="P")
{
$ls_codpro = $data["cod_pro"][$z];
$int_sol->uf_load_datos_proben($ls_codemp,$ls_codpro,'rpc_proveedor','cod_pro','nompro AS nombre','',$ls_nomproben,$as_apeproben);
}
else
{
$ls_cedbene = $data["ced_bene"][$z];
$int_sol->uf_load_datos_proben($ls_codemp,$ls_cedbene,'rpc_beneficiario','ced_bene','nombene AS nombre',',apebene AS apellido',$ls_nomproben,$as_apeproben);
}
if ($ls_estatus==0)
{
$ls_estapro="No Aprobada";
}
else
{
$ls_estapro="Aprobada";
}
$ld_monto=number_format($ld_monto,2,',','.');
$object[$z][1]="";
$object[$z][2]="";
$object[$z][3]="";
$object[$z][4]="";
$object[$z][5]="";
$object[$z][6]="";
}//End del For...
$io_sql->free_result($rs);
$io_sql->close();
}
else
{
for ($z=1;$z<=5;$z++)
{//2
$object[1][1]="";
$object[1][2]="";
$object[1][3]="";
$object[1][4]="";
$object[1][5]="";
$object[1][6]="";
}//2
$totrow=1;
$io_msg->message('No Hay Datos que Mostrar !!!');
}
}
if ($ls_operacion=="VALFECHA")
{
$arre=$_SESSION["la_empresa"];
$ls_empresa=$arre["codemp"];
$li_rdapro =$_POST["rdapro"];
$ls_fechat =$_POST["txtfechas"];
$lb_valido=true;
$lb_valido=$io_fecha->uf_comparar_fecha($ls_fechat,$ls_fecapro);
if ($lb_valido)
{
$io_msg->message('La Fecha de Búsqueda no Puede se Mayor a la Fecha de Aprobación !!!');
$ls_fechat=$ls_fecapro;
for ($z=1;$z<=5;$z++)
{
$object[1][1]="";
$object[1][2]="";
$object[1][3]="";
$object[1][4]="";
$object[1][5]="";
$object[1][6]="";
}
$totrow=1;
}
}
if ($ls_operacion=="GUARDAR")
{//1
$ls_codemp=$la_emp["codemp"];
$lb_valido=true;
$lb_valido=$io_fecha->uf_valida_fecha_periodo($ls_fecapro,$ls_codemp);
if(!$lb_valido)
{
$io_msg->message($io_fecha->is_msg_error);
$lb_valido=false;
}
else
{//2
$ls_fila=$totrow;
$row=0;
$y=0;
for ($i=1;$i<=$totrow;$i++)
{//3
if (array_key_exists("chkaprob".$i,$_POST))
{
$y=$y+1;
$ls_fecha=$io_fun->uf_convertirdatetobd($ls_fecapro);
$lr_datosgrid["numero"][$y]=$_POST["txtnumrecdoc".$i];
$ls_estatus=$_POST["txtestapro".$i];
if($li_rdapro==0)
{
$ls_estapro=1;
}
else
{
$ls_estapro=0;
}
$lr_datosgrid["estatus"][$y]=$ls_estapro;
$lr_datosgrid["fecha"][$y]=$ls_fecha;
$row=$row+1;
}//4
}//3
//}//6
if(($totrow>=1) && ($row>=1))
{
$lb_valido=$int_sol->ue_update_estatus_aprob_recdoc($lr_datosgrid,$row,$la_seguridad);
if ($lb_valido)
{
for ($z=1;$z<=5;$z++)
{//2
$object[$z][1]="";
$object[$z][2]="";
$object[$z][3]="";
$object[$z][4]="";
$object[$z][5]="";
$object[$z][6]="";
}//2
$totrow=1;
}
}
}
}
?>
makegrid($totrow,$title,$object,765,'Recepciones de Documentos',$grid);
?>
