Re: [U2] Very Strange: Only first DICT entry using SUBR is LISTed
No real ideas for you on this - it's not really what I was going for. I use
the SETINDEX and READFWD commands partly to avoid these select list id
entanglements. I never really had a general purpose GET.KEYS subroutine (all
are tied to a specific file) - but I might create one.
-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of jonathanm
Sent: Wednesday, June 22, 2011 5:35 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Very Strange: Only first DICT entry using SUBR is LISTed
Thanks for your excellent suggestion. I took it and, with some modification
got it going. Kind of. I did stick with the idea of sending GET.KEYS a
SELECT statement, since there may be times in the future I want to qualify
the SELECTion with multiple fields. Here's the result:
$BASICTYPE U
SUBROUTINE GET.KEYS(KEY_LIST, SELECT_COMMAND, OPTIONS)
*
LIST_NUMBER=''
KEY_DELIMITER=@VM
* process options
OPT.CNT=DCOUNT(OPTIONS,@AM)
FOR OPT.PTR=1 TO OPT.CNT
OPTION=OPTIONSOPT.PTR
OPT.NAME=FIELD(OPTION,'=',1)
VALUE.START=COL2()+1
OPT.NAME=OCONV(TRIM(OPT.NAME),'MCU')
OPT.VALUE=OPTION[VALUE.START,LEN(OPTION)-VALUE.START+1]
BEGIN CASE
CASE OPT.NAME='LIST_NUMBER'
LIST_NUMBER=OPT.VALUE
CASE OPT.NAME='DELIMITER'
KEY_DELIMITER=OPT.VALUE
END CASE
NEXT OPT.PTR
*
* find an available select list number
IF LIST_NUMBER='' THEN
I=9
LOOP WHILE (I 0) AND (LIST_NUMBER='') DO
IF SELECTINFO(I,1) 1 THEN
LIST_NUMBER=I
END
I=I-1
REPEAT
END
*
MY_SELECT_COMMAND=SELECT_COMMAND: TO :LIST_NUMBER
EXECUTE MY_SELECT_COMMAND CAPTURING SCREEN_OUTPUT
READLIST KEY_LIST FROM LIST_NUMBER ELSE KEY_LIST =
IF KEY_DELIMITER@AM THEN
KEY_LIST=CHANGE(KEY_LIST,@AM,KEY_DELIMITER)
END
RETURN
...and here's a sample of expect_total_qty:
001: I
002: 'SELECT core_cart_detail WITH cust_shipto_cart = ':@ID:'';
SUBR('GET.KEYS',@1,''); TRANS('core_cart_detail',@2,'expect_qty','X');
SUM(@3)
This all works great...except when I get to a field that sums a field in the
detail file that, itself, is a summation of fields in a sub-detail file. I
suspected that the problem was a result of the layered calls to GET.KEYS
using the same select list number. That's why I included the above logic
that finds an available select list number. But nonetheless, I'm getting 0's
in these double-layered summation fields. *sigh*
Any ideas?
Dave Davis-3 wrote:
Not quite - my GET.KEYS would instead look like this:
1: I
2: SUBR('GET.KEYS','core_cart_detail', 'cust_shipto_cart',
cust_shipto_cart)
Which tells the general purpose GET.KEYS routine which file you are
looking for keys to (the detail file), which indexed field you want to use
to retrieve those keys ('cust_shipto_cart'), and what expression holds the
value you want to retrieve (the cust_shipto_cart field in the
core_cart_head file).
To get a total field you would have something like this:
SUBR('GET.KEYS','core_cart_detail', 'cust_shipto_cart', cust_shipto_cart)
;TRANS('core_cart_detail',@1,'receive_qty','X')
;SUM(@2)
-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of jonathanm
Sent: Wednesday, June 22, 2011 3:13 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Very Strange: Only first DICT entry using SUBR is LISTed
OK. I've had a chance to read this a bit more and have a question. When
you
talk about creating a multi-valued I-type that gets the keys, do you mean
something like this?
core_cart_detail_keys
1: I
2: SUBR('GET.KEYS','SELECT core_cart_detail')
3:
4: Detail Keys
5: 10L
6: M
...and then a subroutine like:
SUBROUTINE GET.KEYS(KEY_LIST,COMMAND)
COMMAND=COMMAND: TO 9
EXECUTE COMMAND RTNLIST 9
READLIST KEY_LIST FROM 9
RETURN
Is this along the right idea?
Dave Davis-3 wrote:
You could create one multi-valued I-type in the master file that gets you
the keys to the detail records for that master record's cust_shipto_cart.
Then create V-types that sum expect_qty and receipt_qty. Something like:
TRANS('core_cart_detail',core_cart_detail_keys,'expect_qty','X');SUM(@1)
Really, how is the speed with what you've got now? I did something like
what you did a long while ago and the speed was terrible.
-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of jonathanm
Sent: Wednesday, June 22, 2011 11:45 AM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Very Strange: Only first DICT entry using SUBR is
LISTed
Thanks, Dave. cust_shipto_cart is indeed indexed.
The problem with reading the detail file records is that I'd have to
build
a
unique subroutine for each type of DICT word like this. As it is,
GET.LIST.TOTAL is used in multiple files of different shapes and sizes.
Dave Davis-3 wrote:
Do you do a
[U2] Eclipse release 3.7 (Indigo)
[ad] Every June Eclipse issues a new release. This year it was 62 projects at one time. Wow, I think we are doing well when we issue a release with a few bug fixes. Anyways, I have a lot of trepidation if our products with work with this release. I happy to say that without further reservation that all of our XLr8 line of Eclipse based tools works with Indigo. [/ad] The tools from Rocket that are based on Eclipse are version 3.3 which means they are now four years behind in Eclipse releases. Just a point of fact for those who keep track of these things. Regards, Doug www.u2logic.com Innovation through XLr8Tools and middleware ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] Eclipse release 3.7 (Indigo)
Doug Have you ever thought of doing an add on for Visual studio similar to what you have done for eclipse ? -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Doug Averch Sent: 23 June 2011 17:34 To: U2 Users List Subject: [U2] Eclipse release 3.7 (Indigo) [ad] Every June Eclipse issues a new release. This year it was 62 projects at one time. Wow, I think we are doing well when we issue a release with a few bug fixes. Anyways, I have a lot of trepidation if our products with work with this release. I happy to say that without further reservation that all of our XLr8 line of Eclipse based tools works with Indigo. [/ad] The tools from Rocket that are based on Eclipse are version 3.3 which means they are now four years behind in Eclipse releases. Just a point of fact for those who keep track of these things. Regards, Doug www.u2logic.com Innovation through XLr8Tools and middleware ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users - No virus found in this message. Checked by AVG - www.avg.com Version: 10.0.1382 / Virus Database: 1513/3720 - Release Date: 06/22/11 ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] uppercase
I understand matrix operations well enough to use them frequently, and in light of this discussion, the following question popped into my mind: Is there any difference between: X = OCONV(X,'MCU') and: X = OCONVS(X,'MCU') Has anyone experienced the results being different? Thanks! Richard Lewis On Wed, Jun 22, 2011 at 9:08 AM, George Gallen ggal...@wyanokegroup.com wrote: UPCASE() will also function as OCONVS() If you put in a dynamic array into UPCASE(), it will upcase the entire string and leave the @VM, @AM... untouched. I use this on UV when reading items, especially for searching, I'll upcase the entire dynamic array, then proceed to do my indexes or locates. -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users- boun...@listserver.u2ug.org] On Behalf Of Martin Phillips Sent: Wednesday, June 22, 2011 6:32 AM To: U2 Users List Subject: Re: [U2] uppercase Hi Jeff, The difference is probably only one of performance. Using OCONV requires the conversion code to be decoded in order to work out what to do. Using UPCASE() can go straight off to do the real work without any additional decoding. I suspect not, but there may be some difference of interpretation if you have NLS installed. Martin Phillips Ladybridge Systems Ltd 17b Coldstream Lane, Hardingstone, Northampton NN4 6DB, England +44 (0)1604-709200 - Original Message - From: Jeff Butera jbut...@hampshire.edu To: u2-users@listserver.u2ug.org Sent: Wednesday, June 22, 2011 11:24 AM Subject: [U2] uppercase On unidata, can anyone shed light on the differences between UPCASE(...) and OCONV(...,'MCU')? I know OCONVS(...,'MCU') will preserve @VM and other unidata delimiters, but for single valued data is their any difference in the above? -- Jeff Butera, PhD Manager of ERP Systems Hampshire College 413-559-5556 ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] Eclipse release 3.7 (Indigo)
From: Symeon Breen Doug Have you ever thought of doing an add on for Visual studio similar to what you have done for eclipse ? Symeon, I've written a VS addon like this for myself, but lack of interest in this market for such things precludes them ever getting into the field. I blogged about a couple similar VS projects I had working in Beta, and got zero feedback, so I put them in storage. I think I even published an invitation to a couple forums for feedback on a syntax-highlighting MV BASIC editor addon for VS I wrote (with code folding and other features appreciated by VS developers). Again, zero feedback. Add to that the retribution one faces in this forum about offering solutions like this (because guys like Doug try to disguise a thread like this one as anything other than a blatent [ad]), and I decided a long time ago that it's easier to create offerings for other audiences. I know I'm not the only one who's been discouraged - a number of our respected colleagues in this forum used to advertise such solutions, but not anymore. Sorry, just sayin' ... T ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] Eclipse release 3.7 (Indigo)
G-Man: You __SHOULD__ advertise, as I'd never know what's up without guys like you, Doug, and others letting us know of their offerings. I'm not in the least offended by yours, and others, advertising, as I own a business and understand the need. Remember, if you get too much flack then FTITCTAJ ! :-) Bill - Original Message - *From:* 3xk547...@sneakemail.com *To:* u2-users@listserver.u2ug.org *Date:* 6/23/2011 6:17 PM *Subject:* Re: [U2] Eclipse release 3.7 (Indigo) From: Symeon Breen Doug Have you ever thought of doing an add on for Visual studio similar to what you have done for eclipse ? Symeon, I've written a VS addon like this for myself, but lack of interest in this market for such things precludes them ever getting into the field. I blogged about a couple similar VS projects I had working in Beta, and got zero feedback, so I put them in storage. I think I even published an invitation to a couple forums for feedback on a syntax-highlighting MV BASIC editor addon for VS I wrote (with code folding and other features appreciated by VS developers). Again, zero feedback. Add to that the retribution one faces in this forum about offering solutions like this (because guys like Doug try to disguise a thread like this one as anything other than a blatent [ad]), and I decided a long time ago that it's easier to create offerings for other audiences. I know I'm not the only one who's been discouraged - a number of our respected colleagues in this forum used to advertise such solutions, but not anymore. Sorry, just sayin' ... T ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
