Advanced COBOLFall 2004Program Test Data |
Connecticut Community Colleges | Gateway Community College | Student Info System | Contact Instructor |
Course Home PageSyllabusAssignmentsLecture Overviews |
The last time this page was updated: 8/12/04
|
CUSTOMER-NUMBER | PIC X(6) |
CUSTOMER-NAME | PIC X(20) |
CUST-STREET-ADDRESS | PIC X(20) |
CUST-CITY | PIC X(15) |
CUST-STATE | PIC XX |
CUST-ZIPCODE | PIC X(5) |
CUST-PHONE | PIC X(10) |
Customer Test Data
AD0001JOHN ADAMS 7 NORTH MAIN STEEET MADISON WI554465415553636 AR0002JAMES ARTHUR 85 SOUTH BOULEVARD CHARLESTON SC335786215559854 BE0001ART BELL 3 PEACHTREE STREET ATLANTA GA415234575552648 CH0001GINGER CHARLES 4 HARMS WAYS DENVER CO745638795556911 CL0002MABEL FAYE CLARK 66543 DIVISION ST OMAHA NE681444025553698 CR0003JIMINY CRICKET 55 DISNEY WAY ANAHIEM CA975416545551124 DA0001JEFFERSON DAVIS JR. 99 SOUTH AVENUE VIRGINIA BEACH VA124572305556687 DW0002FRANCIS DWIGHT 33 MAPLE BROOK ROAD FARGO ND558748895552254 FR0001BARNEY FRANKS 770 FIFTH AVENUE NEW YORK NY025472125558887 GR0001GILBERT GRAPE 44 BEACH BOULEVARD BISMARK ND558848895552103 JO0001JOHN JOHNSON 55 SNOWBALL DRIVE FOND DU LAC WI549872655555587 LO0001HARRIET LOVELOSS ESQ88765 FIRST AVENUE NEW HAVEN CT065112035557788 NE0001PAUL NEUMAN 40 WASHINGTON AVENUEWESTPORT CT063452035556698 SI0001HOMER SIMPSON 55 LOSER CIRCLE SPRINGFIELD NJ087742335554477 ST0002DONALD STEINWAY 76 NORTH SOUTH ROAD LAREMEE WV226541565551147 |
PART-NUMBER | PIC 999 |
PART-NAME | PIC X(20) |
UNIT-PRICE | PIC 9(4)V99 |
AMOUNT-ON-HAND | PIC 9(5) |
REORDER-POINT | PIC 99 |
Test Data
0012 CROSS SUPPORT RACK0149600012350 002AIR FOIL 0020902214565 0043 CROSS SUPPORTS 0175100030010 005BASE LADDER RACK 0173200012060 007CONDUIT HOLDER 0047300561080 008HEAVY DUTY KIT 0036800200025 009ANTI-SKID STRIPS 0030600005450 010CUSTOM FIT RBBR MAT 0168300041060 0112-DRAWER STACK UNIT 0336602004445 0233-DRAWER STACK UNIT 0476900221420 024DOOR STORAGE TRAY 0085700054015 025BOOK RACK 0074900101010 035REEL RACK 0071400015020 037CAB CADDY 0042900500080 039SOLID STATE INVERTER0068800020010 055CAB DESK CUP HOLDER 0015300084530 056CONTOUR BIN SHELVING0139800100125 05730 BIN PANEL 0135900250250 059STEEL HVY DUTY CHEST0324000002515 060PIANO BOX 0498000016515 061KARGO MASTER RACK 0529500014120 089SERVICE BODY RACK 0540800005015 099CARGO ANCHOR 0004601500280 100EASY ADJUST KNOB 0001802400590 101SLIDE STOP 0011954514550 120SLIDE-N-LOCK SYSTEM 0127500065530 134SAVE-A-LOAD CARGOBAR0076500524315 145MASTER PADLOCK #3 0008705400580 166HYDRAULIC ASSIST 0171000005040 167WORK WINCH SINGLE 0045000099165 |
TAXABLE-INCOME-IN PIC 9(5).
FEDERAL-TAX-IN PIC V999.
STATE-TAX-IN PIC V999.
Total of 20 records in the tax table. Cut and paste into your text editor progrm.
09800040010 12000080020 14000100030 18000110040 20000150050 22000180060 25000190070 28000200080 31000210090 35000220100 38000230110 42000240120 44000250130 48000280140 60000300150 64000320160 68000350170 75000400180 85000500190 95000600200 |
Last Updated: 8/12/04 |