RE: [U2] seeking info about Mark Information Systems their applications

2005-12-13 Thread Bill_H
Scott:

I know they were working on moving their application to the web, but don't
know if they got it done.  I believe they were down to just a few developers
and needed to keep expenses down. 

Bill
 

 -Original Message-
 From: [EMAIL PROTECTED] 
 [mailto:[EMAIL PROTECTED] On Behalf Of 
 Scott Richardson
 Sent: Monday, December 12, 2005 3:54 PM
 To: u2-users@listserver.u2ug.org
 Subject: [U2] seeking info about Mark Information Systems  
 their applications
 
 I am looking for any information on what happened to a 
 company called Mark Information Systems out of Burlingame, 
 CA; their Distribution Software Package, and folks that used 
 to work there. I did some work with them in the late 80's  
 early 90's, and am curious as to what happened to their 
 installed base, folks that worked there, etc I know that 
 owner George F passed on, but not sure about what happened to 
 the company after that?
 
 Any information would be appreciated.
 
 Please feel free to reply back channel...
 Thanks!
 
 Regards,
 Scott Richardson
 ---
 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] records with unprintable characters

2005-12-13 Thread Carl Sadlier
Does anyone have a program or suggestions on how to clean up a file that
has control characters and unprintable characters that are not
Subvalue,Value or Field markers?

Thanks,

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


RE: [U2] Calling a subroutine on an MV field from an I-Descriptor

2005-12-13 Thread Stevenson, Charles
Try using OCONVS (with an S) instead of OCONV.
The  problem has nothing to do with I-descriptors.
OCONV treats the 1st argument as a string.
OCONVS will process each delimited substring individually.
Notice the FD (hex value mark) in the middle of the 1st output line
below,
but the }, which is an unconverted value mark, in 2nd line:

CT CDS.BP BILLH

 BILLH
0001 CRT OCONV(  '790*4/1*77':@VM:'790*4/1*78',  'MX' )
0002 CRT OCONVS(  '790*4/1*77':@VM:'790*4/1*78',  'MX' )

RUN CDS.BP BILLH
3739302A342F312A3737FD3739302A342F312A3738
3739302A342F312A3737}3739302A342F312A3738



 -Original Message-
 From: [EMAIL PROTECTED] 
 [mailto:[EMAIL PROTECTED] On Behalf Of Bill_H
 Sent: Monday, December 12, 2005 7:00 PM
 To: u2-users@listserver.u2ug.org
 Subject: [U2] Calling a subroutine on an MV field from an I-Descriptor
 
 I'm trying to call a subroutine for each value of an 
 I-Descriptor, but without much luck.  The subroutine looks like:
 
 SUBROUTINE D.CURRDELITEM (RetValue, passValue) COMMON 
 /CURRDELITEM_variables/ ARTLEDGER.FV
 InvId= TRIM(passValue)
 RetValue = ''
 IF NOT(ASSIGNED(ARTLEDGER.FV)) THEN
OPEN '', 'ARTLEDGER' TO ARTLEDGER.FV ELSE RETURN END READ 
 TrInvRec FROM ARTLEDGER.FV, InvId THEN
RetValue = 1
 END ELSE
 *  RetValue = '0'
RetValue = OCONV(InvId, 'MX')
 END
 RETURN
 END
 
 I have a file with multiple invoice#s in field# 35 (INVS):
 
035 77]79]81]82]84]85]86]87]89
 
 The key is 790*4/1.  An I-Descriptor named CURRDEL looks like:
 
002 CATS(REUSE(@ID:'*'), @RECORD35)
 
 gives me:
 
 LIST ARTMASTER 790*4/1 INVS CURRDEL 06:03:34pm  12 Dec 2005 
  PAGE1
 ARTMASTER... INVOICES DEL
 
 790*4/177 
79  790*4/1*79
81  790*4/1*81
82  790*4/1*82
84  790*4/1*84
85  790*4/1*85
86  790*4/1*86
87  790*4/1*87
89  790*4/1*89
 
 1 records listed.
 
 However, I want each key in the DEL... column to be passed 
 to a program named D.CURRDELITEM, and all I get is:
 
002 SUBR(D.CURRDELITEM, CATS(REUSE(@ID:'*'), @RECORD35))
 
 LIST ARTMASTER 790*4/1 INVS CURRDEL 06:52:25pm  12 Dec 2005 
  PAGE1
 ARTMASTER... INVOICES DEL
 
 790*4/177 3739302A342F312
   A3737FD3739302A
   342F312A3739FD3
   739302A342F312A
   3831FD3739302A3
   42F312A3832FD37
   39302A342F312A3
   834FD3739302A34
   2F312A3835FD373
   9302A342F312A38
   36FD3739302A342
   F312A3837FD3739
   302A342F312A383
   9
79
81
82
84
85
86
87
89
 
 1 records listed.
 
 It looks like the subroutine was only called once and the 
 entire string of invoice keys was passed in at one time.  So, 
 I know I haven't handled the complete multi-value properly.
 
 Can anyone help.  Thanks in advance.
 
 Bill
 ---
 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] records with unprintable characters

2005-12-13 Thread George Gallen
This works sometimes...

0031:CONVERT CHAR(252) TO U IN LIN
0032:CONVERT CHAR(253) TO Y IN LIN
0033:CONVERT CHAR(231) TO C IN LIN
0034:CONVERT CHAR(229) TO A IN LIN
0035:CONVERT CHAR(228) TO A IN LIN
0036:CONVERT CHAR(240) TO O IN LIN
0037:CONVERT CHAR(221) TO Y IN LIN
0038:CONVERT CHAR(222) TO D IN LIN
0039:CONVERT CHAR(220) TO U IN LIN
0040:CONVERT CHAR(237) TO I IN LIN
0041:CONVERT CHAR(246) TO O IN LIN
0042:CONVERT CHAR(232) TO E IN LIN
0043:CONVERT CHAR(225) TO A IN LIN
0044:CONVERT CHAR(154) TO S IN LIN
0045:CONVERT CHAR(248) TO O IN LIN
0046:CONVERT CHAR(208) TO D IN LIN
0047:CONVERT CHAR(163) TO L IN LIN
0048:CONVERT CHAR(233) TO E IN LIN
0049:CONVERT CHAR(170) TO A IN LIN
0050:CONVERT CHAR(193) TO A IN LIN
0051:CONVERT CHAR(241) TO N IN LIN
0052:CONVERT CHAR(186) TO   IN LIN

