RE: [U2] call mysub vs. call @mysub

2008-08-27 Thread Brian Leach
Ross

As others have said this was true for PRIME, which is why it is so often
seen in legacy code, but is not the case for UniVerse. More useful is the
fact that UniVerse caches subroutine object in memory until you exit to TCL,
so the overheads on repeated calling are minimised anyway.

Brian 

 -Original Message-
 From: [EMAIL PROTECTED] 
 [mailto:[EMAIL PROTECTED] On Behalf Of Ross Ferris
 Sent: 27 August 2008 01:27
 To: u2-users@listserver.u2ug.org
 Subject: [U2] call mysub vs. call @mysub
 
 Just a quick (dumb?) question that will save me spending 5 
 minutes writing a little test program (instead I'll spending 
 15 mins reading responses  BARGAIN!!) - and may also be 
 useful for other listeners ...
 
 In D3 for subroutines that are called often (either within 
 a program, or a system if you use common) then a construct like
 
 mysub = mysub
 ...
 ...
 for I = 1 to lots
 call @mysub
 ...
 next I
 
 turns out to be marginally faster than
 
 call mysub
 
 because the subroutine name is resolved via the MD once on 
 the first call, sub subsequent indirect calls are faster as 
 they avoid the MD/VOC lookup
 
 Does this hold true across U2? And/or do you get same sort of 
 benefit from global catalog?
 
 Ross Ferris
 Stamina Software
 Visage  Better by Design!
 ---
 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] call mysub vs. call @mysub

2008-08-27 Thread Mats Carlid

The catalog is quite different in univers vs unidata.

As for universe you need to place the cataloged
routine in shared memory  to get better speed.
Then there's no need to read it from disk  - not even at the
initial call. Also all users share one copy of it
thus saving memory - if that's worth anything
given todays memory sizes.

Global and 'normal' cataloging both places the
routines in the same  ../uc/catdir  driectory to be
read when needed, globals as *routine mormal ones
as *account*routine.
As opposed to local cataloging that only makes
a VOC entry to the file where the routine resides.
( You may also use  $  instead of  (the first only?) * )

In unidata  ( I think)  global cataloging places the
routine in shared memory and thus will be faster
on first call.

-- mats



Ross Ferris skrev:


Does this hold true across U2? And/or do you get same sort of benefit
from global catalog?

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


RE: [U2] Accessing Network drive

2008-08-27 Thread Symeon Breen
You would have to mount the share using a mount command

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of art
Sent: 26 August 2008 14:33
To: u2-users@listserver.u2ug.org
Subject: [U2] Accessing Network drive

If I have access to a network drive in Nautilus, with a path name in the 
address bar in the form of smb://host/account/file.dir/file (this is 
working just fine), what would be the equivalent path name from the $ 
prompt to display or access the same thing, like with an ls -lha command?
Art
---
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 - http://www.avg.com 
Version: 8.0.138 / Virus Database: 270.6.7/1632 - Release Date: 25/08/2008
07:05
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


[U2] Triggers

2008-08-27 Thread Alspach, Vance
What manual contains information on creating Universe triggers for non-SQLized
files? I cannot seem to find it in any manual

UV 10.2.4 Pick format
IBM RS6000

Vance Alspach



CONFIDENTIALITY. This electronic mail and any files transmitted with it may
contain information proprietary to Deere  Company, or one of its subsidiaries
or affiliates, and are intended solely for the use of the individual or entity
to whom they are addressed, shall be maintained in confidence and not
disclosed to third parties without the written consent of the sender. If you
are not the intended recipient or the person responsible for delivering the
electronic mail to the intended recipient, be advised that you have received
this electronic mail in error and that any use, dissemination, forwarding,
printing, or copying of this electronic mail is strictly prohibited. If you
have received this electronic mail in error, please immediately notify the
sender by return mail.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] Triggers

2008-08-27 Thread Scott Ballinger
The work-around that I use (I wonder if there is an easier way to do this?)
for non-SQL'd files is:

   1. Create your trigger code (update your audit file, verify authorized
   user, whatever) as an I-type. Have it return a null.
   2. Create a NO.NULLS index on the I-type. This will cause the I-type to
   be called whenever a record is created/deleted/updated in your file. The
   code in your I-type will be executed, but because the index is NO.NULLS and
   you are returning null, no actual index updates take place.

Below is an example of a trigger I use to track changes to a file.

/Scott Ballinger
Pareto Corporation
Edmonds WA USA
206 713 6006



SUBROUTINE SAVE.CHANGES.ENVC(ANS,REC,ID)
* track changes to the ENVC file
* 08-12-04 asb

* This subroutine is called from the 'TRIGGER' I-Type in dict ENVC.
* A secondary index on ENVC is defined on 'TRIGGER' using the NO.NULLS
option.
* That forces this subroutine to be called twice when an ENVC record is
updated:
*  the first time with REC = the original record, then again with REC = the
new
*  record (however, if the ENVC record is new, this subroutine is called
only once).

