Chapter Contents

Previous

Next
SAS/ACCESS Interface to IMS-DL/I Software

Creating SAS Data Sets

This section shows the SAS statements that create each data file used in the book's examples.


MYDATA.BIRTHDAY

The SAS data set MYDATA.BIRTHDAY is updated with data from the EMPLINF2 database.

data mydata.birthday;
  input @01 employee_id   6.
        @08 last_name     $10.
        @19 birthday      date7.;
  format employee_id   6.
         last_name     $10.
         birthday      date7.;
  datalines;
  1247 Garcia     04APR54
  1078 Gibson     23APR36
  1005 Knapp      06OCT38
  1024 Mueller    17JUN53
;

proc print data=mydata.birthday;
  title2 'SAS Data Set MYDATA.BIRTHDAY';
run;


MYDATA.CHECKS

The SAS data set MYDATA.CHECKS is used to update the ACCTDBD database.

data mydata.checks;
  length customer_name  $40.;
  input  customer_name  & $
         soc_sec_number  $11.
         check_account_number
         check_balance
         check_date  date7.;
  format check_account_number  12.
         check_balance  12.2
         check_date  date7.;
  datalines;
COWPER, KEITH  241-98-4542 183352795865 
862.31 25MAR95
OLSZEWSKI, STUART  309-22-4573 382654397566
486.00 02APR95
NAPOLITANO, BARBARA  250-36-8831 284522378774
104.20 10APR95
MCCALL, ROBERT  367-34-1543 644721295973
571.92 05APR95
;

proc print data=mydata.checks;
  title2 'SAS Data Set MYDATA.CHECKS';
run;


MYDATA.CHGDATA

The SAS data set MYDATA.CHGDATA is used to update the ACCTDBD database.

data mydata.chgdata;
  input account  12.
        charge;
  format account 14.
         charge  dollar7.;
  datalines;
345620135872 10
345620134522 7
345620123456 12
382957492811 3
345620134663 8
345620131455 6
345620104732 9
;
run;

proc print data=mydata.chgdata;
  title2 'SAS Data Set MYDATA.CHGDATA';
run;


MYDATA.CHKCRED

The SAS data set MYDATA.CHKCRED is used to add the checking credit path to the ACCTDBD database.

data mydata.chkcred;
        /****  CUSTOMER data    ***/
  input @1   soc_sec_number   $11.
        @13  customer_name    $40.  /
        @1   addr_line_1      $30.
        @32  addr_line_2      $30.  /
        @1   city             $28.
        @30  state            $2.
        @33  country          $20.
        @54  zip_code         $10.  /
        @1   home_phone       $12.
        @14  office_phone     $12.
        /****  CHCKACCT data    ***/
        @27  check_account_number 12.0
        @40  check_amount         12.2
        @53  check_date           date7. /
        @1   filler1              $2.
        @4   check_balance        12.2
        /****  CHCKCRDT data    ***/
        @17  check_credit_amount  12.2 
        @30  check_credit_date    date7.
        @38  filler3              $2.
        @41  check_credit_time    $8.   /
        @1   check_credit_desc    $59.;
    format check_credit_date    date7.;
  datalines;
667-73-8275 WALLS, HOOPER J.


                 345620145345
         1563.23 31MAR95    15:42:43
MAIN ST BRANCH DEPOSIT
667-73-8275 WALLS, HOOPER J.


              345620154633
       1563.23 31MAR95    15:42:43
BAD ACCT_NUM
434-62-1234 SUMMERS, MARY T.


              345620104732
       400.00 02APR95    10:23:46
ACH DEPOSIT
436-42-6394 BOOKER, APRIL M.


              345620135872
       50.00 02APR95    12:16:34
ACH DEPOSIT
434-62-1224 SMITH, JAMES MARTIN


              345620134564
       1342.42 22MAR95    23:23:52
ACH DEPOSIT
434-62-1224 SMITH, JAMES MARTIN


             345620134663
      120.00 28MAR95    10:26:45
ACH DEPOSIT
178-42-6534 PATTILLO, RODRIGUES


             745920057114
    1300.00 12JUN95    14:34:12
