Program Newdisc;
(****************************************************************)
(* *)
(* Author: George Brooke *)
(* Sebastian Bauerstrasse 20c *)
(* 8000 Munich 83 *)
(* West Germany *)
(* *)
(* Date: 30.12.81 *)
(* *)
(* *)
(* NewDisc performs the introduction of a new disc into *)
(* the Disc Catalog System. This System is described, and is *)
(* available, on PASCAL Z Disc #9. *)
(* The Catalog System was originally authored by Ward *)
(* Christenson of CP/M Users Group. *)
(* *)
(* In the following description, the word 'Catalog' is *)
(* used to refer to the Name part of a Disc Identification file *)
(* where the Disc Identification file has a name of the form *)
(* *)
(* <-Name.Serial Number> *)
(* *)
(* *)
(* *)
(* *)
(* *)
(* *)
(* The general method of operation is as follows *)
(* *)
(* 1.0 MAST.CAT is read and a table of the current used *)
(* Disc Serial Numbers and their Categories is built. *)
(* *)
(* 2.0 The Categories, together with 'New Category' and *)
(* NRS are presented to the User who can choose *)
(* a) to use an existing Category, or *)
(* b) to use a new Category, or *)
(* c) to request a display of the allocated Serial *)
(* numbers. This mode will return to main *)
(* menu selection after examination *)
(* *)
(* 3.0 The next available Serial Number is selected and a *)
(* file of the form *)
(* <-category Name.Serial Number> *)
(* is written to the disc in Drive B. *)
(* *)
(* 4.0 The Program cycles until all initialising is *)
(* completed. *)
(* *)
(* *)
(* *)
(* Note: This Program uses the Serial Number '0' to mean *)
(* 'Undefined'. Therefore this program will not *)
(* work if your current MAST.CAT has entries for *)
(* Serial Number 0. *)
(* *)
(****************************************************************)
