I have created a .bat and .sql file for document automation.
------------------------------------------------
--****************************************************************************************************
-- pkg_dump.sql
-- generate &1.psk
--*****************************************************************************************************
PROMPT "Enter the file_name, the extension must be .psk (ie : 20030813.psk) "
ACCEPT file_name CHAR FORMAT 'A30' PROMPT 'filename.psk:>'
COL SORT1 NOPRINT
COL SORT2 NOPRINT
COL SORT3 NOPRINT
COL SORT4 NOPRINT
BREAK ON SORT1 SKIP 1
set linesize 120
SET HEADING OFF
SET ECHO OFF
SET FEEDBACK OFF
SET PAGESIZE 0
SPOOL &&file_name
SELECT NAME SORT1, LINE SORT2,
'Create or Replace ' || TEXT
FROM USER_SOURCE
WHERE TYPE = 'PACKAGE'
AND LINE = 1
UNION
SELECT NAME SORT1, LINE SORT2,
TEXT
FROM USER_SOURCE
WHERE TYPE = 'PACKAGE'
AND LINE > 1
UNION
SELECT NAME SORT1, 999999 SORT2,
'/'
FROM USER_SOURCE
WHERE TYPE = 'PACKAGE'
AND LINE = 1
ORDER BY 1,2;
spool off
exit
------------------------------------------------
REM
REM doc_generate.bat
REM
set pldoc=o:/pldoc
set user=user
set pass=pass
set tns=tns_name
set source=
set doc=doc
sqlplus %user%/%pass%@%tns% @pkg_dump.sql
set classpath=%classpath%o:/pldoc;
I have created a .bat and .sql file for document automation.
------------------------------------------------
--****************************************************************************************************
-- pkg_dump.sql
-- generate &1.psk
--*****************************************************************************************************
PROMPT "Enter the file_name, the extension must be .psk (ie : 20030813.psk) "
ACCEPT file_name CHAR FORMAT 'A30' PROMPT 'filename.psk:>'
COL SORT1 NOPRINT
COL SORT2 NOPRINT
COL SORT3 NOPRINT
COL SORT4 NOPRINT
BREAK ON SORT1 SKIP 1
set linesize 120
SET HEADING OFF
SET ECHO OFF
SET FEEDBACK OFF
SET PAGESIZE 0
SPOOL &&file_name
SELECT NAME SORT1, LINE SORT2,
'Create or Replace ' || TEXT
FROM USER_SOURCE
WHERE TYPE = 'PACKAGE'
AND LINE = 1
UNION
SELECT NAME SORT1, LINE SORT2,
TEXT
FROM USER_SOURCE
WHERE TYPE = 'PACKAGE'
AND LINE > 1
UNION
SELECT NAME SORT1, 999999 SORT2,
'/'
FROM USER_SOURCE
WHERE TYPE = 'PACKAGE'
AND LINE = 1
ORDER BY 1,2;
spool off
exit
------------------------------------------------
REM
REM doc_generate.bat
REM
set pldoc=o:/pldoc
set user=user
set pass=pass
set tns=tns_name
set source=
set doc=doc
sqlplus %user%/%pass%@%tns% @pkg_dump.sql
set classpath=%classpath%o:/pldoc;
call o:/pldoc/pldoc.bat -doctitle \"ora_serv1 package doc\" -d %doc% %source%*.psk
PAUSE
-------------------------------------------------
Thanks Lance !
I hope people will find it useful.