1$*;PTarbell file setup program 3-23-78.$d4d4pppp] ]  ]  ]  ]  ]  ] Instructions?n;1'SNn 76THE PURPOSE OF THIS PROGRAM IS TO SET UP A FILE.$d4THIS INVOLVES DEFINING ALL HEADINGS AND FIELDS.$d4EXAMPLES OF FILES:$d4A LIST OF ALL THE INTEGRATED CIRCUITS ON HAND, OR$d4A LIST OF ALL THE SALES MADE ON A PARTICULAR DATE, OR$d4A LIST OF ALL THE ITEMS SHIPPED IN ONE WEEK.$d4THE FILE IS MADE UP OF RECORDS, AND EACH RECORD$d4IS MADE UP OF FIELDS. THE RECORD MIGHT BE ONE$d4INVENTORY ITEM, OR ONE TRANSACTION. THE FIELD $d4MIGHT BE A QUANTITY, A PRICE, OR A PART NUMBER.$d4WHEN THE FILE IS FIRST STARTED, IT IS NECESSARY TO$d4DEFINE EACH FIELD IN THE RECORDS, AS TO NUMERICAL$d4OR NON-NUMERICAL, WHAT THE NAME OF THE FIELD IS,$d4AND WHAT THE COLUMN HEADING SHOULD BE FOR THE FIELD.$d4THERE ARE PRESENTLY FOUR TYPES OF FILES ALLOWED:$d4 TYPE 0 SEQUENTIAL$d4 TYPE 1 RANDOM$d4 TYPE 3 INDEXED-RANDOM$d4 TYPE 7 LINKED-INDEXED-RANDOM$d4A SEQUENTIAL FILE IS NORMALLY USED FOR ITEMS THAT$d4NEED NO CHANGES, SUCH AS A RECEIVING OR SHIPPING LOG.$d4A RANDOM FILE IS NOT AS COMPACT AS A SEQUENTIAL FILE,$d4BUT IT HAS THE ADVANTAGE OF BEING EASY TO MAKE CHANGES.$d4AN INDEXED FILE ALLOWS QUICK ACCESS TO ANY ENTRY BY$d4SPECIFYING A KEY FIELD, SUCH AS A PART NUMBER IN AN INVENTORY.$d4A LINKED FILE ALLOWS DELETIONS AND INSERTIONS $d4WITHOUT HAVING TO READ AND WRITE THE WHOLE FILE.$d4New file name?n;1'Do you want read restrictions?n;1'YES7npDo you want change restrictions?n;1'YES7pColumns with headings defined?n;1'SYy 7Printer paper width (in columns)?n;"'] !] !This will be field $#.$d4What is the name of this field?n;]!1'Will this field be numeric only?n;1'SYy 7]!6]!Nn 76 How wide do you want this field?n;] !"'] !7W6 The paper width has been exceeded by $5#5 characters.$d4Want a different width for this field?$$d4SYy 7] !6Ok, start over.$d46What is the heading for $]!$?$dn;1'T] !p7 P6 qThat heading is too wide!$d46 ] !Tp6 .7  6 So far your headings look like this:$d4$d4Yy 7 6 ] !] !7 6 Will $]!$ be on the same line as $]!$ ?$dn;1'SNn 7 ] !]!7 6 MINIMUM VALUEn;] !"'MAXIMUM VALUEn;] !"'Want to define another field?n;1'SYy 7 6+Will you ever make changes in this file, $d4except add records to the end?n;1'SNn 7 SEQ6 RANpRAN7 €]-SEQ7 ր-6 7Do you want an index file made?n; 1' S N n 7 6 7!.IND!-Here are the field names:$d46 o.7 ~]!$d46 _Which one makes the index?n;"1'#6 #.#7 #]!"7 6 6 Nope... try again.$d46 9]&",?Do you want a linked file?n;$1'$$S$Y$y 7 7pHow many heading lines in addition to column headings?n;%"'%RAN7 ]]%+++++++?$YES7 &p'p(p)p]]%&+'+(+)++?SEQ7"]&+++++++?6:%.7HEADING LINE $#dn;1'Tppp7Heading $# characters too wide.$d46:RAN7]]%,?SEQ7]&,?6*Nn 76RAN7]]%,?SEQ7]&,?64.7RAN7]]%]!,]!+] !+] !+] !+] !++?SEQ7]&]!,]!+] !+] !+] !+] !++?6$]@ YES7]@Want to set up another file?n;1'SYy 796many heading lines in addition to column headings?n;