DataMuseum.dk

Presents historical artifacts from the history of:

Christian Rovsing CR7, CR8 & CR16 CP/M

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Christian Rovsing CR7, CR8 & CR16 CP/M

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦413681d6b⟧ TextFile

    Length: 1024 (0x400)
    Types: TextFile
    Names: »CHREPORT.CMD«

Derivation

└─⟦ea621760d⟧ Bits:30005267 dBase II - uoriginal diskette
    └─ ⟦this⟧ »CHREPORT.CMD« 

TextFile

NOTE - report on the checks in a database
*  - this dBASE II system uses the database file generated by the
*  - check balancing system initiated by XMENU.  This check report
*  - system reads the XMENU data base and report the subtotals for 
*  - each of the various user memos.
*
* note: uses database with structure same as XMENU
*
? 'THIS PROGRAM IS SET TO RUN ON YOUR PRINTER. IF PRINTER IS NOT READY'
? ' THE PROGRAM MAY HANG UP.'
*  - enter name of database file from XMENU
ACCEPT 'Enter check database name' to DBNAME
*  - assign data basefile to this command system
*  - database has name of xxxx.DBF
USE &DBNAME
*  - index on variable MEMO in database file
INDEX ON MEMO TO &DBNAME
*  - enter title to be printed at top of each output page
ACCEPT 'Enter report title (up to 60 chars)' to TITLE
*  - set header to title value
SET HEAD TO &TITLE
*  - generate report form using CHREPORT.FRM 
REPORT FORM CHREPORT FOR NO#0 TO PRINT
RETURN
«eof»