ACH DEPOSIT
156-45-5672 O'CONNOR, JOSEPH


            345620123456
    100.00 01APR95    12:24:34
ATM DEPOSIT
657-34-3245 BARNHARDT, PAMELA S.


           345620131455
    230.00 04APR95    14:24:11
ACH DEPOSIT
667-82-8275 COHEN, ABRAHAM


           382957492811
   100.00 16APR95    09:21:14
ACH DEPOSIT
456-45-3462 LITTLE, NANCY M.


          345620134522
  50.00 05APR95    12:14:52
ACH DEPOSIT
234-74-4612 WIKOWSKI, JONATHAN S.


          345620113263
         672.32 31MAR95
ATM DEPOSIT
;


MYDATA.CHKDEBD

The SAS data set MYDATA.CHKDEBD is used to add the checking debit path to the ACCTDBD database.

data mydata.chkdebd;
        /****  CUSTOMER data    ***/
  input @1   soc_sec_number    $11.
        @13  customer_name     $40.  /
        @1   addr_line_1       $30.
        @32  addr_line_2       $30.  /
        @1   city              $28.
        @30  state             $2.
        @33  country           $20.
        @54  zip_code          $10.  /
        @1   home_phone        $12.
        @14  office_phone      $12.
        /****  CHCKACCT data    ***/
        @27  check_account_number  12.0 
        @40  check_amount          12.2
        @53  check_date            date7. /
        @1   filler1               $2.
        @4   check_balance         12.2
        /****  CHCKDEBT data    ***/
        @17  check_debit_amount    12.2
        @30  check_debit_date      date7.
        @38  filler2               $2.
        @41  check_debit_time      $8.    /
        @1   check_debit_desc      $59.;
    format check_date    date7.;
    format check_debit_date   date7.;
  datalines;
667-73-8275 WALLS, HOOPER J.


               345620145345
   1266.34       820.00 23MAR95    23:54:53
CHECK 2958
667-73-8275 WALLS, HOOPER J.


               345620145345
   1266.34        52.00 23MAR95    23:54:53
CHECK 2948
667-73-8275 WALLS, HOOPER J.


               345620145345
   1266.34       193.00 28MAR95    22:51:43
CHECK 2951
667-73-8275 WALLS, HOOPER J.


               345620154633  1303.41 28MAR95
  1298.04          .   .

434-62-1234 SUMMERS, MARY T.
                    4322 LEON ST.
GORDONSVILLE       VA USA         26001-0670
803-657-1687    345620104732  826.05 27MAR95
  825.45          .   .

436-42-6394 BOOKER, APRIL M.
                    9712 WALLINGFORD PL.
GORDONSVILLE       VA USA          26001-0670
803-657-1346    345620135872   220.11 26MAR95
   234.89          .   30MAR94    22:34:45
CHECK 103
434-62-1224 SMITH, JAMES MARTIN
                    133 TOWNSEND ST.
GORDONSVILLE       VA USA          26001-0670
803-657-3437    345620134564   2392.93 16MAR95
   2645.34       432.87 18MAR95    22:13:48
CHECK 1826
434-62-1224 SMITH, JAMES MARTIN

               345620134564
   2645.34      19.23 18MAR95    22:13:48
CHECK 1821
434-62-1224 SMITH, JAMES MARTIN


               345620134564
  2645.34     723.23 22MAR95    21:48:12
CHECK 1828
434-62-1224 SMITH, JAMES MARTIN


               345620134564
  2645.34      82.32 22MAR95    21:48:12
CHECK 1829
434-62-1224 SMITH, JAMES MARTIN


               345620134564
  2645.34      73.62 26MAR95    21:22:24
CHECK 1830
434-62-1224 SMITH, JAMES MARTIN


               345620134564
  2645.34      31.23 26MAR95    21:22:24
CHECK 1831
434-62-1224 SMITH, JAMES MARTIN


               345620134564
   2645.34     162.87 29MAR94    22:51:12
CHECK 1835
434-62-1224 SMITH, JAMES MARTIN


               345620134564
   2645.34       7.12 29MAR95    22:51:12
