home *** CD-ROM | disk | FTP | other *** search
/ Best of Big Blue Disk / bbdbest.zip / FAMILY.CHN (.txt) < prev    next >
Turbo Pascal Chain module  |  1987-09-18  |  31KB  |  231 lines
  1. FAMILY
  2. No such file exists.
  3. Data file has bad format.
  4. )Insufficient disk space, or bad filename.
  5. )Cannot do this while within TURBO PASCAL.
  6. I/O error encountered.
  7. :Enter name to save; up to 8 characters, with no extension.
  8. AYou may prefix it with a drive and/or path, as 'C:\FAMILY\SMITH'.
  9. Name (<ENTER> = 
  10. 8An error was encountered while writing.  Data not saved.
  11. NIf you used the name of a previously-saved file, it is probably corrupted now;
  12. 4you'd better save it again or the data will be lost.
  13. Press any key...
  14. *Data has been changed since the last save.
  15. 8These changes will be lost unless you save the data now.
  16. Do you wish to save it? [Y/n]: 
  17. ~PYIt
  18. :Enter name to load; up to 8 characters, with no extension.
  19. AYou may prefix it with a drive and/or path, as 'C:\FAMILY\SMITH'.
  20. Name (<ENTER> = 
  21. =An error was encountered while reading.  Data was not loaded.
  22. Press any key...
  23. <<< User abort >>>
  24. Insufficient memory available.
  25. &Unexepected runtime error encountered.
  26. #Unexpected error of unknown nature.
  27. ,A fatal error has occurred.  Press a key... 
  28. return.chn
  29. Invalid date entry.
  30. Date syntax:  MM/DD/YYYY
  31. LTwo-digit years represent 1900 + year unless preceded by one or more zeroes;
  32. Nthus, 87 represents 1987 but 0087 is A.D. 87.  Give B.C. years as negative #s.
  33. I?'s in any field in date denotes unknown quantity; e.g., 04/??/1985 means
  34. Nunknown date in April, 1985.  Only one ? per field is needed; 04/?/1985 works.
  35. CLeading zeroes may be omitted:  4/1/87 is equivalent to 04/01/1987.
  36. LPrecede date with "c" to indicate approximation:  c4/1/1900 means an approx-
  37. imate date of Apr. 1, 1900.
  38. +Type U to indicate completely unknown date.
  39. LType N or <ENTER> to indicate that a date is inapplicable; as, for instance,
  40. "the death date of a living person.
  41. Enter date: 
  42.  * MISSING *
  43.  * N/A *
  44.  * UNKNOWN *
  45.  * MISSING *
  46.  * N/A *
  47.  * UNKNOWN *
  48.  * Data not entered *
  49.  * Data is missing *
  50.  * Data not entered *
  51.  * Data is missing *
  52.      I.D. #: 
  53.  Name: 
  54.      Gender: 
  55. Female
  56. Neuter
  57. Hermaphrodite
  58.  Date of birth: 
  59.  Place of birth: 
  60.  Date of death: 
  61.  Place of death: 
  62.      Mother: 
  63.      Father: 
  64.  No marriages on record.
  65.  Marriage(s) on record.
  66.  No children on record.
  67.  Child(ren) on record.
  68.  Comments: 
  69. <None>
  70. <Unspecified>
  71. <Unspecified>
  72. I.D. #: 
  73. Female
  74. Neuter
  75. Hermaphrodite
  76. Date of birth: 
  77. Place of birth: 
  78. Date of death: 
  79. Place of death: 
  80. Mother: 
  81. Father: 
  82. No marriages on record.
  83. Spouse(s): 
  84. No children on record.
  85. Child(ren): 
  86. Comments: 
  87. <None>
  88. CUYIt
  89. 2Name or part of name to search for (<ENTER>=All): 
  90. Enter ID number: 
  91. 4Improper syntax.  Enter number, or ?, L, or <ENTER>.
  92. &Out of range.  Enter number from 1 to 
  93. , or ?, L, or <ENTER>.
  94. HThis record has been deleted.  Type another number, or ?, L, or <ENTER>.
  95. 9Enter ID number of person.  Type L for a list of persons.
  96. GPress <ENTER> to skip; this is used when the person in question has not
  97. Jyet been entered in the database, or when no more persons (as in a list of
  98. children) need to be entered.
  99. &Type ? to see this help message again.
  100. Enter ID number: 
  101. You have selected ID #
  102. Is this correct? [Y/n]: 
  103. Enter ID number: 
  104. Found a marriage between 
  105. <Unnamed person> 
  106. <Unnamed person>.
  107. Date of marriage: 
  108. Ending date: 
  109. )Is this the marriage in question? [Y/n]: 
  110. Change this? (y/N): 
  111. #Enter ID # of spouse (? for help): 
  112. Date of marriage (MM/DD/YYYY): 
  113. 2Date marriage ended [if applicable] (MM/DD/YYYY): 
  114. +Any more marriages for this person? [y/N]: 
  115. "Enter ID # of child (? for help): 
  116. +Enter ID numbers of children one at a time.
  117. .Omit ones who do not yet have records entered.
  118. 2Press <ENTER> with no input when you are finished.
  119. )No marriages have currently been entered.
  120. Add new marriage(s)? (y/N): 
  121. Editing data on a marriage...
  122. Spouse: 
  123. #Enter ID # of spouse (? for help): 
  124. Date of marriage: 
  125. New date (MM/DD/YYYY): 
  126. Date marriage ended: 
  127. New date (MM/DD/YYYY): 
  128. Add more marriages? (y/N): 
  129. (No children have currently been entered.
  130. Add new children? (y/N): 
  131. Child: 
  132. Enter new ID # (? for help): 
  133. Add more children? (y/N): 
  134. +Enter ID numbers of children one at a time.
  135. .Omit ones who do not yet have records entered.
  136. 2Press <ENTER> with no input when you are finished.
  137. Entering new record with ID #
  138. Name: 
  139. Gender (M/F): 
  140. Female
  141. Neuter
  142. Hermaphrodite
  143. Date of birth (MM/DD/YYYY): 
  144. Place of birth: 
  145. *Date of death if applicable (MM/DD/YYYY): 
  146. Place of death: 
  147. * N/A *
  148. ID # of mother (? for help): 
  149. ID # of father (? for help): 
  150. Any marriage(s)? [y/N]: 
  151. Any children? [y/N]: 
  152. Comments: 
  153. %ID # of record to edit (? for help): 
  154. Editing record with ID #
  155. Name: 
  156. New name: 
  157. Gender: 
  158. Female
  159. Neuter
  160. Hermaphrodite
  161. (New gender (M/F, <ENTER> if unchanged): 
  162. Female
  163. Neuter
  164. Hermaphrodite
  165. Date of birth: 
  166. ,New date of birth (MM/DD/YYYY, ? for help): 
  167. Place of birth: 
  168. New place of birth: 
  169. Date of death: 
  170. ,New date of death (MM/DD/YYYY, ? for help): 
  171. Place of death: 
  172. New place of death: 
  173. * N/A *
  174. Mother: 
  175. ID # of mother (? for help): 
  176. Father: 
  177. ID # of father (? for help): 
  178. "Edit marriage information? [y/N]: 
  179. Edit children? [y/N]: 
  180. Comments: 
  181. <None>
  182. New comments: 
  183. /Enter ID # of person to delete.  (? for help): 
  184. O                                                                               
  185.      (???? - 
  186. ,Print tree of (D)escendents or (A)ncestors? 
  187. &ID # of starting person (? for help): 
  188. *Output to (S)creen, (P)rinter, or (F)ile? 
  189. Filename to use: 
  190. O           Family tree created using program from BIG BLUE DISK #10.           
  191. Press any key...
  192. There are none.
  193. Press any key...
  194.  (ID #
  195. FWhich record do you want to see? (<ENTER>=Return to original record): 
  196. !Improper syntax.  Enter a number.
  197. (Out of range.  Enter a number from 0 to 
  198. Siblings of 
  199.  (ID #
  200. Press a key to view spouse...
  201. Spouses of 
  202.  (ID #
  203. Children of 
  204.  (ID #
  205. L<N>ext match; <M>other; <F>ather; <S>iblings; <W>eddings; <C>hildren; <E>xit
  206. Your choice: 
  207.  No such person has been entered.
  208. Press a key...
  209. !Output to (S)creen or (P)rinter? 
  210. "Look up by (I)D number or (N)ame? 
  211. ID # to find: 
  212. Record was not found.
  213. Press any key. 
  214. .Name or part of name to search (<ENTER>=All): 
  215. No such record found.
  216. Press any key. 
  217. LBIG BLUE DISK Presents:  Family Tree, by Daniel Tobias.  Copyright (C) 1987.
  218. HBIG BLUE DISK is not public domain.  Please respect the authors' rights.
  219. Family Tree Main Menu
  220.   (A)dd new entries
  221. "  (L)ook up/browse through entries
  222.   (P)rint a family tree
  223.   (E)dit data
  224.   (D)elete a person
  225.   (R)ead data from disk
  226.   (W)rite data to disk
  227.   (C)lear data and start over
  228.   (Q)uit
  229. Your choice: 
  230. return.chn
  231.