Previous Topic: Primary Mode Example 2Next Topic: Secondary Mode


Primary Mode Example 3

Following is a sample of the first page of the report.

                    ******************************************************************************** 1 OPTION LIST ON MAP 2 USER 'XYZ INC.' ┌──────────┐ 3 CALL │ CARDFILE │ ◄ Cataloged library member └──────────┘ 4   NOTE   CUSTOMER/SALESMAN DATA FILE      5   INPT:    FILE   CARD      6            DEFINE NAME                1 TO  2 X      7            DEFINE CUSTOMER-NUMBER     3 TO  5 X  'CUSTOMER'  'NUMBER'      8            DEFINE CITY                      6 X      9            DEFINE STATE               7 TO  8 X     10            DEFINE ZIP-CODE            9 TO 13 X  'ZIP'  'CODE'     11            DEFINE CUSTOMER-SALE-ID   14 TO 15 X  'SALESMAN'  'ID'     12            DEFINE CREDIT-LIMIT       16 TO 23 N2 'CREDIT'  'LIMIT'     13                                                   PIC '$$$,$$9.99'     14            DEFINE CURRENT-BALANCE    24 TO 30 N2 'CURRENT'  'BALANCE'     15                                                   PIC '$$,$$9.99'     16            DEFINE SALESMAN-NAME      32 TO 39 X  'SALESMAN'  'NAME'     17            DEFINE SALESMAN-ID        40 TO 41 X  'SALESMAN'  '   ID   '     18            DEFINE YTD-SALES          42 TO 49 N2 'YEAR-TO-DATE'  'SALES'     19                                                   PIC '$$$,$$9.99'     20            DEFINE BRANCH-ID          50 TO 52 X  'BRANCH'  '   ID   '     22            DEF    UNUSED-CREDIT(6.2)=0       'UNUSED' 'CREDIT'     23                                               PIC '***,**9.99-' Cataloged library member ▼ ┌───────┐ ┌─────┐ 24 CALL │DECODE2│USING│STATE│ST ◄ Library macro substitution └───────┘ └─────┘ 25 NOTE STATE CODE TRANSLATION TABLE ┌───┐ 26 DECODE │:01│INTO :02 ◄ Library macro substitution └───┘ 27 'TX' EQ 'TEXAS' 28 'TN' EQ 'TENNESSEE' 29 'NC' EQ 'NORTH CAROLINA' 30 'GA' EQ 'GEORGIA' 31 'OK' EQ 'OKLAHOMA' 32 'NY' EQ 'NEW YORK' 33 'OH' EQ 'OHIO' 34 'NJ' EQ 'NEW JERSEY' 35 'CT' EQ 'CONNECTICUT' 36 'IL' EQ 'ILLINOIS' 37 'PN' EQ 'PENNSYLVANIA' 38 'MI' EQ 'MICHIGAN' 39 'CO' EQ 'COLORADO' 40 'WA' EQ 'WASHINGTON' 41 'CA' EQ 'CALIFORNIA' 42 ELSE 'UNKNOWN' 'STATE' 'NAME'

Following is a sample of the second page of the report.