It will convert the accented letters to non-accented letter equiv.
I'm sure there are better ways to do this, just this was the easiest.

and it's not inclusive.

Caveats:
 1. It's converts 252 and 253's also
 2. It's forces them to upper case, since in my case the names were upcased
 

George


 -Original Message-
 From: [EMAIL PROTECTED]
 [mailto:[EMAIL PROTECTED] Behalf Of Carl Sadlier
 Sent: Tuesday, December 13, 2005 10:18 AM
 To: u2-users@listserver.u2ug.org
 Subject: [U2] records with unprintable characters
 
 
 Does anyone have a program or suggestions on how to clean up 
 a file that
 has control characters and unprintable characters that are not
 Subvalue,Value or Field markers?
 
 Thanks,
 
 Carl
 ---
 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] Calling a subroutine on an MV field from an I-Descriptor

2005-12-13 Thread Stevenson, Charles
 From: Stevenson, Charles 
 Try using OCONVS (with an S) instead of OCONV.

After seeing Ray W's response, I think I misread your purpose.  What I
said was true, but irrelevant.
The formatting got screwed up on the email.  Be gracious  let me blame
it on that.

I'll second Ray's answer instead.

Here's a good way to program the loop, which preserves the delimiter
association, even if they are a mix of value-, subvalue-, attribute-,
item-, /or text-marks,  assuming you don't know how this routine might
get used 5 years from now.


SUBROUTINE D.CURRDELITEM (RetValue, passValue)
 ...common stuff...
InvIdList = TRIM(passValue)  ;* protects passValue remove pointers, too.
RetValue = ''
LOOP
   REMOVE InvId from InvIdList SETTING DelimLevel 
   READ  TrInvRec FROM ARTLEDGER.FV, InvId THEN
  RetValue:= 1  ;* concatenate to end
   END ELSE
   *  RetValue:= '0'
  RetValue:= OCONV(InvId, 'MX')
   END
WHILE DelimLevel ;* if done, no final delimiter appended
   RetValue:= CHAR( 256 - DelimLevel )  ;* tack on appropriate delimiter
REPEAT
* don't need to worry about resetting remove pointer on InvIdList. it is

* a local variable that disappears upon return to calling routine.
 
RETURN
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] Calling a subroutine on an MV field from an I-Descriptor

2005-12-13 Thread Bill_H
Bruce  Ray:

Thanks.  I was frightened of this prospect.  Maybe U2 needs a 'SUBRS'
function.  

It's amazing how much illogic creeps into an environment to overcome
development issues, and never gets straightened out.  But then it could just
be me.  I'd have never thought I would want to manipulate an entire MV
attribute at once.  :-)

Thanks again.

Bill

 -Original Message-
 From: [EMAIL PROTECTED] 
 [mailto:[EMAIL PROTECTED] On Behalf Of Ray Wurlod
 Sent: Monday, December 12, 2005 8:54 PM
 To: u2-users@listserver.u2ug.org
 Subject: Re: [U2] Calling a subroutine on an MV field from an 
 I-Descriptor
 
 The subroutine needs to do a READ for each value in the 
 multi-valued argument passValue.
 
 You could also do a TRANS() function, which has this loop 
 built in, within the routine.
 
 Note that individual elements of a dynamic array 
 (multi-valued field) can be null, so your null test must be 
 inside the loop.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] records with unprintable characters

2005-12-13 Thread Baker Hughes
Carl,

We faced this recently with data coming from our E-commerce portal,
here's a function we put in our Standard.Variables Include, so we can do
this from any program:

 FUNCTION CLEAN.STRING(STRING.IN)
  RESULT = ''
  LEN.STR = LEN(STRING.IN)

   FOR STR.POS = 1 TO LEN.STR

  STR.CHAR = STRING.IN[STR.POS,1]
  DEC.VAL = SEQ(STR.CHAR)

 BEGIN CASE
 CASE DEC.VAL LT 32
NULL
 CASE DEC.VAL LT 126
RESULT := STR.CHAR
 CASE 1
NULL
  END CASE

   NEXT STR.POS
   RETURN(RESULT)

usage - after we receive input from screen, or data load:
RESP = CLEAN.STRING(RESP)

BakerDOTHughes
ATMouserDOTCom


-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Carl Sadlier
Sent: Tuesday, December 13, 2005 9:18 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] records with unprintable characters


Does anyone have a program or suggestions on how to clean up a file that
has control characters and unprintable characters that are not
Subvalue,Value or Field markers?

Thanks,

Carl
---
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] records with unprintable characters

2005-12-13 Thread Mats Carlid

ED   in up arrow mode  will do it for a few records.

If there are quite a few records but only a few possible characters
I'd explore the stored commands feature of  ED.

Else  I'd program:

listOfChars = char(128):char(129)CHAR(251)  
loop

   read record  ...
   convert listOfChars  to '' in record
   write record ...
   repeat



HTH
--mats



Carl Sadlier wrote:


Does anyone have a program or suggestions on how to clean up a file that
has control characters and unprintable characters that are not
Subvalue,Value or Field markers?

Thanks,

Carl
---
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] Re: OT: Unix Version of PR1MOS EDitor

2005-12-13 Thread Keith W. Roberts
Original Message
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
David A Barrett
Sent: Monday, December 12, 2005 9:18 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] Re: OT: Unix Version of PR1MOS EDitor

 the problem with vi (or emacs) is that I'm not familiar
 with either
 
 No, the problem with vi is that it is case sensitive, and
 clearly intended
 for use with programs that primarily use lower case.