CHECK 1836
434-62-1224 SMITH, JAMES MARTIN


               345620134564
   2645.34      62.34 31MAR95    23:02:12
CHECK 1833
434-62-1224 SMITH, JAMES MARTIN


               345620134663      0.00 24MAR95
      143.78      25.00 28MAR95    15:53:29
ATM MAIN ST.
178-42-6534 PATTILLO, RODRIGUES
                           9712 COOK RD.
ORANGE         VA USA           26042-1650
803-657-1346 803-657-1345 745920057114 1404.90
10JUN95     1502.78   25.89 10JUN95   11:45:25
CHECK 412
156-45-5672 O'CONNOR, JOSEPH
                           235 MAIN ST.
ORANGE         VA USA           26042-1650
803-657-5656 803-623-4257 345620123456  353.65
27MAR95    463.23     13.29 28MAR95   22:23:53
CHECK 934
156-45-5672 O'CONNOR, JOESPH


803-657-5656 803-623-4257 345620123456
         463.23   32.87 31MAR95    23:35:53
CHECK 931
156-45-5672 O'CONNOR, JOSEPH


                345620123456
    463.23      50.00 02APR95    10:23:41
ATM GREEN ST
156-45-5672 O'CONNOR, JOESPH


               345620123456
    463.23      13.42 31MAR95    23:35:53
CHECK 935
657-34-3245 BARNHARDT, PAMELA S.
                            RT 2 BOX 324
CHARLOTTESVILLE     VA USA      25804-0997
803-345-4346 803-355-2543 345620131455 
1243.25  29MAR95       1243.25       .   .

667-82-8275 COHEN, ABRAHAM
                            2345 DUKE ST.
CHARLOTTESVILLE     VA USA      25804-0997
803-657-7435 803-645-4234 382957492811 7462.51 
03APR95       7302.06       .   .

456-45-3462 LITTLE, NANCY M.
                            4543 ELGIN AVE.
RICHMOND          VA USA       26502-3317
803-657-3566   345620134522     608.24 25MAR95
     831.65      42.73 29MAR95    23:12:34
CHECK 296
456-45-3462 LITTLE, NANCY M.


               345620134522
    831.65     172.45 29MAR95    23:12:34
CHECK 301
456-45-3462 LITTLE, NANCY M.


              345620134522
    831.65      38.23 30MAR95    22:51:34
CHECK 297
456-45-3462 LITTLE, NANCY M.


               345620134522
    831.65      10.00 02APR95    21:51:34
CHECK 298
234-74-4612 WIKOWSKI, JONATHAN S.
                         4356 CAMPUS DRIVE
RICHMOND         VA USA          26502-5317
803-467-4587 803-654-7238 345620113263 672.32 
28MAR95       13.28       .   .

;


MYDATA.EMPLDATA

The SAS data set MYDATA.EMPLDATA is used to load the EMPLINF2 database.

data mydata.empldata;
  input @01 employee_id     6.
        @08 last_name       $10.
        @19 first_name      $20.
        @40 hire_date       yymmdd6.
        @47 birthday        yymmdd6.
        @54 ssn             $11. /
        @01 gender          $6.
        @08 status          $9.
        @18 phone_extension $9.
        @28 vacation        8.2
        @37 department      8.
        @46 zip_code        $5.
        @52 city_and_state  $15. /
        @01 street          $20.
        @21 security        5.
        @27 sick_leave      8.2;
  format hire_date   yymmdd6.
         birthday   yymmdd6.;
  datalines;
  1001 Waterhouse Clifton P.781231 480101 254-43-6089
Male  Full Time X5109  8.00   200 78752 Austin,TX
505 Cat Mountain Tr.  310     8.00
  1002 Bowman    Hugh E.   801230 310714 329-88-6729
Male  Full Time X5901  40.00 1000 78741 Austin,TX
47 Cypress Point Cir  310    80.00
  1003 Salazar    Yolanda   821230 401212 166-88-7516
Female Full Time X5169  80.00 200 78641 Leander,TX
6811 Picket Fence Dr  310    56.00
  1004 Knight     Althea    841229 500409 942-62-3354