44 CALL DECODE3 USING NAME CUSTOMER-NAME 44 45 NOTE CUSTOMER NAME TRANSLATION TABLE 46 DECODE :01 INTO :02 47 '01' EQ 'HIGH-ROLLING INVESTMENT ' 48 '02' EQ 'SOUTHERN FRIED FOODS ' 49 '03' EQ 'LEGAL TOBACCO CO. ' 50 '04' EQ 'SOUTHERN PINE INDUSTRIES' 51 '05' EQ 'BARONIAL OIL CO. ' 52 '06' EQ 'COSMOPOLITAN FASHIONS ' 53 '07' EQ 'HEAVY METAL MACHINERY ' 54 '08' EQ 'AIRPORT SERVICES CORP. ' 55 '09' EQ 'STOLID INSURANCE CORP. ' 56 '10' EQ 'INLAND GRAIN TERMINALS ' 57 '11' EQ 'STEEL CURTAIN STEEL INC.' 58 '12' EQ 'PERFECT BEARING CORP. ' 59 '13' EQ 'MOUNTAIN STATES MINING ' 60 '14' EQ 'NORTHWEST PLYWOOD MILLS ' 61 '15' EQ 'ORIENTAL TRADING CO. ' 62 '16' EQ 'WEST COAST LIFESTYLES ' 63 OTHERWISE ' ' 'NAME' 64 CALL DECODE4 USING CITY CUSTOMER-CITY 64 65 NOTE CITY TRANSLATION TABLE 66 DECODE :01 INTO :02 67 'A' EQ 'DALLAS' 68 'B' EQ 'MEMPHIS' 69 'C' EQ 'CHARLOTTE' 70 'D' EQ 'ATLANTA' 71 'E' EQ 'OKLAHOMA CITY' 72 'F' EQ 'NEW YORK' 73 'G' EQ 'CLEVELAND' 74 'H' EQ 'NEWARK' 75 'I' EQ 'HARTFORD' 76 'J' EQ 'CHICAGO' 77 'K' EQ 'PITTSBURGH' 78 'L' EQ 'DETROIT' 79 'M' EQ 'DENVER' 80 'N' EQ 'SEATTLE' 81 'O' EQ 'SAN FRANCISCO' 82 'P' EQ 'LOS ANGELES' ELSE ' ' 'CITY'

Following is a sample of the third page of the report.

84 SUBTRACT CURRENT-BALANCE FROM CREDIT-LIMIT 85 GIVING UNUSED-CREDIT 87 REPORT 'XYZ SAMPLE REPORT 01' 88 SELECT ALL 89 CONTROL QSEQ 90 PRINT CUSTOMER-NAME CUSTOMER-SALE-ID CUSTOMER-CITY STATE 91 ZIP-CODE CREDIT-LIMIT SALESMAN-ID CURRENT-BALANCE 93 REPORT 'XYZ SAMPLE REPORT 02' 94 SELECT ALL 95 CONTROL NAME 96 PRINT DOUBLE SPACING CUSTOMER-NAME CUSTOMER-NUMBER 97 CUSTOMER-CITY ST ZIP-CODE 98 CUSTOMER-SALE-ID CREDIT-LIMIT 100 REPORT 'XYZ SAMPLE REPORT 03' 101 SELECT 'A' (UNUSED-CREDIT GT 0) Multiple report definition 102 SELECT ALL groups (sort required) 103 CONTROL ST CITY ▼ Exact location printing ┌───┐ 104 PRINT │@20│CUSTOMER-NAME 20 CUSTOMER-NUMBER 3 CREDIT-LIMIT └───┘ 105 3 (CURRENT-BALANCE) 3 (A;UNUSED-CREDIT) ▼ Exact location printing ┌──────────────┐ 106 PRINT │@CUSTOMER-NAME│CUSTOMER-CITY 3 ST 3 ZIP-CODE └──────────────┘ 108 REPORT 'XYZ SAMPLE REPORT 04' 109 SELECT ALL 110 CONTROL NAME 111 PRINT CUSTOMER-NAME CUSTOMER-NUMBER CUSTOMER-CITY 112 ST ZIP-CODE CUSTOMER-SALE-ID CREDIT-LIMIT 113 END COMPILE PHASE COMPLETED - NO ERRORS FOUND 001 WARNING(S) ISSUED START 16:54:54 - STOP 16:54:57

Following is a sample of the fourth page of the report.

