<? if ( $conf_db_type == 5 || $conf_db_type == 6 ) { ?>
Menu.AddSpCol(1);
Menu.AddColumn( 1, "javascript:dosql(\"select * from V$VERSION\")", "バージョン情報", "_self" );
Menu.AddColumn( 1, "javascript:dosql(\"select * from DBA_TABLESPACES\")", "テーブルスペース", "_self" );
Menu.AddColumn( 1, "javascript:dosql(\"select * from DBA_DATA_FILES\")", "ファイル", "_self" );
Menu.AddSpCol(1);

Menu.AddColumn( 1, "javascript:dosql(\"select * from USER_TABLES\")", "テーブル", "_self" );
Menu.AddColumn( 1, "javascript:dosql(\"select * from DBA_USERS\")", "スキーマ", "_self" );
Menu.AddSpCol(1);
Menu.AddColumn( 1, "javascript:dosql(\"select * from USER_VIEWS\")", "ビュー(定義)", "_self" );
Menu.AddSpCol(1);
<? } ?>

DECLARE
   WK_PARAM VARCHAR2(100) := 'TEST';
   WK_RET VARCHAR2(100);
BEGIN
   DBMS_OUTPUT.PUT_LINE('無名ブロック処理開始') ;
   DBMS_OUTPUT.PUT_LINE('引数:'||WK_PARAM) ;
   SELECT TEST(WK_PARAM) into WK_RET from dual;
   DBMS_OUTPUT.PUT_LINE('戻り値:'||WK_RET) ;
   DBMS_OUTPUT.PUT_LINE('無名ブロック処理終了') ;
END;