Female Full Time X5218 300 78664 Round Rock,TX
8222 Whitewing Way    110    16.00
  1005 Knapp     Patrice R. 811230 371004 353-43-1272
Female Full Time X5012 8.00   100 78748 Austin,TX
19 Pack Saddle Pass   110    44.00
  1006 Garrett   Olan M.   781231 350123 776-94-3545
Male  Full Time X5208 80.00  300 78731 Austin,TX
67 Running Doe Ln.    110    60.00
  1007 Brown     Virgina P.801230 460524 675-29-9081
Female Full Time X5258 48.00  300 78610 Buda,TX
2713 Nutty Brown Mil  110    32.00
  1008 Hernandez Jesse L.   821230 330326 123-12-0987
Male  Full Time X5448 56.00  500 78664 Round Rock,TX
4319 Red Stone Lane     .     8.00
  1009 Jones     Michael Y. 850330 310521 543-87-1934
Male  Full Time X5713 80.00  800 78748 Austin,TX
23 Moonlight Bend La    .    80.00
  1010 Smith     Janet F.   811230 470807 105-32-9011
Female Full Time X5621 16.00  700 78737 Austin,TX
523 Rim Rock Road       .     8.00
  1011 Van Hotten Gwendolyn 790201 420913 766-30-9237
Female Full Time X5311  .     400 78641 Leander,TX
623 Fauntleroy Trail    .    32.00
  1012 Quintero   Pedro     810214 480221 339-94-2674
Male  Full Time X5348 32.00  400 78741 Austin,TX
77 Button Quail Cove    .    40.00
  1015 Scholl    Madison A. 830304 450319 765-43-0581
Male  Full Time X5419 40.00  500 78741 Austin,TX
3910 Covered Wagon      .    80.00
  1017 Waggonner Merrilee D.850330 360427 586-54-8967
Female Full Time X5914 56.00 1000 78722 Austin,TX
941 Bridgewater Dr.     .    40.00
  1020 Rudd      Fred       601230      . 145-67-6532
Male  Part Time        .     100
                        .      .
  1024 Mueller    Patsy     790403 520617 857-51-1838
Female Full Time X5822 40.00 900 78620 Dripping Spring
6935 Cherry Creek Rd  110    40.00
  1031 Chan       Tai       810502 460704 843-09-7123
Male  Full Time X5331 40.00  400 78755 Austin,TX
1412 Arapahoe Trail     .    80.00
  1049 Fernandez  Sophia    830516 440911 764-91-0193
Female Full Time X5847 96.00  900 78744 Austin,TX
4700 Old Stage Trail    .    40.00
  1050 Ameer      David     850530 511010 456-34-6543
Male  Full Time X5495 56.00  500 78735 Austin,TX
231 Little Hill Cir.    .      .
  1062 Littlejohn Fannie    850429 540517 978-63-3930
Female Full Time X5653 8.00  700 78660 Pflugerville,TX
813 Lime Rock Dr.     110    48.00
  1067 Cahill     Jacob     790105 401225 102-78-8765
Male  Full Time X5042 60.00  100 78748 Austin,TX
121 Hidden Hollow       .    36.00
  1071 Canady     Frank A.  810331 411119 345-91-4321
Male  Full Time X5406  8.00  500 78756 Austin,TX
741 Canyonwood Lane     .     8.00
  1074 Millsap    Joel B.   830831 360612 675-23-8027
Male  Full Time X5224 24.00  300 78755 Austin,TX
1201 Broken Bow Pass  110    48.00
  1077 Gibson     Teddy B.  850929 460423 567-89-2345
Male             X5703 80.00  800 78753 Austin,TX
4441 Hansford           .    80.00
  1078 Gibson    George J.  820930 460423 567-89-2346
Male  Full Time X5703 80.00  800 78753 Austin,TX
2311 Hansford           .    80.00
  1083 Savage    William D. 791001 530120 211-95-9608
Male  Full Time X5505 80.00  600 78737 Austin,TX
97 Cimarron Circle      .    48.00
  1086 Schmidt   Penny      811017 270219 901-45-4567
