Re: [U2] Upper Case and Editors
I have been following this thread (and some other threads resulting from fairly obvious newcomers to UV/UD) with interest. Being pretty much a newbie to UV myself I'd like to throw in a few comments: Many, if not most, of the regular posters in this list seem to have MANY years of experience in this environment, and are still coding according to habits acquired way back in time. I do not mean this disrespectfully - for those that are happy with using line editors and all upper case, that is the way you work. From a newbie's point of view though - anybody learning UV/UD now most likely will come from a C or Visual Basic background, where (especially in the case of C) almost all coding is done in lower case. Personally I use Delphi a lot, which is also done mostly in lower case. I find it inconvenient to switch to the convention of doing coding in all uppercase, especially as I have made a habit of keeping a separate word processor window open to document programs and changes while I am doing the coding. In between, I also have to provide end-user support to 100+ users in MS Office, Lotus Notes etc., and being of a lazy (and efficient) nature, this is done using VNC. Then I also have my email open all the time, and is constantly checking and replying to messages. With all the above (and more!) happening, I find it annoying having to switch caps-lock all the time - what happens a lot is that I switch to another window and start typing away merrily, only to realise after a couple of words that everything is cASE iNVERTED, or that the help I'm trying to give to a user is not working because of case inversion. As to editing, having become accustomed over the years to the convenience of full-screen editors, and not initially knowing that it was possible to use a full-screen editor to edit BPs, it was a nightmare for me to get the simplest things done in UV. I think there are many other newbies out there that feels the same... Add together to this the naming of things ( a UV ACCOUNT is not a login account, but is similar to a MS SQL database etc.), and it was extremely challenging for me to get to grips with UV - the namings make self-help research difficult. Initially I actually hated UV for this, but I was forced to use it because our core financial system runs on it. After having come to grips with how UV works and interacts, I have come to like and very much respect it for what it can do, but I see many of my initial frustrations echoed in posts from other newcomers. This can possibly steer newcomers to the MV environment away from it - it takes a lot of time and effort to make the switch. As Mr. Glorfield stated in his farewell message, this is most definitely a very helpful and courteous group, but on the odd occasion I have also seen replies posted to obvious newcomers that is given based on years of experience, but without regard to the fact that the newcomer does not actually have the necessary foundation to understand it. The U2UG web site proudly advertises the growing Knowledge Base, but how does one get to it? - for a newcomer, there is no direct link to click (unless I am not looking properly) - surely this will be one of the first ports of call for anybody looking for information. I am prepared to dedicate some personal time to do write-ups (how-tos etc) for newcomers, from the perspective of a newcomer, which can then be vetted by more experienced UV users for correctness - this will be a bit intermittent as I have a lot on my plate though. Is anyone prepared to vet and host such write-ups? For the newcomers out there who read this far - stick to it like a foxterrier to a tennis ball - it will pay of in the end and you will be surprised at the new world that opens up. For the UV longtimers - thanks for all the help and feedback to the group - it is much appreciated! Regards Arnold Bosch IT Administrator Taeuber Corssen SWA (Pty) Ltd Windhoek Namibia Tel +264 (0)61 293 2106 Cell +264 (0)81 124 8625 Fax +264 (0)61 293 2104 Email: [EMAIL PROTECTED] -- --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] Upper Case and Editors
Hi Arnold, I haven't really been following this thread -- I gave up and learned to love THE BOMB years ago (despite coming to UV from a C background). With all the above (and more!) happening, I find it annoying having to switch caps-lock all the time - what happens a lot is that I switch to another window and start typing away merrily, only to realise after a couple of words that everything is cASE iNVERTED, or that the help I'm trying to give to a user is not working because of case inversion. If you are running UV then issuing PTERM -CASE INVERT at TCL or in your LOGIN paragraph will apply case inversion just to the session you are logged into. It might make life simpler for you. Sorry if this was covered elsewhere in the thread. regards, Craig --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] Error in report generation.
In message [EMAIL PROTECTED], Norman Morgan [EMAIL PROTECTED] writes I'm with you on the CAPS issue. I do find the code in caps easier to read. Perhaps I'm just used to it from the first 20 years of my career spent writing COBOL. I think the layout of the code and choice of variable and paragraph names has more to do with readability that whether it is upper or lower case. When I started programming (FORTRAN IV) I was using Newbury terminals (iirc). They didn't have lower case! We got a couple of newer ones that did, that went to the secretaries for wordprocessing, and finally I ended up with a brand new PT45 beehive terminal. That was nice :-) Cheers, Wol -- Anthony W. Youngman [EMAIL PROTECTED] 'Yings, yow graley yin! Suz ae rikt dheu,' said the blue man, taking the thimble. 'What *is* he?' said Magrat. 'They're gnomes,' said Nanny. The man lowered the thimble. 'Pictsies!' Carpe Jugulum, Terry Pratchett 1998 Visit the MaVerick web-site - http://www.maverick-dbms.org Open Source Pick --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] Reports In Universe BASIC
In message [EMAIL PROTECTED], MAJ Programming [EMAIL PROTECTED] writes No offense but what does PRINT ON have to do with PRINTER ON/OFF. They're sorta unrelated. But using PRINT ON means you don't need to use PRINTER ON/OFF Most of my programming always sent reports to print unit 1. That way, whether I used CRT or PRINT was totally irrelevant - they both ALWAYS went to the terminal. I have an issue with the code having PRINTER ON ; PRINT SOMETHING then PRINTER OFF in the body of what is assumed to be a loop. It was replying to someone's report request. As I say, if the user had used PRINT ON 1 SOMETHING, then the PRINTER ON ; PRINTER OFF lines could just have been deleted *completely* as redundant. (Only thing is, it was then wise to finish the program with PRINTER CLOSE ON 1 otherwise your users would be saying where's my print job? Still stuck in the queue as pending and open :-) Oh - and another big advantage for PRINT ON 1 - we had a very obscure bug where output to terminal would occasionally just die, and it was in the system for several years! I eventually discovered the cause - a report program did PRINTER ON at the start, PRINTER OFF at the end, and there was some obscure circumstance where it could exit without falling off the bottom of the code and executing the PRINTER OFF. We knew that was what was happening, because when the printout did appear it had all this crud at the end, but we just couldn't work out HOW it was happening. Especially as the users were dire at telling us what they'd done to cause it :-) Actually, I might have discovered and fixed the bug at the same time as I converted it to PRINT ON 1 to fix the problem ... Cheers, Wol - Original Message - From: Anthony W. Youngman [EMAIL PROTECTED] To: u2-users@listserver.u2ug.org Sent: Tuesday, March 13, 2007 4:45 AM Subject: Re: [U2] Reports In Universe BASIC In message [EMAIL PROTECTED], MAJ Programming [EMAIL PROTECTED] writes Here we go with the wide variety of 'examples'. What is the sanity of PRINTER ON, then PRINT then PRINTER OFF? Should we not be teaching PRINTER ON once and PRINTER OFF at the end? I've only seen the redundant PRINTER ON, then PRINT then PRINTER OFF when the programmer didn't know of CRT and was providing some PRINT @(x,y):ID running dialog. Or what I sometimes did (especially useful when creating two or three reports from a single pass through a file...) PRINT ON 1 ... That was quite often used to generate a full report, summary, and stats, all in one pass. Cheers, Wol -- Anthony W. Youngman [EMAIL PROTECTED] 'Yings, yow graley yin! Suz ae rikt dheu,' said the blue man, taking the thimble. 'What *is* he?' said Magrat. 'They're gnomes,' said Nanny. The man lowered the thimble. 'Pictsies!' Carpe Jugulum, Terry Pratchett 1998 Visit the MaVerick web-site - http://www.maverick-dbms.org Open Source Pick --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ -- Anthony W. Youngman [EMAIL PROTECTED] 'Yings, yow graley yin! Suz ae rikt dheu,' said the blue man, taking the thimble. 'What *is* he?' said Magrat. 'They're gnomes,' said Nanny. The man lowered the thimble. 'Pictsies!' Carpe Jugulum, Terry Pratchett 1998 Visit the MaVerick web-site - http://www.maverick-dbms.org Open Source Pick --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] Upper Case and Editors
Thanks Craig - I'm aware of PTERM -CASE INVERT. Unfortunately updating the LOGIN paragraph is not an option, as it impacts 75+ other users. The best I can do is to manually issue the command each time I get to TCL. So sometimes one has to suffer at the expense of others :-) Regards Arnold -- Craig Bennett [EMAIL PROTECTED] Sent by: [EMAIL PROTECTED] 15/03/2007 11:54 Please respond to u2-users@listserver.u2ug.org To u2-users@listserver.u2ug.org cc Subject Re: [U2] Upper Case and Editors Hi Arnold, I haven't really been following this thread -- I gave up and learned to love THE BOMB years ago (despite coming to UV from a C background). With all the above (and more!) happening, I find it annoying having to switch caps-lock all the time - what happens a lot is that I switch to another window and start typing away merrily, only to realise after a couple of words that everything is cASE iNVERTED, or that the help I'm trying to give to a user is not working because of case inversion. If you are running UV then issuing PTERM -CASE INVERT at TCL or in your LOGIN paragraph will apply case inversion just to the session you are logged into. It might make life simpler for you. Sorry if this was covered elsewhere in the thread. regards, Craig --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] Upper Case and Editors
Arnold Bosch wrote: Thanks Craig - I'm aware of PTERM -CASE INVERT. Unfortunately updating the LOGIN paragraph is not an option, as it impacts 75+ other users. The best I can do is to manually issue the command each time I get to TCL. So sometimes one has to suffer at the expense of others :-) Actually it *is* an option. If you're running on UV, check out variable @LOGNAME and the GOTO statement. You can use the userid, (or other criteria), to branch within paragraphs. -- Allen Egerton aegerton at pobox dot com --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] Reports In Universe BASIC
You CAN teach an old dog new tricks. Given the endless combinations of using the statements, it hadn't occurred to me that PRINT ON automatically prints to the printer as if PRINTER ON were processed. I used PRINT ON twenty years ago for some simultaneous reports that I was creating as new code but hadn't incorporated it into today's use as a lot of reports are pre-existing and run multiple times. You're one of the few people that I've run into that use PRINT ON. Also, I have NEVER run into it in all of my years and systems that I've worked on. Like helping the newbies with MV, I can now add this little tidbit to my mental library of techniques should the need arise. Thanks Mark Johnson - Original Message - From: Anthony W. Youngman [EMAIL PROTECTED] To: u2-users@listserver.u2ug.org Sent: Thursday, March 15, 2007 4:37 AM Subject: Re: [U2] Reports In Universe BASIC In message [EMAIL PROTECTED], MAJ Programming [EMAIL PROTECTED] writes No offense but what does PRINT ON have to do with PRINTER ON/OFF. They're sorta unrelated. But using PRINT ON means you don't need to use PRINTER ON/OFF Most of my programming always sent reports to print unit 1. That way, whether I used CRT or PRINT was totally irrelevant - they both ALWAYS went to the terminal. I have an issue with the code having PRINTER ON ; PRINT SOMETHING then PRINTER OFF in the body of what is assumed to be a loop. It was replying to someone's report request. As I say, if the user had used PRINT ON 1 SOMETHING, then the PRINTER ON ; PRINTER OFF lines could just have been deleted *completely* as redundant. (Only thing is, it was then wise to finish the program with PRINTER CLOSE ON 1 otherwise your users would be saying where's my print job? Still stuck in the queue as pending and open :-) Oh - and another big advantage for PRINT ON 1 - we had a very obscure bug where output to terminal would occasionally just die, and it was in the system for several years! I eventually discovered the cause - a report program did PRINTER ON at the start, PRINTER OFF at the end, and there was some obscure circumstance where it could exit without falling off the bottom of the code and executing the PRINTER OFF. We knew that was what was happening, because when the printout did appear it had all this crud at the end, but we just couldn't work out HOW it was happening. Especially as the users were dire at telling us what they'd done to cause it :-) Actually, I might have discovered and fixed the bug at the same time as I converted it to PRINT ON 1 to fix the problem ... Cheers, Wol - Original Message - From: Anthony W. Youngman [EMAIL PROTECTED] To: u2-users@listserver.u2ug.org Sent: Tuesday, March 13, 2007 4:45 AM Subject: Re: [U2] Reports In Universe BASIC In message [EMAIL PROTECTED], MAJ Programming [EMAIL PROTECTED] writes Here we go with the wide variety of 'examples'. What is the sanity of PRINTER ON, then PRINT then PRINTER OFF? Should we not be teaching PRINTER ON once and PRINTER OFF at the end? I've only seen the redundant PRINTER ON, then PRINT then PRINTER OFF when the programmer didn't know of CRT and was providing some PRINT @(x,y):ID running dialog. Or what I sometimes did (especially useful when creating two or three reports from a single pass through a file...) PRINT ON 1 ... That was quite often used to generate a full report, summary, and stats, all in one pass. Cheers, Wol -- Anthony W. Youngman [EMAIL PROTECTED] 'Yings, yow graley yin! Suz ae rikt dheu,' said the blue man, taking the thimble. 'What *is* he?' said Magrat. 'They're gnomes,' said Nanny. The man lowered the thimble. 'Pictsies!' Carpe Jugulum, Terry Pratchett 1998 Visit the MaVerick web-site - http://www.maverick-dbms.org Open Source Pick --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ -- Anthony W. Youngman [EMAIL PROTECTED] 'Yings, yow graley yin! Suz ae rikt dheu,' said the blue man, taking the thimble. 'What *is* he?' said Magrat. 'They're gnomes,' said Nanny. The man lowered the thimble. 'Pictsies!' Carpe Jugulum, Terry Pratchett 1998 Visit the MaVerick web-site - http://www.maverick-dbms.org Open Source Pick --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] Upper Case and Editors
Such nobility of spirit! Arnold Bosch wrote: Thanks Craig - I'm aware of PTERM -CASE INVERT. Unfortunately updating the LOGIN paragraph is not an option, as it impacts 75+ other users. The best I can do is to manually issue the command each time I get to TCL. So sometimes one has to suffer at the expense of others :-) But you could also sneak something like this into the login paragraph: IF @LOGNAME NE arnold GOTO END.OF.LOGIN PTERM -CASE INVERT END.OF.LOGIN: Craig --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] Upper Case and Editors
Arnold, Brian Leach is the guy to talk to about the Knowledgebase, which would be an excellent place to host any/all how-tos. You can contact himn for details: Brian Leach [EMAIL PROTECTED]. The lack of visibility for the Knowledgebase is being addressed as part of the move to the new website for the U2UG. As to the rest of it, I think you put it beautifully. - Chuck Arnold Bosch wrote: I am prepared to dedicate some personal time to do write-ups (how-tos etc) for newcomers, from the perspective of a newcomer, which can then be vetted by more experienced UV users for correctness - this will be a bit intermittent as I have a lot on my plate though. Is anyone prepared to vet and host such write-ups? -- Charles Barouch ([EMAIL PROTECTED]) www.KeyAlly.com (718) 762-3884 x 1 P. O. Box 540957, Queens, NY 11354 --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
[U2] SQL SUM Function
Hello I have a single value field EX.NUMBER with the following values: KeyEX.NUMBER A 123.45 B 567.89 C 987.65 The result of the following SQL Statement using BCI (UniVerse BASIC SQL Client Interface) is SELECT SUM(EX.NUMBER) FROM YYEXAMPLE USING DICT DYYEXAMPLE; Result: 1679 The result should be 1678.99. The statement PRECISION 4 does not affect the result. Any idea? Kind regards, Marinko --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Upper Case and Editors
You could put an IF @LOGNAME = and fix it in the LOGIN Paragraph for yourself. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of Arnold Bosch Sent: Thursday, March 15, 2007 4:56 AM To: u2-users@listserver.u2ug.org Subject: Re: [U2] Upper Case and Editors Thanks Craig - I'm aware of PTERM -CASE INVERT. Unfortunately updating the LOGIN paragraph is not an option, as it impacts 75+ other users. The best I can do is to manually issue the command each time I get to TCL. So sometimes one has to suffer at the expense of others :-) Regards Arnold -- Craig Bennett [EMAIL PROTECTED] Sent by: [EMAIL PROTECTED] 15/03/2007 11:54 Please respond to u2-users@listserver.u2ug.org To u2-users@listserver.u2ug.org cc Subject Re: [U2] Upper Case and Editors Hi Arnold, I haven't really been following this thread -- I gave up and learned to love THE BOMB years ago (despite coming to UV from a C background). With all the above (and more!) happening, I find it annoying having to switch caps-lock all the time - what happens a lot is that I switch to another window and start typing away merrily, only to realise after a couple of words that everything is cASE iNVERTED, or that the help I'm trying to give to a user is not working because of case inversion. If you are running UV then issuing PTERM -CASE INVERT at TCL or in your LOGIN paragraph will apply case inversion just to the session you are logged into. It might make life simpler for you. Sorry if this was covered elsewhere in the thread. regards, Craig --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] SQL SUM Function
First, what are the INTERNAL values of the fields when you look at them in the editor? Are they 12345, 56789, and 98765? Does the field have a conversion of MD2 or MR22? Second, if they are not, are they something weird like 12345.1, 56789.9, 98765.2? Your conversion code may be hiding fractional amounts on display that would still affect the calculation. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Babic Marinko Sent: Thursday, March 15, 2007 8:45 AM To: u2-users@listserver.u2ug.org Subject: [U2] SQL SUM Function Hello I have a single value field EX.NUMBER with the following values: KeyEX.NUMBER A 123.45 B 567.89 C 987.65 The result of the following SQL Statement using BCI (UniVerse BASIC SQL Client Interface) is SELECT SUM(EX.NUMBER) FROM YYEXAMPLE USING DICT DYYEXAMPLE; Result: 1679 The result should be 1678.99. The statement PRECISION 4 does not affect the result. Any idea? Kind regards, Marinko --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
[U2] Upper Case Only
Within the pick environment there is situation where you are forced to use upper case: List Voc with @id like XREF... and with Type = F The interpreter won't recognize most of this statement. _ Mortgage rates as low as 4.625% - Refinance $150,000 loan for $579 a month. Intro*Terms --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: Spam:Re: [U2] Upper Case and Editors
You can also create a VOC paragraph or sentence with your login ID as the record ID and it will be executed instead of the LOGIN paragraph. - Original Message - From: Arnold Bosch [EMAIL PROTECTED] To: u2-users@listserver.u2ug.org Sent: Thursday, March 15, 2007 5:56 AM Subject: Spam:Re: [U2] Upper Case and Editors Thanks Craig - I'm aware of PTERM -CASE INVERT. Unfortunately updating the LOGIN paragraph is not an option, as it impacts 75+ other users. The best I can do is to manually issue the command each time I get to TCL. So sometimes one has to suffer at the expense of others :-) Regards Arnold -- Craig Bennett [EMAIL PROTECTED] Sent by: [EMAIL PROTECTED] 15/03/2007 11:54 Please respond to u2-users@listserver.u2ug.org To u2-users@listserver.u2ug.org cc Subject Re: [U2] Upper Case and Editors Hi Arnold, I haven't really been following this thread -- I gave up and learned to love THE BOMB years ago (despite coming to UV from a C background). With all the above (and more!) happening, I find it annoying having to switch caps-lock all the time - what happens a lot is that I switch to another window and start typing away merrily, only to realise after a couple of words that everything is cASE iNVERTED, or that the help I'm trying to give to a user is not working because of case inversion. If you are running UV then issuing PTERM -CASE INVERT at TCL or in your LOGIN paragraph will apply case inversion just to the session you are logged into. It might make life simpler for you. Sorry if this was covered elsewhere in the thread. regards, Craig --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] Upper Case and Editors
Add a line to the bottom of your login paragraph: IF @LOGNAME = YOURLOGNAME THEN PTERM -CASE INVERT Arnold Bosch wrote: Thanks Craig - I'm aware of PTERM -CASE INVERT. Unfortunately updating the LOGIN paragraph is not an option, as it impacts 75+ other users. The best I can do is to manually issue the command each time I get to TCL. So sometimes one has to suffer at the expense of others :-) Regards Arnold -- --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: *** GMX Spamverdacht *** [U2] SQL SUM Function
Hi At TCL all calculations are done with whole numbers. Therefore your raw data schould NEVER contain decimal points. I guess the SQL SUM is equivalent to the TOTAL statement in the LIST processor, which would return the same result. As a workaround, you can crate a new dictionary item with a correlative that multiplies the raw value by 100 and an output conversion like MR2, and use that dictionary item for your SQL statement instead of EX.NUMBER. hope that helps Mecki Foerthmann. Babic Marinko schrieb: Hello I have a single value field EX.NUMBER with the following values: KeyEX.NUMBER A 123.45 B 567.89 C 987.65 The result of the following SQL Statement using BCI (UniVerse BASIC SQL Client Interface) is SELECT SUM(EX.NUMBER) FROM YYEXAMPLE USING DICT DYYEXAMPLE; Result: 1679 The result should be 1678.99. The statement PRECISION 4 does not affect the result. Any idea? Kind regards, Marinko --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ ___ Der fr|he Vogel fdngt den Wurm. Hier gelangen Sie zum neuen Yahoo! Mail: http://mail.yahoo.de --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
[U2] DEBUGGER
hi, How do i use Debugger to debug a Universe basic program.RAID command helps me doing that but I need to know how to use a debugger while compiling with DEBUG option. Thanks, Sanjeeb =-=-= Notice: The information contained in this e-mail message and/or attachments to it may contain confidential or privileged information. If you are not the intended recipient, any dissemination, use, review, distribution, printing or copying of the information contained in this e-mail message and/or attachments to it are strictly prohibited. If you have received this communication in error, please notify us by reply e-mail or telephone and immediately and permanently delete the message and any attachments. Thank you --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] Upper Case and Editors
Arnold Well spoken. I think you will find everyone on this list is in agreement. The difficulty is, that U2 is such a broad technology that giving a short answer to a question is often impossible without referring to other knowledge areas - and giving a long answer can be too much for someone to wade through. And for someone trying to get to grips with the technology, the biggest barrier is often knowing where to start. So... One of the priorities the U2U2 board has set itself this year is to build a 'Learner Pack' for new users: this will combine tutorials, examples, a standard demonstration database, some useful tools, references to places they can get help and beefing up the knowledge base. And of course, if anyone on-list wishes to contribute to this effort please contact me! The knowledge base is currently located at: http://www.mvopen.org/cms which is the temporary home (though is seems set in stone at the moment) of the new U2UG website. We would really welcome ALL contributions, they don't need to be expert contributions or Shakepearean commentaries! Regards, Brian --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Reports In Universe BASIC
From: MAJ Programming Like helping the newbies with MV, I can now add this little tidbit to my mental library of techniques should the need arise. Just because one can doesn't mean one should. In the case of PRINT ON working properly without a corresponding PRINTER ON, imagine six months later trying to find all of the programs that are outputting to the printer. Not only do we have to search for procs and paragraphs that start the program with a (P (or LPTR) option, but now in searching through the BP code we have to search for both PRINTER ON and PRINT ON. It's likely that someone will forget one of those options (and possibly a few others I may have missed in this quick post) and overlook a program that should have otherwise been found. As this jihad on upper/lower case has illustrated, there are many ways to skin this U2 cat. And the more ways we as a community use, the harder we make it on ourselves to find something months after the fact. I dream of a day when programmers will have a response other than who was the idiot who wrote this crap? when faced with modifying someone else's program. But alas, if this latest battle is any indication, we're no closer to that day today than we were 20 years ago or possibly even 20 years before that. And then we wonder why our jobs are being shipped overseas? It's pretty obvious, when companies are faced with years and years of obfuscated and unmaintainable code, why not get the same results from someone overseas at a fraction of the price? My intent is not to discourage my friends and esteeemed collegues in this list, but rather to vent some frustration in the knowledge that our communal past may be contributing to a negative impact on our individual futures. As a reasonably focused community (in contrast to the millions of programmers in other environments) we have a real fighting chance at turning this thing around, but if we can't find some common ground on an issue as existentially meaningless as upper/lower case then we shouldn't be surprised when the bottom eventually falls out. -Kevin [EMAIL PROTECTED] http://www.PrecisOnline.com ** Check out scheduled Connect! training courses at http://www.PrecisOnline.com/train.html. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] SQL SUM Function
Check the file dictionary to see if the conversion is set to MD0. If so, the value will round up to 1679. Change it to MD2 and you should get the correct result. Ron Babic Marinko wrote: Hello I have a single value field EX.NUMBER with the following values: KeyEX.NUMBER A 123.45 B 567.89 C 987.65 The result of the following SQL Statement using BCI (UniVerse BASIC SQL Client Interface) is SELECT SUM(EX.NUMBER) FROM YYEXAMPLE USING DICT DYYEXAMPLE; Result: 1679 The result should be 1678.99. The statement PRECISION 4 does not affect the result. Any idea? Kind regards, Marinko --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] SQL SUM Function
Marinko, The U2 database is an integer only system, when it comes to using the inbuilt calculations. Numbers should be normalized using the input and output conversions. For instance, money is stored as total number of cents rather than dollars. The conversion code of MD22 will shift the decimal point two places to the left during display. Cheers, David Murray -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Babic Marinko Sent: Thursday, March 15, 2007 8:45 AM To: u2-users@listserver.u2ug.org Subject: [U2] SQL SUM Function Hello I have a single value field EX.NUMBER with the following values: KeyEX.NUMBER A 123.45 B 567.89 C 987.65 The result of the following SQL Statement using BCI (UniVerse BASIC SQL Client Interface) is SELECT SUM(EX.NUMBER) FROM YYEXAMPLE USING DICT DYYEXAMPLE; Result: 1679 The result should be 1678.99. The statement PRECISION 4 does not affect the result. Any idea? Kind regards, Marinko --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Printing Reports In Universe BASIC
Consider the following Universal UniVerse printer handler... *--- -- *R0 Bill Brutzman Aug.2006 SUBROUTINE PRINTER.SETUP.R2 ( Mode ) *-- Printer.Setup : begin case case Mode = 'Portrait' begin case case @logname = 'jimr' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PACK_3X' case @logname = 'lou' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT DOCK' case @logname = 'rich' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT CUST' case @logname = 'karen'; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT CUST' case @logname = 'maria'; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT CUST' case @logname = 'ed' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT CUST' case @logname = 'mike' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PCNTRL' case @logname = 'jimc' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PCNTRL' case @logname = 'jimt' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PCNTRL' case @logname = 'alex' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PCNTRL' case @logname = 'wayne'; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PCNTRL' case @logname = 'bobs' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT ENG' case Mode = 'LandScape' begin case case @logname = 'jimr' ; execute 'SETPTR ,132,55,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PACK.LAND' case @logname = 'bruce'; execute 'SETPTR ,132,55,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PACK.LAND' case @logname = 'lou' ; execute 'SETPTR ,132,55,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT DOCK.LAND' end case case Mode = 'GreenBar' ; execute 'SETPTR ,132,60,2,0,1,BRIEF,NFMT,AT PR0' case 1 ; execute 'SETPTR ,132,60,2,0,1,BRIEF,NFMT,AT PR0' end case execute 'RESET.PRINTER' PRINTER ON *-- The.End : RETURN END *--- -- I suppose that this would be a little more slick to have a UV file with a table of users and printers. HTH. --Bill -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of Kevin King Sent: Thursday, March 15, 2007 10:06 AM To: u2-users@listserver.u2ug.org Subject: RE: [U2] Reports In Universe BASIC From: MAJ Programming Like helping the newbies with MV, I can now add this little tidbit to my mental library of techniques should the need arise. Just because one can doesn't mean one should. In the case of PRINT ON working properly without a corresponding PRINTER ON, imagine six months later trying to find all of the programs that are outputting to the printer. Not only do we have to search for procs and paragraphs that start the program with a (P (or LPTR) option, but now in searching through the BP code we have to search for both PRINTER ON and PRINT ON. It's likely that someone will forget one of those options (and possibly a few others I may have missed in this quick post) and overlook a program that should have otherwise been found. As this jihad on upper/lower case has illustrated, there are many ways to skin this U2 cat. And the more ways we as a community use, the harder we make it on ourselves to find something months after the fact. I dream of a day when programmers will have a response other than who was the idiot who wrote this crap? when faced with modifying someone else's program. But alas, if this latest battle is any indication, we're no closer to that day today than we were 20 years ago or possibly even 20 years before that. And then we wonder why our jobs are being shipped overseas? It's pretty obvious, when companies are faced with years and years of obfuscated and unmaintainable code, why not get the same results from someone overseas at a fraction of the price? My intent is not to discourage my friends and esteeemed collegues in this list, but rather to vent some frustration in the knowledge that our communal past may be contributing to a negative impact on our individual futures. As a reasonably focused community (in contrast to the millions of programmers in other environments) we have a real fighting chance
Re: Spam:RE: [U2] Reports In Universe BASIC
This situation can be alleviated by setting up certain standards in your company and sticking to them. You don't have to go back and redo your legacy code but any new programs should stick to the new standards. If you need to do some extensive changes to an older program then perhaps you can bring the program up to date with the new standards by rebuilding it. Otherwise keep and modify the older program as it was originally designed. Eventually, if you stick with it, all of the programs will be up to your new standards. Of course, if history is any teacher, in another 5 years those standards will be considered out of date with the new designer software of the day. :-) The following can be alleviated by setting a standard of using PRINT only when printing to a printer and CRT when displaying to a terminal. Then if you want to see which programs are print programs, search for PRINT. Jerry - Original Message - From: Kevin King [EMAIL PROTECTED] To: u2-users@listserver.u2ug.org Sent: Thursday, March 15, 2007 9:06 AM Subject: Spam:RE: [U2] Reports In Universe BASIC Just because one can doesn't mean one should. In the case of PRINT ON working properly without a corresponding PRINTER ON, imagine six months later trying to find all of the programs that are outputting to the printer. Not only do we have to search for procs and paragraphs that start the program with a (P (or LPTR) option, but now in searching through the BP code we have to search for both PRINTER ON and PRINT ON. It's likely that someone will forget one of those --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
[U2] [UD] CALL @progname
I am writing some code that will execute a variable passed in progname using CALL @progname. Question - what is the 'best' way to know that progname exists before I attempt the CALL. I thought about reading the VOC, but if it's globally cataloged, that won't work. I could read the VOC and then the CTLGTB -- but that was two reads just to 'know' the routine wasn't going to blow up. Is there a more efficient or systemic way to do this? **Typically** progname will reference a real program, so this testing is 'overhead' for 99.9% of the time - but if someone were to pass in a bad 'progname', I want to be more graceful (and secure!) just falling over. Since some of the calls will come from 'web connected' clients, and some of the clients may not know for sure that the host cannot handle the request - if the client has a different function list than the host at that point and time... I'm just trying to plan for 'worst case'. How do others handle CALL @ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re:[U2] Upper Case Only
Hi, the Pick environment will not recognize non-ECL-type P statements, in your case *with @id like XREF...*, when you type the statement in lower case, because in the Pick environment the proper syntax would be IIRC *with @id = XREF:]* I think it works the other way round too. Mecki Ron Hutchings schrieb: Within the pick environment there is situation where you are forced to use upper case: List Voc with @id like XREF... and with Type = F The interpreter won't recognize most of this statement. _ Mortgage rates as low as 4.625% - Refinance $150,000 loan for $579 a month. Intro*Terms --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ ___ Telefonate ohne weitere Kosten vom PC zum PC: http://messenger.yahoo.de --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
AW: [U2] SQL SUM Function
Hello Ron You are right. I tested it now with MR22 and it works :-) Thanks, Marinko -Urspr|ngliche Nachricht- Von: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Im Auftrag von Ron White Gesendet: Donnerstag, 15. Mdrz 2007 14:14 An: u2-users@listserver.u2ug.org Betreff: Re: [U2] SQL SUM Function Check the file dictionary to see if the conversion is set to MD0. If so, the value will round up to 1679. Change it to MD2 and you should get the correct result. Ron Babic Marinko wrote: Hello I have a single value field EX.NUMBER with the following values: KeyEX.NUMBER A 123.45 B 567.89 C 987.65 The result of the following SQL Statement using BCI (UniVerse BASIC SQL Client Interface) is SELECT SUM(EX.NUMBER) FROM YYEXAMPLE USING DICT DYYEXAMPLE; Result: 1679 The result should be 1678.99. The statement PRECISION 4 does not affect the result. Any idea? Kind regards, Marinko --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: Spam:RE: [U2] Printing Reports In Universe BASIC
We use a user setup file with parameters for each user. The id's for the file are the user's login id. We store the users default parameters in the file. We have a program that reads the file when the user logs in for some things and other programs that use other features in the file. The file contains information about the user including their security level on programs, letter signature, department, employee number, what menu comes up when they log in, and which printer they use; among other things. That way it is not hard coded in any program like that below. If a user is added or deleted then the programs that use the information don't have to be modified. They are just added or deleted from the table (actually moved to an inactive user table for historical reference or the off chance they return). Jerry - Original Message - From: Brutzman, Bill [EMAIL PROTECTED] To: u2-users@listserver.u2ug.org Sent: Thursday, March 15, 2007 11:04 AM Subject: Spam:RE: [U2] Printing Reports In Universe BASIC Consider the following Universal UniVerse printer handler... *--- -- *R0 Bill Brutzman Aug.2006 SUBROUTINE PRINTER.SETUP.R2 ( Mode ) *-- Printer.Setup : begin case case Mode = 'Portrait' begin case case @logname = 'jimr' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PACK_3X' case @logname = 'lou' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT DOCK' case @logname = 'rich' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT CUST' case @logname = 'karen'; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT CUST' case @logname = 'maria'; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT CUST' case @logname = 'ed' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT CUST' case @logname = 'mike' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PCNTRL' case @logname = 'jimc' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PCNTRL' case @logname = 'jimt' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PCNTRL' case @logname = 'alex' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PCNTRL' case @logname = 'wayne'; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PCNTRL' case @logname = 'bobs' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT ENG' case Mode = 'LandScape' begin case case @logname = 'jimr' ; execute 'SETPTR ,132,55,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PACK.LAND' case @logname = 'bruce'; execute 'SETPTR ,132,55,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PACK.LAND' case @logname = 'lou' ; execute 'SETPTR ,132,55,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT DOCK.LAND' end case case Mode = 'GreenBar' ; execute 'SETPTR ,132,60,2,0,1,BRIEF,NFMT,AT PR0' case 1 ; execute 'SETPTR ,132,60,2,0,1,BRIEF,NFMT,AT PR0' end case execute 'RESET.PRINTER' PRINTER ON *-- The.End : RETURN END *--- -- I suppose that this would be a little more slick to have a UV file with a table of users and printers. HTH. --Bill -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of Kevin King Sent: Thursday, March 15, 2007 10:06 AM To: u2-users@listserver.u2ug.org Subject: RE: [U2] Reports In Universe BASIC From: MAJ Programming Like helping the newbies with MV, I can now add this little tidbit to my mental library of techniques should the need arise. Just because one can doesn't mean one should. In the case of PRINT ON working properly without a corresponding PRINTER ON, imagine six months later trying to find all of the programs that are outputting to the printer. Not only do we have to search for procs and paragraphs that start the program with a (P (or LPTR) option, but now in searching through the BP code we have to search for both PRINTER ON and PRINT ON. It's likely that someone will forget one of those options (and possibly a few others I may have missed in this quick post) and overlook a program that should have otherwise been found. As this jihad on upper/lower case has illustrated, there are many ways to skin this U2 cat. And the more ways we as a community use, the harder we make it on ourselves to find something months after the fact. I dream of a day when programmers will have a response other than who was the idiot who wrote this crap?
RE: [U2] [UD] CALL @progname
We do this all of the time for our EDI mapping. Since our code is all in 1 file, it is easy. PROG.NAME = JLSH.EDI.OUT856 READV X FROM PROGFILE,_:PROG.NAME:.:EDI.TPNAME, 1 THEN PROG.NAME = PROG.NAME:.:EDI.TPNAME END Obviously if your source code exists in multiple files, you would need logic to determine (and open if necessary) which file to look in. Notice all CAPS, 23 years (although I am open both conventions). UD 6 HP/UX Vance Alspach J L Industrial Supply An MSC Company -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of David Wolverton Sent: Thursday, March 15, 2007 11:20 AM To: u2-users@listserver.u2ug.org Subject: [U2] [UD] CALL @progname I am writing some code that will execute a variable passed in progname using CALL @progname. Question - what is the 'best' way to know that progname exists before I attempt the CALL. I thought about reading the VOC, but if it's globally cataloged, that won't work. I could read the VOC and then the CTLGTB -- but that was two reads just to 'know' the routine wasn't going to blow up. Is there a more efficient or systemic way to do this? **Typically** progname will reference a real program, so this testing is 'overhead' for 99.9% of the time - but if someone were to pass in a bad 'progname', I want to be more graceful (and secure!) just falling over. Since some of the calls will come from 'web connected' clients, and some of the clients may not know for sure that the host cannot handle the request - if the client has a different function list than the host at that point and time... I'm just trying to plan for 'worst case'. How do others handle CALL @ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ This e-mail is intended for the use of the addressee(s) only and may contain privileged, confidential, or proprietary information that is exempt from disclosure under law. If you are not the intended recipient, please do not read, copy, use or disclose the contents of this communication to others. Please notify the sender that you have received this e-mail in error by replying to the e-mail. Please then delete the e-mail and destroy any copies of it. Thank you. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Help with File Pointers
If you are trying to determine that two files are pointing to the same thing, you could set a lock on one and try to set it on the other. If it will not let you do it, then you have the same file. ( note that my first thought was to write an item, but that could cause problems if anyone else was using the file. ) give the lock a unique name like testingFilePointerTestProgram so you don't have issues with existing data. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] DEBUGGER
You don't compile with the DEBUG option. The Universe Debugger is an interactive debugger that you run the program inside of. It's more of an editor/debugger than just a debugger. Load the program you want to debug then use the stepping options to move from line to line and view the contents of variables in the watch window. I always start with the F8 key then set the stop/break points I want. Word of caution, if you have set some break points then make a change to your source code and compile, your preset break points may not behave as you wish. I always clear my break points before running a debug session to make sure the processing stops on the line I want. Also, DEBUG statements in your source code do not affect the debugger. It just skips right over them. HTH BobW -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Sanjeebkumar Sarangi Sent: Thursday, March 15, 2007 6:45 AM To: u2-users@listserver.u2ug.org Subject: [U2] DEBUGGER hi, How do i use Debugger to debug a Universe basic program.RAID command helps me doing that but I need to know how to use a debugger while compiling with DEBUG option. Thanks, Sanjeeb --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] [UD] CALL @progname
From David Wolverton How do others handle CALL @ As you've pointed out, there's no really good way to do this, at least not one that's easy AND portable. So what about this idea? Create a configuration record or file that has information for all of the methods you know about, then verify against that file? That way you have the control to ensure that all the methods are installed, you have a quick and simple way of checking for a valid method, and could even translate a method name into a valid subroutine with a different name if you so chose. -Kevin [EMAIL PROTECTED] http://www.PrecisOnline.com ** Check out scheduled Connect! training courses at http://www.PrecisOnline.com/train.html. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] [UD] CALL @progname
This test shows the compiled source code exists - not that it's cataloged. If the VOC or CTLGTB were missing, the code shown would still allow the CALL @subroutine to fail. And I had not thought about checking that the compiled code existed! I guess it could happen that the VOC pointer is there, but the compiled code is not? You just added something else for me to check! I wanted simpler! ;-) -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Vance E Alspach (JL - SFD) Sent: Thursday, March 15, 2007 10:50 AM To: u2-users@listserver.u2ug.org Subject: RE: [U2] [UD] CALL @progname We do this all of the time for our EDI mapping. Since our code is all in 1 file, it is easy. PROG.NAME = JLSH.EDI.OUT856 READV X FROM PROGFILE,_:PROG.NAME:.:EDI.TPNAME, 1 THEN PROG.NAME = PROG.NAME:.:EDI.TPNAME END Obviously if your source code exists in multiple files, you would need logic to determine (and open if necessary) which file to look in. Notice all CAPS, 23 years (although I am open both conventions). UD 6 HP/UX Vance Alspach J L Industrial Supply An MSC Company --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] [UD] CALL @progname
David, @CALL's are very inefficient and slow. It would be worth doing a speed test. Also, it might be prudent to have significant control over an external process calling an internal one. This is the source of many a virus on MS-Windows. I have used a CASE statement to check a variable and call the appropriate routine. This way, only processes which have been tested and approved can be called by the external process. Cheers, David Murray -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of David Wolverton Sent: Thursday, March 15, 2007 11:20 AM To: u2-users@listserver.u2ug.org Subject: [U2] [UD] CALL @progname I am writing some code that will execute a variable passed in progname using CALL @progname. Question - what is the 'best' way to know that progname exists before I attempt the CALL. I thought about reading the VOC, but if it's globally cataloged, that won't work. I could read the VOC and then the CTLGTB -- but that was two reads just to 'know' the routine wasn't going to blow up. Is there a more efficient or systemic way to do this? **Typically** progname will reference a real program, so this testing is 'overhead' for 99.9% of the time - but if someone were to pass in a bad 'progname', I want to be more graceful (and secure!) just falling over. Since some of the calls will come from 'web connected' clients, and some of the clients may not know for sure that the host cannot handle the request - if the client has a different function list than the host at that point and time... I'm just trying to plan for 'worst case'. How do others handle CALL @ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Help with File Pointers
But doesn't the locking let the same session set the same lock many times? BobW -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Michael Rajkowski Sent: Thursday, March 15, 2007 7:52 AM To: u2-users@listserver.u2ug.org Cc: [EMAIL PROTECTED]; u2-users@listserver.u2ug.org Subject: RE: [U2] Help with File Pointers If you are trying to determine that two files are pointing to the same thing, you could set a lock on one and try to set it on the other. If it will not let you do it, then you have the same file. ( note that my first thought was to write an item, but that could cause problems if anyone else was using the file. ) give the lock a unique name like testingFilePointerTestProgram so you don't have issues with existing data. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Upper Case and Editors
If you don't want to change the LOGIN paragraph for everyone, create a VOC entry with your login name, universe will run it first, if you want it to still run the LOGIN after than then make that call in your login name... Example - Login name = YOURNAME .L YOURNAME YOURNAME 001 PA 002 DISPLAY WE ARE RUNNING IN YOURNANE 003 PTERM -CASE INVERT 003 LOGIN When you log in with YOURNAME it will run the YOURNAME paragraph if it exists, if it does not exist it will run the LOGIN... Ron Sage Senior Systems Developer -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Jeff Schasny Sent: Thursday, March 15, 2007 9:44 AM To: u2-users@listserver.u2ug.org Subject: Re: [U2] Upper Case and Editors Add a line to the bottom of your login paragraph: IF @LOGNAME = YOURLOGNAME THEN PTERM -CASE INVERT Arnold Bosch wrote: Thanks Craig - I'm aware of PTERM -CASE INVERT. Unfortunately updating the LOGIN paragraph is not an option, as it impacts 75+ other users. The best I can do is to manually issue the command each time I get to TCL. So sometimes one has to suffer at the expense of others :-) Regards Arnold -- --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] [UD] CALL @progname
If you were going to cover all the possible bases, you would need to do the: 1. VOC 2. OPEN 'CTLG' and read that. This covers 'LOCAL' catalogs 3. CREATE a temporary VOC entry where att1 is 'DIR' att2 is @UDTHOME/sys/CTLG/(first letter of program name) OPEN this file and read using program name as the Key Hoepfully somebody will come up with something simpiliar. But these are the three places I know of where object code can live. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of David Wolverton Sent: Thursday, March 15, 2007 9:20 AM To: u2-users@listserver.u2ug.org Subject: [U2] [UD] CALL @progname I am writing some code that will execute a variable passed in progname using CALL @progname. Question - what is the 'best' way to know that progname exists before I attempt the CALL. I thought about reading the VOC, but if it's globally cataloged, that won't work. I could read the VOC and then the CTLGTB -- but that was two reads just to 'know' the routine wasn't going to blow up. Is there a more efficient or systemic way to do this? **Typically** progname will reference a real program, so this testing is 'overhead' for 99.9% of the time - but if someone were to pass in a bad 'progname', I want to be more graceful (and secure!) just falling over. Since some of the calls will come from 'web connected' clients, and some of the clients may not know for sure that the host cannot handle the request - if the client has a different function list than the host at that point and time... I'm just trying to plan for 'worst case'. How do others handle CALL @ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] [UD] CALL @progname
Actually - I just ran a test, and was surprised somewhat: 1,000,000 Iterations of ways to do a call... CALL PROGNAME (direct)7047 CALL *PROGNAME (global)7766 CALL @PROGNAME (indirect) 6984 GOSUB (logic contained in-line)1531 Call as Function 10203 I've rearranged the order the routines are called in, and run the test suite over and over... The Indirect calls are CLEARLY faster, with all numbers moving +/- 50, EXCEPT the indirect, which only moved +/- 25 or so. Note that I set the @PROGNAME outside of the call loop - this was not testing how fast the system could set variables - just the difference on the 'calls'. If I include the setting of the name WITHIN the loop, the indirect call went to 7290 or so -- the difference in the 'direct' call vs the 'indirect' call efficiency appears to be in the Variable handling! But both are still faster than use of Global catalogs. Anyone have a clue why the indirects are a hair faster? Or am I just getting lucky over and over? I always thought they were slower as well! DW -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of David Murray Sent: Thursday, March 15, 2007 11:32 AM To: u2-users@listserver.u2ug.org Subject: RE: [U2] [UD] CALL @progname David, @CALL's are very inefficient and slow. It would be worth doing a speed test. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] DEBUGGER
Sanjeeb As with everything in UniVerse there is more than one way to use it! There are two debugger environments - the client/server UniDebugger application, and the regular debugger in your UniVerse command session (TCL). To enter the debugger in TCL you can either: a) include a DEBUG statement in the code. The program will stop there and enter the debugger. Just remember to remove that when you recompile! b) press your break key whilst running the program (usually Ctrl-C) and select the 'D' option when you are given the break options. You can set the value of the break key by typing: PTERM INTR followed by the key you wish to choose (e.g. Ctrl-C or Ctrl-X). Brian hi, How do i use Debugger to debug a Universe basic program.RAID command helps me doing that but I need to know how to use a debugger while compiling with DEBUG option. Thanks, Sanjeeb --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Upper Case and Editors
Arnold: One can only hope the more experienced engineers of the U2 products are listening. One work-around after another make life more difficult not less. In the 21st century a solution would be helpful. Case sensitivity is a blight on the landscape of computing perpetuated by systems whose history was written by two-fingured typists and engineering challenged equipment. Someone mentioned recently the caps limitations of Prism terminals, as though typewriters haven't been around since the beginning of the 20th century and, certainly, noone had ever learned to use such contraptions. :-) Bill -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Arnold Bosch Sent: Thursday, March 15, 2007 12:38 AM To: u2-users@listserver.u2ug.org Subject: Re: [U2] Upper Case and Editors [snipped] ...I find it annoying having to switch caps-lock all the time - what happens a lot is that I switch to another window and start typing away merrily, only to realise after a couple of words that everything is cASE iNVERTED, or that the help I'm trying to give to a user is not working because of case inversion. As to editing, having become accustomed over the years to the convenience of full-screen editors, and not initially knowing that it was possible to use a full-screen editor to edit BPs, it was a nightmare for me to get the simplest things done in UV. I think there are many other newbies out there that feels the same... [snipped] --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] [UD] CALL @progname
Inefficient, but I check for Direct, Local and/or Global. Here is the subroutine that I use, which you can see has three opens. On the positive side, this has not failed me since I started using it. (Hopefully, there are no typos in this.) SUBROUTINE VERIFY.PROGRAM(PROGRAM.NAME,CATALOG.TYPE,CATALOG.PATH) * * Open files, initialize variables * OPEN 'CTLG' TO F.CTLG ELSE STOP 201,'CTLG' OPEN 'CTLGTB' TO F.CTLGTB ELSE STOP 201,'CTLGTB' OPEN 'VOC' TO F.VOC ELSE STOP 201,'VOC' CATALOG.TYPE = '' CATALOG.PATH = '' * * Check for a voc entry * READ VOC.REC FROM F.VOC,PROGRAM.NAME THEN IF VOC.REC1 = 'C' THEN OBJECT.PATH = VOC.REC2 NUM.FIELDS = COUNT(OBJECT.PATH,'/') + 1 * * Check to see if this is a direct catalog * OBJECT.NAME = FIELD(OBJECT.PATH,'/',NUM.FIELDS) OBJECT.FILE = FIELD(OBJECT.PATH,'/',NUM.FIELDS - 1) IF OBJECT.NAME = '_':PROGRAM.NAME AND OBJECT.FILE # CTLG THEN CATALOG.TYPE-1 = 'Direct' CATALOG.PATH-1 = OBJECT.PATH END * * Look in the CTLG file, indicates local catalog * (This could be deceiving if the direct catalog exists.) * READV EXISTS FROM F.CTLG,PROGRAM.NAME,0 THEN CATALOG.TYPE-1 = 'Local' IF VOC.REC3 # '' THEN OBJECT.PATH := ' - ':VOC.REC3 END CATALOG.PATH-1 = OBJECT.PATH END END END ELSE * * Look in the CTLG file, indicates a local catalog, but no * corresponding voc record. This is probably an error, since * without a voc record, I don't think you can call the program. * READV EXISTS FROM F.CTLG,PROGRAM.NAME,0 THEN CATALOG.TYPE-1 = 'Local?' CATALOG.PATH-1 = PROGRAM.NAME END END * * Look in the global catalog directory for the program name * READ CTLGTB.REC FROM F.CTLGTB,PROGRAM.NAME THEN CATALOG.TYPE-1 = 'Global' CATALOG.PATH-1 = CTLGTB.REC3 END RETURN -- Charlie Rubeor Senior Database Administrator Wiremold/Legrand 60 Woodlawn Street West Hartford, CT 06110 Tel: 860-233-6251 x3498 Fax: 860-523-3690 Email: [EMAIL PROTECTED] -- --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Help with File Pointers
Good point, so release it on the other file pointer, and then look at the locktable to see if it is gone. Bob Woodward [EMAIL PROTECTED] sale.com To Sent by: u2-users@listserver.u2ug.org [EMAIL PROTECTED] cc stserver.u2ug.org Subject RE: [U2] Help with File Pointers 03/15/2007 10:40 AM Please respond to [EMAIL PROTECTED] er.u2ug.org But doesn't the locking let the same session set the same lock many times? BobW -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Michael Rajkowski Sent: Thursday, March 15, 2007 7:52 AM To: u2-users@listserver.u2ug.org Cc: [EMAIL PROTECTED]; u2-users@listserver.u2ug.org Subject: RE: [U2] Help with File Pointers If you are trying to determine that two files are pointing to the same thing, you could set a lock on one and try to set it on the other. If it will not let you do it, then you have the same file. ( note that my first thought was to write an item, but that could cause problems if anyone else was using the file. ) give the lock a unique name like testingFilePointerTestProgram so you don't have issues with existing data. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ [demime 1.01d removed an attachment of type image/gif which had a name of graycol.gif] [demime 1.01d removed an attachment of type image/gif which had a name of pic22882.gif] [demime 1.01d removed an attachment of type image/gif which had a name of ecblank.gif] --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Help with File Pointers
Another thing you can try is something like this: 001: * 002: OPEN CUSTOMER TO FILEONE ELSE STOP 003: OPEN MYCUSTOMER TO FILETWO ELSE STOP 004: * 005: READU REC FROM FILEONE, MIKETEST ELSE REC = 006: STATUS = RECORDLOCKED(FILETWO, MIKETEST ) 007: PRINT STATUS Note that the RECORDLOCKED function will 0 if not locked, so if 0 no lock, and different files. Bob Woodward [EMAIL PROTECTED] sale.com To Sent by: u2-users@listserver.u2ug.org [EMAIL PROTECTED] cc stserver.u2ug.org Subject RE: [U2] Help with File Pointers 03/15/2007 10:40 AM Please respond to [EMAIL PROTECTED] er.u2ug.org But doesn't the locking let the same session set the same lock many times? BobW -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Michael Rajkowski Sent: Thursday, March 15, 2007 7:52 AM To: u2-users@listserver.u2ug.org Cc: [EMAIL PROTECTED]; u2-users@listserver.u2ug.org Subject: RE: [U2] Help with File Pointers If you are trying to determine that two files are pointing to the same thing, you could set a lock on one and try to set it on the other. If it will not let you do it, then you have the same file. ( note that my first thought was to write an item, but that could cause problems if anyone else was using the file. ) give the lock a unique name like testingFilePointerTestProgram so you don't have issues with existing data. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ [demime 1.01d removed an attachment of type image/gif which had a name of graycol.gif] [demime 1.01d removed an attachment of type image/gif which had a name of pic04151.gif] [demime 1.01d removed an attachment of type image/gif which had a name of ecblank.gif] --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] [UD] CALL @progname
David, The HELP BASIC CALL help info explains how the CALL and CALL@ work. The variable setting should be included in the loop as it is a valid part of the CALL@ setup. Setting the variable will 'trigger' the CALL@ to find the program again. It is more of a real-life situation than setting the variable out of the loop. Nevertheless, it is interesting results, as CALL@ used to be rather slow. But debugging will be very stressful with [EMAIL PROTECTED] As a side note, I am finding similar zero-speed differences between dynamic and static array usages in large array's. The internals of U2 must be getting more interesting... Cheers, David Murray -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of David Wolverton Sent: Thursday, March 15, 2007 1:50 PM To: u2-users@listserver.u2ug.org Subject: RE: [U2] [UD] CALL @progname Actually - I just ran a test, and was surprised somewhat: 1,000,000 Iterations of ways to do a call... CALL PROGNAME (direct)7047 CALL *PROGNAME (global)7766 CALL @PROGNAME (indirect) 6984 GOSUB (logic contained in-line)1531 Call as Function 10203 I've rearranged the order the routines are called in, and run the test suite over and over... The Indirect calls are CLEARLY faster, with all numbers moving +/- 50, EXCEPT the indirect, which only moved +/- 25 or so. Note that I set the @PROGNAME outside of the call loop - this was not testing how fast the system could set variables - just the difference on the 'calls'. If I include the setting of the name WITHIN the loop, the indirect call went to 7290 or so -- the difference in the 'direct' call vs the 'indirect' call efficiency appears to be in the Variable handling! But both are still faster than use of Global catalogs. Anyone have a clue why the indirects are a hair faster? Or am I just getting lucky over and over? I always thought they were slower as well! DW -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of David Murray Sent: Thursday, March 15, 2007 11:32 AM To: u2-users@listserver.u2ug.org Subject: RE: [U2] [UD] CALL @progname David, @CALL's are very inefficient and slow. It would be worth doing a speed test. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] [UD] CALL @progname
David Wolverton wrote: snip Anyone have a clue why the indirects are a hair faster? Or am I just getting lucky over and over? I always thought they were slower as well! In Prime's implementation, which I *believe* was carried over to Universe, the *first* reference to @PROGNAME has to resolve the reference. Which means that it looks up the address that the routine's loaded into. Every subsequent reference uses the already resolved reference. Which is *fast*. So, the programming practice is to define it, snap the link the first time you call it, then keep calling it. Minimal overhead, and gives you a great deal of flexibility in coding. An example of the flexibility would be: BEGIN CASE CASE COMPANY EQ COMPANY.1 INVOICE.RTN = INVOICE.RTN.COMPANY.1 CASE COMPANY EQ COMPANY.2 INVOICE.RTN = INVOICE.RTN.COMPANY.2 CASE 1 INVOICE.RTN = INVOICE.RTN.GENERIC END CASE CALL @INVOICE.RTN (argument list) -- Allen Egerton aegerton at pobox dot com --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Upper Case Only
Ron: In PICK mode there is no LIKE keyword. Comparisons use the normal =, #, etc operators. So your example should be: LIST VOC WITH @ID = XREF] AND WITH TYPE = F ...or LIST VOC = XREF] WITH TYPE = F (notice the upper-casing) :-) Hope this helps. Bill Ron Hutchings wrote... Within the pick environment there is situation where you are forced to use upper case: List Voc with @id like XREF... and with Type = F The interpreter won't recognize most of this statement. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: Spam:RE: [U2] Universe/UniObjects and Visual Studio
Hello all, I worked through Brian's tutorial he mentions below and found it MUCH more helpful than anything else I have found so far. I am having one issue that I will work through shortly. The cmd.GenerateXML is not working with my test system according to the error due to my version of Universe (10.1.12). I am setting up a test environment on my laptop with 10.2 and will see if that helps. I was, however, able to create a VB program that accessed my Universe database and updated it. Success!!! Made it through page 19 of 24 and updated data with no issues and full understanding. Thanks, Brian, for shedding light on the subject. I am going to go through the knowledge base and see if there are more toys with which to play. Thanks to all who contribute to the list and the website!! -Leslie Chamberlin -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of [EMAIL PROTECTED] Sent: Monday, March 12, 2007 3:42 AM To: u2-users@listserver.u2ug.org Subject: Spam:RE: [U2] Universe/UniObjects and Visual Studio Anthony there is a tutorial on using UniObjects with VB Express on the U2UG Knowledge Base. Check out : www.mvopen.org/cms and click the Knowledge Base link. Regards, Brian Hi guys, I am messing with Visual Basic Express edition. I was hoping to use UniObjects against my Universe Database. The examples in the UniObjects Developers Guide are a little outdated. How do I get the UniObjects to appear in the toolbar (if you can do this) ? They refer to Sub Form_Load, which I have seen in older versions of VB, but not VB 2005. Basically what I am looking for is a 'quick fix' for the 5 minute program example in the Developers Guide that has already taken me beyond that time frame. Thanks Anthony -- No virus found in this outgoing message. Checked by AVG Free Edition. Version: 7.5.446 / Virus Database: 268.18.8/716 - Release Date: 3/9/2007 6:53 PM --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: Spam:RE: [U2] Universe/UniObjects and Visual Studio
Leslie HTH I did some poking around earlier and found that the GenerateXML actually seems to call down to a subroutine named GETXMLSUB held in the BP file of the uv account. On some 10.1 versions it is present, but not cataloged: I found when I added it to global catalog as *GETXMLSUB it worked fine for me, though I guess it's not officially supported at that release. It might be worth giving it a try. Brian -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of leslie chamberlin Sent: 15 March 2007 19:12 To: u2-users@listserver.u2ug.org Subject: RE: Spam:RE: [U2] Universe/UniObjects and Visual Studio Hello all, I worked through Brian's tutorial he mentions below and found it MUCH more helpful than anything else I have found so far. I am having one issue that I will work through shortly. The cmd.GenerateXML is not working with my test system according to the error due to my version of Universe (10.1.12). I am setting up a test environment on my laptop with 10.2 and will see if that helps. I was, however, able to create a VB program that accessed my Universe database and updated it. Success!!! Made it through page 19 of 24 and updated data with no issues and full understanding. Thanks, Brian, for shedding light on the subject. I am going to go through the knowledge base and see if there are more toys with which to play. Thanks to all who contribute to the list and the website!! -Leslie Chamberlin --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] [UD] CALL @progname
Duh duh duh (slaps forehead). I missed the UD bit in the subject line. Apologies. Brian -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Brian Leach Sent: 15 March 2007 20:38 To: u2-users@listserver.u2ug.org Subject: RE: [U2] [UD] CALL @progname David If you look at the MAP command, globally cataloged programs keep track of the number of times they have been run since being cataloged. That suggests that their headers are updated when they are called, which would explain why they are slower. Normally UniVerse cached subroutine object in memory for efficiency until you return to TCL. But I really don't understand why a function is slower. Are you actually using a FUNCTION or a DEFFUN ...CALLING construct? Brian -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of David Wolverton Sent: 15 March 2007 17:50 To: u2-users@listserver.u2ug.org Subject: RE: [U2] [UD] CALL @progname Actually - I just ran a test, and was surprised somewhat: 1,000,000 Iterations of ways to do a call... CALL PROGNAME (direct)7047 CALL *PROGNAME (global)7766 CALL @PROGNAME (indirect) 6984 GOSUB (logic contained in-line)1531 Call as Function 10203 I've rearranged the order the routines are called in, and run the test suite over and over... The Indirect calls are CLEARLY faster, with all numbers moving +/- 50, EXCEPT the indirect, which only moved +/- 25 or so. Note that I set the @PROGNAME outside of the call loop - this was not testing how fast the system could set variables - just the difference on the 'calls'. If I include the setting of the name WITHIN the loop, the indirect call went to 7290 or so -- the difference in the 'direct' call vs the 'indirect' call efficiency appears to be in the Variable handling! But both are still faster than use of Global catalogs. Anyone have a clue why the indirects are a hair faster? Or am I just getting lucky over and over? I always thought they were slower as well! DW -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of David Murray Sent: Thursday, March 15, 2007 11:32 AM To: u2-users@listserver.u2ug.org Subject: RE: [U2] [UD] CALL @progname David, @CALL's are very inefficient and slow. It would be worth doing a speed test. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] [UD] CALL @progname
David If you look at the MAP command, globally cataloged programs keep track of the number of times they have been run since being cataloged. That suggests that their headers are updated when they are called, which would explain why they are slower. Normally UniVerse cached subroutine object in memory for efficiency until you return to TCL. But I really don't understand why a function is slower. Are you actually using a FUNCTION or a DEFFUN ...CALLING construct? Brian -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of David Wolverton Sent: 15 March 2007 17:50 To: u2-users@listserver.u2ug.org Subject: RE: [U2] [UD] CALL @progname Actually - I just ran a test, and was surprised somewhat: 1,000,000 Iterations of ways to do a call... CALL PROGNAME (direct)7047 CALL *PROGNAME (global)7766 CALL @PROGNAME (indirect) 6984 GOSUB (logic contained in-line)1531 Call as Function 10203 I've rearranged the order the routines are called in, and run the test suite over and over... The Indirect calls are CLEARLY faster, with all numbers moving +/- 50, EXCEPT the indirect, which only moved +/- 25 or so. Note that I set the @PROGNAME outside of the call loop - this was not testing how fast the system could set variables - just the difference on the 'calls'. If I include the setting of the name WITHIN the loop, the indirect call went to 7290 or so -- the difference in the 'direct' call vs the 'indirect' call efficiency appears to be in the Variable handling! But both are still faster than use of Global catalogs. Anyone have a clue why the indirects are a hair faster? Or am I just getting lucky over and over? I always thought they were slower as well! DW -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of David Murray Sent: Thursday, March 15, 2007 11:32 AM To: u2-users@listserver.u2ug.org Subject: RE: [U2] [UD] CALL @progname David, @CALL's are very inefficient and slow. It would be worth doing a speed test. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Universe/UniObjects and Visual Studio
IMHO, You rock, Brian!! That did the trick. Now off to play with other new toys.. thanks so much -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Brian Leach Sent: Thursday, March 15, 2007 3:28 PM To: u2-users@listserver.u2ug.org Subject: Spam:RE: Spam:RE: [U2] Universe/UniObjects and Visual Studio Leslie HTH I did some poking around earlier and found that the GenerateXML actually seems to call down to a subroutine named GETXMLSUB held in the BP file of the uv account. On some 10.1 versions it is present, but not cataloged: I found when I added it to global catalog as *GETXMLSUB it worked fine for me, though I guess it's not officially supported at that release. It might be worth giving it a try. Brian -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of leslie chamberlin Sent: 15 March 2007 19:12 To: u2-users@listserver.u2ug.org Subject: RE: Spam:RE: [U2] Universe/UniObjects and Visual Studio Hello all, I worked through Brian's tutorial he mentions below and found it MUCH more helpful than anything else I have found so far. I am having one issue that I will work through shortly. The cmd.GenerateXML is not working with my test system according to the error due to my version of Universe (10.1.12). I am setting up a test environment on my laptop with 10.2 and will see if that helps. I was, however, able to create a VB program that accessed my Universe database and updated it. Success!!! Made it through page 19 of 24 and updated data with no issues and full understanding. Thanks, Brian, for shedding light on the subject. I am going to go through the knowledge base and see if there are more toys with which to play. Thanks to all who contribute to the list and the website!! -Leslie Chamberlin --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Upper Case Only
I was using pick as a generic term. I am currently working on an AIX platform running Universe with the pick flavor and the LIKE keyword works. My point was that it has to be in upper case unless you have really mucked up the VOC with extaneous synonyms. __ From: Bill H [EMAIL PROTECTED] Reply-To: u2-users@listserver.u2ug.org To: u2-users@listserver.u2ug.org Subject: RE: [U2] Upper Case Only Date: Thu, 15 Mar 2007 12:02:10 -0700 Ron: In PICK mode there is no LIKE keyword. Comparisons use the normal =, #, etc operators. So your example should be: LIST VOC WITH @ID = XREF] AND WITH TYPE = F ...or LIST VOC = XREF] WITH TYPE = F (notice the upper-casing) :-) Hope this helps. Bill Ron Hutchings wrote... Within the pick environment there is situation where you are forced to use upper case: List Voc with @id like XREF... and with Type = F The interpreter won't recognize most of this statement. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ _ Get a FREE Web site, company branded e-mail and more from Microsoft Office Live! --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] [UD] CALL @progname
DEFFUN UTL.MULT.PERCENT.BY.NUMBER.FUNC(PERCENT,NUMBER) FOR ZZZ = 1 TO CYCLE.CNT RESULT = UTL.MULT.PERCENT.BY.NUMBER.FUNC(PERCENT,NUMBER) NEXT ZZZ Routine Function call I think -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Brian Leach Sent: Thursday, March 15, 2007 3:38 PM To: u2-users@listserver.u2ug.org Subject: RE: [U2] [UD] CALL @progname But I really don't understand why a function is slower. Are you actually using a FUNCTION or a DEFFUN ...CALLING construct? Brian --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] Printing Reports In Universe BASIC
Could all of this SETPTR stuff be in a table that's easier to maintain. I've added such to my UD and D3 clients. - Original Message - From: Brutzman, Bill [EMAIL PROTECTED] To: u2-users@listserver.u2ug.org Sent: Thursday, March 15, 2007 11:04 AM Subject: RE: [U2] Printing Reports In Universe BASIC Consider the following Universal UniVerse printer handler... *--- -- *R0 Bill Brutzman Aug.2006 SUBROUTINE PRINTER.SETUP.R2 ( Mode ) *-- Printer.Setup : begin case case Mode = 'Portrait' begin case case @logname = 'jimr' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PACK_3X' case @logname = 'lou' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT DOCK' case @logname = 'rich' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT CUST' case @logname = 'karen'; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT CUST' case @logname = 'maria'; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT CUST' case @logname = 'ed' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT CUST' case @logname = 'mike' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PCNTRL' case @logname = 'jimc' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PCNTRL' case @logname = 'jimt' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PCNTRL' case @logname = 'alex' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PCNTRL' case @logname = 'wayne'; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PCNTRL' case @logname = 'bobs' ; execute 'SETPTR ,80,60,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT ENG' case Mode = 'LandScape' begin case case @logname = 'jimr' ; execute 'SETPTR ,132,55,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PACK.LAND' case @logname = 'bruce'; execute 'SETPTR ,132,55,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT PACK.LAND' case @logname = 'lou' ; execute 'SETPTR ,132,55,2,0,1,BRIEF,NHEAD,NFMT,NOEJECT,AT DOCK.LAND' end case case Mode = 'GreenBar' ; execute 'SETPTR ,132,60,2,0,1,BRIEF,NFMT,AT PR0' case 1 ; execute 'SETPTR ,132,60,2,0,1,BRIEF,NFMT,AT PR0' end case execute 'RESET.PRINTER' PRINTER ON *-- The.End : RETURN END *--- -- I suppose that this would be a little more slick to have a UV file with a table of users and printers. HTH. --Bill -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of Kevin King Sent: Thursday, March 15, 2007 10:06 AM To: u2-users@listserver.u2ug.org Subject: RE: [U2] Reports In Universe BASIC From: MAJ Programming Like helping the newbies with MV, I can now add this little tidbit to my mental library of techniques should the need arise. Just because one can doesn't mean one should. In the case of PRINT ON working properly without a corresponding PRINTER ON, imagine six months later trying to find all of the programs that are outputting to the printer. Not only do we have to search for procs and paragraphs that start the program with a (P (or LPTR) option, but now in searching through the BP code we have to search for both PRINTER ON and PRINT ON. It's likely that someone will forget one of those options (and possibly a few others I may have missed in this quick post) and overlook a program that should have otherwise been found. As this jihad on upper/lower case has illustrated, there are many ways to skin this U2 cat. And the more ways we as a community use, the harder we make it on ourselves to find something months after the fact. I dream of a day when programmers will have a response other than who was the idiot who wrote this crap? when faced with modifying someone else's program. But alas, if this latest battle is any indication, we're no closer to that day today than we were 20 years ago or possibly even 20 years before that. And then we wonder why our jobs are being shipped overseas? It's pretty obvious, when companies are faced with years and years of obfuscated and unmaintainable code, why not get the same results from someone overseas at a fraction of the price? My intent is not to discourage my friends and esteeemed collegues in this list, but rather to vent some frustration in the knowledge that our communal past may be
Re: [U2] Reports In Universe BASIC
I agree that scanning programs for concepts is made harder with this. I inherit this kind of code and have been known to quote your quote. But I must repeat that the train has left the MV station at the highest level. Sure, a flavour (Ud/Uv/D3/Mvbase etc) may dictate standards but they have a legacy to support. A VAR can dictate standards to their programmers for programmer interchangability. And an end user can dictate their own programming standards as well. I would lean in the opposite of teaching standards (hold your flames). Unless you're programming in a nicely controlled MV environment, where the standards pre-exist that you must follow, you might as well get used to being able to interpet many different methods for performing the same task. I will stand on my soapbox and shout that MV has no standards, just a lot of styles. There is no governing body to enforce standards and if the remaining providers (u2/uv/ d3 etc) were to build and force them, there would be some disagreements at that level. If they concurred, then all of the existing code underneath would have to be magically re-written or allowed to remain. How coult anyone really prove that their 'style' should be the 'standard'. Are we going to have a standards convention and hash over each MV topic from loops, gotos, opens, dict items, procs, PRINT ON blah, blah. The train has left the station on this topic for us MV programmers. We all develop our own styles and hash them about for the newbies to review. But everything compiles, one plus one does equal two and we all get paid in the end. Flame me if you wish. But offer some real counterpoints and not just conjecture. Respectfully Mark Johnson - Original Message - From: Kevin King [EMAIL PROTECTED] To: u2-users@listserver.u2ug.org Sent: Thursday, March 15, 2007 9:06 AM Subject: RE: [U2] Reports In Universe BASIC From: MAJ Programming Like helping the newbies with MV, I can now add this little tidbit to my mental library of techniques should the need arise. Just because one can doesn't mean one should. In the case of PRINT ON working properly without a corresponding PRINTER ON, imagine six months later trying to find all of the programs that are outputting to the printer. Not only do we have to search for procs and paragraphs that start the program with a (P (or LPTR) option, but now in searching through the BP code we have to search for both PRINTER ON and PRINT ON. It's likely that someone will forget one of those options (and possibly a few others I may have missed in this quick post) and overlook a program that should have otherwise been found. As this jihad on upper/lower case has illustrated, there are many ways to skin this U2 cat. And the more ways we as a community use, the harder we make it on ourselves to find something months after the fact. I dream of a day when programmers will have a response other than who was the idiot who wrote this crap? when faced with modifying someone else's program. But alas, if this latest battle is any indication, we're no closer to that day today than we were 20 years ago or possibly even 20 years before that. And then we wonder why our jobs are being shipped overseas? It's pretty obvious, when companies are faced with years and years of obfuscated and unmaintainable code, why not get the same results from someone overseas at a fraction of the price? My intent is not to discourage my friends and esteeemed collegues in this list, but rather to vent some frustration in the knowledge that our communal past may be contributing to a negative impact on our individual futures. As a reasonably focused community (in contrast to the millions of programmers in other environments) we have a real fighting chance at turning this thing around, but if we can't find some common ground on an issue as existentially meaningless as upper/lower case then we shouldn't be surprised when the bottom eventually falls out. -Kevin [EMAIL PROTECTED] http://www.PrecisOnline.com ** Check out scheduled Connect! training courses at http://www.PrecisOnline.com/train.html. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] Upper Case and Editors
Also recall that earlier typewriters didn't have a '1' key, rather you used the lower-case L. - Original Message - From: Bill H [EMAIL PROTECTED] To: u2-users@listserver.u2ug.org Sent: Thursday, March 15, 2007 1:16 PM Subject: RE: [U2] Upper Case and Editors Arnold: One can only hope the more experienced engineers of the U2 products are listening. One work-around after another make life more difficult not less. In the 21st century a solution would be helpful. Case sensitivity is a blight on the landscape of computing perpetuated by systems whose history was written by two-fingured typists and engineering challenged equipment. Someone mentioned recently the caps limitations of Prism terminals, as though typewriters haven't been around since the beginning of the 20th century and, certainly, noone had ever learned to use such contraptions. :-) Bill -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Arnold Bosch Sent: Thursday, March 15, 2007 12:38 AM To: u2-users@listserver.u2ug.org Subject: Re: [U2] Upper Case and Editors [snipped] ...I find it annoying having to switch caps-lock all the time - what happens a lot is that I switch to another window and start typing away merrily, only to realise after a couple of words that everything is cASE iNVERTED, or that the help I'm trying to give to a user is not working because of case inversion. As to editing, having become accustomed over the years to the convenience of full-screen editors, and not initially knowing that it was possible to use a full-screen editor to edit BPs, it was a nightmare for me to get the simplest things done in UV. I think there are many other newbies out there that feels the same... [snipped] --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Upper Case Only
Ron: Sorry for the misstatement...I'm running UniData. UniData is occasionally much less forgiving than UV (sometimes it seems the engineers enjoyed tripping up PICK people). :-o Bill -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Ron Hutchings Sent: Thursday, March 15, 2007 2:25 PM To: u2-users@listserver.u2ug.org Subject: RE: [U2] Upper Case Only I was using pick as a generic term. I am currently working on an AIX platform running Universe with the pick flavor and the LIKE keyword works. My point was that it has to be in upper case unless you have really mucked up the VOC with extaneous synonyms. __ From: Bill H [EMAIL PROTECTED] Reply-To: u2-users@listserver.u2ug.org To: u2-users@listserver.u2ug.org Subject: RE: [U2] Upper Case Only Date: Thu, 15 Mar 2007 12:02:10 -0700 Ron: In PICK mode there is no LIKE keyword. Comparisons use the normal =, #, etc operators. So your example should be: LIST VOC WITH @ID = XREF] AND WITH TYPE = F ...or LIST VOC = XREF] WITH TYPE = F (notice the upper-casing) :-) Hope this helps. Bill Ron Hutchings wrote... Within the pick environment there is situation where you are forced to use upper case: List Voc with @id like XREF... and with Type = F The interpreter won't recognize most of this statement. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ _ Get a FREE Web site, company branded e-mail and more from Microsoft Office Live! --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
