Multiples query before REPFOOTER

Question

hi,
how can i do multiple queries before i print my footer.currently it will repeat printing title and footer for each of the query.Please help.
CLEAR COLUMNS
CLEAR BREAKS
CLEAR COMPUTE
COLUMN X_CONTACT_TYPE HEADING 'CONTACT_TYPE' FORMAT A5
SET TERMOUT OFF
SET FEEDBACK OFF
SET TRIMSPOOL ON
SET PAGESIZE 100
SET UNDERLINE =
COLUMN TODAY NOPRINT NEW_VALUE DATEVAR
COLUMN REC_COUNT NOPRINT NEW_VALUE REC_CTR
TTITLE 'TITLE NAME ' SKIP 1 -
LEFT 'Date/Time: ' DATEVAR SKIP 1 -
LEFT 'Page: ' FORMAT 999 SQL.PNO SKIP 1 -
LEFT '================================================================================================================' SKIP 1
REPFOOTER SKIP 1 '**************************************' SKIP 1 -
LEFT 'Total No. of Records before patched      : ' REC_CTR SKIP 1 -
LEFT '****************************************End of Report**********************************************************' SKIP 1
SET LINESIZE 1000
WHENEVER SQLERROR EXIT SQL.SQLCODE
SELECT
COUNT(*) AS REC_COUNT
FROM S_OPTY_CON A,S_OPTY B
WHERE A.OPTY_ID = B.ROW_ID
AND B.CONSUMER_OPTY_FLG = 'Y'
AND A.X_CONTACT_TYPE IS NULL;
WHENEVER OSERROR EXIT SQL.OSCODE
SPOOL /DESKTOP/Report.txt
BREAK ON REPORT
WHENEVER SQLERROR EXIT SQL.SQLCODE
SELECT DISTINCT(X_CONTACT_TYPE) AS CONTACT TYPE DISTINCT
FROM S_OPTY_CON
WHERE OPTY_ID IN (SELECT ROW_ID from S_OPTY WHERE CONSUMER_OPTY_FLG = 'Y')
SELECT
COUNT(*) AS TOTAL,X_CONTACT_TYPE AS CONTACT_TYPE,
TO_CHAR(SYSDATE, 'DD/MM/YYYY HH24:MI:SS') AS TODAY
FROM S_OPTY_CON A,S_OPTY B
WHERE A.OPTY_ID = B.ROW_ID
AND B.CONSUMER_OPTY_FLG = 'Y'
GROUP BY X_CONTACT_TYPE;
CLEAR COLUMNS
CLEAR BREAKS
CLEAR COMPUTE
SET TERMOUT ON
SET FEEDBACK ON
SET TRIMSPOOL OFF
SPOOL OFF
EXIT
Expected Output:
TITLE NAME
Date/Time: 21/10/2004 11:07:16
Page: 1
=========================================
CONTACT TYPE DISTINCT
=========================================
C
P
NULL
=========================================
TOTAL CONTACT TYPE
=========================================
1248 C
820 P
34611 NULL
'Total No. of Records before patched : 36679
****************************************End of Report**********************************************************
Thanks

Answer 1

hi,
how can i do multiple queries before i print my footer.currently it will repeat printing title and footer for each of the query.Please help.
CLEAR COLUMNS
CLEAR BREAKS
CLEAR COMPUTE
COLUMN X_CONTACT_TYPE HEADING 'CONTACT_TYPE' FORMAT A5
SET TERMOUT OFF
SET FEEDBACK OFF
SET TRIMSPOOL ON
SET PAGESIZE 100
SET UNDERLINE =
COLUMN TODAY NOPRINT NEW_VALUE DATEVAR
COLUMN REC_COUNT NOPRINT NEW_VALUE REC_CTR
TTITLE 'TITLE NAME ' SKIP 1 -
LEFT 'Date/Time: ' DATEVAR SKIP 1 -
LEFT 'Page: ' FORMAT 999 SQL.PNO SKIP 1 -
LEFT '================================================================================================================' SKIP 1
REPFOOTER SKIP 1 '**************************************' SKIP 1 -
LEFT 'Total No. of Records before patched      : ' REC_CTR SKIP 1 -
LEFT '****************************************End of Report**********************************************************' SKIP 1
SET LINESIZE 1000
WHENEVER SQLERROR EXIT SQL.SQLCODE
SELECT
COUNT(*) AS REC_COUNT
FROM S_OPTY_CON A,S_OPTY B
WHERE A.OPTY_ID = B.ROW_ID
AND B.CONSUMER_OPTY_FLG = 'Y'
AND A.X_CONTACT_TYPE IS NULL;
WHENEVER OSERROR EXIT SQL.OSCODE
SPOOL /DESKTOP/Report.txt
BREAK ON REPORT
WHENEVER SQLERROR EXIT SQL.SQLCODE
SELECT DISTINCT(X_CONTACT_TYPE) AS CONTACT TYPE DISTINCT
FROM S_OPTY_CON
WHERE OPTY_ID IN (SELECT ROW_ID from S_OPTY WHERE CONSUMER_OPTY_FLG = 'Y')
SELECT
COUNT(*) AS TOTAL,X_CONTACT_TYPE AS CONTACT_TYPE,
TO_CHAR(SYSDATE, 'DD/MM/YYYY HH24:MI:SS') AS TODAY
FROM S_OPTY_CON A,S_OPTY B
WHERE A.OPTY_ID = B.ROW_ID
AND B.CONSUMER_OPTY_FLG = 'Y'
GROUP BY X_CONTACT_TYPE;
CLEAR COLUMNS
CLEAR BREAKS
CLEAR COMPUTE
SET TERMOUT ON
SET FEEDBACK ON
SET TRIMSPOOL OFF
SPOOL OFF
EXIT
Expected Output:
TITLE NAME
Date/Time: 21/10/2004 11:07:16
Page: 1
=========================================
CONTACT TYPE DISTINCT
=========================================
C
P
NULL
=========================================
TOTAL CONTACT TYPE
=========================================
1248 C
820 P
34611 NULL
'Total No. of Records before patched : 36679
****************************************End of Report**********************************************************
Thanks