Female Full Time X5822 80.00  900 78735 Austin,TX
6419 Wild Rose Road     .    80.00
  1092 Polanski  Ivan L.    831130 471011 497-36-7845
Male  Full Time X5621 56.00 700 78620 Dripping Spring
2501 Timberline Tr.     .      .
  1101 Nathaniel  Darryl    860101 440321 584-86-6945
Male  Full Time X5544 40.00  600 78735 Austin,TX
1892 Red River Road   210     8.00
  1105 Faulkner  Carrie Ann 830102 510817 987-76-7469
Female Full Time X5417 48.00  500 78756 Austin,TX
5649 Foothill Park    110    16.00
  1112 Jones     Rita M.    790202 481224 890-98-6789
Female Full Time X5271 24.00  300 78735 Austin,TX
907 Hickory Stick       .     8.00
  1119 Goodson   Alan F.    820116 500621 234-67-8901
Male  Full Time X5512 48.00  600 78626 Georgetown,TX
11410 Smokey Hill Rd    .    16.00
  1120 Reid      David G.   830214 450815 442-04-0121
Male  Full Time X5369 80.00  400 78752 Austin,TX
1322 Lazy Lane        224    80.00
  1123 Freeman   Leopold    861030 350209 828-26-7282
Male  Part Time X5604   .    700 78757 Austin,TX
13 Timber Hills Tr.   106      .
  1133 Williamson Janice L. 831103 520519 131-41-9129
Female Full Time X5802 40.00  900 78610 Buda,TX
2706 Frontier Valley    .     8.00
  1139 Seaton     Gary     800403 561003 286-04-6279
Male  Full Time X5545 80.00  600 78757 Austin,TX
2111 Wind Ridge Road    .    80.00
  1145 Juarez    Armando   820501 470528 876-19-0378
Male  Full Time X5987 48.00 1000 78626 Georgetown,TX
1017 Woodstone Sq.      .    16.00
  1156 Reed      Kenneth D. 840830 550105 875-15-1388
Male  Full Time X5307 64.00  400 78641 Leander,TX
1349 Begonia Terrace    .    40.00
  1161 Richardson Travis Z. 860913 371130 654-54-8127
Male  Full Time X5325 88.00  400 78752 Austin,TX
2009 Mountain Lake    110    96.00
  1213 Johnson    Bradford  840131 540415 321-32-9446
Male  Full Time X5446 40.00  500 78724 Austin,TX
678 Buffalo Gap Road    .    40.00
  1217 Rodriguez Romualdo R. 810131 290209 493-77-4863
Male  Full Time X5874 32.00  900 78746 Austin,TX
804 Lazy Brook Lane     .    48.00
  1219 Kaatz      Freddie   830131 570621 181-49-4592
Male  Full Time X5387 80.00  400 78753 Austin,TX
4713 Cedar Tree Lane    .    80.00
  1234 Shropshire Leland G. 850415 490904 555-21-4173
Male  Full Time X5616 32.00  700 78752 Austin,TX
606 Bull Creek Trail    .    40.00
  1238 Throckmort Stewart Q.850516 310804 109-07-5098
Male  Full Time X5391 40.00  400 78756 Austin,TX
479 Roundup Circle      .    40.00
  1247 Garcia    Francisco  840730 550505 678-23-0123
Male  Full Time X5348 80.00  400 78756 Austin,TX
479 Whispering Wind     .    72.00
  1261 Collins    Lillian   810824 510501 302-59-2781
Female Full Time X5616 80.00  700 78664 Round Rock,TX
9117 Beaver Creek Rd    .    48.00
  1265 Slye      Leonard R. 840331 601218 434-21-1300
Male  Half Time X5123   .    200 78742 Austin,TX
4106 Main St.           .      .
  1266 Redfox    Richard B. 850902 440404 210-65-2786
Male  Full Time X5386 48.00  400 78660 Pflugerville,TX
9807 Three Oaks Tr.     .    48.00
  1272 Smith     Garland P. 850413 540405 397-80-8491
