An ALGOL program that turns the LINCOFF file produced by Unisys EAE (formerly LINC) into a flat table.
LINCOFF describes its records as a nested tree — levels inside levels, OCCURS
inside OCCURS, with the PICTURE clauses at the leaves. That is fine for
generating COBOL, and useless for anything that wants rows. This flattens it.
The grammar it parses:
|<------------------+
| |
--+--+-- <LEVEL> --+--+--|
| |
+-------------+
-- NUMTOK -- IDNTOK --+-- . --+-------------------------+--------------------------------+--|
| | |<------------------+ | |
| | | | | |
| +--+--+-- <LEVEL> --+--+--+ |
| | | |
| +-------------+ |
| |
+-- PIC -+- 9 --+-+----------------------------------------+- . ---+
| | | | | |
| +- X --+ +- ( NUMTOK ) -+-----------------------+-+ |
| | | | | | |
| +- S9 -+ +- V9 -+--------------+-+ | |
| | | | | |
| | +- ( NUMTOK ) -+ | |
| | | |
| +- V9 -+--------------+---------------------------+ |
| | | |
| +- ( NUMTOK ) -+ |
| |
+-- OCCURS -- NUMTOK -- . --+-------------------------+------------+
| |<------------------+ |
| | | |
+--+--+-- <LEVEL> --+--+--+
| |
+-------------+
control_batfiles.bat drives FTP through control_getfiles, which is not tracked:
it carries the host, usercode and password of the machine the sources live on.
Copy control_getfiles.example (and symbol_getfiles.example where present) to the
name without the suffix and fill in your own values.
MIT — see LICENSE.