This is not a problem at all.  Oh, maybe it was in original vi, but most
*nix distros now use vim instead, which support syntax files and the like,
including case insensitivity.  I have lots of stuff to support Pick BASIC
coding in vim if anyone's interested.  Granted, you want the code to end up
uppercase, but that's trivially accomplished.

 Anyone who has been editing a PICK program and wanted to go down a few
 lines and hit J before they realized the CAPS Lock was
 still on knows what I'm talking about.
 
 Yeah, sure you can reassign all of the keys in vi, but at
 that point you've wasted far too much energy.

Not the least bit necessary.

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


Re: [U2] records with unprintable characters

2005-12-13 Thread Dave Taylor
Carl,

I suggest that you contact Dave Weaver at weaver-consulting.com:
530-676-6052.

Purchase a copy of his CLEAN program for a very reasonable price.

It works great.

Dave Taylor
President
Sysmark Information Systems, Inc.
49 Aspen Way
Rolling Hills Estates, CA 90274
800-SYSMARK (800-797-6275)
(O) 310-544-1974
(P) 800-339-1497
(F) 310-377-3550
Your Source for Integrated EDI Translation and DataSync Integration
www.sysmarkinfo.com


- Original Message - 
From: Carl Sadlier [EMAIL PROTECTED]
To: u2-users@listserver.u2ug.org
Sent: Tuesday, December 13, 2005 7:18 AM
Subject: [U2] records with unprintable characters


 Does anyone have a program or suggestions on how to clean up a file that
 has control characters and unprintable characters that are not
 Subvalue,Value or Field markers?

 Thanks,

 Carl
 ---
 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] Secondary Index Problem

2005-12-13 Thread iggchamp
Hi All,

UV9.6.1.16
HPUX 11

I have an index that is no longer working and am not sure why.  The whole 
purpose of this index is to allow me to use the SELECTINDEX to get a list of 
items that have something in field 67 of the record.  The index has 13 records 
but there are actually 876 records with something in 67.  I can rebuild the 
index but I really want to know what went wrong.

Any thoughts would be appreciated.

The dictionary item looks like...
0001: I
0002: IF @RECORD67 # '' THEN 1 ELSE ''
0003:
0004: Send^2532SAP
0005: 4R
0006: S
0007:

Here is the output from LIST.INDEX

LIST.INDEX MS_POH SIM.TRIGGER STATS
Alternate Key Index Statistics for file MS_POH
File... MS_POH
Indices 1 (0 A-type, 0 C-type, 0 D-type, 1 I-type, 0 SQL, 0 S-type)
Index Updates.. Enabled, No updates pending
Index name  Type  BuildNulls  In DICT  S/M  Just Unique Field num/I-type
SIM.TRIGGER  INot Reqd  No Yes  SR NIF @RECORD67 #
 '' THEN 1 ELSE
''
Statistics:
Number   Records per Alternate Key Index  Size
Index name  of Keys   Average   Minimum   Maximum   StdDev   (in Bytes)
SIM.TRIGGER 1 1313130 92
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] records with unprintable characters

2005-12-13 Thread BNeylon
Converting the control characters like that can be dangerous.  I run a 
program to create a list of those with control characters and then use the 
editor.  The control characters are generally part of control strings, 
^027W or ^027K.  That sort of thing.  Leaving an extraneous W or K 
or whatever can be just as bad to your data integrity as the ESC, STX, 
etal.

Bruce M Neylon
Health Care Management Group 





Mats Carlid [EMAIL PROTECTED]
Sent by: [EMAIL PROTECTED]
12/13/2005 11:33 AM
Please respond to u2-users

 
To: u2-users@listserver.u2ug.org
cc: 
Subject:Re: [U2] records with unprintable characters

ED   in up arrow mode  will do it for a few records.

If there are quite a few records but only a few possible characters
I'd explore the stored commands feature of  ED.

Else  I'd program:

listOfChars = char(128):char(129)CHAR(251) 
loop
read record  ...
convert listOfChars  to '' in record
write record ...
repeat



HTH
--mats



Carl Sadlier wrote:

Does anyone have a program or suggestions on how to clean up a file that
has control characters and unprintable characters that are not
Subvalue,Value or Field markers?

Thanks,

Carl
---
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] OT: Unix Version of PR1MOS EDitor

2005-12-13 Thread Keith W. Roberts
Original Message
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Anthony W. Youngman
Sent: Saturday, December 10, 2005 2:59 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] OT: Unix Version of PR1MOS EDitor

 It's all very well saying vi beats the stuffing out of a line editor,
 but if that's the case I'd rather have the Sheffield Editor
 instead ...
 the problem with vi (or emacs) is that I'm not familiar with
 either, and
 the documentation is (from my point of view) pretty naff.
 Maybe I ought
 to buy the relevant animal book, but ... I'm too used to nice manuals
 coming with programs :-) 

Actually, vim help is awesome.  You do need to get some basics under your
belt before it becomes easy, but there are user guide chapters and a
tutorial to get you started.

But to each their own. :)  The only definition of better which makes sense
is that which improves your comfort-level and productivity.

-Keith

P.S.  That naff is an interesting word ... where's that from?
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


[U2] Arev commands

2005-12-13 Thread Jerry Banker
Anybody know where I could get an on-line copy of the Advanced Revelations
R/Basic commands? We don't have ARev but I was looking at a program and would
like to see what some of the command syntax is compared to UV.

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


RE: [U2] records with unprintable characters

2005-12-13 Thread Anthony Dzikiewicz
Carl,

Something like the following is an idea.  This might filter a bit more
than what you want, but it is simple enough to modify.


FUNCTION CLEAN.TEXT(TEXT)
 TEXT.OUT = ''
 FOR Y = 1 TO LEN(TEXT)
TEST=SEQ(TEXT[Y,1])
IF TEST32 OR TEST126 THEN
  CONTINUE
