home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / datatl25.zip / DCTDSGN.Z / customer.cpy < prev    next >
Text File  |  1997-09-11  |  1KB  |  68 lines
  1.       ******* IBM TeamConnection DataAtlas V1.0.1  *******
  2.       *
  3.       * This Sample COBOL copy file represents data in the
  4.       *   DA_CELD sample DB2 database
  5.       * 
  6.       * To reconcile shareable data elements and shareable
  7.       *   data structures when populating this copy file use
  8.       *   either:
  9.       *      /samples/datatlas.map
  10.       *      /samples/celdial/da_celd.map
  11.       *
  12.       * CelDial Billing System
  13.       * CUSTOMER INFORMATION
  14.        01  CUSTOMER-ALL.
  15.             05  CUSTOMER-NUMBER PIC X(7).
  16.             05  CUSTOMER-NAME   PIC X(40).
  17.             05  SALES-REP       PIC X(5).
  18.             05  CONTACT         PIC X(30).
  19.             05  CONTACT-PHONE   PIC X(17).
  20.             05  CONTACT-FAX     PIC X(17).
  21.             05  SHIP-ID         PIC X(2).
  22.             05  SHIP-ADDRESS.
  23.                 10  STREET      PIC X(40).
  24.                 10  CITY        PIC X(30).
  25.                 10  COUNTRY     PIC X(20).
  26.                 10  ZIP         PIC X(10).
  27.                 10  ZIP-LOC     PIC X(1).
  28.             05  BILLING-ADDRESS.
  29.                 10  STREET      PIC X(40).
  30.                 10  CITY        PIC X(30).
  31.                 10  COUNTRY     PIC X(20).
  32.                 10  ZIP         PIC X(10).
  33.                 10  ZIP-LOC     PIC X(1).
  34.  
  35.  
  36.  
  37.  
  38.  
  39.  
  40.  
  41.  
  42.  
  43.  
  44.  
  45.  
  46.  
  47.  
  48.  
  49.  
  50.  
  51.  
  52.  
  53.  
  54.  
  55.  
  56.  
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.  
  64.  
  65.  
  66.  
  67.  
  68.