Ex1007.Lis Listing - Compaq COBOL AAQ2G1FTK User Manual

Producing Printed Reports
10.9 Report Writer Examples
Figure 10–16 EX1007.LIS Listing
CUSTOMER MASTER FILE REPORT
+--------------------------------------------------------------------------------------------------------------+
| NAME |
|--------------------------------------------------------------------------------------------------------------|
| LAST | FIRST |MI|
+--------------------------------------------------------------------------------------------------------------+
Abbott John B 12 Pleasant Street
Abbott John B 12 Pleasant Street
Abbott John B 12 Pleasant Street
Abbott John B 12 Pleasant Street
Abbott John B 12 Pleasant Street
Abbott John B 12 Pleasant Street
Abbott John B 12 Pleasant Street
TOTAL RECORDS:
Adam Harold B 980 Main Street
TOTAL RECORDS:
Albert Robert S 100 Meadow Lane
TOTAL RECORDS:
Alexander Greg T 317 Narrows Road
Alexander Greg T 317 Narrows Road
Alexander Greg T 317 Narrows Road
Alexander Greg T 317 Narrows Road
CUSTOMER MASTER FILE REPORT
+--------------------------------------------------------------------------------------------------------------+
| NAME |
|--------------------------------------------------------------------------------------------------------------|
| LAST | FIRST |MI|
+--------------------------------------------------------------------------------------------------------------+
Alexander Greg T 317 Narrows Road
Alexander Greg T 317 Narrows Road
TOTAL RECORDS:
Allan David L 10 Wonder Lane
TOTAL RECORDS:
Alwin Tom F 400 High Street
TOTAL RECORDS:
Ames Alice J 40 Center Road
Ames Alice J 40 Center Road
Ames Alice J 40 Center Road
TOTAL RECORDS:
Amico Art A 31 Athens Road
TOTAL RECORDS:
10–56 Producing Printed Reports
*******************************
*
* Customer Master File
*
* 11-08-2000
*
* Report EX1007
* Detail Report
*
*
*
*******************************
ADDRESS
STREET | CITY
Nashua
Nashua
Nashua
Nashua
Nashua
Nashua
Nashua
7
Nashua
1
Gardner
1
Westminster
Westminster
Westminster
East Westminster
ADDRESS
STREET | CITY
Westminster
East Westminster
6
Merrimack
1
Princeton
1
Nashua
Nashua
Nashua
3
Nashua
1
*
*
*
*
*
*
*
*
*
*
| INVOICE
|ST| ZIP | DATE | NUMBER| AMOUNT
NH 03102 7-01-2000 000001 $10,000.90
NH 03102 7-01-2000 000001 $10,000.90
NH 03102 7-01-2000 000001 $10,000.90
NH 03102 7-01-2000 000001 $10,000.90
NH 03102 7-01-2000 000001 $10,000.90
NH 03102 7-01-2000 000001 $10,000.90
NH 03102 7-01-2000 000001 $10,000.90
*****************************************
$70,006.30
*****************************************
NH 03102 2-06-2000 000002 $21,008.90
*****************************************
$21,008.90
*****************************************
MA 01420 2-06-2000 000003 $61,009.00
*****************************************
$61,009.00
*****************************************
MA 01473 2-06-2000 000004 $10,000.71
MA 01473 2-06-2000 000004 $10,000.71
MA 01473 2-06-2000 000004 $10,000.71
MA 01473 2-06-2000 000004 $10,000.71
| INVOICE
|ST| ZIP | DATE | NUMBER| AMOUNT
MA 01473 2-06-2000 000004 $10,000.71
MA 01473 2-06-2000 000004 $10,000.71
*****************************************
$60,004.26
*****************************************
NH 03014 2-06-2000 000001 $24,101.00
*****************************************
$24,101.00
*****************************************
NJ 12341 3-07-2000 000008 $70,000.17
*****************************************
$70,000.17
*****************************************
NH 03060 2-07-2000 000007 $10,000.00
NH 03060 2-07-2000 000007 $10,000.00
NH 03060 2-07-2000 000007 $10,000.00
*****************************************
$30,000.00
*****************************************
NH 03060 2-06-2000 000007 $12,340.70
*****************************************
$12,340.70
*****************************************
VM-0661A-AI
PAGE 2
|
|
PAGE 3
|
|
(continued on next page)