home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #26 / NN_1992_26.iso / spool / comp / database / oracle / 2171 < prev    next >
Encoding:
Internet Message Format  |  1992-11-11  |  5.1 KB
  1. Path: sparky!uunet!mcsun!news.funet.fi!hydra!klaava!cc.helsinki.fi!jaakola
  2. From: jaakola@cc.helsinki.fi
  3. Newsgroups: comp.databases.oracle
  4. Subject: Re: SQL*REP - how to reset &Page variable to 1
  5. Message-ID: <1992Nov11.175809.1@cc.helsinki.fi>
  6. Date: 11 Nov 92 15:58:09 GMT
  7. References: <fragante.721444309@unixg.ubc.ca>
  8. Sender: news@klaava.Helsinki.FI (Uutis Ankka)
  9. Organization: University of Helsinki
  10. Lines: 171
  11.  
  12. In article <fragante.721444309@unixg.ubc.ca>, fragante@unixg.ubc.ca (Gv Fragante) writes:
  13. > I remember seeing this question posted a few months back but missed reading it.
  14. > So if anyone can remember, how can I reset the page number to 1 after a group
  15. > break ? Also, how can I make SQL*REP pause after each group break ? I need
  16. > the pause to allow the user to insert a special stationary into the laser
  17. > printer.
  18. > 
  19. > Thanks.
  20.  
  21. Here it is again:
  22.  
  23. Week ago I requested help on resetting page numbers when a record in
  24. a master group changes. VSOOD@us.oracle.com posted me a solution for
  25. SQL*ReportWriter version 1.1 which used an user exit written in Pro*C.
  26. Inspired by that I discovered a new way to reset page numbers which
  27. does not need any Pro*C, just plain brute force &SQL-kludges. This
  28. solution does not affect detail groups in any way; all extra fields
  29. are placed at REPORT and master levels.
  30.  
  31. PLEASE NOTE THAT IN SQL*REPORTWRITER VERSION 2 THERE WILL BE A
  32. BUILT-IN WAY TO RESET PAGE NUMBER WHEN RECORD CHANGES! And in version
  33. 2 you cannot have fields with source &PAGE any more...
  34.  
  35. The example below demonstrates that
  36.   - this works for details returning no rows
  37.   - this works for master - multiple details -reports
  38.  
  39. I can see no reason why this wouldn't work for master-detail-detail
  40. reports; I have not tried it, though.
  41.  
  42. This is my report like:
  43.  
  44. QUERY:
  45.   dept:
  46.     query:
  47.        SELECT deptno
  48.        FROM dept
  49.  
  50.   emp:
  51.     query:
  52.        SELECT deptno, ename
  53.        FROM emp
  54.        WHERE deptno = :deptno
  55.     parent query 1: dept
  56.     Do NOT enter any records for "Child Columns/Parent 1 Columns"!
  57.  
  58.   manager:
  59.     query:
  60.        SELECT ename managername
  61.        FROM emp
  62.        WHERE deptno = :deptno
  63.          AND job = 'MANAGER'
  64.     parent query 1: dept
  65.     Do NOT enter any records for "Child Columns/Parent 1 Columns"!
  66.  
  67. GROUP:
  68.   G_dept:
  69.     page break: Always
  70.   G_emp:
  71.     relative position: Below
  72.   G_manager:
  73.     relative position: Below
  74.  
  75. FIELD:
  76.   FieldName    Source       Group      DataType  Width  Skip
  77.   ---------    ------       -----      --------  -----  ----
  78.   oldmaster    #RWENOP      REPORT     CHAR      30
  79.   realpage     &PAGE        REPORT     NUM        3
  80.   virtpage     #RWENOP      G_dept     NUM        3     X
  81.   firstpage    (1)          G_dept     NUM        3     X
  82.   DEPTNO       dept.DEPTNO  G_dept     NUM        4
  83.   forcecalc    (2)          G_dept     NUM        3     X
  84.   DEPTNO2      emp.DEPTNO   G_emp      NUM        4
  85.   ENAME        ENAME        G_emp      CHAR      10
  86.   MANAGERNAME  MANAGERNAME  G_manager  CHAR      10
  87.  
  88.   where (1) is
  89.     &SQL SELECT DECODE(:oldmaster,
  90.                   :deptno,:firstpage,
  91.                   :realpage),
  92.            :deptno
  93.          INTO :firstpage,
  94.            :oldmaster
  95.          FROM dual
  96.  
  97.   and (2) is
  98.     &SQL SELECT :realpage - :firstpage + 1
  99.          INTO :virtpage
  100.          FROM dual
  101.  
  102.   The fields oldmaster, realpage, virtpage, firstpage and forcecalc were
  103.   created manually.
  104.  
  105. SUMMARY:
  106.  
  107.   SummaryName   Field     Function  DataType  Width  PrintGroup  ResetGroup
  108.   -----------   -----     --------  --------  -----  ----------  ----------
  109.   virtpagesum   virtpage  Last      NUM       3      G_dept      PAGE
  110.  
  111. TEXT:
  112.  
  113.   place &virtpagesum on the PAGE Header and enjoy!
  114.  
  115.   The "repeat on page overflow" is crossed by default for G_dept
  116.   objects; I have not tested what happens if it's not crossed.
  117.  
  118. I tested it by setting Report Page Height to 12 and here is the result:
  119. (please note that ^L stands for form feed)
  120.  
  121.                                              PAGE:   1
  122. Deptno
  123. ------
  124.     10
  125.   Deptno  Ename
  126.   ------  ----------
  127.       10  CLARK
  128.       10  KING
  129. ^L
  130.  
  131.                                              PAGE:   2
  132. Deptno
  133. ------
  134.     10
  135.   Deptno  Ename
  136.   ------  ----------
  137.       10  MILLER
  138. ^L
  139.  
  140.                                              PAGE:   3
  141. Deptno
  142. ------
  143.     10
  144.     Managername
  145.     -----------
  146.     CLARK
  147. ^L
  148.  
  149.                                              PAGE:   1
  150. Deptno
  151. ------
  152.     20
  153.   Deptno  Ename
  154.   ------  ----------
  155.       20  SMITH
  156.       20  JONES
  157. ^L
  158. [stuff deleted]
  159. ^L
  160.  
  161.                                              PAGE:   1
  162. Deptno
  163. ------
  164.     40
  165.   Deptno  Ename
  166.   ------  ----------
  167.     Managername
  168.     -----------
  169.  
  170. I tried to get rid of the summary, but the virtpage seems to "lag" one
  171. page behind! I discovered one solution without a summary, but it worked
  172. only if DESTYPE=Screen - if I set DESTYPE=File the page numbers do not
  173. reset! My runrep's version is 1.1.12.2.2 on MS-DOS and we have discovered
  174. other annoying inconsistencies between File and Screen desformats.
  175.  
  176. If you have a solution which eliminates the summary, please let me know!
  177. --
  178. Juhani Jaakola        jaakola@CC.Helsinki.FI
  179. Phone: +358-0-506811  (or +358-0-13431405)
  180. Fax:   +358-0-50681300
  181. Address: Sulkapolku 4 B 13 A
  182.          00370 Helsinki
  183.