home *** CD-ROM | disk | FTP | other *** search
/ Boston 2 / boston-2.iso / DOS / PROGRAM / BASIC / POWBASIC / LIBRARY1 / EXAMP2.ZIP / PB091790 < prev    next >
Text File  |  1990-09-17  |  10KB  |  318 lines
  1. all
  2. H#: 65712 S12/SPECTRA Publishing
  3.     15-Sep-90  00:27:46
  4. Sb: #65539-Peace and Quiet !
  5. Fm: Richard Kanarek 72371,111
  6. To: John Watts 73760,751 (X)
  7.  
  8. Challenge accepted! Check you e-mail!
  9.  
  10. Cordially, Richard
  11.  
  12. Press <CR> for next or type CHOICES !
  13. H#: 65885 S12/SPECTRA Publishing
  14.     16-Sep-90  12:43:32
  15. Sb: #aplib error & update
  16. Fm: Howard Ballinger 71121,776
  17. To:  75300,214 (X)
  18.  
  19. Barry:
  20.  
  21. Thanks for looking over my files and for the tip. I removed all the STATIC
  22. arrays (I guess if it slows the menu routines down any, I can't tell !!) and am
  23. re-uploading it all as TEMP.ZIP. Please rename it as APLIB.ZIP and replace the
  24. old version in the library with it. I also swatted an old bug in SUB
  25. ENTERSTRING () and made a couple of minor improvements.
  26.  
  27. (What Barry advised me by EMail was that PB v. 2.10 won't accept STATIC arrays
  28. as PUBLIC -- and rightly so 'cause the units mostly don't know what to do with
  29. them !!)
  30.  
  31.  -- Howard
  32.  
  33.  
  34.  
  35. There is 1 Reply.
  36.  
  37. Press <CR> for next or type CHOICES !
  38. H#: 65896 S12/SPECTRA Publishing
  39.     16-Sep-90  14:20:23
  40. Sb: #65885-#aplib error & update
  41. Fm: Barry Erick for Spectra 75300,214
  42. To: Howard Ballinger 71121,776 (X)
  43.  
  44. Will do, but you could upload it as aplib.zip and just tell cis, when it asks,
  45. to replace the old file. Also, if you use Tapcis, there is a great sharware
  46. program called TapUpp that makes uploading files as easy as using tapcis.
  47.  --- Barry
  48.  
  49.  
  50.  
  51.  
  52. There is 1 Reply.
  53.  
  54. Press <CR> for next or type CHOICES !
  55. H#: 65925 S12/SPECTRA Publishing
  56.     16-Sep-90  18:28:41
  57. Sb: #65896-#aplib error & update
  58. Fm: John Watts 73760,751
  59. To: Barry Erick for Spectra 75300,214 (X)
  60.  
  61. Barry,
  62.        TapUpp?..... Sounds just like what I need.  Where is it located? What
  63. FORUM LIB???    Also take a look at RATS.ZIP.... sent it Friday.
  64.                                Keep Tapping
  65.                                John
  66.  
  67.  
  68.  
  69. There is 1 Reply.
  70.  
  71. Press <CR> for next or type CHOICES !
  72. H#: 65932 S12/SPECTRA Publishing
  73.     16-Sep-90  19:49:34
  74. Sb: #65925-aplib error & update
  75. Fm: Barry Erick for Spectra 75300,214
  76. To: John Watts 73760,751
  77.  
  78. John,
  79.  TapUp4.exe is the file and is in Lib 2 of the Tapcis library. G Tapcis for it.
  80.  I did release rats today.. good work.
  81.  --- barry
  82.  
  83.  
  84.  
  85.  
  86. Press <CR> for next or type CHOICES !
  87. H#: 65887 S12/SPECTRA Publishing
  88.     16-Sep-90  12:47:43
  89. Sb: #Strange Error!
  90. Fm: Howard Ballinger 71121,776
  91. To:  75300,214 (X)
  92.  
  93. Barry --
  94.  
  95. OOPS! I have a new problem.
  96.  
  97. As I mentioned, the versions of the high/low database tools I have now link and
  98. operate perfectly with my little database demo (and best of all, it compiles &
  99. links in 11 sec. on my XT -- I compare that with what it used to take when the
  100. toolbox was $INCLUDED and had to be recompiled every time!) But as I try to do
  101. the same thing to a little longer file -- well, a lot longer -- something very
  102. odd happens.  The compiler's second pass stops with an error it flags as Error
  103. 462, undefined SUB, locating the cursor just before the first line of code in
  104. GETKEY.BOX, which is an include file inside of DBHI-U.BAS; and that's not even
  105. what I'm trying to compile (the unit itself compiles fine and still links to
  106. the smaller main file and works
  107. ).
  108.  
  109. I just went off and tried adding a segment break even tho' the compiler didn't
  110. say it needed one -- cuz the program is pretty big now. But no! Didn't affect a
  111. thing. I checked up & down the file (looking at the previous INCLUDE file too)
  112. and found nothing suspicious.
  113.  
  114. Any guesses ??
  115.  
  116.  -- Howard
  117.  
  118.  
  119.  
  120. There is 1 Reply.
  121.  
  122. Press <CR> for next or type CHOICES !H#: 65897 S12/SPECTRA Publishing
  123.     16-Sep-90  14:20:29
  124. Sb: #65887-#Strange Error!
  125. Fm: Barry Erick for Spectra 75300,214
  126. To: Howard Ballinger 71121,776 (X)
  127.  
  128.  You have the $Include called from within the PBU? If you are using a pbu, all
  129. subs must be public.
  130.  You may be able to tell, I do not fully understand your problem.
  131.  -- Barry
  132.  
  133.  
  134.  
  135.  
  136. There is 1 Reply.
  137.  
  138. Press <CR> for next or type CHOICES !
  139. H#: 65963 S12/SPECTRA Publishing
  140.     16-Sep-90  23:31:18
  141. Sb: #65897-#Strange Error!
  142. Fm: Howard Ballinger 71121,776
  143. To: Barry Erick for Spectra 75300,214
  144.  
  145.  
  146. Barry --
  147.  
  148. That's a thought -- I did look for a non-PUBLIC SUB in the unit. But even at
  149. that, why would the unit work perfectly fine with a different main file
  150. (because first I created a version of DUPS.BAS  -- from the Borland forum
  151. sysops -- to test the database toolbox files, and it is thoroughly debugged
  152. already) and fail in this bigger file in which I'm using, to the best of my
  153. knowledge, exactly the same toolbox calls ... ???
  154.  
  155. The problem is that the cursor lands on a blank line within the code of a PBU
  156. (dblow.pbu to be specific). It doesn't point to any kind of SUB or function
  157. call at all, not even close to one. But it says 462, SUB not found.
  158.  
  159. And then I thought, since dblow.bas is mostly just a list of "INCLUDE"
  160. statements, and our blank line IS within an included .BOX file, maybe it was
  161. trying to point to something and missed.
  162.  
  163. Does this ring any bells with anyone ?? How can I try to track it down.
  164.  
  165.  
  166.  
  167. There is 1 Reply.
  168.  
  169. Press <CR> for next or type CHOICES !
  170. H#: 65978 S12/SPECTRA Publishing
  171.     17-Sep-90  05:01:46
  172. Sb: #65963-Strange Error!
  173. Fm: Mike Burns 71551,1353
  174. To: Howard Ballinger 71121,776
  175.  
  176. Howard,
  177.   Check the same line number in your main file. Sometimes,
  178.  I can get your problem in a large file. An internal line
  179.  counter seems to get lost somewhere. Usually I can find
  180.  the error in the main program. Or I have not put in a
  181.  DECLARE statement in the pbu for a function (such as
  182.  funcFileExists% in the stuff I sent you).
  183.           Mike
  184.  
  185.  
  186. Press <CR> for next or type CHOICES !
  187. H#: 65889 S12/SPECTRA Publishing
  188.     16-Sep-90  12:50:52
  189. Sb: #Toolkit revisions
  190. Fm: Howard Ballinger 71121,776
  191. To:  71551,1353 (X)
  192.  
  193.  
  194. Mike --
  195.  
  196. RADICAL !! Your fixes to the High- & Low-Level database toolbox files work
  197. great -- I just resurrected an old testbed file and wrote in the $LINKS, made a
  198. few other modernizations and it's a wrap!
  199.  
  200. The only additional change I'd suggest is in ACCESS.BOX, set dbFirstFileNo =
  201. FREEFILE. That way, if we  a l w a y s  use FREEFILE to get a good file number
  202. to use in OPEN statements, we'll never have conflicts.
  203.  
  204. I don't care for the code skeleton from the manual for opening or creating the
  205. database files, and I'm going to show how I do it in another message. My
  206. working EXE files don't include dbCreate () at all -- the LAST thing I want
  207. them to do is go ahead and initialize new datafiles or somehow trash the
  208. existing ones! If a database manger can't find its data, it should just exit. I
  209. use a separate little prog for one-time use to do the file creation.
  210.  
  211. See you in the next msg -- H.
  212.  
  213.  
  214.  
  215. There are 2 Replies.
  216.  
  217. Press <CR> for next or type CHOICES !
  218. H#: 65890 S12/SPECTRA Publishing
  219.     16-Sep-90  12:52:49
  220. Sb: #65889-Toolkit revisions
  221. Fm: Howard Ballinger 71121,776
  222. To: Howard Ballinger 71121,776 (X)
  223.  
  224. This is the code I use to open the toolbox database files. I have already
  225. $INCLUDEd the high & low level PBU's as modified on Mike's suggestions, as well
  226. as the APLIB files (EXIST () is a function therein.)
  227.  .
  228.  .
  229.  MaxFilesVal = 4
  230.  CALL  dbInit (MaxFilesVal)
  231.  GOSUB OpenEmployerFiles
  232.  GOSUB StructureFields '                  (which contains the FIELD statements)
  233.  .
  234.  .                        rest of program ...
  235.  . OpenEmployerFiles:
  236.  IF NOT EXIST ("EMPLOYRS.DF") THEN PRINT "File not found: EMPLOYRS.DF": STOP
  237.  IF NOT EXIST ("EMPLOYRS.KF") THEN PRINT "File not found: EMPLOYRS.KF": STOP
  238.  IF NOT EXIST ("EMPLNMBR.KF") THEN PRINT "File not found: EMPLNMBR.KF": STOP
  239.  
  240.  INCR LastFileNum: MainDSet% = LastFileNum
  241.  CALL dbOpen(MainDSet%, MainFile%,"EMPLOYRS.KF", Dummy1, Dummy2)
  242.  IF dbStatus THEN ERROR dbStatus
  243.  
  244.  INCR LastFileNum: NumKyDSet% = LastFileNum
  245.  CALL OpenIndex(NumKyDSet%, "EMPLNMBR.KF", Dummy1, Dummy$, Dummy2, Dummy3)
  246.  IF dbStatus THEN ERROR dbStatus
  247.  
  248.  CALL ClearKey(MainDSet%): CALL ClearKey(NumKyDSet%)
  249.  RETURN
  250.  .
  251.  Much simpler, don't ya think ??
  252.  
  253.   -- Howard
  254.  
  255.  
  256.  
  257. Press <CR> for next or type CHOICES !
  258. H#: 65918 S12/SPECTRA Publishing
  259.     16-Sep-90  17:36:14
  260. Sb: #65889-Toolkit revisions
  261. Fm: Mike Burns 71551,1353
  262. To: Howard Ballinger 71121,776 (X)
  263.  
  264. Howard,
  265.   Using FREEFILE to assign file numbers is the best way,
  266.  I just haven't gotten around to changing all me programs
  267.  at this point.  I allow the users to create new files
  268.  automatically so they don't call me and ask how to do it.
  269.  
  270.   The toolbox create routines check for the file before it
  271.  tries to create the new files, so the risk is minimal.
  272.  
  273.   Some changes I would like to see in a "new" database
  274.  toolbox are:
  275.    1) Variable Length records.
  276.    2) Checkpointing
  277.    3) Multiple indexes stored with data (data + indexes = 1 file)
  278.    4) Ascending/Descending Keys
  279.    5) Auto reclamation of deleted records
  280.  
  281.  Glad you got it working ...     Mike
  282.  
  283.  
  284. Press <CR> for next or type CHOICES !
  285. H#: 65985 S12/SPECTRA Publishing
  286.     17-Sep-90  06:09:18
  287. Sb: Make Utility
  288. Fm: AL MUSELLA 76114,637
  289. To: All
  290.  
  291. Hello,
  292.   I just uploaded the source code for a Make Utility to our library.
  293. This utility compares the date and time stamp of the .PBU to the source .BAS
  294. files of a project and recompilies them if needed.
  295.   This is a free utility!
  296.   Also included in the source code is routines to access the date and time
  297. stamp of a file from DOS.
  298.   One problem: I don't have access to a monochrome system, so if anyone who has
  299. downloads it, let me know how it works, and what changes should be made to the
  300. color statements.
  301.                Al
  302.  
  303. Press <CR> for next or type CHOICES !
  304. HPC Vendor B ForumHSections Menu
  305.  
  306. Section names (#subjs/# msgs)
  307.  1 Quarterdeck  (58/129)
  308.  2 Primavera Systems  (5/5)
  309.  3 Korenthal Assocs.  (4/10)
  310.  4 Personics Corp.  (20/59)
  311.  5 Quicksoft  (2/2)
  312.  6 TurboPower Software  (30/94)
  313.  7 ChipSoft, Inc.  (1/6)
  314.  8 DacEasy  (5/9)
  315. 10 J.P. Software  (25/86)
  316. 11 PDC Prolog  (1/1)
  317. 12 SPECTRA Publishing  (5/13)
  318. HEnter choice(s) or ALL !