I/P 00001 X 00080 = 00080 INPT O/P 00048 X 00096 = 04608 HITFILE SRT 00005 - 00021 = 00016 .SORT KEY INFO. GSA 00000001919 (00000000193 ENTRIES) GSA 1 = 00000000002 NUMERIC CONSTANT ...... CON GSA 2 = 00000000136 QUOTED LITERAL ........ LIT GSA 3 = 00000000001 INTERMEDIATE RESULT ... RES GSA 4 = 00000000049 UNQUOTED LITERAL ...... INT GSA 5 = 00000000002 ACCUMULATOR ........... ACC GSA 6 = 00000000002 VALUE ................. VAL GSA 7 = 00000000000 STRING ................ STR GSA 8 = 00000000001 HEX LITERAL ........... HEX FNT 00000000820 (00000000046 ENTRIES) FNT 0 = 00000000005 LABELS ................ 01 FNT 1 = 00000000040 SCALAR VARIABLES ...... 01 FNT 2 = 00000000001 FILE DESC. BLOCKS ..... 02 FNT 3 = 00000000000 ARRAYS ................ 03 FST 00000009828 (00000000351 ENTRIES) FST 0 = 00000000004 INTERNAL ONLY ......... -02 FST 1 = 00000000005 USER/REPORT ........... 01 FST 2 = 00000000012 INPUT AREA VARIABLE ... 02 FST 3 = 00000000191 GSA VARIABLE .......... 03 FST 4 = 00000000002 DATA MOVEMENT ......... 04 FST 5 = 00000000050 DECODE ................ 05 FST 6 = 00000000005 SEQUENCE AND CONTROL .. 06 FST 7 = 00000000002 CONDITION TEST ........ 07 FST 8 = 00000000006 SELECTION ............. 08 FST 9 = 00000000035 PRINT LAYOUT .......... 09 FST A = 00000000030 HIT RECORD EXTENSION .. 0A FST B = 00000000001 GET RECORD ............ 0B FST C = 00000000000 CONTROL BREAK CALC .... 0C FST D = 00000000000 UNDEFINED ............. 0D FST E = 00000000000 ARRAY DEF/REL. INDEX .. 0E FST F = 00000000008 DUMMY ................. 0F GETMAIN REQUIREMENT FOR GSA/FNT/FST ... APPROX. 013K

Following is a sample of the fifth page of the report.

     ------ FIELD NAME ------ ORIGIN  QUAL  HIT ARY  ----------------------------------- REPORTS ------------------------------      ABORT:                   *LABEL*      BLANK                    * GSA * (00)      BRANCH-ID                INPT    (01)      CITY                     INPT    (01)      CREDIT-LIMIT             INPT    (01)   X         1  2  3  4      CURRDATE                 * GSA * (00)      CURRENT-BALANCE          INPT    (01)   X         1  3      CURRENT-DATE             * GSA * (00)      CURRENT-TIME             * GSA * (00)      CURRTIME                 * GSA * (00)      CUSTOMER-CITY            * GSA * (00)   X         1  2  3  4      CUSTOMER-NAME            * GSA * (00)   X         1  2  3  4      CUSTOMER-NUMBER          INPT    (01)   X         2  3  4      CUSTOMER-SALE-ID         INPT    (01)   X         1  2  4      DD                       * GSA * (00)      END-OF-FILE              * GSA * (00)      EOJ:                     *LABEL*      HR                       * GSA * (00)      INPT                     * GSA * (00)      INPT:                    *LABEL*      MM                       * GSA * (00)      MN                       * GSA * (00)      NAME                     INPT    (01)      NO-RECORD-FOUND          * GSA * (00)      QSEQ                     * GSA * (00)      RECORD-FOUND             * GSA * (00)      SALESMAN-ID              INPT    (01)   X         1      SALESMAN-NAME            INPT    (01)      SPACE                    * GSA * (00)      SPACES                   * GSA * (00)      SS                       * GSA * (00)      ST                       * GSA * (00)   X         2  3  4      START:                   *LABEL*      STATE                    INPT    (01)   X         1      TAG                      * GSA * (00)      TEST:                    *LABEL*      UNUSED-CREDIT            * GSA * (00)   X         3      XD                       * GSA * (00)      XM                       * GSA * (00)      XY                       * GSA * (00)      YTD-SALES                INPT    (01)      YY                       * GSA * (00)      ZERO                     * GSA * (00)      ZEROS                    * GSA * (00)      ZIP-CODE                 INPT    (01)   X         1  2  3  4

