Re: [U2] [UD] Executing save-list
Bill, Re: cataloging programs with the same name as a ud verb: In addition to deleting the V pointer to the verb and recataloging my program in the VOC, using the DIRECT or LOCAL option (I prefer the DIRECT option), I *also* have to delete the V pointer to all synonyms of the verb (eg. SP.EDIT in addition to SP-EDIT) and copy the catalog pointer for the program name (SP-EDIT) to the name of the synonym (SP.EDIT) in the VOC. Otherwise, UD runs the verb of the synonym, if there is one, before it runs the object code of the program. hth, Dave Dave Taylor President Sysmark Information Systems, Inc. 49 Aspen Way Rolling Hills Estates, CA 90274 800-SYSMARK (800-797-6275) (O) 310-544-1974 (C) 310-561-5200 (P) 800-339-1497 (F) 310-377-3550 Your Source for Integrated EDI Translation and DataSync Integration www.sysmarkinfo.com - Original Message - From: Bill Haskett [EMAIL PROTECTED] To: u2-users@listserver.u2ug.org Sent: Wednesday, March 29, 2006 4:24 PM Subject: RE: [U2] [UD] Executing save-list snip --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] [UD] Executing save-list
Bill, I think I've discovered how to make the VOC entry override the UD verb. I am running UD PE 7.1 on Windows 2000 Server and I have set ECLTYPE = P and BASICTYPE = P in the UDNTSPOOLER account. I started with a program called LISTPTR in the BP file. UD has a verb called LISTPTR. After I compiled BP LISTPTR and ran LISTPTR I got the UD version of LISTPTR. The VOC for LISTPTR was NULL but there was an entry in the BP file for a record = _LISTPTR which I presume is the compiled code for LISTPTR. After I deleted the UD verb for LISTPTR from the VOC and ran LISTPTR I still got the UD version of LISTPTR. After I CATALOGed BP LISTPTR and ran LISTPTR I got the UD version of LISTPTR. There was no change in the VOC or the BP file and there was no entry for LISTPTR in the local CTLG file. Note that this CATALOG with no option is the default, and therefore the *global*, catalog option. After I CATALOGed BP LISTPTR with the LOCAL option, the entry for LISTPTR in the VOC was: 1.C 2.C:\IBM\ud71\localaccountname\CTLG\programname (which was LISTPTR) 3.BP\LISTPTR I ran LISTPTR and got the *new* program to run, not the UD verb. After I CATALOGEd BP LISTPTR with the DIRECT option, the entry for LISTPTR in the VOC was: 1.C 2.BP\_LISTPTR I ran LISTPTR and also got the *new* version of the program to run, not the UD verb. So, I've concluded that compiling and cataloging the program with either the LOCAL or the DIRECT option will override the UD verb, if you've deleted the UD verb from the VOC prior to cataloging the program. I think I prefer using the DIRECT option because theprogram does not have to be re-cataloged when you recompile the program. I then addressed the issue of running the program in other accounts. The CATALOG command with no options catalogs the program globally, but the globally cataloged version of the program that ran was the UD verb version, not my new program version. So, I entered a catalog pointer in the VOC of the demo account to the cataloged record of the new program in the application account (UDNTSPOOLER) AE VOC LISTPTR 1.C 2.D:\IBM\ud71\UDNTSPOOLER\BP\_LISTPTR LISTPTR in the demo account ran the *new* version of the program in the BP file in the UDNTSPOOLER account. I then changed and recompiled the program in the UDNTSPOOLER account but did not recatalog it, and it ran the recompiled program in the demo account. I then modified the LISTPTR record in the VOC of the demo account to provide a relative path to the cataloged program as follows and it also ran the *new* version of the program from the demo account: AE VOC LISTPTR 1.C 2./IBM/ud71/UDNTSPOOLER/BP/_LISTPTR You may not change your approach to solving this problem, but here is an alternative approach if you want to play with it. Thanks again for your help and that of all the other who provided suggestions in getting me to the point where I could begin to play with and discover this approach. Please let me know if there are any hidden risks in this strategy. Rgds, Dave Dave Taylor President Sysmark Information Systems, Inc. 49 Aspen Way Rolling Hills Estates, CA 90274 800-SYSMARK (800-797-6275) (O) 310-544-1974 (C) 310-561-5200 (P) 800-339-1497 (F) 310-377-3550 Your Source for Integrated EDI Translation and DataSync Integration www.sysmarkinfo.com - Original Message - From: Bill Haskett [EMAIL PROTECTED] To: u2-users@listserver.u2ug.org Sent: Wednesday, March 29, 2006 3:24 PM Subject: RE: [U2] [UD] Executing save-list Bruce: So, I'm guessing you're validating that the SAVE-LIST and SAVE.LIST (and probably SAVELIST) are all ignoring the local (VOC) file. I misstated, in my original mail, when I said the modified SAVE-LIST works from TCL because it doesn't; only the SL synonym works properly. Do you have any idea how to override this restrictive handling of verbs, and make the VOC the primary source for the verbs I identify? As always, thanks. Bill -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Bruce Nichol Sent: Tuesday, March 28, 2006 11:06 PM To: u2-users@listserver.u2ug.org Subject: Re: [U2] [UD] Executing save-list Goo'day, Bill... At 16:52 28/03/06 -0800, you wrote: I was following some suggestions to track saved lists and did the following: 1) Created a SAVE-LIST (VOC) entry that looks like: SAVE-LIST 001 V 002 U2.LISTINFO 2) Wrote a program U2.LISTINFO that updates a (LISTINFO) file with information then does an EXECUTE \SAVE.LIST \ : LISTNAME. When I EXECUTE \SAVE-LIST \ : LISTNAME from a BASIC program the program U2.LISTINFO isn't called. It's as though there is a global SAVE-LIST command that is used instead of the local one. Is this true? Any ideas how I can overcome this? (ECLTYPE P) If UD is anything like UV, SAVE-LIST is exactly the same as SAVE.LIST, 'cos part of the comaptibility with Pick
Re: [U2] [UD] Executing save-list
For those not sure : EXECUTE TCL.COMMAND RTNLIST THE.LIST CAPTURING DISCARD The above command in Universe will not work. Even though the manual says it does. We did the following to get the same effect : EXECUTE TCL.COMMAND CAPTURING DISCARD READLIST THE.LIST ELSE THE.LIST = good luck Jack Garivaldis Interactive Data Melbourne Australia -- View this message in context: http://www.nabble.com/-UD-Executing-save-list-t1359368.html#a3688795 Sent from the U2 - Users forum at Nabble.com. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] [UD] Executing save-list
Jack RTNLIST works but it creates a select list variable not a regular dynamic array. This means you can use it to segregate list processing as below: Execute SSELECT VOC RTNLIST SLIST CAPTURING OUT Crt OUT= :OUT Fin = @False Loop ReadNext Id From SLIST Else Fin = @True Until Fin Do Crt Id = :Id Repeat What you can't do is use it for a ReadList statement. Brian -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of jig (sent by Nabble.com) Sent: 31 March 2006 13:53 To: u2-users@listserver.u2ug.org Subject: Re: [U2] [UD] Executing save-list For those not sure : EXECUTE TCL.COMMAND RTNLIST THE.LIST CAPTURING DISCARD The above command in Universe will not work. Even though the manual says it does. We did the following to get the same effect : EXECUTE TCL.COMMAND CAPTURING DISCARD READLIST THE.LIST ELSE THE.LIST = good luck Jack Garivaldis Interactive Data Melbourne Australia -- View this message in context: http://www.nabble.com/-UD-Executing-save-list-t1359368.html#a3688795 Sent from the U2 - Users forum at Nabble.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] [UD] Executing save-list
Have you also set up SAVE.LIST the same as SAVE-LIST? When you type in SAVE-LIST I believe the interpreter changes the command to SAVE.LIST before executing it. - Original Message - From: Bill Haskett [EMAIL PROTECTED] To: u2-users@listserver.u2ug.org Sent: Wednesday, March 29, 2006 5:24 PM Subject: RE: [U2] [UD] Executing save-list Bruce: So, I'm guessing you're validating that the SAVE-LIST and SAVE.LIST (and probably SAVELIST) are all ignoring the local (VOC) file. I misstated, in my original mail, when I said the modified SAVE-LIST works from TCL because it doesn't; only the SL synonym works properly. Do you have any idea how to override this restrictive handling of verbs, and make the VOC the primary source for the verbs I identify? As always, thanks. Bill -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Bruce Nichol Sent: Tuesday, March 28, 2006 11:06 PM To: u2-users@listserver.u2ug.org Subject: Re: [U2] [UD] Executing save-list Goo'day, Bill... At 16:52 28/03/06 -0800, you wrote: I was following some suggestions to track saved lists and did the following: 1) Created a SAVE-LIST (VOC) entry that looks like: SAVE-LIST 001 V 002 U2.LISTINFO 2) Wrote a program U2.LISTINFO that updates a (LISTINFO) file with information then does an EXECUTE \SAVE.LIST \ : LISTNAME. When I EXECUTE \SAVE-LIST \ : LISTNAME from a BASIC program the program U2.LISTINFO isn't called. It's as though there is a global SAVE-LIST command that is used instead of the local one. Is this true? Any ideas how I can overcome this? (ECLTYPE P) If UD is anything like UV, SAVE-LIST is exactly the same as SAVE.LIST, 'cos part of the comaptibility with Pick is that a dot or a dash for TCL verbs are the same Regards, Bruce Nichol Talon Computer Services ALBURYNSW 2640 Australia http://www.taloncs.com.au Tel: +61 (0)411149636 Fax: +61 (0)260232119 If it ain't broke, fix it till it is! --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] [UD] Executing save-list
Don't know about others but my system AIX 5.2 Universe Pr1me flavor 10.1.12. Nothing in VOC for SAVE-LIST. But if I enter SAVE-LIST JUSTATEST. It saves my 'selections'. So I guess the 'current' interpreter automatically converts. Of course, that hasn't stopped me from creating GL, EL SL for speed typing purposes. Jerry Banker wrote: Have you also set up SAVE.LIST the same as SAVE-LIST? When you type in SAVE-LIST I believe the interpreter changes the command to SAVE.LIST before executing it. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] [UD] Executing save-list
Bill, Your super! I also set ECLTYPE=p and BASICTYPE=P and it compiled after I set BASICTYPE=P even though the documentation on EXECUTE makes no mention of this requirement with respect to the RTNLIST option. Thanks so much, Dave Dave Taylor President Sysmark Information Systems, Inc. 49 Aspen Way Rolling Hills Estates, CA 90274 800-SYSMARK (800-797-6275) (O) 310-544-1974 (C) 310-561-5200 (P) 800-339-1497 (F) 310-377-3550 Your Source for Integrated EDI Translation and DataSync Integration www.sysmarkinfo.com - Original Message - From: Bill Haskett [EMAIL PROTECTED] To: u2-users@listserver.u2ug.org Sent: Thursday, March 30, 2006 2:36 PM Subject: RE: [U2] [UD] Executing save-list Dave: I have no clue why this doesn't compile. I have a number of programs I wrote for UniData years ago that use this syntax frequently, so I know it's supposed to work. Here's some code that I used all the time: ECMD = \SSELECT BUSINESS.LINE BY BUS.CD\ EXECUTE ECMD RTNLIST COMP.LIST CAPTURING OUTPUT READSELECT ALL.COMPS FROM COMP.LIST ELSE COMP.LIST = '' SWAP @AM WITH '' IN ALL.COMPS ALL.COMPS = DQUOTE(ALL.COMPS) This even indicates you don't need to ...RTNLIST... to a list number but can return to a list variable name. I created the same program as you did and got the same error. I then went to tcl then executed the following: :ECLTYPE U :BASICTYPE U ...then tried it again; I got the same error. However, when I replaced 'EXECUTE' with 'MDPERFORM' (not 'PERFORM') it compiled fine. I normally set PICK compatibility mode by executing ECLTYPE P and BASICTYPE P when the user logs on. Reviewing the UDT.OPTIONS documentation, and reading some other documents, I set the following UDT.OPTIONS to get additional Pick compatibility: UDT.OPTIONS 3 ON UDT.OPTIONS 7 ON UDT.OPTIONS 15 ON UDT.OPTIONS 23 ON UDT.OPTIONS 32 ON UDT.OPTIONS 34 ON UDT.OPTIONS 43 ON UDT.OPTIONS 48 ON UDT.OPTIONS 54 ON UDT.OPTIONS 56 ON UDT.OPTIONS 64 ON UDT.OPTIONS 66 ON UDT.OPTIONS 75 ON UDT.OPTIONS 78 ON UDT.OPTIONS 83 ON UDT.OPTIONS 89 ON UDT.OPTIONS 92 ON UDT.OPTIONS 104 ON UDT.OPTIONS 114 ON I guess I'll add this issue to the list of issues I've run into and submit then to IBM for possible help, now that I'm licensed and have support instead of PE. :-) Bill Haskett Advantos Systems, Inc. www.advantos.net (760)944-5570 (CA) (360)923-4838 (WA) -Original Message- From: Dave Taylor [mailto:[EMAIL PROTECTED] Sent: Wednesday, March 29, 2006 10:13 PM To: Bill Haskett Subject: Re: [U2] [UD] Executing save-list Bill, Thanks for pointing me to the documentation on the EXECUTE statement on UD PE 7.x on Windows 2000 Server. I think that I'm compliant. I can't even get the following 2-line program to compile without an error: ED BP EX 0001EXECUTE SELECT CLIENTS RTNLIST 1 0002END When I compile it I get the message: Misuse of reserved word 'RTNLIST' Expecting: end-of-file,END I must be missing something! BTW, you mentioned a PICK mode. Is there a PICK mode? I haven't been able to find any reference to PICK anywhere in the documentation. Thanks again, Dave Dave Taylor President Sysmark Information Systems, Inc. 49 Aspen Way Rolling Hills Estates, CA 90274 800-SYSMARK (800-797-6275) (O) 310-544-1974 (C) 310-561-5200 (P) 800-339-1497 (F) 310-377-3550 Your Source for Integrated EDI Translation and DataSync Integration www.sysmarkinfo.com - Original Message - From: Bill Haskett [EMAIL PROTECTED] To: 'Dave Taylor' [EMAIL PROTECTED] Sent: Wednesday, March 29, 2006 1:47 PM Subject: RE: [U2] [UD] Executing save-list Dave: In UniData on Windows, when the newacct Windows command is run, a SAVEDLISTS director is created locally to the account. So, on Windows anyway, lists are kept in a local SAVEDLISTS subdirectory. According to the documentation: - - - - - - - - - - RTNLIST int.expr The RTNLIST clause must be an integer from 0-9, designating the select list to return to the calling program. You can use the resulting list with subsequent READNEXT statements or in the PASSLIST clause of an EXECUTE statement. If an expression is not given after RTNLIST, the generated select list replaces the contents of list 0. If RTNLIST is not specified, no list is returned. If you use EXECUTE to call a UniBasic program, no select list is returned even though you specify RTNLIST. On the other hand, PASSLIST is always effective and transfers a select list to the called program. - - - - - - - - - - I've found a lot of stuff doesn't work in PICK mode, so I mess around with lower-casing the save.list, merge.list, etc commands with EXECUTE. Hope this helps. Bill -Original Message- From: Dave Taylor [mailto:[EMAIL PROTECTED] Sent: Tuesday, March 28, 2006 6:46 PM
RE: [U2] [UD] Executing save-list
Bruce: So, I'm guessing you're validating that the SAVE-LIST and SAVE.LIST (and probably SAVELIST) are all ignoring the local (VOC) file. I misstated, in my original mail, when I said the modified SAVE-LIST works from TCL because it doesn't; only the SL synonym works properly. Do you have any idea how to override this restrictive handling of verbs, and make the VOC the primary source for the verbs I identify? As always, thanks. Bill -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Bruce Nichol Sent: Tuesday, March 28, 2006 11:06 PM To: u2-users@listserver.u2ug.org Subject: Re: [U2] [UD] Executing save-list Goo'day, Bill... At 16:52 28/03/06 -0800, you wrote: I was following some suggestions to track saved lists and did the following: 1) Created a SAVE-LIST (VOC) entry that looks like: SAVE-LIST 001 V 002 U2.LISTINFO 2) Wrote a program U2.LISTINFO that updates a (LISTINFO) file with information then does an EXECUTE \SAVE.LIST \ : LISTNAME. When I EXECUTE \SAVE-LIST \ : LISTNAME from a BASIC program the program U2.LISTINFO isn't called. It's as though there is a global SAVE-LIST command that is used instead of the local one. Is this true? Any ideas how I can overcome this? (ECLTYPE P) If UD is anything like UV, SAVE-LIST is exactly the same as SAVE.LIST, 'cos part of the comaptibility with Pick is that a dot or a dash for TCL verbs are the same Regards, Bruce Nichol Talon Computer Services ALBURYNSW 2640 Australia http://www.taloncs.com.au Tel: +61 (0)411149636 Fax: +61 (0)260232119 If it ain't broke, fix it till it is! --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
[U2] [UD] Executing save-list
I was following some suggestions to track saved lists and did the following: 1) Created a SAVE-LIST and DELETE-LIST (VOC) entry that look like: SAVE-LIST 001 V 002 U2.LISTINFO 2) Wrote a program U2.LISTINFO that updates a (LISTINFO) file with information then does an EXECUTE \SAVE.LIST \ : LISTNAME. From TCL the SAVE-LIST ... seems to work fine. However, when I EXECUTE \SAVE-LIST \ : LISTNAME from a BASIC program the program U2.LISTINFO isn't called. It's as though there's a global SAVE-LIST command that is used instead of the local one. Is this true? Any ideas how I can overcome this? (ECLTYPE P) As always, thanks. Bill Haskett Advantos Systems, Inc. www.advantos.net (760)944-5570 (CA) (360)923-4838 (WA) --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] [UD] Executing save-list
Hi Bill, I haven't been following this discussion until now, but I'm struggling to get an EXECUTE statement with a RTNLIST option to work and was considering just saving the list and getting the list as an alternative. In researching this option, I just discovered that saved lists are normally stored in a global file called SAVEDLISTS (see online HELP SAVE-LIST, or the UniBasic Command Reference manual). Does this help at all? Dave Dave Taylor President Sysmark Information Systems, Inc. 49 Aspen Way Rolling Hills Estates, CA 90274 800-SYSMARK (800-797-6275) (O) 310-544-1974 (C) 310-561-5200 (P) 800-339-1497 (F) 310-377-3550 Your Source for Integrated EDI Translation and DataSync Integration www.sysmarkinfo.com - Original Message - From: Bill Haskett [EMAIL PROTECTED] To: u2-users@listserver.u2ug.org Sent: Tuesday, March 28, 2006 4:52 PM Subject: [U2] [UD] Executing save-list I was following some suggestions to track saved lists and did the following: 1) Created a SAVE-LIST and DELETE-LIST (VOC) entry that look like: SAVE-LIST 001 V 002 U2.LISTINFO 2) Wrote a program U2.LISTINFO that updates a (LISTINFO) file with information then does an EXECUTE \SAVE.LIST \ : LISTNAME. From TCL the SAVE-LIST ... seems to work fine. However, when I EXECUTE \SAVE-LIST \ : LISTNAME from a BASIC program the program U2.LISTINFO isn't called. It's as though there's a global SAVE-LIST command that is used instead of the local one. Is this true? Any ideas how I can overcome this? (ECLTYPE P) As always, thanks. Bill Haskett Advantos Systems, Inc. www.advantos.net (760)944-5570 (CA) (360)923-4838 (WA) --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] [UD] Executing save-list
Goo'day, Bill... At 16:52 28/03/06 -0800, you wrote: I was following some suggestions to track saved lists and did the following: 1) Created a SAVE-LIST and DELETE-LIST (VOC) entry that look like: SAVE-LIST 001 V 002 U2.LISTINFO 2) Wrote a program U2.LISTINFO that updates a (LISTINFO) file with information then does an EXECUTE \SAVE.LIST \ : LISTNAME. From TCL the SAVE-LIST ... seems to work fine. However, when I EXECUTE \SAVE-LIST \ : LISTNAME from a BASIC program the program U2.LISTINFO isn't called. It's as though there's a global SAVE-LIST command that is used instead of the local one. Is this true? Any ideas how I can overcome this? (ECLTYPE P) If UD is anything like UV, SAVE-LIST is exactly the same as SAVE.LIST, 'cos part of the comaptibility with Pick is that a dot or a dash for TCL verbs are the same As always, thanks. Bill Haskett Advantos Systems, Inc. www.advantos.net (760)944-5570 (CA) (360)923-4838 (WA) --- 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 Anti-Virus. Version: 7.1.384 / Virus Database: 268.3.3/295 - Release Date: 28/03/06 Regards, Bruce Nichol Talon Computer Services ALBURYNSW 2640 Australia http://www.taloncs.com.au Tel: +61 (0)411149636 Fax: +61 (0)260232119 If it ain't broke, fix it till it is! -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.1.384 / Virus Database: 268.3.3/295 - Release Date: 28/03/06 --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/