uf_conectar(); $io_msg=new class_mensajes(); $io_ds=new class_datastore(); $io_sql=new class_sql($con); $io_fun=new class_funciones(); $la_emp=$_SESSION["la_empresa"]; if (array_key_exists("operacion",$_POST)) { $ls_operacion=$_POST["operacion"]; } else { $ls_operacion=""; } if (array_key_exists("txtnumrec",$_POST)) { $ls_numrec=$_POST["txtnumrec"]; } else { $ls_numrec=""; } if (array_key_exists("cmbconcepto",$_POST)) { $ls_concepto=$_POST["cmbconcepto"]; } else { $ls_concepto=""; } if (array_key_exists("txtnombre",$_POST)) { $ls_nomproben=$_POST["txtnombre"]; } else { $ls_nomproben=""; } if (array_key_exists("txtfecdes",$_POST)) { $ls_fecdes =$_POST["txtfecdes"]; } else { $ls_fecdes=""; } if (array_key_exists("txtfechas",$_POST)) { $ls_fechas =$_POST["txtfechas"]; } else { $ls_fechas=""; } if (array_key_exists("txtfecdes",$_POST)) { $ls_fecemi =$_POST["txtfecdes"]; } else { $ls_fecemi=""; } if (array_key_exists("txtfechas",$_POST)) { $ls_fechat =$_POST["txtfechas"]; } else { $ls_fechat=""; } if (array_key_exists("txtcodproben",$_POST)) { $ls_codproben=$_POST["txtcodproben"]; } else { $ls_codproben=""; } if (array_key_exists("prov",$_POST)) { $ls_prov=$_POST["prov"]; } else { $ls_prov=""; } if (empty($ls_operacion)) { $array_fecha=getdate(); $ls_dia=$array_fecha["mday"]; $ls_mes=$array_fecha["mon"]; $ls_ano=$array_fecha["year"]; $ls_fecha=$io_fun->uf_cerosizquierda($ls_dia,2)."/".$io_fun->uf_cerosizquierda($ls_mes,2)."/".$ls_ano; $ls_fecemi=$ls_fecha; $ls_fechat=$ls_fecha; } ?>
Catálogo de Recepción de Documento
         
Nº de Recepcion

Fecha Recepción  

Desde     Hasta

  Todas Proveedor Beneficiario    
Código/Cédula
Nombre
 
Estatus
Concepto select($ls_sql); ?>  