Male  Full Time X5415  8.00  500 78602 Bastrop,TX
7594 Red Cliff Rd.      .    48.00
  1313 Smith     Jerry Lee  850130 420913 823-10-0951
Male  Full Time X5169  .     200 78745 Austin,TX
8203 Friar Tuck Ln.     .    16.00
  1327 Brooks    Ruben R.   820430 520225 789-56-2109
Male  Full Time X5347 80.00  400 78744 Austin,TX
2509 Loganberry Dr.     .    80.00
  1900 Smith      John        .      .      .
                        .     100
                        .      .
;


MYDATA.INITSEG

The SAS data set MYDATA.INITSEG is used to initially load the ACCTDBD database.

data mydata.initseg;
        /****  CUSTOMER data    ***/
  input @1   soc_sec_number    $11.
        @13  customer_name     $40.  /
        @1   addr_line_1       $30.
        @32  addr_line_2       $30.  /
        @1   city              $28.
        @30  state             $2.
        @33  country           $20.
        @54  zip_code          $10.  /
        @1   home_phone        $12.
        @14  office_phone      $12.
        /****  CHCKACCT data    ***/
        @27  check_account_number  12.0 
        @40  check_amount          12.2 
        @53  check_date            date7. /
        @1   filler1               $2.
        @4   check_balance         12.2
        /****  CHCKDEBT data    ***/
        @17  check_debit_amount    12.2 
        @30  check_debit_date      date7.
        @38  filler2               $2.
        @41  check_debit_time      $8.    /
        @1   check_debit_desc      $59.;
    format check_date  date7.;
    format check_debit_date  date7.;
  datalines;
667-73-8275 WALLS, HOOPER J.
                     4525 CLARENDON RD
RAPIDAN          VA USA           22215-5600
803-657-3098 803-645-4418 345620145345 1702.19 15MAR95
        1266.34          .   19MAR94    21:22:53
CHECK 2947;


MYDATA.PHONENUM

The SAS data set MYDATA.PHONENUM is used to update the ACCTDBD database.

data mydata.phonenum;
  soc_sec_number = '667-73-8275';
  home_phone = '703-657-3098';
  office_phone = '703-645-4418';
  output;
  soc_sec_number = '434-62-1234';
  home_phone = '703-645-441 ';
  office_phone = '            ';
  output;
  soc_sec_number = '178-42-6534';
  home_phone = '703-657-1346';
  office_phone = '703-657-1345';
  output;
  soc_sec_number = '156-45-5672';
  home_phone = '703-657-5656';
  office_phone = '703-623-4257';
  output;
  soc_sec_number = '657-34-3245';
  home_phone = '703-345-4346';
  office_phone = '703-355-5438';
  output;
  soc_sec_number = '456-45-3462';
  home_phone = '703-657-3566';
  office_phone = '703-645-1212';
  output;
  soc_sec_number = '416-41-3162';
  home_phone = '703-657-3166';
  office_phone = '703-615-1212';
  output;
run;

proc print data=mydata.phonenum;
  title2 'SAS Data Set MYDATA.PHONENUM';
run;


MYDATA.SAVCRED

The SAS data set MYDATA.SAVCRED is used to add the savings credit path to the ACCTDBD database.

data mydata.savcred;
        /****  CUSTOMER data    ***/
  input @1   soc_sec_number    $11.
        @13  customer_name     $40.  /
        @1   addr_line_1       $30.
        @32  addr_line_2       $30.  /
        @1   city              $28. 
        @30  state             $2. 
        @33  country           $20. 
        @54  zip_code          $10.  /
        @1   home_phone        $12.
        @14  office_phone      $12.
        /****  SAVEACCT data    ***/
        @27  savings_account_number 12.0 
        @40  savings_amount         12.2
        @53  savings_date           date7. /
        @1   filler4                $2.
        @4   savings_balance        12.2 
       /****  SAVECRDT data    ***/
        @17  savings_credit_amount  12.2
        @30  savings_credit_date    date7.
        @38  filler6                $2.
        @41  savings_credit_time    $8.   /
        @1   savings_credit_desc    $59.;
    format savings_credit_date  date7.;
  datalines;
