home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a524 / 39.ddi / demo / case4.ctl < prev    next >
Encoding:
Text File  |  1991-03-04  |  528 b   |  20 lines
  1. -- 
  2. -- $Header: case4.ctl,v 10010.3 88/01/14 14:40:19 hdai Exp $ case4.ctl 
  3. -- 
  4. LOAD DATA
  5. INFILE case4.dat
  6. DISCARDFILE case4.dis    
  7. DISCARDMAX 999    
  8. REPLACE
  9. CONTINUEIF (1) = '*'
  10. INTO TABLE EMP 
  11.  
  12. ( EMPNO    POSITION(02:05) INTEGER EXTERNAL,
  13.   ENAME    POSITION(07:16) CHAR,
  14.   JOB      POSITION(18:26) CHAR,
  15.   MGR      POSITION(28:31) INTEGER EXTERNAL,
  16.   SAL      POSITION(33:40) DECIMAL EXTERNAL,
  17.   COMM     POSITION(42:49) DECIMAL EXTERNAL,
  18.   DEPTNO   POSITION(51:52) INTEGER EXTERNAL,
  19.   HIREDATE POSITION(53:61) INTEGER EXTERNAL)
  20.