INCLUDE INC EQU.CHANGES

COMMON /SAVE.CHANGES.ENVC/ CHANGES,DICT.CHANGES,OLD.REC,ID2

ANS = 

IF ASSIGNED(CHANGES) ELSE
  OPEN ENVC.CHANGES TO CHANGES ELSE
OPEN MD TO MD ELSE RETURN
READ X FROM MD,ENVC.CHANGES THEN RETURN
Q = Q
Q2 = xxx
Q3 = ENVC.CHANGES
wRITE Q ON MD,ENVC.CHANGES
OPEN ENVC.CHANGES TO CHANGES ELSE RETURN
  END

  OPEN DICT ENVC.CHANGES TO DICT.CHANGES ELSE RETURN
  OLD.REC = 
  ID2 = [EMAIL PROTECTED]*

END

* This indexed trigger sub is only called once when filing a new record, so
we need
*  to handle the case of filing a new record, then immediately editing it:
IF REC EQ OLD.REC THEN
  ID2 = ID
  RETURN
END

IF ID2 NE ID THEN
  * first time @record = old rec
  OLD.REC = REC
  ID2 = ID
  RETURN
END ELSE
  * 2nd time @record = new rec
  NEW.REC = REC
  ID2 = [EMAIL PROTECTED]*
END

IF OLD.REC EQ NEW.REC THEN RETURN

*
* Run MAKE.FIELDS.ARRAY on ENVC and merge in the
* ENVC.FIELDS.ARRAY here, then comment out the fields
* you don't want to track changes for.  Do not $include the
* item, or else your commented out fields may get stepped
* on if MAKE.FIELDS.ARRAY is run again.
*

***
* MAKE.FIELDS.ARRAY for file ENVC as of 12-27-07 asb
*
MAXFIELDS = 168
DIM FIELDNAMES(168) ; DIM CONVS(168)
MAT FIELDNAMES =  ; MAT CONVS = 
FIELDNAMES(1) = LINE.IDS
FIELDNAMES(2) = PRV.TIN
FIELDNAMES(3) = PRV.NAME
FIELDNAMES(4) = PRV.SORTKEY
FIELDNAMES(5) = PRV.ADDRESS
FIELDNAMES(6) = PRV.CITY
FIELDNAMES(7) = PRV.ST
FIELDNAMES(8) = PRV.ZIP
FIELDNAMES(9) = FAM.SSN
FIELDNAMES(10) = FAM.NAME
FIELDNAMES(11) = FAM.ADDRESS
FIELDNAMES(12) = FAM.CITY
FIELDNAMES(13) = FAM.ST
FIELDNAMES(14) = FAM.ZIP
FIELDNAMES(15) = FAM.DOB  ; CONVS(15) = D4-
FIELDNAMES(16) = PAT.NUM
FIELDNAMES(17) = PAT.NAME
FIELDNAMES(18) = PAT.DOB  ; CONVS(18) = D4-
FIELDNAMES(19) = PAT.ADDRESS
FIELDNAMES(20) = PAT.REL
FIELDNAMES(21) = PAT.NOTES
FIELDNAMES(22) = PAT.CITY
FIELDNAMES(23) = FAM.SEX
FIELDNAMES(24) = PAT.SEX
FIELDNAMES(25) = FUND
FIELDNAMES(26) = CLAIM.NO
FIELDNAMES(27) = ERRMSG
FIELDNAMES(28) = PAT.SSN
**FIELDNAMES(29) = DATE ; CONVS(29) = D4-
FIELDNAMES(30) = USER
FIELDNAMES(31) = DCN
FIELDNAMES(32) = TYPE
FIELDNAMES(33) = PRV.REFNUM
FIELDNAMES(34) = NEWPAT
FIELDNAMES(35) = HS.ID
FIELDNAMES(36) = PRV.PHONE
FIELDNAMES(37) = FAM.PHONE
FIELDNAMES(38) = PAT.ST
FIELDNAMES(39) = PAT.ZIP
FIELDNAMES(40) = PAT.PHONE
FIELDNAMES(41) = OI.NAME
FIELDNAMES(42) = OI.ADDRESS
FIELDNAMES(43) = OI.CITY
FIELDNAMES(44) = OI.STATE
FIELDNAMES(45) = OI.ZIP
FIELDNAMES(46) = OI.PHONE
FIELDNAMES(47) = OI.DOB   ; CONVS(47) = D4-
FIELDNAMES(48) = OI.SEX
FIELDNAMES(49) = OI.PLAN
FIELDNAMES(50) = OI.POLICY
FIELDNAMES(51) = TOT.AMT  ; CONVS(51) = MR2
FIELDNAMES(52) = REF.NAME
FIELDNAMES(53) = REF.PHONE
FIELDNAMES(54) = REF.PID
FIELDNAMES(55) = REN.NAME
FIELDNAMES(56) = REN.ADDRESS
FIELDNAMES(57) = REN.CITY
FIELDNAMES(58) = REN.ST
FIELDNAMES(59) = REN.ZIP
FIELDNAMES(60) = REN.PID
FIELDNAMES(61) = FAC.NAME
FIELDNAMES(62) = FAC.ADDRESS
FIELDNAMES(63) = FAC.CITY
FIELDNAMES(64) = FAC.ST
FIELDNAMES(65) = FAC.ZIP
FIELDNAMES(66) = LAB.NAME
FIELDNAMES(67) = ADJ
FIELDNAMES(68) = PRV.SITE
FIELDNAMES(69) = PLAN.NAME
FIELDNAMES(70) = STATUS.CODE
**FIELDNAMES(71) = STATUS.DATE  ; CONVS(71) = D4-
**FIELDNAMES(72) = PAID.AMT ; CONVS(72) = MR2,
FIELDNAMES(73) = NEWPRV
**FIELDNAMES(74) = PAYEE
FIELDNAMES(75) = PAT.SOF
FIELDNAMES(76) = PAT.ROI
FIELDNAMES(77) = PAT.AOB
FIELDNAMES(78) = PAYER.NAME
FIELDNAMES(79) = PRV.TS
FIELDNAMES(80) = PRV.TYPE
FIELDNAMES(81) = NOTE
**FIELDNAMES(82) = FILENAME
FIELDNAMES(83) = FUNDERR
FIELDNAMES(84) = PPO.CODE
FIELDNAMES(85) = PPO.PHYS
FIELDNAMES(86) = REPRICE
FIELDNAMES(87) = ORIG.FUND
FIELDNAMES(88) = 

