Catálogo de Ordenes de Compra
Número
Proveedor
Buscar
uf_conectar(); $io_msg =new class_mensajes(); $io_fun =new class_funciones(); $ds =new class_datastore(); $io_sql =new class_sql($con); $arre=$_SESSION["la_empresa"]; $ls_codemp=$arre["codemp"]; if (array_key_exists("linea",$_GET)) { $li_linea=$_GET["linea"]; } else { if(array_key_exists("hidlinea",$_POST)) { $li_linea=$_POST["hidlinea"]; } else { $li_linea=""; } } if(array_key_exists("operacion",$_POST)) { $ls_operacion=$_POST["operacion"]; $ls_numordcom="%".$_POST["txtnumordcom"]."%"; $ls_cod_pro="%".$_POST["txtcodpro"]."%"; $ls_status="%".$_POST["hidstatus"]."%"; } else { $ls_operacion=""; } print "
"; print "
"; print "
Número
"; print "
Proveedor
"; print "
Fecha
"; print "
"; if($ls_operacion=="BUSCAR") { $ls_sql="SELECT soc_ordencompra.numordcom,soc_ordencompra.cod_pro,soc_ordencompra.fecordcom, ". " (SELECT nompro FROM rpc_proveedor". " WHERE rpc_proveedor.cod_pro=soc_ordencompra.cod_pro) AS nompro". " FROM soc_ordencompra". " WHERE codemp = '".$ls_codemp."'". " AND estpenalm = 0". " AND numordcom LIKE '".$ls_numordcom."'". " AND cod_pro LIKE '".$ls_cod_pro."' ". " AND estcom<>'3' ". " AND estcondat = 'B' ". " AND EXISTS". " (SELECT * FROM soc_dt_bienes ". " WHERE soc_ordencompra.numordcom=soc_dt_bienes.numordcom)". " GROUP BY soc_ordencompra.numordcom,soc_ordencompra.cod_pro,soc_ordencompra.fecordcom". " ORDER BY soc_ordencompra.numordcom,soc_ordencompra.cod_pro,soc_ordencompra.fecordcom"; $rs_cta=$io_sql->select($ls_sql); //echo $ls_sql.'
'; $data=$rs_cta; if($row=$io_sql->fetch_row($rs_cta)) { $data=$io_sql->obtener_datos($rs_cta); $arrcols=array_keys($data); $totcol=count($arrcols); $ds->data=$data; $totrow=$ds->getRowCount("numordcom"); for($z=1;$z<=$totrow;$z++) { print "
"; $ls_numordcom= $data["numordcom"][$z]; $ls_codpro= $data["cod_pro"][$z]; $ls_nompro= $data["nompro"][$z]; $ld_fecordcom= $data["fecordcom"][$z]; $ld_fecordcom=$io_fun->uf_convertirfecmostrar($ld_fecordcom); print "
".$ls_numordcom."
"; print "
".$data["cod_pro"][$z]."
"; print "
".$ld_fecordcom."
"; print "
"; } } else { $io_msg->message("No hay registros."); } } print "
"; ?>