Previous Topic Next topic Print topic


To map report lines

Restriction: This topic applies only when the AppMaster Builder AddPack has been installed, and applies only to Windows platforms.
In the Program Painter, follow each TYPE clause you coded for each group with a MOCKUP LINES clause, starting in column 12 on the next line down, as follows:
           MOCKUP LINE[S] linenumber1 [THRU linenumberN]

For example, the following code:

   MOCK    STOCKRPT
   01      TYPE IS REPORT HEADING    
               NEXT GROUP IS NEXT PAGE
           MOCKUP LINES 1 THRU 5
   01      TYPE IS PAGE HEADING
               NEXT GROUP PLUS 2
           MOCKUP LINES 6 THRU 8
   01      TYPE IS CONTROL HEADING WS-LOCATION-CODE
           MOCKUP LINES 10 THRU 12
   01      PART-DETAIL TYPE IS DETAIL 
               NEXT GROUP PLUS 1
           MOCKUP LINE 13
   01      TYPE IS CONTROL FOOTING WS-LOCATION-CODE
           MOCKUP LINES 14 THRU 19
   01      TYPE IS CONTROL FOOTING FINAL
           MOCKUP LINES 20 THRU 24
   01      TYPE IS PAGE FOOTING
               LINE PLUS 2
           MOCKUP LINE 25
   01      TYPE IS REPORT FOOTING
               LINE PLUS 2
           MOCKUP LINE 27

Corresponds to the following mock-up.:

*************************TOP OF DATA**********************
                 WONDERFUL WIDGETS INCORPORATED
                         MID-ATLANTIC
                          STOCK REPORT
                           XXXXXX XXX

                         MID-ATLANTIC
                         STOCK REPORT
                         XXXXXX XXX

LOCATION       LAST COUNT   QUANTITY   QUANTITY   QUANTITY
                  DATE      IN STOCK    ISSUED    RECEIVED

XXXXXXXXXXXX    99/99/99     ZZZ,ZZ9     ZZ,ZZ9    ZZZ,ZZ9

                           ---------  ---------  ---------
TOTAL BY LOCATION:         Z,ZZZ,ZZ9   Z,ZZZ,ZZ9  Z,ZZZ,ZZ9

TOTAL NUMBER OF SALES BY LOCATION:       ZZZ,ZZ9

TOTAL WONDERFUL WIDGETS IN STOCK:      Z,ZZZ,ZZ9
TOTAL WONDERFUL WIDGETS ISSUED:        Z,ZZZ,ZZ9
TOTAL WONDERFUL WIDGETS RECEIVED:      Z,ZZZ,ZZ9
TOTAL WONDERFUL WIDGETS SOLD:          Z,ZZZ,ZZ9

                             PAGE ZZZ9

                    *****  END OF REPORT  *****
Note: For more information, see Report Mapping Rules.
Previous Topic Next topic Print topic