home *** CD-ROM | disk | FTP | other *** search
- echo off
- rem ---------- HOUSEKEEPING
- if exist c:\ai\stocks.dly erase c:\ai\stocks.dly
- if exist c:\ai\stocks.err erase c:\ai\stocks.err
- rem ---------- CALL CIS FOR STOCK QUOTES
- echo ==== LOADING PROCOMM PLUS =====
- c:
- cd \mod\plus
- pcplus /fcis6.asx
- rem ---------- IF WE ABORTED DO NOT DO UPDATES
- if exist c:\ai\stocks.err goto PROBLEM
- rem ---------- CREATE COMMA DELIMITED VERSION
- echo ======= PPSTOCK RUNNING =======
- ppstock c:\ai\stocks.dly c:\qpro\data\stocks.prn
- rem ---------- SAVE INTO HISTORY FILE
- copy c:\qpro\data\stocks.hst+c:\qpro\data\stocks.prn c:\qpro\data\stocks.hst
- rem ---------- DO QUATTRO PRO UPDATE
- echo ===== LOADING QUATTRO PRO =====
- cd \qpro
- q c:\qpro\data\stocks
- goto FINIS
- :PROBLEM
- rem ---------- CIS ABORTED SIGNAL OBVIOUS ERROR
- if exist c:\ai\stocks.dly erase c:\ai\stocks.dly
- echo ==================================
- echo ===== ERROR CONDITION FOUND ======
- echo ==================================
- type c:\ai\stocks.err
- echo ==================================
- goto END
- :FINIS
- echo ==================================
- echo === CIS STOCK LOAD SUCCESSFUL ===
- echo ==================================
- :END