667-73-8275 WALLS, HOOPER J.


             459923888253      784.29  28MAR95
   672.63         8.45 30MAR95    09:34:18
INTEREST
434-62-1234 SUMMERS, MARY T.
                               4322 LEON ST.
GORDONSVILLE        VA USA         26001-0670
             345689404732      8406.0  27MAR95
 8364.24        41.82 30MAR95    23:46:03
INTEREST
436-42-6394 BOOKER, APRIL M.
                          9712 WALLINGFORD PL.
GORDONSVILLE        VA USA         26001-0670
            144256844728       809.45 21MAR95
 1032.23        50.00 26MAR95    12:26:15
INTEREST
434-62-1224 SMITH, JAMES MARTIN
                               133 TOWNSEND ST.
GORDONSVILLE       VA USA         26001-0670
            345689473762       130.64 15MAR95
  261.64         1.31 30MAR95    23:45:53
INTEREST
434-62-1224 SMITH, JAMES MARTIN
                               133 TOWNSEND ST.
GORDONSVILLE       VA USA         26001-0670
            345689498217      9421.79 16MAR95
 9374.92        46.07 30MAR95    23:45:32
INTEREST
178-42-6534 PATTILLO, RODRIGUES
                               9712 COOK RD.
ORANGE             VA USA         26042-1650
           345689462413       950.96 15MAR95
  946.23         4.73 30MAR95    23:44:25
INTEREST
156-45-5672 O'CONNOR, JOESPH
                               235 MAIN ST.
ORANGE             VA USA         26042-1650
           345689435776       136.40 27MAR95
  284.97         1.43 30MAR95    23:48:56
INTEREST
657-34-3245 BARNHARDT, PAMELA S.
                               RT 2 BOX 324
CHARLOTTESVILLE    VA USA         25804-0997
           859993641223       845.35 18MAR95
 2553.45        71.44 26MAR95    08:41:28
INTEREST
667-82-8275 COHEN, ABRAHAM
                               2345 DUKE ST.
CHARLOTTESVILLE    VA USA         25804-0997
           884672297126       945.25 26MAR95
  793.25        52.33 28MAR95    11:45:26
INTEREST
456-45-3462 LITTLE, NANCY M.


          345689463822       929.24 25MAR95
  924.62         4.62 30MAR95    23:46:01
INTEREST
234-74-4612 WIKOWSKI, JONATHAN S.
                          4356 CAMPUS DRIVE
RICHMOND           VA USA         26502-3317
                .                     .   .
            .            .   .

;


MYDATA.SAVDEBD

The SAS data set MYDATA.SAVDEBD is used to add the savings debit path to the ACCTDBD database.

data mydata.savdebd;
        /****  CUSTOMER data    ***/
  input @1   soc_sec_number      $11.
        @13  customer_name       $40.  /
        @1   addr_line_1         $30.
        @32  addr_line_2         $30.  /
        @1   city                $28.
        @30  state               $2.
        @33  country             $20.
        @54  zip_code            $10.  /
        @1   home_phone          $12.
        @14  office_phone        $12.
        /****  SAVEACCT data    ***/
        @27  savings_account_number 12.0 
        @40  savings_amount         12.2 
        @53  savings_date           date7. /
        @1   filler4                $2.
        @4   savings_balance        12.2 
        /****  SAVEDEBT data    ***/
        @17  savings_debit_amount   12.2 
        @30  savings_debit_date     date7.
        @38  filler5                $2.
        @41  savings_debit_time     $8.    /
        @1   savings_debit_desc     $59.;
    format savings_date  date7.;
    format savings_debit_date  date7.;
  datalines;
667-73-8275 WALLS, HOOPER J.


           459923888253       784.29 28MAR95
         672.63        .   .

434-62-1234 SUMMERS, MARY T.
                               4322 LEON ST.
GORDONSVILLE       VA USA        26001-0670
          345689404732       8406.00 27MAR95
        8364.24        .   .

436-42-6394 BOOKER, APRIL M.
                         9712 WALLINGFORD PL.
GORDONSVILLE       VA USA        26001-0670
          144256844728       809.45 21MAR95
        1032.23        .   .