Following is a sample of the sixth page of the report.

                                                   (3350   ) ......H I T   F I L E   L A Y O U T......  FD  DROUT                                   DROUT:  FILE DISK SEQUENTIAL VARIABLE RECORD=         100 BLOCK=        4612        BLOCK CONTAINS        4612 CHARACTERS        RECORD CONTAINS         100 CHARACTERS        RECORDING MODE V        DATA RECORD IS HITFILE.  01  HITFILE.        02 RDW                             PICTURE X(4)                 DEFINE RDW                             1 -    4 X        02 TAG-CHARACTER                   PICTURE X                    DEFINE TAG-CHARACTER                   5 -    5 X        02 SORT-KEY.           03 REPORT-NUMBER                PICTURE B                    DEFINE REPORT-NUMBER                   6 -    6 B           03 USER-SORT-KEY                PICTURE X(15)                DEFINE USER-SORT-KEY                   7 -   21 X        02 REPORT-01.                      XYZ SAMPLE REPORT 01           03 00.CUSTOMER-NAME             PICTURE X(24).               DEFINE 00.CUSTOMER-NAME               22 -   45 X           03 01.CUSTOMER-SALE-ID          PICTURE XX                   DEFINE 01.CUSTOMER-SALE-ID            46 -   47 X           03 00.CUSTOMER-CITY             PICTURE X(13)                DEFINE 00.CUSTOMER-CITY               48 -   60 X           03 01.STATE                     PICTURE XX                   DEFINE 01.STATE                       61 -   62 X           03 01.ZIP-CODE                  PICTURE X(5)                 DEFINE 01.ZIP-CODE                    63 -   67 X           03 01.CREDIT-LIMIT              PICTURE 9(6)V99              DEFINE 01.CREDIT-LIMIT                68 -   75 N2           03 01.SALESMAN-ID               PICTURE XX                   DEFINE 01.SALESMAN-ID                 76 -   77 X           03 01.CURRENT-BALANCE           PICTURE 9(5)V99              DEFINE 01.CURRENT-BALANCE             78 -   84 N2        02 REPORT-02.                      XYZ SAMPLE REPORT 02           03 00.CUSTOMER-NAME             PICTURE X(24)                DEFINE 00.CUSTOMER-NAME               22 -   45 X           03 01.CUSTOMER-NUMBER           PICTURE XXX                  DEFINE 01.CUSTOMER-NUMBER             46 -   48 X           03 00.CUSTOMER-CITY             PICTURE X(13)                DEFINE 00.CUSTOMER-CITY               49 -   61 X           03 00.ST                        PICTURE X(14)                DEFINE 00.ST                          62 -   75 X           03 01.ZIP-CODE                  PICTURE X(5)                 DEFINE 01.ZIP-CODE                    76 -   80 X           03 01.CUSTOMER-SALE-ID          PICTURE XX                   DEFINE 01.CUSTOMER-SALE-ID            81 -   82 X           03 01.CREDIT-LIMIT              PICTURE 9(6)V99              DEFINE 01.CREDIT-LIMIT                83 -   90 N2        02 REPORT-03.                      XYZ SAMPLE REPORT 03           03 00.CUSTOMER-NAME             PICTURE X(24)                DEFINE 00.CUSTOMER-NAME               22 -   45 X           03 01.CUSTOMER-NUMBER           PICTURE XXX                  DEFINE 01.CUSTOMER-NUMBER             46 -   48 X           03 01.CREDIT-LIMIT              PICTURE 9(6)V99              DEFINE 01.CREDIT-LIMIT                49 -   56 N2           03 01.CURRENT-BALANCE           PICTURE 9(5)V99              DEFINE 01.CURRENT-BALANCE             57 -   63 N2           03 00.UNUSED-CREDIT             PICTURE S9(7)V99     COMP-3  DEFINE 00.UNUSED-CREDIT               64 -   68 P2           03 00.CUSTOMER-CITY             PICTURE X(13)                DEFINE 00.CUSTOMER-CITY               69 -   81 X           03 00.ST                        PICTURE X(14)                DEFINE 00.ST                          82 -   95 X           03 01.ZIP-CODE                  PICTURE X(5)                 DEFINE 01.ZIP-CODE                    96 -  100 X        02 REPORT-04.                      XYZ SAMPLE REPORT 04           03 00.CUSTOMER-NAME             PICTURE X(24)                DEFINE 00.CUSTOMER-NAME               22 -   45 X           03 01.CUSTOMER-NUMBER           PICTURE XXX                  DEFINE 01.CUSTOMER-NUMBER             46 -   48 X           03 00.CUSTOMER-CITY             PICTURE X(13)                DEFINE 00.CUSTOMER-CITY               49 -   61 X           03 00.ST                        PICTURE X(14)                DEFINE 00.ST                          62 -   75 X           03 01.ZIP-CODE                  PICTURE X(5)                 DEFINE 01.ZIP-CODE                    76 -   80 X           03 01.CUSTOMER-SALE-ID          PICTURE XX                   DEFINE 01.CUSTOMER-SALE-ID            81 -   82 X           03 01.CREDIT-LIMIT              PICTURE 9(6)V99              DEFINE 01.CREDIT-LIMIT                83 -   90 N2