RE: [U2] Triggers

2008-08-27 Thread Christian PAGER
Hi Vance,

None indeed. But triggers work on files too.

Christian

-Message d'origine-
De : [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] De la part de Alspach, Vance
Envoyi : mercredi 27 ao{t 2008 15:54
@ : u2-users@listserver.u2ug.org
Objet : [U2] Triggers

What manual contains information on creating Universe triggers for
non-SQLized
files? I cannot seem to find it in any manual

UV 10.2.4 Pick format
IBM RS6000

Vance Alspach



CONFIDENTIALITY. This electronic mail and any files transmitted with it may
contain information proprietary to Deere  Company, or one of its
subsidiaries
or affiliates, and are intended solely for the use of the individual or
entity
to whom they are addressed, shall be maintained in confidence and not
disclosed to third parties without the written consent of the sender. If you
are not the intended recipient or the person responsible for delivering the
electronic mail to the intended recipient, be advised that you have received
this electronic mail in error and that any use, dissemination, forwarding,
printing, or copying of this electronic mail is strictly prohibited. If you
have received this electronic mail in error, please immediately notify the
sender by return mail.
---
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] Triggers

2008-08-27 Thread Tom Dodds
Universe SQL Reference if I remember correctly.

HTH

Tom Dodds

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Alspach, Vance
Sent: Wednesday, August 27, 2008 8:54 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] Triggers

What manual contains information on creating Universe triggers for
non-SQLized
files? I cannot seem to find it in any manual

UV 10.2.4 Pick format
IBM RS6000

Vance Alspach



CONFIDENTIALITY. This electronic mail and any files transmitted with it may
contain information proprietary to Deere  Company, or one of its
subsidiaries
or affiliates, and are intended solely for the use of the individual or
entity
to whom they are addressed, shall be maintained in confidence and not
disclosed to third parties without the written consent of the sender. If you
are not the intended recipient or the person responsible for delivering the
electronic mail to the intended recipient, be advised that you have received
this electronic mail in error and that any use, dissemination, forwarding,
printing, or copying of this electronic mail is strictly prohibited. If you
have received this electronic mail in error, please immediately notify the
sender by return mail.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

__ Information from ESET NOD32 Antivirus, version of virus signature
database 3392 (20080827) __

The message was checked by ESET NOD32 Antivirus.

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


RE: [U2] Triggers

2008-08-27 Thread Ron White
On my Uv/NT 10.2 file triggers are documented in the System Description
Manual.
Try the following link.
http://www-01.ibm.com/software/data/u2/pubs/library/102univ/

Ron White

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Alspach, Vance
Sent: Wednesday, August 27, 2008 8:54 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] Triggers

What manual contains information on creating Universe triggers for
non-SQLized
files? I cannot seem to find it in any manual

UV 10.2.4 Pick format
IBM RS6000

Vance Alspach



