64 lines
1.5 KiB
SQL
64 lines
1.5 KiB
SQL
@@header
|
|
|
|
/*
|
|
*
|
|
* Author : Vishal Gupta
|
|
* Purpose : Display view's query
|
|
* Parameters : 1 - OWNER, this could also be passed as OWNER.object_name
|
|
* 2 - OBJECT_NAME
|
|
*
|
|
*
|
|
* Revision History:
|
|
* ===================
|
|
* Date Author Description
|
|
* --------- ------------ -----------------------------------------
|
|
* 25-Feb-13 Vishal Gupta Created
|
|
*
|
|
*
|
|
*/
|
|
|
|
/************************************
|
|
* INPUT PARAMETERS
|
|
************************************/
|
|
UNDEFINE OWNER
|
|
UNDEFINE OBJECT_NAME
|
|
|
|
DEFINE OWNER="&&1"
|
|
DEFINE OBJECT_NAME="&&2"
|
|
|
|
|
|
|
|
COLUMN _owner NEW_VALUE owner NOPRINT
|
|
COLUMN _object_name NEW_VALUE object_name NOPRINT
|
|
|
|
set term off
|
|
SELECT SUBSTR(UPPER('&&owner'), 1 , CASE INSTR('&&owner','.') WHEN 0 THEN LENGTH ('&&owner') ELSE INSTR('&&owner','.') - 1 END ) "_owner"
|
|
, DECODE(UPPER('&&object_name'),'',SUBSTR(UPPER('&&owner'),INSTR('&&owner','.')+1),UPPER('&&object_name')) "_object_name"
|
|
FROM DUAL;
|
|
set term on
|
|
|
|
|
|
Prompt
|
|
Prompt ************************************************************
|
|
Prompt ** Object &&OWNER..&&OBJECT_NAME's Source Code
|
|
Prompt ************************************************************
|
|
|
|
|
|
COLUMN text HEADING "S O U R C E C O D E" FORMAT a150
|
|
|
|
set long 400000
|
|
set pages 50000
|
|
|
|
SELECT s.TEXT
|
|
FROM dba_source s
|
|
WHERE s.owner = '&&OWNER'
|
|
AND s.name = '&&OBJECT_NAME'
|
|
ORDER BY s.owner
|
|
, s.name
|
|
, s.type
|
|
, s.line
|
|
;
|
|
|
|
|
|
@@footer
|