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: <[email protected]> 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 > > 0001 EXECUTE "SELECT CLIENTS" RTNLIST 1 > > 0002 END > > > > 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 > > > > To: Bill Haskett; [email protected] > > > > Subject: 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: <[email protected]> > > > > 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 > > > > > [email protected] > > > > > To unsubscribe please visit http://listserver.u2ug.org/ > ------- > u2-users mailing list > [email protected] > To unsubscribe please visit http://listserver.u2ug.org/ ------- u2-users mailing list [email protected] To unsubscribe please visit http://listserver.u2ug.org/
