uv SHOW utility: need it aware of Pick-style A- & S-items

158 views
Skip to first unread message

Chuck Stevenson

unread,
Jul 31, 2015, 3:42:40 PM7/31/15
to Pick and MultiValue Databases
Has anyone modified SHOW to handle Pick-style A- & S-items, including correlatives?
They give us the source to it & its called subroutines in uv/APP.PROGS.

SHOW is a really handy tcl tool for research & troubleshooting, but it is of PI heritage & I'm too lazy to Pickify it myself if someone is willing to share.

tia,
Chuck

Charlie Noah

unread,
Jul 31, 2015, 3:55:26 PM7/31/15
to mvd...@googlegroups.com
Hey Chuck,

Long time! I have the source to SHOW, but somewhere along the way I've lost my copy of uv/APP.PROGS. I never ported SHOW to Jbase. What does it do? Maybe someone has something with the same functionality.

Charlie

Tiny Bear Wild Bird Store
Home of "Safety Net Shipping"
http://www.TinyBearWildBirdStore.com
Toll Free: 1-855-TinyBear (855-846-9232)

--
You received this message because you are subscribed to
the "Pick and MultiValue Databases" group.
To post, email to: mvd...@googlegroups.com
To unsubscribe, email to: mvdbms+un...@googlegroups.com
For more options, visit http://groups.google.com/group/mvdbms

Chuck Stevenson

unread,
Aug 7, 2015, 5:11:37 PM8/7/15
to Pick and MultiValue Databases
SHOW many be a misnomer.  It's a way to do a pick-list using the dictionary & LIST-like syntax.
It came from PI.  They probably should have called it PICK, but that would be anathama.  They did not even admit that that particular word was in Webster's Dictionary.


Example  (I hope google displays this with fixed width font):

>SSELECT VOC WITH  @ID LIKE "&..."  BY F2

14 record(s) selected to SELECT list #0.
>>SHOW VOC TYPE F2 F3 HEADING "'TL'Pick some stuff:"


05:07:12pm  07 Aug 2015
Pick some stuff:
     VOC..................   TYPE F2...........  F3...........
-nn|
* 1| &ED&                    F    &ED&           SOURCE/DICTS/
   |                                             D_&ED&
  2| &METADATA_REPOSITORY&   F    &METADATA_REP  C:\U2\UV/D_&M
   |                              OSITORY&       ETADATA_REPOS
   |                                             ITORY&
* 3| &TEMP&                  F    &TEMP&         D_&TEMP&
* 4| &XML&                   F    &XML&          D_&XML&
* 5| &UFD&                   F    .              C:\U2\UV\D_UF
   |                                             D
  6| &                       K    10
  7| &DEVICE&                F    C:\U2\UV\&DEV  C:\U2\UV\D_&D
   |                              ICE&           EVICE&
  8| &KEYSTORE&              F    C:\U2\UV\&KEY  C:\U2\UV\D_&K
   |                              STORE&         EYSTORE&
  9| &MAP&                   F    C:\U2\UV\&MAP  C:\U2\UV\D_&M
   |                              &              AP&
 10| &PARTFILES&             F    C:\U2\UV\&PAR  C:\U2\UV\D_&P
   |                              TFILES&        ARTFILES&
 11| &COMO&                  F    C:\uvScratch\  SOURCE/DICTS/
   |                              DEV\&COMO&     D_&COMO&
 12| &HOLD&                  F    C:\uvScratch\  SOURCE/DICTS/
   |                              DEV\&HOLD&     D_&HOLD&
*13| &PH&                    F    C:\uvScratch\  SOURCE/DICTS/
   |                              DEV\&PH&       D_&PH&
 14| &SAVEDLISTS&            F    C:\uvScratch\  SOURCE/DICTS/
   |                              DEV\&SAVEDLIS  D_&SAVEDLISTS
   |                              TS&            &
   |
S   - Select ss  C - Clear ss        ss can be number, range, ALL or VISIBLE
Q   - Quit
^^  - Refresh     ? - Help on SHOW     [Page=1]     [Selected=5]
(Last) -->

Above, I answered the prompt with "1 3-5 13"
SHOW put asterisks by those line numbers.
I can page forward and back if multiple pages, and add or clear items selected.
When I finally "Q" out,  I'm left with an active select list.
In this case, the select list would have 5 items:  &ED&, &TEMP&, &XML&, &UFD&, &PH&.
When greenscreen was king, this was a really nifty tool.
Now, it's still handy for developers & troubleshooters working at TCL.

