Creating SAS Data Sets for IMS

MyData.Birthday Data Set

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 Data Set

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 Data Set

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
;

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

MyData.ChkCred Data Set

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 Data Set

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 Data Set

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 Data Set

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 Data Set

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 Data Set

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 Data Set

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 Data Set

The SAS data set MyData.Customer is 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 Data Set

The SAS data set MyData.NewAddr is in SAS 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 Data Set

The SAS data set Ver6.SSNums is in SAS 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;