Following is a sample of the seventh page of the report.

  REPORT   01 FIELD NAME                  HDR1  HDR2  DTL   ACC   TOTAL       PICTURE            TAG   FROM   TO   LINE   01   00.CUSTOMER-NAME               4          24            24                                   1    24               01.CUSTOMER-SALE-ID            8     2     2             8                                  31    38               00.CUSTOMER-CITY               4          13            13                                  46    58               01.STATE                       5           2             5                                  66    70               01.ZIP-CODE                    3     4     5             5                                  78    82               01.CREDIT-LIMIT                6     5    11            11         $$$,$$9.99               90   100               01.SALESMAN-ID                 8     8     2             8                                 108   115               01.CURRENT-BALANCE             7     7    10            10          $$,$$9.99              123   132

Following is a sample of the eighth page of the report.

  REPORT   02 FIELD NAME                  HDR1  HDR2   DTL   ACC   TOTAL        PICTURE            TAG   FROM   TO   LINE   01   00.CUSTOMER-NAME               4          24            24                                   1    24               01.CUSTOMER-NUMBER             8     6     3             8                                  33    40               00.CUSTOMER-CITY               4          13            13                                  49    61               00.ST                          5     4    14            14                                  70    83               01.ZIP-CODE                    3     4     5             5                                  92    96               01.CUSTOMER-SALE-ID            8     2     2             8                                 105   112               01.CREDIT-LIMIT                6     5    11            11         $$$,$$9.99              122   132

Following is a sample of the ninth page of the report.

Date: mm/dd/ccyy    ********************************************************************************         Page:     9                     *                                 CA Datacom/DB                                * Time: hh.mm.ss      *                                General Utility                               *      Release: 12                     *                   Copyright © 2009 CA. All rights reserved.                  *               SPnn                     ********************************************************************************   REPORT   03 FIELD NAME                  HDR1  HDR2   DTL   ACC   TOTAL        PICTURE            TAG   FROM   TO                                                                                                          ┌──┐   LINE   01   00.CUSTOMER-NAME               4          24            24                                 │20│   43                                                                                                          └──┘               01.CUSTOMER-NUMBER             8     6     3             8                                  64    71               01.CREDIT-LIMIT                6     5    11            11         $$$,$$9.99               75    85               01.CURRENT-BALANCE             7     7    10    12      12          $$,$$9.99               89   100               00.UNUSED-CREDIT               6     6    11    13      13        ***,**9.99-       A      104   116                                                                                                          ┌──┐   LINE   02   00.CUSTOMER-CITY                          13            13                                 │20│   32                                                                                                          └──┘               00.ST                                     14            14                                  36    49               01.ZIP-CODE                                5             5                                  53    57                                                                                                           ▲                                                                                    Result of exact location printing