But SHOW can't handle Pick-style dictionary items.  (TYPE, F2 & F3 are I- or D-types.)
That was my question:  if anyone had adapted it for A-, S-items & correlatives.

Chuck Stevenson

unread,
Aug 7, 2015, 5:35:01 PM8/7/15
to Pick and MultiValue Databases
Charlie,

Fwiw, if you ever need it, uv/APP.PROGS is still part of the free UVPE Personal Edition downloadable from Rocket website.

Warmest regards,
cds


On Friday, July 31, 2015 at 1:55:26 PM UTC-6, CWNoah wrote:

Charlie Noah

unread,
Aug 10, 2015, 11:01:50 AM8/10/15
to mvd...@googlegroups.com
Chuck,

The only thing Rocket is offering now is 64 bit, which won't install on my 32 bit Win 7 Pro machine. I can't find APP.PROGS in the install zip file, either. :'(

Best,
Charlie

Tony Gravagno

unread,
Aug 11, 2015, 4:18:16 PM8/11/15
to Pick and MultiValue Databases
Random thoughts....

That seems like a cool utility. In addition for support for A/S would be neat to fit it with ability to process mouseclicks from AccuTerm/wIntegrate, or just use those tools to export data into a GUI grid for easier navigation/selection.

Our industry is full of neat stuff like this, that everyone wants for free, and most people expect the DBMS vendors to provide. I know the OP is looking for a community modified version of the code, and that's great, it's in the right spirit of making use of open source. But most people in this industry simply don't get that concept - modify and share. As an example the DM,BP, source has always been available in AP/D3 but almost no one wants to modify it.

One issue with modification of these routines is that while the source is in there, it is copyrighted by Rocket Software, and as such cannot be published or otherwise distributed. I don't have an issue with that policy, it's entirely their right. But now that Rocket owns U2 and D3, I'm hoping they can publish some guidelines about how that source can be used for the benefit of other U2/D3 users.

And I would hope that Rocket would accept improvements to their code from the field, but in my experience even when provided with code to fix issues, their "Not Invented Here" attitude forces them to move through one release after another with the same bugs and inefficiencies. Seriously, I've modified BP code and passed it back to them but they never seem to be interested. And per the above, I can't publish it, so while the world of FOSS moves forward, I and others are stuck with code that might help to keep others on this platform but we aren't allowed to do anything with it. That's all just frustrating.

I don't know the legality of porting that SHOW code to jBase, Reality, or any other platform, but clarification on that would help as well. People assume that because the source is available that it's FOSS+GPL, etc but that's not true at all. The source is there for the benefit of those who use the platform where the code is provided, not for to benefit those on other platforms.

T

CWNoah

unread,
Aug 11, 2015, 9:37:00 PM8/11/15
to Pick and MultiValue Databases
Hi Tony,

I agree with everything you said, but Rocket does offer the personal edition, just in 64 bit form. I'd really like to get it in 32 bit, because that's what I have. It's a shame it isn't available somewhere, because I've always liked Universe, and could support clients better if I had it.

Charlie

Tony Gravagno

unread,
Aug 11, 2015, 10:39:56 PM8/11/15
to mvd...@googlegroups.com
Charlie, you may be able to install the free vmWare Player on your 32bit system, and then install 64bit OS and DBMS products as guest systems. I was running like that for a long time before I got a 64bit system. (This may require a BIOS setting which "even older" systems may not have.)

As to DBMS providers offering platforms that run on older systems, that's not in line with their goals. They expect end-users to be running on current and adequate hardware, and they expect people who develop over the platform to have adequate resources to create solutions for those end-users. I know we get away with this kind of thing from time to time but not always - my clients can run RAID, dual SCSI, or 12GB of RAM but I don't need that to support them.

So again, you do have a free solution to this specific problem.. A choice not to buy a heftier system is understandable. But it's tougher to support a choice not to go with free solutions.

Best,
T

Ross Ferris

unread,
Aug 16, 2015, 3:52:04 AM8/16/15
to Pick and MultiValue Databases
Are you sure? I didn't think a 32bit VM was capable of running a 64bit guest, thought 64bit VM will happily run a 32 (or maybe even 16) bit guest

Tony Gravagno

unread,
Aug 16, 2015, 2:37:47 PM8/16/15
to Pick and MultiValue Databases
Reply all
Reply to author
Forward
0 new messages