home *** CD-ROM | disk | FTP | other *** search
/ Boston 2 / boston-2.iso / DOS / PROGRAM / BASIC / POWBASIC / LIBRARY1 / EXAMP2.ZIP / PB091090 < prev    next >
Text File  |  1990-09-10  |  17KB  |  480 lines
  1. all
  2. H#: 64621 S12/SPECTRA Publishing
  3.     08-Sep-90  07:04:00
  4. Sb: #64316-Peace and Quiet !
  5. Fm: Richard Thompson 73200,3071
  6. To: Harry McDonald 74776,1017
  7.  
  8. Hi Harry,
  9.  
  10.      Thanks for the tip.  I was going to go out later this afternoon and see
  11. what is available.  Don't need details your recommendation is enough.
  12.  
  13.                                                          Thanks,
  14.                                                            Rich
  15.  
  16.  
  17.  
  18. Press <CR> for next or type CHOICES !
  19. H#: 64657 S12/SPECTRA Publishing
  20.     08-Sep-90  10:35:49
  21. Sb: #64284-Peace and Quiet !
  22. Fm: Bob Zale: PowerBASIC R&D 76304,1303
  23. To: Mason Landstreet 71220,1547
  24.  
  25. We do allow OPEN "A",1,"<filename>".  Please see it on page 193 of the
  26. PowerBASIC Reference Guide.  However, the alternate form of OPEN is the one
  27. that will see most use in the future.  The reason is simply network control. 
  28. In PB #2.10, we've added support for file access limitations
  29. (read/write/read-write), as well as locks (lock read/write/read-write/ shared).
  30. It necessary for these options to be specified as literals at compile-time,
  31. just so they can be error-checked then.  If not, it would probably add a K or
  32. two to the size of your .exe's just to do this error-checking every time a file
  33. is opened.  Incidentally, we've opted to use the identical syntax for network
  34. OPEN's as in found in Microsoft's QB and BC7.
  35.   Other new features in PB #2.10?  More program capacity.  Some beta testers
  36. have already reported they can compile programs 30-35% larger than with PB
  37. #2.00.  Obviously not eveyone will see that large an increase and some will see
  38. more.  Regarless of the exact %, it's substantial. Also,
  39. exe files are faster and smaller.  A few common bechmarks are 500% faster, and
  40. .exe's are usually 5% to 20% smaller.  We've added DIR$ to read file,
  41. directory, and volume names; ATTRIB to set or read a file attribute; CHDRIVE to
  42. set the default drive; CURDIR$ to read the default directory/path; COM3 and
  43. COM4 are now supported, as well as baud rates of 19200, 38400, 57600, and even
  44. 115200 (if your hardware will handle it); an option to keep DTR high after COM
  45. file close; LOCK and UNLOCK statements for networks; better error messages for
  46. $LINK (yes, we finally even tell you the name of an unresolved external, and
  47. other similar things); more improvements in .OBJ linking (emulated 87 opcodes,
  48. sharing of public data and code between .obj's).  And even more.  The formal
  49. announcement will come shortly.  Stay tuned right here!
  50.   Bob Zale (PowerBASIC R&D)
  51.  
  52. Press <CR> for next or type CHOICES !
  53. H#: 64653 S12/SPECTRA Publishing
  54.     08-Sep-90  10:16:12
  55. Sb: #64188-Peace and Quiet !
  56. Fm: Bob Zale: PowerBASIC R&D 76304,1303
  57. To: George Green 70565,276 (X)
  58.  
  59. Thanks for the inquiry, George.  We're working on the formal announcement of PB
  60. #2.10 right now, and expect to have it posted here within a couple of days at
  61. most.  I really think you'll like it, so please keep watching.
  62.   Bob Zale (PowerBASIC R&D)
  63.  
  64. Press <CR> for next or type CHOICES !
  65. H#: 64600 S12/SPECTRA Publishing
  66.     07-Sep-90  22:54:28
  67. Sb: #64415-#Peace and Quiet !
  68. Fm: Howard Ballinger 71121,776
  69. To: Howard Ballinger 71121,776 (X)
  70.  
  71.  
  72.  Bob --
  73.  
  74.  Ohmigosh yes, there's one more LARGE wish for the list(s): when linker
  75.  error 503, unresolved EXTERNAL variable, occurs, please have the
  76.  machine TELL ME WHICH variable!
  77.  
  78.  I have an error of that sort right now that I can't find -- and I don't
  79.  think I should upload the code for perusal because it's the database
  80.  section of the TB database tool kit;  I'm trying to convert it into
  81.  a separately compiled Power Basic Unit using STATIC arrays.
  82.  
  83.  But lo! Did I by any chance see the name of the author of that toolbox
  84.  on a recent message on your forum ?? If so, maybe he could assist me.
  85.  Maybe he's done the job already and would be willing to share with a
  86.  registered user of the Borland product.
  87.  
  88.  By the way, I never did manage to find a way to delete a key from a
  89.  dups-allowed index using the "low-level" calls. I tried every way I
  90.  could. So I just reindex the whole file when I need to.
  91.  
  92.  One other wish, now you got me started: could there be a MAKE - type
  93.  function which would recompile any unit whose .PBU file was older than
  94.  its source file, before compiling the main program & linking ??
  95.  
  96.  Regards,
  97.           -- Howard
  98.  
  99.  
  100.  
  101. There are 2 Replies.
  102.  
  103. Press <CR> for next or type CHOICES !
  104. H#: 64609 S12/SPECTRA Publishing
  105.     08-Sep-90  04:48:29
  106. Sb: #64600-Peace and Quiet !
  107. Fm: Mike Burns 71551,1353
  108. To: Howard Ballinger 71121,776 (X)
  109.  
  110. Howard,
  111.  I will eplex you the steps I went through to change my
  112.  toolbox to .pbu's.
  113.  
  114.  You can delete keys when dups allowed has been set. You need
  115.  to have the correct DataRef& to pass to DeleteKey. To get this
  116.  you have to Read the key before deleting. I will send you
  117.  the source to a .pbu that manipulates a file with multiple
  118.  keys. It may look a little strange, I use the second key file
  119.  to hold 5 different sets of keys to save files.
  120.  
  121.  The file will be a .zip file.
  122.                     Mike
  123.  
  124.  
  125. Press <CR> for next or type CHOICES !
  126. H#: 64662 S12/SPECTRA Publishing
  127.     08-Sep-90  11:58:38
  128. Sb: #64600-Peace and Quiet !
  129. Fm: Barry Erick for Spectra 75300,214
  130. To: Howard Ballinger 71121,776 (X)
  131.  
  132. Howard,
  133.  2.10 will do the wish #1... tells you what variable!
  134.   --- Barry
  135.  
  136.  
  137.  
  138.  
  139. Press <CR> for next or type CHOICES !
  140. H#: 64661 S12/SPECTRA Publishing
  141.     08-Sep-90  11:50:47
  142. Sb: #64415-Peace and Quiet !
  143. Fm: Bob Zale: PowerBASIC R&D 76304,1303
  144. To: Howard Ballinger 71121,776 (X)
  145.  
  146. Howard--
  147.   Thanks a bunch for all your comments!  I haven't been able to find a problem
  148. with unassigned constants as you mentioned.  If a named constant is not
  149. assigned a value, references to it should return zero, and it seems to do that
  150. in my tests.  Could you be assigning some other value in a hidden place, like
  151. an $include file?  If you have an example, I'd love to see it.
  152.   Erasing static arrays from a unit can be a problem.  The reason is this:
  153. PowerBASIC assumes that all arrays declared PUBLIC/EXTERNAL are dynamic, and it
  154. generally forces them to be so.  If you have a DIM STATIC A$() and a PUBLIC
  155. A$(), you'll get an error.  However, if you forget the PUBLIC, PB is a little
  156. too forgiving, and still resolves the external references to the array A$() in
  157. your unit files.  Unfortunately, when the unit was compiled, PB followed it's
  158. own rules, and presumed A$() was dynamic, and so trys to release static memory.
  159. Confusion reigns, and memory is corrupted.  Very sorry for the problem and the
  160. inconvenience.
  161.   Bottom line:  Any arrays used as PUBLIC/EXTERNAL must be dynamic.  If DIM'd
  162. as static, you're inviting trouble.  All future versions of PowerBASIC will
  163. warn you of this error condition.  Thanks VERY MUCH for your help!
  164.   Bob Zale (PowerBASIC R&D)
  165.  
  166. Press <CR> for next or type CHOICES !
  167. H#: 64573 S12/SPECTRA Publishing
  168.     07-Sep-90  18:09:18
  169. Sb: #64469-#$Link & ^KP Questions
  170. Fm: Richard Kanarek 72371,111
  171. To: Barry Erick for Spectra 75300,214 (X)
  172.  
  173. I'm sorry, I don't know what a "balcnk problem" is.
  174. Thanks for the other information!
  175. Richard
  176.  
  177. There is 1 Reply.
  178.  
  179. Press <CR> for next or type CHOICES !
  180. H#: 64617 S12/SPECTRA Publishing
  181.     08-Sep-90  06:46:43
  182. Sb: #64573-$Link & ^KP Questions
  183. Fm: Barry Erick for Spectra 75300,214
  184. To: Richard Kanarek 72371,111
  185.  
  186. Well, a "balcnk problem" a.k.a. "blank problem" when the keyboard can't spell
  187. (actually my archive shows I spelled it balnk.. I do not know where the c came
  188. from).  :)
  189.  --- Barry
  190.  
  191.  
  192.  
  193.  
  194. Press <CR> for next or type CHOICES !
  195. H#: 64599 S12/SPECTRA Publishing
  196.     07-Sep-90  22:43:49
  197. Sb: #DIR in PB ot TB ?
  198. Fm: ed evans 73135,1606
  199. To: all
  200.  
  201. So Id like a subroutine that will read DIR info into string variables. I found
  202. one for QB4 that looks lik it might do it, but as these things go, its just
  203. dufferent enough to not work. So I either rewrite it, or search for a urbo or
  204. Power basic version that already exists. This has GOT to exist! How could it
  205. not ... I need all file info ... a long string per DIR linw would be fine. Any
  206. suggestions ? -=ed=
  207. There are 2 Replies.
  208.  
  209. Press <CR> for next or type CHOICES !
  210. H#: 64663 S12/SPECTRA Publishing
  211.     08-Sep-90  11:58:45
  212. Sb: #64599-DIR in PB ot TB ?
  213. Fm: Barry Erick for Spectra 75300,214
  214. To: ed evans 73135,1606
  215.  
  216. Ed,
  217.  real soon there will be an update to 2.10 that will have that in it. In the
  218. neanwile, you may want to check for findfirst, or getdir.zip. Anyway, in the
  219. library, I do have something that does that. May be called finfil.zip, also. A
  220. BRO key:Dir*   should get it. Found it.. FNDFIL.ZIP is the file.
  221.  --- Barry
  222.  
  223.  
  224.  
  225.  
  226.  
  227. Press <CR> for next or type CHOICES !
  228. H#: 64670 S12/SPECTRA Publishing
  229.     08-Sep-90  13:11:39
  230. Sb: #64599-DIR in PB ot TB ?
  231. Fm: Howard Ballinger 71121,776
  232. To: ed evans 73135,1606
  233.  
  234. Another source for what you want -- I just uploaded a new version of my own
  235. toolkit. Link it in and CALL DirFirst, then DirNext.
  236.  -- Howard B.
  237.  
  238. Press <CR> for next or type CHOICES !
  239. H#: 64636 S12/SPECTRA Publishing
  240.     08-Sep-90  09:24:05
  241. Sb: #PBPLUS96.EXE shortfall
  242. Fm: BRUCE NOPPER 73300,2444
  243. To: Bob Zale
  244.  
  245. This is regards to the description for the file pbplus.zip. The fact that this
  246. patch to EGA/VGA memory will not work if the system memory is less than 640k.
  247.  
  248. There is 1 Reply.
  249.  
  250. Press <CR> for next or type CHOICES !
  251. H#: 64651 S12/SPECTRA Publishing
  252.     08-Sep-90  10:12:10
  253. Sb: #64636-PBPLUS96.EXE shortfall
  254. Fm: Bob Zale: PowerBASIC R&D 76304,1303
  255. To: BRUCE NOPPER 73300,2444
  256.  
  257. You're absolutely right, Bruce.  PBPLUS96 will not be usable at all, unless you
  258. have 640k of main memory.  I guess we just presumed that PBPLUS96 users would
  259. have 640k available, as that is the published minimum memory requirement for
  260. PowerBASIC.  I hope that it didn't cause you too much of an inconvenience.
  261.   Bob Zale (PowerBASIC R&D)
  262.  
  263. Press <CR> for next or type CHOICES !
  264. H#: 64660 S12/SPECTRA Publishing
  265.     08-Sep-90  11:16:16
  266. Sb: #.pbu's for TOOLBOX
  267. Fm: George Green 70565,276
  268. To: Mike Burns 71551,1353 (X)
  269.  
  270. Mike,
  271.  I noticed in one of your messages that you have converted the TB-db toolkit
  272.  over to .PBU'S. Any chance of your posting the steps you took in the
  273.  data library here. There would probably be several people interested in
  274.  this. It's a project I've been putting-off myself for some time now.
  275.  
  276.  -George Green
  277.  
  278.  
  279.  
  280. There is 1 Reply.
  281.  
  282. Press <CR> for next or type CHOICES !
  283. H#: 64677 S12/SPECTRA Publishing
  284.     08-Sep-90  14:59:46
  285. Sb: #64660-#.pbu's for TOOLBOX
  286. Fm: Mike Burns 71551,1353
  287. To: George Green 70565,276 (X)
  288.  
  289. George,
  290.   Here are the basic steps although I did it quite awhile
  291.   ago:
  292.  
  293.   To create a dblow.pbu
  294.  
  295.   1) First I put a bunch of shared statements at the top of
  296.      dblow.box. These statements shared any variable that was
  297.      shared by access.box, delkey.box, getkey.box, addkey.box.
  298.      I also added to the words local to ALL SUBs (this
  299.      is defualt and not needed but I did it to protect for
  300.      future versions).
  301.  
  302.   2) Add the keyword PUBents. 4) The only EXTERNAL vardbStatus.
  303.      I modified dbInit to accept dbMaxFiles% as a parameter.
  304.  
  305.      At this point you should be able to create a dblow.pbu.
  306.  
  307. [More]
  308.  
  309.  
  310.  
  311.  
  312.  
  313. There is 1 Reply.
  314.  
  315. Press <CR> for next or type CHOICES !
  316. H#: 64678 S12/SPECTRA Publishing
  317.     08-Sep-90  14:59:54
  318. Sb: #64677-#.pbu's for TOOLBOX
  319. Fm: Mike Burns 71551,1353
  320. To: Mike Burns 71551,1353 (X)
  321.  
  322. [Continued]
  323.  
  324. (cont).
  325.   5)  You need to create a file that declares all the public
  326.       routines and their parameters.(I call mine dblow.dec)
  327.  
  328.   ' Routines Found In DBLOW.PBU
  329.    DECLARE SUB AddKey(INTEGER, LONG, STRING)
  330.    DECLARE SUB AddRec(INTEGER, LONG)
  331.    DECLARE SUB ClearKey(INTEGER)
  332.    DECLARE SUB CloseFile(INTEGER)
  333.    DECLARE SUB CloseIndex(INTEGER)
  334.    DECLARE SUB DeleteKey(INTEGER, LONG, STRING)
  335.    DECLARE SUB DeleteRec(INTEGER,LONG)
  336.    DECLARE SUB GetRec(INTEGER, LONG)
  337.    DECLARE SUB GetStatus(INTEGER, STRING, INTEGER, STRING, INTEGER, INTEGER)
  338.    DECLARE SUB MakeFile(INTEGER, INTEGER, INTEGER, STRING)
  339.    DECLARE SUB MakeIndex(INTEGER, STRING, INTEGER, STRING, INTEGER, INTEGER)
  340.    DECLARE SUB NextKey(INTEGER, LONG , STRING)
  341.    DECLARE SUB OpenFile(INTEGER, INTEGER, INTEGER, STRING)
  342.    DECLARE SUB OpenIndex(INTEGER, STRING, INTEGER, STRING, INTEGER, INTEGER)
  343.    DECLARE SUB PrevKey(INTEGER, LONG , STRING)
  344.    DECLARE SUB PutRec(INTEGER, LONG)
  345.    DECLARE SUB SearchKey(INTEGER, LONG, STRING )
  346.  
  347. [More]
  348.  
  349.  
  350.  
  351. There is 1 Reply.
  352.  
  353. Press <CR> for next or type CHOICES !
  354. H#: 64679 S12/SPECTRA Publishing
  355.     08-Sep-90  15:00:03
  356. Sb: #64678-#.pbu's for TOOLBOX
  357. Fm: Mike Burns 71551,1353
  358. To: Mike Burns 71551,1353 (X)
  359.  
  360. [Continued]
  361.  
  362. (cont).
  363.   6) Add to this dblow.dec file the named constants and dbStatus.
  364.  ' return codes for database stuff
  365.   EXTERNAL dbStatus
  366.   %Okay               =   0
  367.   %FileNotFound       = 1000   'You tried to open a non-existant file
  368.   %FileAlreadyCreated = 1001   'You tried to create an already-created file.
  369.   %InvalidCall        = 1002   'You used a command that doesn't exist.
  370.   %FileNotDBLOW       = 1003   'The file exists, but is not an DBLOW file.
  371.   %TooManyFiles       = 1004   'You have opened more than MaxFiles files.
  372.   %KeyNotFound        = 1005   'You have referenced a non-existant key.
  373.   %EndOfFile          = 1006   '
  374.   %FileNotOpen        = 1007
  375.   %KeyAlreadyExists   = 1008
  376.   %TooManyKeys        = 1009
  377.   %FileNotDBHIGH      = 1010
  378.   %FileAllowsDups     = 1011   'You tried to open a Duplicate-key file in
  379.                                'non-Duplicate mode
  380.   %BadParameter       = 1012   'Parameter out of range
  381.  
  382. '====  This file is included at the beginning of each unit that
  383. '      uses a routine in dblow.pbu.
  384.  
  385.   In the main program you would declare dbStatus as PUBLIC and link
  386.   in dlblow.pbu.
  387.  
  388. [More]
  389.  
  390.  
  391. There is 1 Reply.
  392.  
  393. Press <CR> for next or type CHOICES !
  394. H#: 64680 S12/SPECTRA Publishing
  395.     08-Sep-90  15:00:09
  396. Sb: #64679-#.pbu's for TOOLBOX
  397. Fm: Mike Burns 71551,1353
  398. To: Mike Burns 71551,1353 (X)
  399.  
  400. [Continued]
  401.  
  402. (cont).
  403.  
  404.    This should get you started. I also changed the DIM statements
  405.  in dbINIT to be DIM DYNAMIC.
  406.  
  407.     The other .box routines are roughly the same. You will
  408.  want to keep the public variables at a minimum in order to
  409.  minimize name conflicts. I do have all the Ent.  variables
  410.  declared as public/external from that toolbox.
  411.  
  412.     You should end up with the following .pbu's.
  413.     scrnasm.pbu, scrnsubs.pbu, entsubs.pbu, dblow.pbu,
  414.     dbhigh.pbu, sort.pbu.  These will include the other
  415.     .box files during the compile. You do not need
  416.     to compile a access.pbu, getkey.pbu, etc.
  417.  
  418.   If you have any questions ask and I will try and answer them.
  419.   It's been awhile since I converted to units so I may have
  420.   left something out.
  421.  
  422.           Mike
  423.  
  424.  
  425.  
  426.  
  427. There is 1 Reply.
  428.  
  429. Press <CR> for next or type CHOICES !
  430. H#: 64717 S12/SPECTRA Publishing
  431.     08-Sep-90  23:04:37
  432. Sb: #64680-.pbu's for TOOLBOX
  433. Fm: George Green 70565,276
  434. To: Mike Burns 71551,1353 (X)
  435.  
  436. Mike...
  437.  Thanks for all the msgs, I'll get to work
  438.  -George Green \ex
  439.  
  440. Press <CR> for next or type CHOICES !
  441. H#: 64770 S12/SPECTRA Publishing
  442.     09-Sep-90  16:32:10
  443. Sb: #NUMERIC TYPES
  444. Fm: DOUG MILLER 73757,1300
  445. To: BOB ZALE
  446.  
  447. I'VE TRIED TO KEEP MY FOOT IN BASICA I DON'T KNOW THAT IN PB IF DIFFERENT TYPES
  448. CAN BE MIXED LIKE A@ A# MKMD$(A#)  A@=CVMD(A$) AM I DOING SOMETHING THAT WON'T
  449. WORK THANKS
  450.  
  451. There is 1 Reply.
  452.  
  453. Press <CR> for next or type CHOICES !
  454. H#: 64777 S12/SPECTRA Publishing
  455.     09-Sep-90  17:58:42
  456. Sb: #64770-NUMERIC TYPES
  457. Fm: Bob Zale: PowerBASIC R&D 76304,1303
  458. To: DOUG MILLER 73757,1300 (X)
  459.  
  460. Doug --
  461.   PowerBASIC always does automatic type conversions.  Never a problem, so no
  462. need to worry about it.
  463.   Bob Zale
  464.  
  465. Press <CR> for next or type CHOICES !
  466. HPC Vendor B ForumHSections Menu
  467.  
  468. Section names (#subjs/# msgs)
  469.  1 Quarterdeck  (60/136)
  470.  2 Primavera Systems  (1/1)
  471.  3 Korenthal Assocs.  (1/2)
  472.  4 Personics Corp.  (22/59)
  473.  5 Quicksoft  (4/8)
  474.  6 TurboPower Software  (45/106)
  475.  7 ChipSoft, Inc.  (1/2)
  476.  8 DacEasy  (8/11)
  477. 10 J.P. Software  (9/41)
  478. 11 PDC Prolog  (6/10)
  479. 12 SPECTRA Publishing  (6/22)
  480. HEnter choice(s) or ALL !