Following is a sample of the tenth page of the report.

Date: mm/dd/ccyy    ********************************************************************************         Page:     10                     *                                 CA Datacom/DB                                * Time: hh.mm.ss      *                                General Utility                               *      Release: 12                     *                   Copyright © 2009 CA. All rights reserved.                  *               SPnn                     ********************************************************************************   REPORT   04 FIELD NAME                  HDR1  HDR2  DTL   ACC   TOTAL       PICTURE            TAG   FROM   TO   LINE   01   00.CUSTOMER-NAME               4          24            24                                   1    24               01.CUSTOMER-NUMBER             8     6     3             8                                  33    40               00.CUSTOMER-CITY               4          13            13                                  49    61               00.ST                          5     4    14            14                                  70    83               01.ZIP-CODE                    3     4     5             5                                  92    96               01.CUSTOMER-SALE-ID            8     2     2             8                                 105   112               01.CREDIT-LIMIT                6     5    11            11         $$$,$$9.99              122   132

RUN DIAGNOSTICS INDEX VIOLATIONS 00000000000 PROGRAM CHECKS 00000000000 PRIMARY I/P RECORDS 00000000016 HITS FOR REPORT 1 - 00000000016 HITS FOR REPORT 2 - 00000000016 HITS FOR REPORT 3 - 00000000016 HITS FOR REPORT 4 - 00000000016 TOTAL RECORDS SELECTED 00000000064

XYZ INC. 24 JUN 2010                                              XYZ SAMPLE REPORT 01                                    PAGE     1 ------------------------------------------------------------------------------------------------------------------------------- NAME                          SALESMAN       CITY                STATE       ZIP              CREDIT     SALESMAN       CURRENT                               ID                                             CODE              LIMIT        ID          BALANCE ------------------------------------------------------------------------------------------------------------------------------- HIGH-ROLLING INVESTMENT        7             DALLAS              TX          75260       $100,000.00      7          $54,000.00 SOUTHERN FRIED FOODS          10             MEMPHIS             TN          38101        $30,000.00     10          $36,500.00 LEGAL TOBACCO CO.             10             CHARLOTTE           NC          28228        $40,000.00     10           $5,400.00 SOUTHERN PINE INDUSTRIES       7             ATLANTA             GA          30304        $20,000.00      7               $0.00 BARONIAL OIL CO.               7             OKLAHOMA CITY       OK          73125        $90,000.00      7          $27,000.00 COSMOPOLITAN FASHIONS          1             NEW YORK            NY          10001        $60,000.00      1          $22,800.00 HEAVY METAL MACHINERY          2             CLEVELAND           OH          44101        $50,000.00      2          $48,900.00 AIRPORT SERVICES CORP.         8             NEWARK              NJ          07102        $40,000.00      8          $12,500.00 STOLID INSURANCE CORP.         8             HARTFORD            CT          06101        $80,000.00      8          $86,000.00 INLAND GRAIN TERMINALS         1             CHICAGO             IL          60607        $40,000.00      1           $4,000.00 STEEL CURTAIN STEEL INC.       2             PITTSBURGH          PN          15219        $30,000.00      2               $0.00 PERFECT BEARING CORP.          1             DETROIT             MI          48233        $20,000.00      1           $2,300.00 MOUNTAIN STATES MINING         5             DENVER              CO          80202        $50,000.00      5          $47,200.00 NORTHWEST PLYWOOD MILLS        5             SEATTLE             WA          98134        $20,000.00      5               $0.00 ORIENTAL TRADING CO.           5             SAN FRANCISCO       CA          94119        $60,000.00      5          $54,000.00 WEST COAST LIFESTYLES          5             LOS ANGELES         CA          90052        $10,000.00      5          $11,000.00 END OF REPORT

