RE: [U2] I need a correlative, just like the correlative...

2008-09-19 Thread Allen E. Elwood
Just about every vendor that I've seen implement this has done it slightly
different.  This is how you do it in mvbase - from my How To folder:

If you have the manual for your version, start looking through the section
on Dictionary types!

How to write basic subr DICT items in MvBase

LASTVALUE

001 SUBROUTINE LASTVALUE
002 $INCLUDE BASICLIB ACCESS.COMMON
003 ANSWER = CURRENT$1,DCOUNT(CURRENT$,@VM)
004 RETURN ANSWER


LAST.QTY

001 A
002 12
003
004
005
006
007
008 B:BP LASTVALUE
009 R
010 10

Dick Pick used to have a challenge for anyone to write a dictionary that
would allow printing the last value of a MV field (as I did above with a
SUBR).  I figured a way to do it with A correlatives and wrote to him.  He
wrote back and said the challenge was to use F correlatives, and even though
I had figured out a way, I didn't win the CIGAR.  He also thanked me and
told me he was going to tell everyone he knew that there was now a way.

It took three dicts:
one to do a boolean comparison to value mark (leaves a 1 for every value
mark found)

the second to do a summation of previous step + 1

the third to do a index of the previous step on the attr to arrive at the
last value of the attr

Now it's a piece of cake to do in just about any version with all the
additions that have been done.  But back in 1988 it was a *little* harder!

hth,

Allen

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Jeff Schasny
Sent: Wednesday, September 17, 2008 07:01
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] I need a correlative, just like the correlative...


I don't know how to do that in a correlative i.e. Pick/SMA style
dictionary entry. Any help would be appreciated.

Allen E. Elwood wrote:
 Which is why I always just use a subr.  The real cost to the client is the
 cost creation and maintenance.  Subr's are just *so* easy to understand.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] I need a correlative, just like the correlative...

2008-09-17 Thread Jeff Schasny
I don't know how to do that in a correlative i.e. Pick/SMA style 
dictionary entry. Any help would be appreciated.

Allen E. Elwood wrote:
 Which is why I always just use a subr.  The real cost to the client is the
 cost creation and maintenance.  Subr's are just *so* easy to understand.

   
and

David Tod Sigafoos wrote:
Jeff,

Why not just call a simple DICT program?

 -Original Message-
 From: Jeff Schasny [EMAIL PROTECTED]
 Date: 09/16/2008 01:46 PM
 To: u2-users@listserver.u2ug.org
 Subject: Re: [U2] I need a correlative, just like the correlative...

 My Pick Pocket Guide fails me.

 I can't use an I descriptor (that would be way too easy) and I need to
 create a correlative that presents the data in a multivalued field as a
 single valued comma delimited list.
 The equivalent of this:
 0001: I
 0002: CONVERT(@VM,',',PO.NUMBER)
 0003:
 0004: PO NUMBER
 0005: 30T
 0006: S

 Thanks
 --
 
 Jeff Schasny - Denver, Co, USA
 jschasny at gmail dot com
 
 ---
 u2-users mailing list
 u2-users@listserver.u2ug.org
 To unsubscribe please visit http://listserver.u2ug.org/
   

-- 

Jeff Schasny - Denver, Co, USA
jschasny at gmail dot com

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] I need a correlative, just like the correlative...

2008-09-16 Thread rbl000
Jeff,

It's not pretty, but if you know the maximum number of values (n), you could
use this:

F;0;(Tfname;X1;;96);C,;:;0;(Tfname;X2;;96);:;C,;:; ... ;0;(Tfname;Xn;;96);:

Best Regards,

Richard Lewis


-Original Message-
From: Jeff Schasny [EMAIL PROTECTED]
Date: 09/16/2008 01:46 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] I need a correlative, just like the correlative...

My Pick Pocket Guide fails me.

I can't use an I descriptor (that would be way too easy) and I need to
create a correlative that presents the data in a multivalued field as a
single valued comma delimited list.
The equivalent of this:
0001: I
0002: CONVERT(@VM,',',PO.NUMBER)
0003:
0004: PO NUMBER
0005: 30T
0006: S

Thanks
--

Jeff Schasny - Denver, Co, USA
jschasny at gmail dot com

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/





Adult Diaper
Live your life with confidence. Click now for a discreet selection of adult
diapers!
http://216.21.215.31/fc/JkJQPThTFMgVXhpyOkrSskSXEjIzNycjT2gLmTg5XC7yblDbYVDqT
3/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] I need a correlative, just like the correlative...

2008-09-16 Thread David Tod Sigafoos
   Jeff,

   Why not just call a simple DICT program?

   Tuesday, September 16, 2008, 10:46:01 AM, you wrote:

   JS My Pick Pocket Guide fails me.

   JS I can't use an I descriptor (that would be way too easy) and I need to

   JS create a correlative that presents the data in a multivalued field as a

   JS single valued comma delimited list.

   JS The equivalent of this:

   JS 0001: I

   JS 0002: CONVERT(@VM,',',PO.NUMBER)

   JS 0003:

   JS 0004: PO NUMBER

   JS 0005: 30T

   JS 0006: S

   JS Thanks

   --

   DSig `

   David Tod Sigafoos  ( O O )

___oOOo__( )__oOOo___

   I'm frankly sick and tired of the political preachers across this country
   telling me as a citizen that if I want to be a moral person, I must believe
   in A, B, C, and D. Just who do they think they are? And from where do they
   presume to claim the right to dictate their moral beliefs to me?  --  Barry
   Goldwater.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] I need a correlative, just like the correlative...

2008-09-16 Thread Allen E. Elwood
Which is why I always just use a subr.  The real cost to the client is the
cost creation and maintenance.  Subr's are just *so* easy to understand.

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of rbl000
Sent: Tuesday, September 16, 2008 14:45
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] I need a correlative, just like the correlative...


Jeff,

It's not pretty, but if you know the maximum number of values (n), you could
use this:

F;0;(Tfname;X1;;96);C,;:;0;(Tfname;X2;;96);:;C,;:; ... ;0;(Tfname;Xn;;96);:

Best Regards,

Richard Lewis


-Original Message-
From: Jeff Schasny [EMAIL PROTECTED]
Date: 09/16/2008 01:46 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] I need a correlative, just like the correlative...

My Pick Pocket Guide fails me.

I can't use an I descriptor (that would be way too easy) and I need to
create a correlative that presents the data in a multivalued field as a
single valued comma delimited list.
The equivalent of this:
0001: I
0002: CONVERT(@VM,',',PO.NUMBER)
0003:
0004: PO NUMBER
0005: 30T
0006: S

Thanks
--

Jeff Schasny - Denver, Co, USA
jschasny at gmail dot com

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/





Adult Diaper
Live your life with confidence. Click now for a discreet selection of adult
diapers!
http://216.21.215.31/fc/JkJQPThTFMgVXhpyOkrSskSXEjIzNycjT2gLmTg5XC7yblDbYVDq
T
3/
---
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/