END
TEXT.OUT := TEXT[Y,1]
 NEXT Y
RETURN(TEXT.OUT)
END  

Anthony

 Carl Sadlier wrote:
 
 Does anyone have a program or suggestions on how to clean up a file 
 that has control characters and unprintable characters that are not 
 Subvalue,Value or Field markers?
 
 Thanks,
 
 Carl
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] records with unprintable characters

2005-12-13 Thread john reid
To spot the bad guys, build an idesc named GARBAGE, then
SELECT FILE WITH GARBAGE NE 

You might need a subvalue count as well.

GARBAGE:
I
COUNT(@RECORD,@FM);COUNT(@RECORD,@VM);COUNT(OCONV(@RECORD,MCP),.);COUNT(@RECORD,.);IF
 @[EMAIL PROTECTED]@4 = @3 THEN  ELSE @1:-:@2:-:@3:-:@4

J

On 12/13/05, Baker Hughes [EMAIL PROTECTED] wrote:
 Carl,

 We faced this recently with data coming from our E-commerce portal,
 here's a function we put in our Standard.Variables Include, so we can do
 this from any program:

  FUNCTION CLEAN.STRING(STRING.IN)
  RESULT = ''
  LEN.STR = LEN(STRING.IN)

   FOR STR.POS = 1 TO LEN.STR

  STR.CHAR = STRING.IN[STR.POS,1]
  DEC.VAL = SEQ(STR.CHAR)

 BEGIN CASE
 CASE DEC.VAL LT 32
NULL
 CASE DEC.VAL LT 126
RESULT := STR.CHAR
 CASE 1
