RE: Coolest code you've ever written

[Jon Erickson <jerickson@xxxxxxx>]

Mine was COBOL based on a WANG VS which interfaced with our corporate AS/400
where all the financials were.

We had, (at the time) 62 remote stores, each with a WANG VS 5000 for Order
entry and inventory, a WANG VS 5000 at corporate for communication,
development and maintenance, and an AS/400 Model E50, which replaced a WANG
VS 10000. Connectivity consisted of Point-to-Point analog via WANGNET, which
was eventually upgraded to Switched 56kb digital lines, and 10BaseT between
the corporate VS & AS/400.

Daily we retrieved each stores transactions, uploaded to the AS/400 for
updating, then sent back the updated data to the stores, all through our
automated nightly update process.

I wrote an interactive application to reside on the corporate WANG VS that
tracked the progress of each stores transaction files, enabling the operator
to initiate a file send/receive to/from store(s) & corporate.  The
application interfaced with WANGNET and FTP applications to push/pull files
from either WANG or AS/400 systems.

A year or two after my leaving, they upgraded the network and migrated from
the WANG VS using COBOL to Unix based machines with AcuCobol.

My, how we grow,...
Jon A. Erickson
Sr. Programmer Analyst
800.COM Inc.
1516 NW Thurman St
Portland, OR  97209-2517

Direct: 503.944.3613
Fax: 503.944.3690
Web: http://800.com
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---