434-62-1224 SMITH, JAMES MARTIN
                              133 TOWNSEND ST.
GORDONSVILLE       VA USA        26001-0670
          345689473762       130.64 15MAR95
         261.64     132.31 03APR94    14:42:43
MAIN ST BRANCH WITHDRAWAL
434-62-1224 SMITH, JAMES MARTIN
                              133 TOWNSEND ST.
GORDONSVILLE       VA USA        26001-0670
          345689498217      9421.79 16MAR95
        9374.92        .   .

178-42-6534 PATTILLO, RODRIGUES
                               9712 COOK RD.
ORANGE             VA USA        26042-1650
          345689462413       950.96 15MAR95
         946.23        .   .

156-45-5672 O'CONNOR, JOESPH
                               235 MAIN ST.
ORANGE             VA USA        26042-1650
          345689435776       136.40 27MAR95
         284.97     150.00 31MAR94    12:23:42
ATM GREEN ST
657-34-3245 BARNHARDT, PAMELA S.
                               RT 2 BOX 324
CHARLOTTESVILLE    VA USA        25804-0997
          859993641223       845.35 18MAR95
        2553.45        .   .

667-82-8275 COHEN, ABRAHAM
                               2345 DUKE ST.
CHARLOTTESVILLE    VA USA        25804-0997
         884672297126       945.25 26MAR95
         793.25        .   .

456-45-3462 LITTLE, NANCY M.


         345689463822       929.24 25MAR95
         924.62        .   .

234-74-4612 WIKOWSKI, JONATHAN S.
                               4356 CAMPUS DRIVE
RICHMOND           VA USA        26502-3317
                  .                     .   .
            .          .   .

;


MYDATA.CUSTOMER

The SAS data set MYDATA.CUSTOMER is a SAS data set used to update the ACCTDBD database.

data mydata.customer;
        /****  CUSTOMER data    ***/
  input @1   soc_sec_number    $11.
        @13  customer_name     $40. /
        @1   addr_line_1       $30.
        @32  addr_line_2       $30. /
        @1   city              $28.
        @30  state             $2.
        @33  country           $20.
        @54  zip_code          $10. /
        @1   home_phone        $12.
        @14  office_phone      $12.; 
  datalines;
131-73-2785 HUTTLINGER, HORTENSE H.
                             2785 HILLARY PL
RAPIDAN          VA USA           22215-5600
803-657-4097 803-645-4419
232-62-2432 MANNERLY, MAYNARD M.
                             6525 MORGAN ST
RAPIDAN          VA USA           22215-5600
803-657-9066 803-645-4420
;


MYDATA.NEWADDR

The SAS data set MYDATA.NEWADDR is in Version 6 format and is used to update the ACCTDBD database.

data mydata.newaddr;
  /****  CUSTOMER data    ***/
  input @1   ssn         $11.
        /* social security number */
        @13  newaddr1    $30.
        /* first line of address */
        @44  newaddr2    $30. /
        /* second line of address */
        @1   newcity     $28.
        /* customer city */
        @30  newstate    $2.
        /* customer state */
        @33  newzip      $10.; 
        /* customer zip code */
  datalines;
178-42-6534              1111 PAUL PLACE
RAPIDAN       VA 22215-5600
156-45-5672              2222 OSCAR DR.
ORANGE        VA 26042-1650
;


VER6.SSNUMS

The SAS data set VER6.SSNUMS is in Version 6 format and is used to update the ACCTDBD database.

data ver6.ssnums;
  input @1  ssnumb $11.
        @13 name   $40.;
  datalines;
267-83-2241 GORDIEVSKY, OLEG
276-44-6885 MIFUNE, YUKIO
352-44-2151 SHIEKELESLAM, SHALA
436-46-1931 NISHIMATSU-LYNCH, CAROL
;

proc print data=mydata.ssnums;
  title2 'SAS Data Set VER6.SSNUMS';
run;


Chapter Contents

Previous

Next

Top of Page

Copyright 1999 by SAS Institute Inc., Cary, NC, USA. All rights reserved.