XYZ INC. 24 JUN 2010                                              XYZ SAMPLE REPORT 02                                    PAGE    1 ------------------------------------------------------------------------------------------------------------------------------- NAME                            CUSTOMER        CITY                 STATE                 ZIP        SALESMAN           CREDIT                                 NUMBER                               NAME                  CODE       ID                  LIMIT ------------------------------------------------------------------------------------------------------------------------------- HIGH-ROLLING INVESTMENT         101             DALLAS               TEXAS                 75260       7            $100,000.00 SOUTHERN FRIED FOODS            102             MEMPHIS              TENNESSEE             38101      10             $30,000.00 LEGAL TOBACCO CO.               103             CHARLOTTE            NORTH CAROLINA        28228      10             $40,000.00 SOUTHERN PINE INDUSTRIES        104             ATLANTA              GEORGIA               30304       7             $20,000.00 BARONIAL OIL CO.                108             OKLAHOMA CITY        OKLAHOMA              73125       7             $90,000.00 COSMOPOLITAN FASHIONS           201             NEW YORK             NEW YORK              10001       1             $60,000.00 HEAVY METAL MACHINERY           203             CLEVELAND            OHIO                  44101       2             $50,000.00 AIRPORT SERVICES CORP.          207             NEWARK               NEW JERSEY            07102       8             $40,000.00 STOLID INSURANCE CORP.          210             HARTFORD             CONNECTICUT           06101       8             $80,000.00 INLAND GRAIN TERMINALS          211             CHICAGO              ILLINOIS              60607       1             $40,000.00 STEEL CURTAIN STEEL INC.        212             PITTSBURGH           PENNSYLVANIA          15219       2             $30,000.00 PERFECT BEARING CORP.           214             DETROIT              MICHIGAN              48233       1             $20,000.00 MOUNTAIN STATES MINING          303             DENVER               COLORADO              80202       5             $50,000.00 NORTHWEST PLYWOOD MILLS         306             SEATTLE              WASHINGTON            98134       5             $20,000.00 ORIENTAL TRADING CO.            308             SAN FRANCISCO        CALIFORNIA            94119       5             $60,000.00 WEST COAST LIFESTYLES           309             LOS ANGELES          CALIFORNIA            90052       5             $10,000.00 END OF REPORT