NULL
  END CASE

   NEXT STR.POS
   RETURN(RESULT)

 usage - after we receive input from screen, or data load:
 RESP = CLEAN.STRING(RESP)

 BakerDOTHughes
 ATMouserDOTCom


 -Original Message-
 From: [EMAIL PROTECTED]
 [mailto:[EMAIL PROTECTED] On Behalf Of Carl Sadlier
 Sent: Tuesday, December 13, 2005 9:18 AM
 To: u2-users@listserver.u2ug.org
 Subject: [U2] records with unprintable characters


 Does anyone have a program or suggestions on how to clean up a file that
 has control characters and unprintable characters that are not
 Subvalue,Value or Field markers?

 Thanks,

 Carl
 ---
 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/



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


RE: [U2] records with unprintable characters

2005-12-13 Thread Jeff Fitzgerald
Assuming that the control characters are in the body of the record and not
in the key, the following may be helpful.  When users attempt to use the
arrow keys on their PCs during data entry it can put control chars in unless
the app screens the input


EQU ASCII.CHARS LIT
'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz1234567890
[EMAIL PROTECTED]*()_+~-=`[]{};:,./\?|':CHAR(34):CHAR(39)

READ RECORD FROM ...

TEMP.RECORD = RECORD
CONVERT ASCII.CHARS:@FM:@VM:@SM TO '' IN TEMP.RECORD
IF TEMP.RECORD # '' THEN
   CONVERT TEMP.RECORD TO '' IN RECORD
   WRITE RECORD ON ...
END



Hope this helps,

Jeff Fitzgerald
Fitzgerald  Long, Inc.



-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Carl Sadlier
Sent: Tuesday, December 13, 2005 9:49 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] records with unprintable characters

Does anyone have a program or suggestions on how to clean up a file that has
control characters and unprintable characters that are not Subvalue,Value or
Field markers?

Thanks,

Carl
---
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] Secondary Index Problem

2005-12-13 Thread rbl000
I'm guessing you want quotes around the '1' in your I-descriptor expression.  
Try instead of this:

IF @RECORD67 # '' THEN 1 ELSE ''
try this:
IF @RECORD67 # '' THEN '1' ELSE ''

Richard Lewis


 --- On Tue 12/13, [EMAIL PROTECTED]  [EMAIL PROTECTED]  wrote:
From: [EMAIL PROTECTED] [mailto: [EMAIL PROTECTED]
To: u2-users@listserver.u2ug.org
Date: Tue, 13 Dec 2005 17:06:07 +
Subject: [U2] Secondary Index Problem

Hi All,UV9.6.1.16HPUX 11I have an index that is no longer working and am not 
sure why.  The whole purpose of this index is to allow me to use the 
SELECTINDEX to get a list of items that have something in field 67 of the 
record.  The index has 13 records but there are actually 876 records with 
something in 67.  I can rebuild the index but I really want to know what went 
wrong.Any thoughts would be appreciated.The dictionary item looks like...0001: 
I0002: IF @RECORD67 # '' THEN 1 ELSE ''0003:0004: Send^2532SAP0005: 4R0006: 
S0007:Here is the output from LIST.INDEXLIST.INDEX MS_POH SIM.TRIGGER 
STATSAlternate Key Index Statistics for file MS_POHFile... 
MS_POHIndices 1 (0 A-type, 0 C-type, 0 D-type, 1 I-type, 0 SQL, 0 
S-type)Index Updates.. Enabled, No updates pendingIndex name  Type  Build   
 Nulls  In DICT  S/M  Just Unique Field num/I-typeSIM.TRIGGER  INot 
Reqd  No Yes  SR NIF @RECORD67 #  
 !
  
'' THEN 1 ELSE  
  ''Statistics:Number   Records per 
Alternate Key Index  SizeIndex name  of Keys   Average   Minimum   
Maximum   StdDev   (in Bytes)SIM.TRIGGER 1 1313
130 92---u2-users mailing [EMAIL PROTECTED] unsubscribe 
please visit http://listserver.u2ug.org/

___
No banners. No pop-ups. No kidding.
Make My Way  your home on the Web - http://www.myway.com
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] Secondary Index Problem

2005-12-13 Thread john reid
I recall occasions where I had to issue the ENABLE.INDEX command in
order to kick start the automatic indexing process.  Sometimes I had
to issue it more than once.  I know not what caused the problem or
what I was doing wrong.
j

On 12/13/05, [EMAIL PROTECTED] [EMAIL PROTECTED] wrote:
 Hi All,

 UV9.6.1.16
 HPUX 11

 I have an index that is no longer working and am not sure why.  The whole 
 purpose of this index is to allow me to use the SELECTINDEX to get a list of 
 items that have something in field 67 of the record.  The index has 13 
 records but there are actually 876 records with something in 67.  I can 
 rebuild the index but I really want to know what went wrong.

 Any thoughts would be appreciated.

 The dictionary item looks like...
 0001: I
 0002: IF @RECORD67 # '' THEN 1 ELSE ''
 0003:
 0004: Send^2532SAP
 0005: 4R
 0006: S
 0007:

 Here is the output from LIST.INDEX

 LIST.INDEX MS_POH SIM.TRIGGER STATS
 Alternate Key Index Statistics for file MS_POH
 File... MS_POH
 Indices 1 (0 A-type, 0 C-type, 0 D-type, 1 I-type, 0 SQL, 0 S-type)
 Index Updates.. Enabled, No updates pending
 Index name  Type  BuildNulls  In DICT  S/M  Just Unique Field 
 num/I-type
 SIM.TRIGGER  INot Reqd  No Yes  SR NIF 
 @RECORD67 #
 '' THEN 1 ELSE
''
 Statistics:
Number   Records per Alternate Key Index  Size
 Index name  of Keys   Average   Minimum   Maximum   StdDev   (in 
 Bytes)
 SIM.TRIGGER 1 1313130 92
 ---
 u2-users mailing list
 u2-users@listserver.u2ug.org
 To unsubscribe please visit http://listserver.u2ug.org/



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


Re: [U2] records with unprintable characters

2005-12-13 Thread gcanedy
One thing to be careful of that we ran into is control characters in the
Key (@ID).  If your application wrote out a record with say an ESC in the
key, and it also wrote that key as a field value in another record in a
different file, fixing just the data portion will put your records out of
sync.  If you fix the @ID, and that record is an Indexed record, there
could be some issues in the Index as well to be aware of.


Gary P. Canedy
Database Analyst
ProMutual Group
(617) 757-6775


   
 Carl Sadlier
 [EMAIL PROTECTED] 
 com   To 
 Sent by:  u2-users@listserver.u2ug.org  
 [EMAIL PROTECTED]  cc 
 stserver.u2ug.org 
   Subject 
   [U2] records with unprintable   
 12/13/2005 10:18  characters  
 AM
   
   
 Please respond to 
 [EMAIL PROTECTED] 
er.u2ug.org
   
   




Does anyone have a program or suggestions on how to clean up a file that
has control characters and unprintable characters that are not
Subvalue,Value or Field markers?

Thanks,

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







---
This email and any files transmitted with it are intended only for the
person or entity to which it is addressed and may contain confidential
and/or privileged material.   If you received this email in error, please
contact the sender immediately and delete this email from your system.  If
you are not the named addressee, you should not disseminate, distribute,
print, or copy the email, or take any action in reliance on its contents.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] Calling a subroutine on an MV field from an I-Descriptor

2005-12-13 Thread Rex Gozar
Bill,

If all you are trying to do is return a multi-valued 1 or 0 string for a
multi-valued list of id's, you can use this in field 2 of your I-descriptor:

0002: CATS(REUSE(@ID:*), @RECORD35) ; TRANS(ARTLEDGER, @1, 0, X) ;
NES(@2, REUSE())

Note that @RECORD35 can be replaced with the actual dictionary name for
field 35.


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


Re: [U2] Arev commands

2005-12-13 Thread Richard A. Wilson
I dont believe there really is one. Also it really depends on which revision 
level of arev you are running.


is there any syntax/statement/function in particular you need

Rich

Jerry Banker wrote:


Anybody know where I could get an on-line copy of the Advanced Revelations
R/Basic commands? We don't have ARev but I was looking at a program and would
like to see what some of the command syntax is compared to UV.

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




--
Richard A. Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064
[EMAIL PROTECTED]
www.lakeside-systems.com
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


[U2] Determine performance of secondary index

2005-12-13 Thread Rod Hills
Hi all,

Can the FILE.USAGE command be used with secondary indexes?

I'm trying to determine how much total disk i/o is reduced when a
secondary index is added. I can't find any tools to show activity on the
index file like FILE.USAGE does for the primary file.

I am running UV10.0.16 on HPUX 11i system.

Thanks in advance...

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


Re: [U2] Secondary Index Problem

2005-12-13 Thread Gordon J Glorfield
Oh! Oh!  I know this one.

The 13 records in your index indicate the number of records that had 
something in attribute 67 when the index was originally built.  Because it 
is an I descriptor and not an actual attribute nothing changed when the 
record was written with the change to attribute 67 therefore no updates to 
the index.

What would be better (and would work) would be to build an index on 
attribute 67 then select for 67 not equal to null.


Gordon J. Glorfield
Sr. Applications Developer
MAMSI (A UnitedHealth Company)
301-360-8839

[EMAIL PROTECTED] wrote on 12/13/2005 12:06:07 PM:

 Hi All,

 UV9.6.1.16
 HPUX 11

 I have an index that is no longer working and am not sure why.  The 
 whole purpose of this index is to allow me to use the SELECTINDEX to
 get a list of items that have something in field 67 of the record. 
 The index has 13 records but there are actually 876 records with 
 something in 67.  I can rebuild the index but I really want to know 
 what went wrong.

 Any thoughts would be appreciated.

 The dictionary item looks like...
 0001: I
 0002: IF @RECORD67 # '' THEN 1 ELSE ''
 0003:
 0004: Send^2532SAP
 0005: 4R
 0006: S
 0007:

[SNIP]


This e-mail, including attachments, may include confidential and/or 
proprietary information, and may be used only by the person or entity to 
which it is addressed. If the reader of this e-mail is not the intended 
recipient or his or her authorized agent, the reader is hereby notified 
that any dissemination, distribution or copying of this e-mail is 
prohibited. If you have received this e-mail in error, please notify the 
sender by replying to this message and delete this e-mail immediately.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] records with unprintable characters

2005-12-13 Thread George Gallen
The majority of the garbage characters I get are from
files from clients in other countries where they have entered
an upper ASCII code from an accented letter.

In these cases, changing the character to null will make
a misspelled name, which is why I have my routine change the
character to it's non-accented name.

It's not a perfect solution, but it's a happy medium. 

George

 -Original Message-
 From: [EMAIL PROTECTED]
 [mailto:[EMAIL PROTECTED] Behalf Of Rex Gozar
 Sent: Tuesday, December 13, 2005 2:04 PM
 To: u2-users@listserver.u2ug.org
 Subject: RE: [U2] records with unprintable characters
 
 
 Carl,
 
 I would also expected that in addition to cleaning up the 
 data that you have
 taken steps to prevent garbage from getting into your files 
 in the first
 place (you do use an input subroutine, right?).  A simple test like:
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] Arev commands

2005-12-13 Thread Jerry Banker

Well there was this one command that looked something like this:

start = 1
a = trim(rec[start,F,])

and I was wondering if it was using some kind of correlative to get the 
length or if the brackets are used differently in Arev. Also, I would just 
like to have a command reference for all of the various flavors of Pick so 
if I need to convert a program from one flavor to another I could.


- Original Message - 
From: Richard A. Wilson [EMAIL PROTECTED]

To: u2-users@listserver.u2ug.org
Sent: Tuesday, December 13, 2005 12:50 PM
Subject: Re: [U2] Arev commands


I dont believe there really is one. Also it really depends on which 
revision level of arev you are running.


is there any syntax/statement/function in particular you need

Rich

Jerry Banker wrote:

Anybody know where I could get an on-line copy of the Advanced 
Revelations
R/Basic commands? We don't have ARev but I was looking at a program and 
would

like to see what some of the command syntax is compared to UV.

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




--
Richard A. Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064
[EMAIL PROTECTED]
www.lakeside-systems.com
---
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] records with unprintable characters

2005-12-13 Thread Scott Ballinger
Here is the fastest way I have found to eliminate bad chars in
string

 bad.chars = 
 for n = 1 to 31
   bad.chars := char(n)
 next n
 for n = 128 to 250
   bad.chars := char(n)
 next n
 convert bad.chars to  in string

/Scott Ballinger
Pareto Corporation
Edmonds WA USA
206 713 6006


-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Baker Hughes
Sent: Tuesday, December 13, 2005 8:32 AM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] records with unprintable characters

Carl,

We faced this recently with data coming from our E-commerce portal,
here's a function we put in our Standard.Variables Include, so we can do
this from any program:

 FUNCTION CLEAN.STRING(STRING.IN)
  RESULT = ''
  LEN.STR = LEN(STRING.IN)

   FOR STR.POS = 1 TO LEN.STR

  STR.CHAR = STRING.IN[STR.POS,1]
  DEC.VAL = SEQ(STR.CHAR)

 BEGIN CASE
 CASE DEC.VAL LT 32
NULL
 CASE DEC.VAL LT 126
RESULT := STR.CHAR
 CASE 1
NULL
  END CASE

   NEXT STR.POS
   RETURN(RESULT)

usage - after we receive input from screen, or data load:
RESP = CLEAN.STRING(RESP)

BakerDOTHughes
ATMouserDOTCom


-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Carl Sadlier
Sent: Tuesday, December 13, 2005 9:18 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] records with unprintable characters


Does anyone have a program or suggestions on how to clean up a file that
has control characters and unprintable characters that are not
Subvalue,Value or Field markers?

Thanks,

Carl
---
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] Arev commands

2005-12-13 Thread Richard A. Wilson

I've never used this syntax but according to the manual

if the send expression begins with F then return all characters from the 
starting position until the 2nd character of the F expression is found


example

REC = 'ABCDEF,HIJK'
A=TRIM(REC[1,'F,'])
A would equal ABCDEF (i.e. until the comma)

note there is also Bx which searches backwards

I'm not aware of any on-line/pdf/etc manuals for Rev. you maybe able to do 
searches on www.revelation.com knowledge base section, but I dont think you'll 
find a single document that has the command reference manual you are looking for.


fortunately I'm a packrat  have manuals going back to the 70's. Sometimes its a 
dirty job digging them out from storage, but I keep important ones handy


Rich



Jerry Banker wrote:


Well there was this one command that looked something like this:

start = 1
a = trim(rec[start,F,])

and I was wondering if it was using some kind of correlative to get the 
length or if the brackets are used differently in Arev. Also, I would 
just like to have a command reference for all of the various flavors of 
Pick so if I need to convert a program from one flavor to another I could.


- Original Message - From: Richard A. Wilson 
[EMAIL PROTECTED]

To: u2-users@listserver.u2ug.org
Sent: Tuesday, December 13, 2005 12:50 PM
Subject: Re: [U2] Arev commands


I dont believe there really is one. Also it really depends on which 
revision level of arev you are running.


is there any syntax/statement/function in particular you need

Rich

Jerry Banker wrote:

Anybody know where I could get an on-line copy of the Advanced 
Revelations
R/Basic commands? We don't have ARev but I was looking at a program 
and would

like to see what some of the command syntax is compared to UV.

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




--
Richard A. Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064
[EMAIL PROTECTED]
www.lakeside-systems.com
---
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/




--
Richard A. Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064
[EMAIL PROTECTED]
www.lakeside-systems.com
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] records with unprintable characters

2005-12-13 Thread Scott Ballinger
Sorry Mats, I should read deeper into the stack before jumping in...
Didn't notice that you had already suggested the same convert bad.chars
to null solution.

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


RE: [U2] Arev commands

2005-12-13 Thread Bob Woodward
For the most part, R/Basic commands are very similar to the Universe
Basic commands.  There are very subtle differences but nothing really
major.  If you can work in Universe, you'll do just find in AREV.

BobW
 
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Jerry Banker
Sent: Tuesday, December 13, 2005 9:19 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] Arev commands

Anybody know where I could get an on-line copy of the Advanced
Revelations
R/Basic commands? We don't have ARev but I was looking at a program and
would
like to see what some of the command syntax is compared to UV.

Jerry Banker
---
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] Arev commands - Where's the original message?

2005-12-13 Thread Brenda Price
Ok, did anyone else get the replies but not the original message?  I notice I 
don't always get the original message, usually I think, I've just deleted it 
and don't remember doing it and I'm too busy to check the deleted folder. 

However, this time for sure I did not get the original message and neither did 
my co-workers.  Just wondering if it happens to anyone else on the list.  

Brenda Price
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Jerry Banker
Sent: Tuesday, December 13, 2005 1:51 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Arev commands


Well there was this one command that looked something like this:

start = 1
a = trim(rec[start,F,])

and I was wondering if it was using some kind of correlative to get the 
length or if the brackets are used differently in Arev. Also, I would just 
like to have a command reference for all of the various flavors of Pick so 
if I need to convert a program from one flavor to another I could.

- Original Message - 
From: Richard A. Wilson [EMAIL PROTECTED]
To: u2-users@listserver.u2ug.org
Sent: Tuesday, December 13, 2005 12:50 PM
Subject: Re: [U2] Arev commands


I dont believe there really is one. Also it really depends on which 
revision level of arev you are running.

 is there any syntax/statement/function in particular you need

 Rich

 Jerry Banker wrote:

 Anybody know where I could get an on-line copy of the Advanced 
 Revelations
 R/Basic commands? We don't have ARev but I was looking at a program and 
 would
 like to see what some of the command syntax is compared to UV.

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



 -- 
 Richard A. Wilson
 Lakeside Systems
 Smithfield, RI, USA
 Voice 401-231-3959
 Fax   206-202-2064
 [EMAIL PROTECTED]
 www.lakeside-systems.com
 ---
 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/

-- 
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.371 / Virus Database: 267.13.13/199 - Release Date: 12/13/2005
 

-- 
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.1.371 / Virus Database: 267.13.13/199 - Release Date: 12/13/2005
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] Secondary Index Problem

2005-12-13 Thread John Jenkins
Building an Index while the file is in use can cause a similar problem.
Usually the index is either disabled or Out of step (missing updates).

Resolution: Don't create or build an index while a file could be open. A
useful tool (Unix) is:

fuser -u unix_file_name

This command lists the Unix PIDs of all processes that have a file open -
check ALL data portions (dynamic files) and indexes as well. Watch this
though - if MFILES is relatively low some processes may have swapped the
file handle in the rotating file pool and fuser won't show these up. Get
everyone off the file..

Useful references:

Unix:
fuser -u

Windows:
Handle (http://www.sysinternals.com)

UniVerse:
SET.INDEX

Otherwise - accessing a file from another UniVerse instance via a NFS or
share link with no UV-NET concurrency control can give some entertaining
(but otherwise useless) hours of fun (file buffers flushing etc).

Regards

JayJay

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
[EMAIL PROTECTED]
Sent: 13 December 2005 17:06
To: u2-Users
Subject: [U2] Secondary Index Problem

Hi All,

UV9.6.1.16
HPUX 11

I have an index that is no longer working and am not sure why.  The whole
purpose of this index is to allow me to use the SELECTINDEX to get a list of
items that have something in field 67 of the record.  The index has 13
records but there are actually 876 records with something in 67.  I can
rebuild the index but I really want to know what went wrong.

Any thoughts would be appreciated.

The dictionary item looks like...
0001: I
0002: IF @RECORD67 # '' THEN 1 ELSE ''
0003:
0004: Send^2532SAP
0005: 4R
0006: S
0007:

Here is the output from LIST.INDEX

LIST.INDEX MS_POH SIM.TRIGGER STATS
Alternate Key Index Statistics for file MS_POH
File... MS_POH
Indices 1 (0 A-type, 0 C-type, 0 D-type, 1 I-type, 0 SQL, 0 S-type)
Index Updates.. Enabled, No updates pending
Index name  Type  BuildNulls  In DICT  S/M  Just Unique Field
num/I-type
SIM.TRIGGER  INot Reqd  No Yes  SR NIF
@RECORD67 #
 '' THEN 1
ELSE
''
Statistics:
Number   Records per Alternate Key Index  Size
Index name  of Keys   Average   Minimum   Maximum   StdDev   (in
Bytes)
SIM.TRIGGER 1 1313130 92
---
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] Calling a subroutine on an MV field from an I-Descriptor

2005-12-13 Thread Bill_H
Thanks Rex.  I didn't quite give the entire BASIC program.  It is a
particular business rule that, in a D3 system, was shared by a variety of
BASIC programs and dictionaries.

Unlike U2, D3 uses one passed variable in the subroutine argument list where
the contents of the dictionary stack is automatically assigned this single
argument variable.  The BASIC code usually takes that value then does
whatever then reassigns the variable a new value to be returned.  When
processing returns to the dictionary the assigned variable is automatically
placed back into the dictionary stack.

I'm not sure I like one method over the other.  I just need to make
additional changes to business rule subroutines so they can be called from
both dictionaries and BASIC code.

Bill
 

 -Original Message-
 From: [EMAIL PROTECTED] 
 [mailto:[EMAIL PROTECTED] On Behalf Of Rex Gozar
 Sent: Tuesday, December 13, 2005 10:45 AM
 To: u2-users@listserver.u2ug.org
 Subject: RE: [U2] Calling a subroutine on an MV field from an 
 I-Descriptor
 
 Bill,
 
 If all you are trying to do is return a multi-valued 1 or 
 0 string for a multi-valued list of id's, you can use this 
 in field 2 of your I-descriptor:
 
 0002: CATS(REUSE(@ID:*), @RECORD35) ; TRANS(ARTLEDGER, 
 @1, 0, X) ; NES(@2, REUSE())
 
 Note that @RECORD35 can be replaced with the actual 
 dictionary name for field 35.
 
 
 rex
 ---
 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] records with unprintable characters

2005-12-13 Thread andi_mayer
I have a conversion list from German  to UV, which I use in my VB-
Programms.

Idon't think this list will help you, because the German letter | (an u with 
double-point on top) is ASCII 252 and the VM-mark is 178 on my 
German VB system.

The easiest way to find such a list is to write a file with all the Ascii-
codes and then read it. You see then which charakter is which 
charaktor on screen and then make your own conversion table.

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


RE: [U2] Arev commands - Where's the original message?

2005-12-13 Thread Tom Dodds
Yes, it happens often, and I respond the same,  by not looking if I already
delete it.

Tom Dodds
[EMAIL PROTECTED]
708-234-9608 Office
630-235-2975 Cell

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Brenda Price
Sent: Tuesday, December 13, 2005 3:36 PM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] Arev commands - Where's the original message?

Ok, did anyone else get the replies but not the original message?  I notice
I don't always get the original message, usually I think, I've just deleted
it and don't remember doing it and I'm too busy to check the deleted folder.


However, this time for sure I did not get the original message and neither
did my co-workers.  Just wondering if it happens to anyone else on the list.


Brenda Price
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Jerry Banker
Sent: Tuesday, December 13, 2005 1:51 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Arev commands


Well there was this one command that looked something like this:

start = 1
a = trim(rec[start,F,])

and I was wondering if it was using some kind of correlative to get the 
length or if the brackets are used differently in Arev. Also, I would just 
like to have a command reference for all of the various flavors of Pick so 
if I need to convert a program from one flavor to another I could.

- Original Message - 
From: Richard A. Wilson [EMAIL PROTECTED]
To: u2-users@listserver.u2ug.org
Sent: Tuesday, December 13, 2005 12:50 PM
Subject: Re: [U2] Arev commands


I dont believe there really is one. Also it really depends on which 
revision level of arev you are running.

 is there any syntax/statement/function in particular you need

 Rich

 Jerry Banker wrote:

 Anybody know where I could get an on-line copy of the Advanced 
 Revelations
 R/Basic commands? We don't have ARev but I was looking at a program and 
 would
 like to see what some of the command syntax is compared to UV.

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



 -- 
 Richard A. Wilson
 Lakeside Systems
 Smithfield, RI, USA
 Voice 401-231-3959
 Fax   206-202-2064
 [EMAIL PROTECTED]
 www.lakeside-systems.com
 ---
 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/

-- 
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.371 / Virus Database: 267.13.13/199 - Release Date: 12/13/2005
 

-- 
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.1.371 / Virus Database: 267.13.13/199 - Release Date: 12/13/2005
---
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] Arev commands

2005-12-13 Thread Tom Dodds
Jerry, you should be able to use the F1 key for help.  I learned the entire
Arev system through the F1 key.  They have wonderful online, contextual
help.  They also have a web site at
http://www.revtechnologies.com/Default.aspx
And a support list available at that address.

hth

Tom Dodds
[EMAIL PROTECTED]
708-234-9608 Office
630-235-2975 Cell

 Anybody know where I could get an on-line copy of the Advanced Revelations
 R/Basic commands? We don't have ARev but I was looking at a program and
would
 like to see what some of the command syntax is compared to UV.
 
 Jerry Banker
 ---
 u2-users mailing list
 u2-users@listserver.u2ug.org
 To unsubscribe please visit http://listserver.u2ug.org/
 
 

-- 
Richard A. Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064
[EMAIL PROTECTED]
www.lakeside-systems.com
---
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] Arev commands

2005-12-13 Thread Keith W. Roberts
How interesting.  And sed-like.

-Keith

Original Message
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Richard A. Wilson
Sent: Tuesday, December 13, 2005 1:09 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Arev commands

 I've never used this syntax but according to the manual
 
 if the send expression begins with F then return all
 characters from the
 starting position until the 2nd character of the F expression is found
 
 example
 
 REC = 'ABCDEF,HIJK'
 A=TRIM(REC[1,'F,'])
 A would equal ABCDEF (i.e. until the comma)
 
 note there is also Bx which searches backwards
 
 I'm not aware of any on-line/pdf/etc manuals for Rev. you
 maybe able to do
 searches on www.revelation.com knowledge base section, but I
 dont think you'll
 find a single document that has the command reference manual
 you are looking for.
 
 fortunately I'm a packrat  have manuals going back to the 70's.
 Sometimes its a dirty job digging them out from storage, but I keep
 important 
 ones handy
 
 Rich
 
 
 
 Jerry Banker wrote:
 
 Well there was this one command that looked something like this:
 
 start = 1
 a = trim(rec[start,F,])
 
 and I was wondering if it was using some kind of correlative to get
 the length or if the brackets are used differently in Arev. Also, I
 would just like to have a command reference for all of the various
 flavors of Pick so if I need to convert a program from one flavor to
 another I could. 
 
 - Original Message - From: Richard A. Wilson
 [EMAIL PROTECTED]
 To: u2-users@listserver.u2ug.org
 Sent: Tuesday, December 13, 2005 12:50 PM
 Subject: Re: [U2] Arev commands
 
 
 I dont believe there really is one. Also it really depends on which
 revision level of arev you are running.
 
 is there any syntax/statement/function in particular you need
 
 Rich
 
 Jerry Banker wrote:
 
 Anybody know where I could get an on-line copy of the Advanced
 Revelations R/Basic commands? We don't have ARev but I was looking
 at a program and would like to see what some of the command syntax
 is compared to UV. 
 
 Jerry Banker
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] Arev commands

2005-12-13 Thread David Jordan
Note there was, although I have not checked recently an Arev conversion
utility on the UniVerse installation disks.

Regards

David Jordan
Managing Consultant
 

DACONO Holdings Pty Ltd
www.dacono.com.au
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/