CONFIDENTIALITY. This electronic mail and any files transmitted with it may
contain information proprietary to Deere  Company, or one of its
subsidiaries
or affiliates, and are intended solely for the use of the individual or
entity
to whom they are addressed, shall be maintained in confidence and not
disclosed to third parties without the written consent of the sender. If you
are not the intended recipient or the person responsible for delivering the
electronic mail to the intended recipient, be advised that you have received
this electronic mail in error and that any use, dissemination, forwarding,
printing, or copying of this electronic mail is strictly prohibited. If you
have received this electronic mail in error, please immediately notify the
sender by return mail.
---
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] uniobjects - kinda fixed

2008-08-27 Thread doug chanco

Well,
we have basically gone full circle .. while we did fix a 
lot of issues with our VB6 app and did improve it quite a
bit, we were still having issues.  One of the developers here rolled 
back from the 2006 uniobjects (windows) dll and now things are back to 
working how they were before this all started.


We even tested old versions of the VB6 app that 2 weeks ago would not 
work with the 2000 uniobjects dll and now they are working just fine.  I 
am totally stumped as to what happened, all I can say is that now things 
are basically back to where they were several weeks ago with


1. the same PC
2. same application
3. same dll's

that just a few weeks ago would not work.  I know what you'll are all 
thinking and I completely agree and that is SOMETHING had to have 
changed.  But I work in universe and aix and do some networking stuff 
and nothing changed at these points.  We have a cisco guys and he swears 
that nothing changed on his cisco stuff and we have support techs that 
swear nothing changed on the PC's, this reminds me of a saying I once heard


when you are SURE that everything in your program works correctly and 
your program does NOT work one thing you can be SURE of is that 
something you are SURE of is wrong


anyway in trying to see what could of possibly caused this problem I am 
trying to get what changed in the iniobjects dll between the 2000 
version and teh 2006 version (back when all this started upgrading to 
2006 fixed a lot of the issues where teh application would not start and 
kept crashing) and now downgrading to the 2000 dll seems to have fixed 
99% of our problems ...


We have tried getting the information from IBM but they have not been 
very responsive and I am sure that someone on this list can answer my 
question or tell me how I can get it answered


thanks to everyone who helped with this issue and thanks in advance for 
any responses to this question


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


Re: [U2] Accessing Network drive

2008-08-27 Thread art

Symeon Breen wrote:

You would have to mount the share using a mount command


Actually, the following tip worked perfectly:

 After you connect to a network drive through gnome it gets mounted in
 the .gvfs folder.
 Tyler
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] uniobjects - kinda fixed

2008-08-27 Thread Wally Terhune
I will be happy to chase up follow-thru on a support case, but find nothing
for 'Doug Chanco' in the system, nor can I tell you company name to search
that way.
Do you have a U2 support case number?
regards,

 Wally Terhune   Mark your
 U2 Support Architectcalendar!
 IBM Information Management Software
 Tel: (303) 773-7969 T/L
 656-7969
 Mobile: (303) 807-6222
 Email: [EMAIL PROTECTED]
 http://www.ibm.com/software/data/u2/support








  From:   doug chanco [EMAIL PROTECTED]

  To: u2-users@listserver.u2ug.org

  Date:   08/27/2008 02:28 PM

  Subject:[U2] uniobjects - kinda fixed






Well,
 we have basically gone full circle .. while we did fix a
lot of issues with our VB6 app and did improve it quite a
bit, we were still having issues.  One of the developers here rolled
back from the 2006 uniobjects (windows) dll and now things are back to
working how they were before this all started.

We even tested old versions of the VB6 app that 2 weeks ago would not
work with the 2000 uniobjects dll and now they are working just fine.  I
am totally stumped as to what happened, all I can say is that now things
are basically back to where they were several weeks ago with

1. the same PC
2. same application
3. same dll's

that just a few weeks ago would not work.  I know what you'll are all
thinking and I completely agree and that is SOMETHING had to have
changed.  But I work in universe and aix and do some networking stuff
and nothing changed at these points.  We have a cisco guys and he swears
that nothing changed on his cisco stuff and we have support techs that
swear nothing changed on the PC's, this reminds me of a saying I once heard

when you are SURE that everything in your program works correctly and
your program does NOT work one thing you can be SURE of is that
something you are SURE of is wrong

anyway in trying to see what could of possibly caused this problem I am
trying to get what changed in the iniobjects dll between the 2000
version and teh 2006 version (back when all this started upgrading to
2006 fixed a lot of the issues where teh application would not start and
kept crashing) and now downgrading to the 2000 dll seems to have fixed
99% of our problems ...

We have tried getting the information from IBM but they have not been
very responsive and I am sure that someone on this list can answer my
question or tell me how I can get it answered

thanks to everyone who helped with this issue and thanks in advance for
any responses to this question

dougc
---
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/jpeg which had a name of 
21464273.jpg]

[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 
ecblank.gif]
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/