|
Re: I don't need Windows much at all anymore
|
Alexander Caldwell
|
Oct 21, 2007 13:27 PDT
|
Jerry,
That's right, but the starkit Tcl/Tk file that has all the Tcl/Tk interpreter files and needed extensions remains compressed on the disk, so it not taking up anywhere near as much disk space as when you have it installed it in a regular installation, such as you would do with the ActiveTcl, I'm pretty sure that is right. Plus with the starkit version, you could make up a custom package that only has the extensions needed to run the app, and eliminates uneeded ones, so that could keep it a bit smaller as well.
I think I will experiment with using the SQL statements to get data for Tkfp, instead of just grabbing the row from the tkfp_tablelist2_network.tcl gui. It was just convenient to do it that way for the situation I had. Of course, whatever way I get the data from the sqlite database, it will still need to be put into some type of Tcl data structure, like a variable, list or array. Now they have a new structure called a "dict". I need to learn more about it as apparantly it is useful for some things.
But I was thinking the next thing I use the Rolodex for would be to make a new way to select the current "drugstore" for sending the faxes to. The current method uses a simple file with a unique fax name and a phone number, each on one line. But I could make a method that would query the database for all the names, put those in a pop up cascading menu like it has, then when you select one of those, use another SQL query to get the fax number for that drugstore, etc. I would also have to change the way the test3.tcl program that does all the work of sending out the faxes works, so it would get the list along with the fax numbers from the SQLite rolodex as well. That would be a bit more challenging than the current method from the simple file. I would also need to get sqlite working on my old 486 on the older version of Linux it is using, since it is where the faxes are actually sent from in my situation. I will have to check into whether the current version of Sqlite
will run on that old thing.
Alex
Jerry Park <park.-@gmail.com> wrote:
Alex,
Yeah, it's kind of a "Paradigm Shift" as the ethicists or theologians
would say, but Tcl/Tk programs are pretty small compared to the
"general bloat" experience from so many Windows programs. 2 or 3 megs
isn't bad, but I suppose if you were running it from Damn Small Linux
or something, 2 or 3 megs might be a bit deal.
I noticed on the home Win2k box I'm on right now that the wish and Tcl
binaries are about 40 k each, and the respective dll's are about +/- 1
meg each. The lib folder is about 38 megs with all the Tcl extensions
I have. So it would appear that adding Wish8.5 to
/root/Tkfp/drug_programs/bin with very many extensions would be bigger
than an extra startkit or two.
Using the starkit approach to Tkfp sort of "modularizes" it as well,
so that you're less likely to break something with tksqlite down the
road if you decide to start messing around with the versions of wish
and tclsh or lib extensions.
I have been using the tact of retrieving data from SQLite tables using
SQL statements rather than Tcl list statements, although I've
considered the relative advantages of both. For the amount of data we
are retrieving, I doubt if speed is a consideration either way. Tcl
list statements may be more advantageous from the standpoint of code
brevity, however, in a proc. Overall, though I think it's more a
matter of preference as to whether you retrieve a whole row and then
use lindex or lrange to retrieve each datum, or use SQL to retrieve
each column individually.
Jerry
| | Jerry,
That's a good idea about using the starkit version of
tksqlite, even if I have to include a copy of the
newer starpack files to run the tksqlite program, it
is only a couple of megabytes more, which is not that
expensive any longer. I did include a separate starkit
to run the Tkdiff, and I think the Eskill, programs
that you can launch from the Admin tab. So one more
Starkit won't hurt anything.
I'm at home now and don't have the updated rolodex
database here but will send it tomorrow. I was able to
add some code to note_gen.tcl in the charge_entry proc
that scans the ICD9 codes for consults and pops up a
dialog that asks for the referring physicians name,
UPIN and NPI. But I made a button below the entry
boxes that allows you to click and fill the boxes from
the currently selected or highlighted row in the
tkfp_tablist2_network.tcl GUI - if you have the
"Physicians" table displayed. The tablelist widget is
a fancy listbox, so you can just get the whole row of
data as a list and then use the Tcl "lindex" or
"lrange" function to get the data from the columns. I
was thinking I should have used and SQL statement to
get the data out of the database, but the method of
just getting the row from the tablelist seemed so
easy.
I did some printing tests on the new CMS1500 claim
form that has the NPI no.'s as well as needing to
still have the old ID numbers as well. I have
everything working. I am putting some finishing
touches on positioning things.
Alex
|
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
|
|
 |
|
