Obviously more complex subroutines should be handled with an editable program. But for most non-subroutines, PRINT is the trick. For some subroutine situations, PRINT is pretty good.
Your list of oddities would certainly be more painful with the SELECT EVAL or other offered methods. ----- Original Message ----- From: "Peter Olson" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Wednesday, October 20, 2004 9:51 AM Subject: RE: [U2] [UD] running a subroutine > biases is sometimes a good thing. i just looked at it as exercise. > most if not all the subroutines i work with contain dynamic arrays, > dimensioned arrays of file pointers, and a wonderful list of other oddities > passed as what sometimes seems as an endless list of parameters that testing > at tcl would be extremely painful at best. the tools i use make it almost > pleasant to crank out a few lines of code and test it a more controlled > environment. > > > -----Original Message----- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED] Behalf Of Mark Johnson > Sent: Wednesday, October 20, 2004 8:54 AM > To: [EMAIL PROTECTED] > Subject: Re: [U2] [UD] running a subroutine > > > Biased as I may be, but my PRINT example program will handle any of this and > much, much more instead of writing (and forgetting about) miscellaneous > procs and other small, limited use programs. It will give you more. > > A problem with sending stuff to a proc is knowing how many parameters are > necessary as they all get slotted in A1, A2, A3 etc. If the values in the > subroutine contain (or allow) spaces, then this proc is useless. Plus, you > would have to test for n number of parameters before closing the > parenthesis. > > Clearly typing this at tcl is better: > > PRINT ; CALL SUBNAME(VAL1, VAL2, VAL3) > > Later in the day you could type: > > PRINT ; CALL ANOTHERSUB(VAL1, VAL2, VAL3, VAL4, VAL5, X) ; PRINT X > > and not have to write another proc. > > In fact, I welcome any criticisms or limitations anyone would have against > establishing this PRINT command to handle everything. I know of 2 limits: 1) > No hanging ELSE or THENs. 2) Cannot use READNEXT. Other than that I'm all > ears. > > My 3 cents. > > ----- Original Message ----- > From: "Peter Olson" <[EMAIL PROTECTED]> > To: <[EMAIL PROTECTED]> > Sent: Tuesday, October 19, 2004 8:43 AM > Subject: RE: [U2] [UD] running a subroutine > > > > "but i want more!" > > > > found it! > > > > 0001: PQ > > 0002: HSELECT > > 0003: H EVAL "SUBR(' > > 0004: A\2 > > 0005: H', > > 0006: A3 > > 0007: H )" FROM VOC FIRST 1; > > 0008: P > > > > now it's > > > > tcl>TS AGE.DATE -2224,42 > > > > Cool.... thanks! > > > > > > 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 > > [EMAIL PROTECTED] > > To unsubscribe please visit http://listserver.u2ug.org/ > ------- > u2-users mailing list > [EMAIL PROTECTED] > To unsubscribe please visit http://listserver.u2ug.org/ > > > 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 > [EMAIL PROTECTED] > To unsubscribe please visit http://listserver.u2ug.org/ ------- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