"; print ""; print "Nro de Recepción"; print "Proveedor"; print "Fecha de Registro"; print "Estatus"; print "Monto"; print ""; if ($ls_operacion=="BUSCAR") { $ls_fecemi =$_POST["txtfecdes"]; $ls_fechat =$_POST["txtfechas"]; if ((empty($ls_fecemi) && (!empty($ls_fechat))) || (empty($ls_fechat) && (!empty($ls_fecemi)))) { $io_msg->message('Tipee la Fecha Faltante !!!'); } else { $ls_numrec ="%".$_POST["txtnumrec"]."%"; if (!empty($ls_fecemi) && !empty($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); } else { $ls_fecdes=""; $ls_fechas=""; } $ls_concepto="%".$_POST["cmbconcepto"]."%"; if ($ls_concepto=="%T%") { $ls_concepto="%%"; } $ls_nombre ="%".$_POST["txtnombre"]."%"; $ls_status ="%".$_POST["cmbestatus"]."%"; if ($ls_status=="%T%") { $ls_estatus="%%"; } else { $ls_estatus=$ls_status; } $ls_prov=$_POST["prov"]; if ($ls_prov=="P") { $ls_codpro="%".$_POST["txtpro"]."%"; $ls_cedbene='----------'; } else { if ($ls_prov=="B") { $ls_codpro='----------'; $ls_beneficiario="%".$_POST["txtben"]."%"; } } $ls_codemp=$la_emp["codemp"]; if (!($ls_nombre=="%%") && ($ls_prov=="T")) { $lb_valido=true; $io_msg->message('Escoja Si la Busqueda del Nombre es por Proveedor o Beneficiario !!!'); $lb_valido=false; } else { $lb_valido=true; } if ($lb_valido) { if ($ls_prov=="P") { $ls_strfecha=""; if (!empty($ls_fecdes) && !empty($ls_fechas)) { $ls_strfecha=" AND C.fecemisol BETWEEN '".$ls_fecdes."' AND C.fecemisol<='".$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 C.estprodoc like '".$ls_estatus."' AND ". " P.cod_pro like '".$ls_codpro."' AND C.cod_pro=P.cod_pro AND ". " P.nompro like '".$ls_nombre."' AND codcla like '".$ls_concepto."'"; $ls_sql=$ls_sql.$ls_srtfecha; } elseif($ls_prov=="B") { $ls_strfecha=""; if (!empty($ls_fecdes) && !empty($ls_fechas)) { $ls_strfecha=" AND C.fecemisol BETWEEN '".$ls_fecdes."' AND C.fecemisol<='".$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.estprodoc like '".$ls_estatus."' AND ". " C.ced_bene like '".$ls_beneficiario."' AND C.ced_bene=B.ced_bene AND ". " B.nombene like '".$ls_nombre."' AND codcla like '".$ls_concepto."'"; $ls_sql=$ls_sql.$ls_srtfecha; } else { $ls_strfecha=""; if (!empty($ls_fecdes) && !empty($ls_fechas)) { $ls_strfecha=" AND fecregdoc BETWEEN '".$ls_fecdes."' AND '".$ls_fechas."' ORDER BY fecregdoc ASC"; } $ls_sql=" SELECT * ". " FROM cxp_rd ". " WHERE codemp='".$ls_codemp."' AND numrecdoc like '".$ls_numrec."' AND ". " estprodoc like '".$ls_estatus."' AND codcla like '".$ls_concepto."'"; $ls_sql=$ls_sql.$ls_strfecha; } } } } $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++) { print ""; $ls_numrec =$data["numrecdoc"][$z]; $ls_tiprec =$data["codtipdoc"][$z]; //***************************************************************************************************** $ls_sql=" SELECT dentipdoc ". " FROM cxp_documento ". " WHERE codtipdoc='".$ls_tiprec."'"; $rs=$io_sql->select($ls_sql); if($row=$io_sql->fetch_row($rs)) { $ls_denrec=$row["dentipdoc"]; } //**************************************************************************************************** $ls_codclasrec =$data["codcla"][$z]; $ls_sql= " SELECT dencla FROM cxp_clasificador_rd WHERE codcla='".$ls_codclasrec."'"; $rs=$io_sql->select($ls_sql); if($row=$io_sql->fetch_row($rs)) { $ls_dencla=$row["dencla"]; } //**************************************************************************************************** $ls_denconrec=$data["dencondoc"][$z]; $ls_fecha =$data["fecemidoc"][$z]; $ls_fecemirec=substr($ls_fecha,8,2)."/".substr($ls_fecha,5,2)."/".substr($ls_fecha,0,4); $ls_fechas=$data["fecregdoc"][$z]; $ls_fecregrec=substr($ls_fechas,8,2)."/".substr($ls_fechas,5,2)."/".substr($ls_fechas,0,4); $ls_fec =$data["fecvendoc"][$z]; $ls_fecvenrec=substr($ls_fec,8,2)."/".substr($ls_fec,5,2)."/".substr($ls_fec,0,4); $ld_totrec=$data["montotdoc"][$z]; $ld_dedrec=$data["mondeddoc"][$z]; $ld_carrec=$data["moncardoc"][$z]; $subtotalcar=$ld_totrec-$ld_carrec; $subtotalded=$ld_totrec+$ld_dedrec; $subtotal =$subtotalded-$subtotalcar; $subtotalrec =number_format($subtotal,2,",","."); $ld_montotrec=number_format($ld_totrec,2,",","."); $ld_mondedrec=number_format($ld_dedrec,2,",","."); $ld_moncarrec=number_format($ld_carrec,2,",","."); $ls_numrefrec=$data["numref"][$z]; $ls_procede=$data["procede"][$z]; $li_impuesto=$data["estimpmun"][$z]; $ls_estatus=$data["estprodoc"][$z]; if($ls_estatus=="R") { $ls_estprorec="Recibida"; } if($ls_estatus=="A") { $ls_estprorec="Anulada"; } if ($ls_estatus=="E") { $ls_estprorec="Emitida en Solicitud"; } if ($ls_estatus=="C") { $ls_estprorec="Contabilizada"; } $ls_estlibrec=$data["estlibcom"][$z]; $ls_estapro =$data["estaprord"][$z]; $ls_fecapro =$data["fecaprord"][$z]; $ls_usuapro =$data["usuaprord"][$z]; $ls_tippro =$data["tipproben"][$z]; if($ls_tippro=="P") { $ls_codpro=$data["cod_pro"][$z]; $ls_sql=" SELECT nompro,rifpro ". " FROM rpc_proveedor ". " WHERE (codemp='".$ls_codemp."' AND cod_pro='".$ls_codpro."')"; $rs=$io_sql->select($ls_sql); if($row=$io_sql->fetch_row($rs)) { $ls_nombre=$row["nompro"]; $ls_rif=$row["rifpro"]; } } else { $ls_codpro=$data["ced_bene"][$z]; $ls_sql=" SELECT nombene ". " FROM rpc_beneficiario ". " WHERE (codemp='".$ls_codemp."' AND ced_bene='".$ls_codpro."')"; $rs=$io_sql->select($ls_sql); if($row=$io_sql->fetch_row($rs)) { $ls_nombre=$row["nombene"]; } } print "".$ls_numrec.""; print "".$ls_nombre.""; print "".$ls_fecregrec.""; print "".$ls_estprorec.""; print "".$ld_montotrec.""; print ""; } } print ""; ?>