XYZ INC. 24 JUN 2010                                              XYZ SAMPLE REPORT 03                                    PAGE    1 ------------------------------------------------------------------------------------------------------------------------------                    NAME                                        CUSTOMER        CREDIT        CURRENT          UNUSED                                                                NUMBER           LIMIT        BALANCE          CREDIT ------------------------------------------------------------------------------------------------------------------------------                    ORIENTAL TRADING CO.                        308         $60,000.00     $54,000.00   ****6,000.00                    SAN FRANCISCO   CALIFORNIA       94119                    WEST COAST LIFESTYLES                       309         $10,000.00     $11,000.00                    LOS ANGELES     CALIFORNIA       90052                    MOUNTAIN STATES MINING                      303         $50,000.00     $47,200.00   ****2,800.00                    DENVER          COLORADO         80202                    STOLID INSURANCE CORP.                      210         $80,000.00     $86,000.00                    HARTFORD        CONNECTICUT      06101                    SOUTHERN PINE INDUSTRIES                    104         $20,000.00          $0.00   ***20,000.00                    ATLANTA         GEORGIA          30304                    INLAND GRAIN TERMINALS                      211         $40,000.00      $4,000.00   ***36,000.00                    CHICAGO         ILLINOIS         60607                    PERFECT BEARING CORP.                       214         $20,000.00      $2,300.00   ***17,700.00                    DETROIT         MICHIGAN         48233                    AIRPORT SERVICES CORP.                      207         $40,000.00     $12,500.00   ***27,200.00                    NEWARK          NEW JERSEY       07102                    COSMOPOLITAN FASHIONS                       201         $60,000.00     $22,800.00   ***37,200.00                    NEW YORK        NEW YORK         10001                    LEGAL TOBACCO CO.                           103         $40,000.00      $5,400.00   ***34,600.00                    CHARLOTTE       NORTH CAROLINA   28228                    HEAVY METAL MACHINERY                       203         $50,000.00     $48,900.00   ****1,100.00                    CLEVELAND       OHIO             44101                    BARONIAL OIL CO.                            108         $90,000.00     $27,000.00   ***63,000.00                    OKLAHOMA CITY   OKLAHOMA         73125                    STEEL CURTAIN STEEL INC.                    212         $30,000.00          $0.00   ***30,000.00                    PITTSBURGH      PENNSYLVANIA     15219                    SOUTHERN FRIED FOODS                        102         $30,000.00     $36,500.00                    MEMPHIS         TENNESSEE        38101                    HIGH-ROLLING INVESTMENT                     101        $100,000.00     $54,000.00   ***46,000.00                    DALLAS          TEXAS            75260                    NORTHWEST PLYWOOD MILLS                     306         $20,000.00          $0.00   ***20,000.00                    SEATTLE         WASHINGTON       98134                                                                                         ------------   ------------- GRAND TOTAL                                                                              $411,600.00 ****341,900.00

XYZ INC. 24 JUN 2010                                              XYZ SAMPLE REPORT 04                                    PAGE    1 ------------------------------------------------------------------------------------------------------------------------------- NAME                            CUSTOMER        CITY                 STATE                 ZIP        SALESMAN           CREDIT                                 NUMBER                               NAME                  CODE       ID                  LIMIT ------------------------------------------------------------------------------------------------------------------------------- HIGH-ROLLING INVESTMENT         101             DALLAS               TEXAS                 75260       7            $100,000.00 SOUTHERN FRIED FOODS            102             MEMPHIS              TENNESSEE             38101      10             $30,000.00 LEGAL TOBACCO CO.               103             CHARLOTTE            NORTH CAROLINA        28228      10             $40,000.00 SOUTHERN PINE INDUSTRIES        104             ATLANTA              GEORGIA               30304       7             $20,000.00 BARONIAL OIL CO.                108             OKLAHOMA CITY        OKLAHOMA              73125       7             $90,000.00 COSMOPOLITAN FASHIONS           201             NEW YORK             NEW YORK              10001       1             $60,000.00 HEAVY METAL MACHINERY           203             CLEVELAND            OHIO                  44101       2             $50,000.00 AIRPORT SERVICES CORP.          207             NEWARK               NEW JERSEY            07102       8             $40,000.00 STOLID INSURANCE CORP.          210             HARTFORD             CONNECTICUT           06101       8             $80,000.00 INLAND GRAIN TERMINALS          211             CHICAGO              ILLINOIS              60607       1             $40,000.00 STEEL CURTAIN STEEL INC.        212             PITTSBURGH           PENNSYLVANIA          15219       2             $30,000.00 PERFECT BEARING CORP.           214             DETROIT              MICHIGAN              48233       1             $20,000.00 MOUNTAIN STATES MINING          303             DENVER               COLORADO              80202       5             $50,000.00 NORTHWEST PLYWOOD MILLS         306             SEATTLE              WASHINGTON            98134       5             $20,000.00 ORIENTAL TRADING CO.            308             SAN FRANCISCO        CALIFORNIA            94119       5             $60,000.00 WEST COAST LIFESTYLES           309             LOS ANGELES          CALIFORNIA            90052       5             $10,000.00 END OF REPORT