|
View:
New views
20 Messages
—
Rating Filter:
Alert me
|
| < Prev | 1 - 2 - 3 - 4 | Next > |
|
|
Passing by ValueUnidata 7.1 I think this has come up before (side question: how do you search the archives?)... I think it is possible to pass a parameter by value instead of by reference. This, of course, means that any changes to the parameter in the called subroutine are localized and its original value in the calling routine is unchanged there. Does anyone do this? If so, how?Cheers,Kebbon _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by ValueUse parentheses when you call:
CALL MY.SUBR((firstval), (secondval), etc) -----Original Message----- From: u2-users-bounces@... [mailto:u2-users-bounces@...] On Behalf Of Kebbon Irwin Sent: Thursday, January 26, 2012 9:40 AM To: u2-users@... Subject: [U2] Passing by Value Unidata 7.1 I think this has come up before (side question: how do you search the archives?)... I think it is possible to pass a parameter by value instead of by reference. This, of course, means that any changes to the parameter in the called subroutine are localized and its original value in the calling routine is unchanged there. Does anyone do this? If so, how?Cheers,Kebbon _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users ________________________________ Dave Davis Team Lead, R&D P: 614-875-4910 x108 F: 614-875-4088 E: DDavis@... [http://www.harriscomputer.com/images/signatures/HarrisSchools.gif] [http://www.harriscomputer.com/images/signatures/DivisionofHarris.gif]<http://www.harriscomputer.com/> 6110 Enterprise Parkway Grove City, OH 43123 www.harris-schoolsolutions.com<http://www.harris-schoolsolutions.com> This message is intended exclusively for the individual or entity to which it is addressed. This communication may contain information that is proprietary, privileged or confidential or otherwise legally exempt from disclosure. If you are not the named addressee, you are not authorized to read, print, retain, copy or disseminate this message or any part of it. If you have received this message in error, please notify the sender immediately by e-mail and delete all copies of the message. _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by ValuePut the variable in parentheses to pass by value, e.g.
CALL MYSUB((VAR1)) rex On Thu, Jan 26, 2012 at 9:39 AM, Kebbon Irwin <kebbon.irwin@...> wrote: > > Unidata 7.1 > I think this has come up before (side question: how do you search the archives?)... I think it is possible to pass a parameter by value instead of by reference. This, of course, means that any changes to the parameter in the called subroutine are localized and its original value in the calling routine is unchanged there. Does anyone do this? If so, how?Cheers,Kebbon > _______________________________________________ > U2-Users mailing list > U2-Users@... > http://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by ValueHi,
It is possible from the calling side, simply by enclosing the argument variable in parentheses, effectively making it an expression. It is not possible from the subroutine except by copying the argument to a local variable. Martin Phillips Ladybridge Systems Ltd 17b Coldstream Lane, Hardingstone, Northampton NN4 6DB, England +44 (0)1604-709200 -----Original Message----- From: Kebbon Irwin Sent: Thursday, January 26, 2012 2:39 PM To: u2-users@... Subject: [U2] Passing by Value Unidata 7.1 I think this has come up before (side question: how do you search the archives?)... I think it is possible to pass a parameter by value instead of by reference. This, of course, means that any changes to the parameter in the called subroutine are localized and its original value in the calling routine is unchanged there. Does anyone do this? If so, how?Cheers,Kebbon _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by ValueCALL SUBNAME( IVAR+0 , AVAR:"" )
> From: Kebbon Irwin > I think it is possible to pass a > parameter by value instead of by reference. _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by ValueVery sly.
-----Original Message----- From: Tony Gravagno <3xk547o02@...> To: u2-users <u2-users@...> Sent: Thu, Jan 26, 2012 7:17 am Subject: Re: [U2] Passing by Value CALL SUBNAME( IVAR+0 , AVAR:"" ) > From: Kebbon Irwin I think it is possible to pass a parameter by value instead of by reference. _______________________________________________ 2-Users mailing list 2-Users@... ttp://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by ValueWell, that's a neat trick I've never known about. Once again, this list
proves it's an invaluable resource. I've always done it on the subroutine side like so: CALL NON.MODIFYING.SUB (THIS.VAR) SUBROUTINE NON.MODIFYING.SUB (GLOBAL.THIS.VAR) THIS.VAR = GLOBAL.THIS.VAR THIS.VAR = THAT.VAR RETURN -John -----Original Message----- From: u2-users-bounces@... [mailto:u2-users-bounces@...] On Behalf Of Martin Phillips Sent: Thursday, January 26, 2012 6:47 AM To: U2 Users List Subject: Re: [U2] Passing by Value Hi, It is possible from the calling side, simply by enclosing the argument variable in parentheses, effectively making it an expression. It is not possible from the subroutine except by copying the argument to a local variable. Martin Phillips Ladybridge Systems Ltd 17b Coldstream Lane, Hardingstone, Northampton NN4 6DB, England +44 (0)1604-709200 -----Original Message----- From: Kebbon Irwin Sent: Thursday, January 26, 2012 2:39 PM To: u2-users@... Subject: [U2] Passing by Value Unidata 7.1 I think this has come up before (side question: how do you search the archives?)... I think it is possible to pass a parameter by value instead of by reference. This, of course, means that any changes to the parameter in the called subroutine are localized and its original value in the calling routine is unchanged there. Does anyone do this? If so, how?Cheers,Kebbon _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by ValueHmm... Not sure why Outlook put the subroutine code all on one line.
I'll try again: CALL NON.MODIFYING.SUB (THIS.VAR) SUBROUTINE NON.MODIFYING.SUB (GLOBAL.THIS.VAR) THIS.VAR = GLOBAL.THIS.VAR THIS.VAR = THAT.VAR RETURN -----Original Message----- From: u2-users-bounces@... [mailto:u2-users-bounces@...] On Behalf Of John Hester Sent: Thursday, January 26, 2012 9:56 AM To: U2 Users List Subject: Re: [U2] Passing by Value Well, that's a neat trick I've never known about. Once again, this list proves it's an invaluable resource. I've always done it on the subroutine side like so: CALL NON.MODIFYING.SUB (THIS.VAR) SUBROUTINE NON.MODIFYING.SUB (GLOBAL.THIS.VAR) THIS.VAR = GLOBAL.THIS.VAR THIS.VAR = THAT.VAR RETURN -John _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by ValueEssentially, adding the () or +0 or :"" creates an expression. CALL then passes the result of the expression instead of the address of the variable. You get the same result by passing a dynamic array reference like IVAR<1>, though not a dimensioned array reference like A(5), because each array element is a variable with an address. (I don't know for a fact that all pick systems treat IVAR<I> ask an expression--there might be someone who handled it as a true array--but u2 does).
On Jan 26, 2012, at 12:30 PM, Wjhonson wrote: > Very sly. > > > > -----Original Message----- > From: Tony Gravagno <3xk547o02@...> > To: u2-users <u2-users@...> > Sent: Thu, Jan 26, 2012 7:17 am > Subject: Re: [U2] Passing by Value > > > CALL SUBNAME( IVAR+0 , AVAR:"" ) >> From: Kebbon Irwin > I think it is possible to pass a > parameter by value instead of by reference. > _______________________________________________ > 2-Users mailing list > 2-Users@... > ttp://listserver.u2ug.org/mailman/listinfo/u2-users > > _______________________________________________ > U2-Users mailing list > U2-Users@... > http://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by ValueOn a related note, any clever ideas to localize a variable to a local subroutine? For I = 1 to 10 GOSUB PROCESS Next I Stop 3000 Lines of code later.... PROCESS: FOR I = 1 TO 20 PRINT I NEXT I RETURN _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by ValueBy way of naming convention:
FOR PROCESS_I = 1 TO 20 -----Original Message----- From: u2-users-bounces@... [mailto:u2-users-bounces@...] On Behalf Of Wjhonson Sent: Thursday, January 26, 2012 1:09 PM To: u2-users@... Subject: Re: [U2] Passing by Value On a related note, any clever ideas to localize a variable to a local subroutine? For I = 1 to 10 GOSUB PROCESS Next I Stop 3000 Lines of code later.... PROCESS: FOR I = 1 TO 20 PRINT I NEXT I RETURN _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users ________________________________ Dave Davis Team Lead, R&D P: 614-875-4910 x108 F: 614-875-4088 E: DDavis@... [http://www.harriscomputer.com/images/signatures/HarrisSchools.gif] [http://www.harriscomputer.com/images/signatures/DivisionofHarris.gif]<http://www.harriscomputer.com/> 6110 Enterprise Parkway Grove City, OH 43123 www.harris-schoolsolutions.com<http://www.harris-schoolsolutions.com> This message is intended exclusively for the individual or entity to which it is addressed. This communication may contain information that is proprietary, privileged or confidential or otherwise legally exempt from disclosure. If you are not the named addressee, you are not authorized to read, print, retain, copy or disseminate this message or any part of it. If you have received this message in error, please notify the sender immediately by e-mail and delete all copies of the message. _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by ValueAnd if your internal subroutine is called RECONCILE.CUSTOMERS.BUDGET.BALANCE ?? -----Original Message----- From: Dave Davis <DDavis@...> To: U2 Users List <u2-users@...> Sent: Thu, Jan 26, 2012 10:17 am Subject: Re: [U2] Passing by Value By way of naming convention: FOR PROCESS_I = 1 TO 20 -----Original Message----- rom: u2-users-bounces@... [mailto:u2-users-bounces@...] n Behalf Of Wjhonson ent: Thursday, January 26, 2012 1:09 PM o: u2-users@... ubject: Re: [U2] Passing by Value n a related note, any clever ideas to localize a variable to a local ubroutine? For I = 1 to 10 GOSUB PROCESS ext I top 3000 Lines of code later.... PROCESS: OR I = 1 TO 20 RINT I EXT I ETURN ______________________________________________ 2-Users mailing list 2-Users@... ttp://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________ ave Davis eam Lead, R&D P: 614-875-4910 x108 : 614-875-4088 : DDavis@... [http://www.harriscomputer.com/images/signatures/HarrisSchools.gif] [http://www.harriscomputer.com/images/signatures/DivisionofHarris.gif]<http://www.harriscomputer.com/> 6110 Enterprise Parkway rove City, OH 3123 ww.harris-schoolsolutions.com<http://www.harris-schoolsolutions.com> This message is intended exclusively for the individual or entity to which it is ddressed. This communication may contain information that is proprietary, rivileged or confidential or otherwise legally exempt from disclosure. If you re not the named addressee, you are not authorized to read, print, retain, copy r disseminate this message or any part of it. If you have received this message n error, please notify the sender immediately by e-mail and delete all copies f the message. _______________________________________________ 2-Users mailing list 2-Users@... ttp://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by ValuePerhaps you should consider making that one an external subroutine - it sounds like it could be used in more than one place. External subroutines would give you the scope control you want.
-----Original Message----- From: u2-users-bounces@... [mailto:u2-users-bounces@...] On Behalf Of Wjhonson Sent: Thursday, January 26, 2012 1:26 PM To: u2-users@... Subject: Re: [U2] Passing by Value And if your internal subroutine is called RECONCILE.CUSTOMERS.BUDGET.BALANCE ?? -----Original Message----- From: Dave Davis <DDavis@...> To: U2 Users List <u2-users@...> Sent: Thu, Jan 26, 2012 10:17 am Subject: Re: [U2] Passing by Value By way of naming convention: FOR PROCESS_I = 1 TO 20 -----Original Message----- rom: u2-users-bounces@... [mailto:u2-users-bounces@...] n Behalf Of Wjhonson ent: Thursday, January 26, 2012 1:09 PM o: u2-users@... ubject: Re: [U2] Passing by Value n a related note, any clever ideas to localize a variable to a local ubroutine? For I = 1 to 10 GOSUB PROCESS ext I top 3000 Lines of code later.... PROCESS: OR I = 1 TO 20 RINT I EXT I ETURN ______________________________________________ 2-Users mailing list 2-Users@... ttp://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________ ave Davis eam Lead, R&D P: 614-875-4910 x108 : 614-875-4088 : DDavis@... [http://www.harriscomputer.com/images/signatures/HarrisSchools.gif] [http://www.harriscomputer.com/images/signatures/DivisionofHarris.gif]<http://www.harriscomputer.com/> 6110 Enterprise Parkway rove City, OH 3123 ww.harris-schoolsolutions.com<http://www.harris-schoolsolutions.com> This message is intended exclusively for the individual or entity to which it is ddressed. This communication may contain information that is proprietary, rivileged or confidential or otherwise legally exempt from disclosure. If you re not the named addressee, you are not authorized to read, print, retain, copy r disseminate this message or any part of it. If you have received this message n error, please notify the sender immediately by e-mail and delete all copies f the message. _______________________________________________ 2-Users mailing list 2-Users@... ttp://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users ________________________________ Dave Davis Team Lead, R&D P: 614-875-4910 x108 F: 614-875-4088 E: DDavis@... [http://www.harriscomputer.com/images/signatures/HarrisSchools.gif] [http://www.harriscomputer.com/images/signatures/DivisionofHarris.gif]<http://www.harriscomputer.com/> 6110 Enterprise Parkway Grove City, OH 43123 www.harris-schoolsolutions.com<http://www.harris-schoolsolutions.com> This message is intended exclusively for the individual or entity to which it is addressed. This communication may contain information that is proprietary, privileged or confidential or otherwise legally exempt from disclosure. If you are not the named addressee, you are not authorized to read, print, retain, copy or disseminate this message or any part of it. If you have received this message in error, please notify the sender immediately by e-mail and delete all copies of the message. _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by ValueI always try to use meaningful variable names.
CUSTOMER.CNT = DCOUNT(CUSTOMERS, @VM) FOR CUSTOMER.PTR = 1 TO CUSTOMER.CNT CUSTOMER = CUSTOMER<1, CUSTOMER.PTR> . . . NEXT CUSTOMER.PTR David A. Green (480) 813-1725 DAG Consulting -----Original Message----- From: u2-users-bounces@... [mailto:u2-users-bounces@...] On Behalf Of Wjhonson Sent: Thursday, January 26, 2012 11:09 AM To: u2-users@... Subject: Re: [U2] Passing by Value On a related note, any clever ideas to localize a variable to a local subroutine? For I = 1 to 10 GOSUB PROCESS Next I Stop 3000 Lines of code later.... PROCESS: FOR I = 1 TO 20 PRINT I NEXT I RETURN _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by ValueTo avoid this very situation, I give my loop variables very generic name (like XX1) and then verify that XX1 is either not used or at least will not get caught in a conflicting condition. Using XX1 also suggests that it is not a meaningful name ("CUST.NAME" suggests it is the customer name) and makes it easy to find. Using a looping variable of "X" is not great because if you search for it, you will find it in "NEXT", "XREF", etc. XX1, XX2, XX3, etc. are unlikely to be names of anything else. Of course, if you try hard enough, you can always break this, but it has served me well for many years.
John John Israel Senior ERP Developer Dayton Superior Corporation 1125 Byers Rd Miamisburg, OH 45342 Office: 937-866-0711 x44380 Fax: 937-865-9182 JohnIsrael@... This message w/attachments (message) is intended solely for the use of the intended recipient(s) and may contain information that is privileged, confidential or proprietary. If you are not an intended recipient, please notify the sender, and then please delete and destroy all copies and attachments, and be advised that any review or dissemination of, or the taking of any action in reliance on, the information contained in or attached to this message is prohibited. -----Original Message----- From: u2-users-bounces@... [mailto:u2-users-bounces@...] On Behalf Of Dave Davis Sent: Thursday, January 26, 2012 1:36 PM To: U2 Users List Subject: Re: [U2] Passing by Value Perhaps you should consider making that one an external subroutine - it sounds like it could be used in more than one place. External subroutines would give you the scope control you want. -----Original Message----- From: u2-users-bounces@... [mailto:u2-users-bounces@...] On Behalf Of Wjhonson Sent: Thursday, January 26, 2012 1:26 PM To: u2-users@... Subject: Re: [U2] Passing by Value And if your internal subroutine is called RECONCILE.CUSTOMERS.BUDGET.BALANCE ?? -----Original Message----- From: Dave Davis <DDavis@...> To: U2 Users List <u2-users@...> Sent: Thu, Jan 26, 2012 10:17 am Subject: Re: [U2] Passing by Value By way of naming convention: FOR PROCESS_I = 1 TO 20 -----Original Message----- rom: u2-users-bounces@... [mailto:u2-users-bounces@...] n Behalf Of Wjhonson ent: Thursday, January 26, 2012 1:09 PM o: u2-users@... ubject: Re: [U2] Passing by Value n a related note, any clever ideas to localize a variable to a local ubroutine? For I = 1 to 10 GOSUB PROCESS ext I top 3000 Lines of code later.... PROCESS: OR I = 1 TO 20 RINT I EXT I ETURN ______________________________________________ 2-Users mailing list 2-Users@... ttp://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________ ave Davis eam Lead, R&D P: 614-875-4910 x108 : 614-875-4088 : DDavis@... [http://www.harriscomputer.com/images/signatures/HarrisSchools.gif] [http://www.harriscomputer.com/images/signatures/DivisionofHarris.gif]<http://www.harriscomputer.com/> 6110 Enterprise Parkway rove City, OH 3123 ww.harris-schoolsolutions.com<http://www.harris-schoolsolutions.com> This message is intended exclusively for the individual or entity to which it is ddressed. This communication may contain information that is proprietary, rivileged or confidential or otherwise legally exempt from disclosure. If you re not the named addressee, you are not authorized to read, print, retain, copy r disseminate this message or any part of it. If you have received this message n error, please notify the sender immediately by e-mail and delete all copies f the message. _______________________________________________ 2-Users mailing list 2-Users@... ttp://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users ________________________________ Dave Davis Team Lead, R&D P: 614-875-4910 x108 F: 614-875-4088 E: DDavis@... [http://www.harriscomputer.com/images/signatures/HarrisSchools.gif] [http://www.harriscomputer.com/images/signatures/DivisionofHarris.gif]<http://www.harriscomputer.com/> 6110 Enterprise Parkway Grove City, OH 43123 www.harris-schoolsolutions.com<http://www.harris-schoolsolutions.com> This message is intended exclusively for the individual or entity to which it is addressed. This communication may contain information that is proprietary, privileged or confidential or otherwise legally exempt from disclosure. If you are not the named addressee, you are not authorized to read, print, retain, copy or disseminate this message or any part of it. If you have received this message in error, please notify the sender immediately by e-mail and delete all copies of the message. _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by ValueI like to use increasing roman numerals:
FOR I = 1 TO COUNTER GOSUB PROCESS NEXT I PROCESS: FOR II = 1 TO COUNTER2 FOR III = 1 TO COUNTER3 FOR IV = 1 TO COUNTER4 NEXT IV NEXT III NEXT II RETURN -----Original Message----- From: u2-users-bounces@... [mailto:u2-users-bounces@...] On Behalf Of Wjhonson Sent: Thursday, January 26, 2012 10:09 AM To: u2-users@... Subject: Re: [U2] Passing by Value On a related note, any clever ideas to localize a variable to a local subroutine? For I = 1 to 10 GOSUB PROCESS Next I Stop 3000 Lines of code later.... PROCESS: FOR I = 1 TO 20 PRINT I NEXT I RETURN _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by ValueYou've never worked on programs that are 8000 lines long I take it :) -----Original Message----- From: John Hester <JHester@...> To: U2 Users List <u2-users@...> Sent: Thu, Jan 26, 2012 10:49 am Subject: Re: [U2] Passing by Value I like to use increasing roman numerals: FOR I = 1 TO COUNTER GOSUB PROCESS EXT I PROCESS: OR II = 1 TO COUNTER2 FOR III = 1 TO COUNTER3 FOR IV = 1 TO COUNTER4 NEXT IV NEXT III EXT II ETURN -----Original Message----- rom: u2-users-bounces@... mailto:u2-users-bounces@...] On Behalf Of Wjhonson ent: Thursday, January 26, 2012 10:09 AM o: u2-users@... ubject: Re: [U2] Passing by Value n a related note, any clever ideas to localize a variable to a local ubroutine? For I = 1 to 10 GOSUB PROCESS ext I top 3000 Lines of code later.... PROCESS: OR I = 1 TO 20 RINT I EXT I ETURN ______________________________________________ 2-Users mailing list 2-Users@... ttp://listserver.u2ug.org/mailman/listinfo/u2-users ______________________________________________ 2-Users mailing list 2-Users@... ttp://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by Value - Found word(s) list error in the Text bodyIs Mr Davis previously graduated from ASM in 1974?
Garry L. Smith Director Info. Systems Charles McMurray Company T# 559-292-5782 F# 559-346-6169 -----Original Message----- From: u2-users-bounces@... [mailto:u2-users-bounces@...] On Behalf Of Dave Davis Sent: Thursday, January 26, 2012 10:17 AM To: U2 Users List Subject: Re: [U2] Passing by Value - Found word(s) list error in the Text body By way of naming convention: FOR PROCESS_I = 1 TO 20 -----Original Message----- From: u2-users-bounces@... [mailto:u2-users-bounces@...] On Behalf Of Wjhonson Sent: Thursday, January 26, 2012 1:09 PM To: u2-users@... Subject: Re: [U2] Passing by Value On a related note, any clever ideas to localize a variable to a local subroutine? For I = 1 to 10 GOSUB PROCESS Next I Stop 3000 Lines of code later.... PROCESS: FOR I = 1 TO 20 PRINT I NEXT I RETURN _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users ________________________________ Dave Davis Team Lead, R&D P: 614-875-4910 x108 F: 614-875-4088 E: DDavis@... [http://www.harriscomputer.com/images/signatures/HarrisSchools.gif] [http://www.harriscomputer.com/images/signatures/DivisionofHarris.gif]<h ttp://www.harriscomputer.com/> 6110 Enterprise Parkway Grove City, OH 43123 www.harris-schoolsolutions.com<http://www.harris-schoolsolutions.com> This message is intended exclusively for the individual or entity to which it is addressed. This communication may contain information that is proprietary, privileged or confidential or otherwise legally exempt from disclosure. If you are not the named addressee, you are not authorized to read, print, retain, copy or disseminate this message or any part of it. If you have received this message in error, please notify the sender immediately by e-mail and delete all copies of the message. _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by Value - Found word(s) list error in the Text bodyBefore my time.
I don't really do the "PROCESS_I" thing - but if necessary I do try to associate the name of the index variable with the thing being indexed. We use a lot of SB+ paragraph code so the subject of "internal subroutines" does not really present itself. -----Original Message----- From: u2-users-bounces@... [mailto:u2-users-bounces@...] On Behalf Of Garry Smith Sent: Thursday, January 26, 2012 2:35 PM To: U2 Users List Subject: Re: [U2] Passing by Value - Found word(s) list error in the Text body Is Mr Davis previously graduated from ASM in 1974? Garry L. Smith Director Info. Systems Charles McMurray Company T# 559-292-5782 F# 559-346-6169 -----Original Message----- From: u2-users-bounces@... [mailto:u2-users-bounces@...] On Behalf Of Dave Davis Sent: Thursday, January 26, 2012 10:17 AM To: U2 Users List Subject: Re: [U2] Passing by Value - Found word(s) list error in the Text body By way of naming convention: FOR PROCESS_I = 1 TO 20 -----Original Message----- From: u2-users-bounces@... [mailto:u2-users-bounces@...] On Behalf Of Wjhonson Sent: Thursday, January 26, 2012 1:09 PM To: u2-users@... Subject: Re: [U2] Passing by Value On a related note, any clever ideas to localize a variable to a local subroutine? For I = 1 to 10 GOSUB PROCESS Next I Stop 3000 Lines of code later.... PROCESS: FOR I = 1 TO 20 PRINT I NEXT I RETURN _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users ________________________________ Dave Davis Team Lead, R&D P: 614-875-4910 x108 F: 614-875-4088 E: DDavis@... [http://www.harriscomputer.com/images/signatures/HarrisSchools.gif] [http://www.harriscomputer.com/images/signatures/DivisionofHarris.gif]<h ttp://www.harriscomputer.com/> 6110 Enterprise Parkway Grove City, OH 43123 www.harris-schoolsolutions.com<http://www.harris-schoolsolutions.com> This message is intended exclusively for the individual or entity to which it is addressed. This communication may contain information that is proprietary, privileged or confidential or otherwise legally exempt from disclosure. If you are not the named addressee, you are not authorized to read, print, retain, copy or disseminate this message or any part of it. If you have received this message in error, please notify the sender immediately by e-mail and delete all copies of the message. _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users ________________________________ Dave Davis Team Lead, R&D P: 614-875-4910 x108 F: 614-875-4088 E: DDavis@... [http://www.harriscomputer.com/images/signatures/HarrisSchools.gif] [http://www.harriscomputer.com/images/signatures/DivisionofHarris.gif]<http://www.harriscomputer.com/> 6110 Enterprise Parkway Grove City, OH 43123 www.harris-schoolsolutions.com<http://www.harris-schoolsolutions.com> This message is intended exclusively for the individual or entity to which it is addressed. This communication may contain information that is proprietary, privileged or confidential or otherwise legally exempt from disclosure. If you are not the named addressee, you are not authorized to read, print, retain, copy or disseminate this message or any part of it. If you have received this message in error, please notify the sender immediately by e-mail and delete all copies of the message. _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
|
|
Re: Passing by ValueI asked the Rocket Software guys to have LOCAL variables... but nothing...
:-( On Thu, Jan 26, 2012 at 2:02 PM, Wjhonson <wjhonson@...> wrote: > > You've never worked on programs that are 8000 lines long I take it :) > > > > > -----Original Message----- > From: John Hester <JHester@...> > To: U2 Users List <u2-users@...> > Sent: Thu, Jan 26, 2012 10:49 am > Subject: Re: [U2] Passing by Value > > > I like to use increasing roman numerals: > FOR I = 1 TO COUNTER > GOSUB PROCESS > EXT I > PROCESS: > OR II = 1 TO COUNTER2 > FOR III = 1 TO COUNTER3 > FOR IV = 1 TO COUNTER4 > > NEXT IV > NEXT III > EXT II > ETURN > -----Original Message----- > rom: u2-users-bounces@... > mailto:u2-users-bounces@...] On Behalf Of Wjhonson > ent: Thursday, January 26, 2012 10:09 AM > o: u2-users@... > ubject: Re: [U2] Passing by Value > > n a related note, any clever ideas to localize a variable to a local > ubroutine? > For I = 1 to 10 > GOSUB PROCESS > ext I > top > 3000 Lines of code later.... > PROCESS: > OR I = 1 TO 20 > RINT I > EXT I > ETURN > ______________________________________________ > 2-Users mailing list > 2-Users@... > ttp://listserver.u2ug.org/mailman/listinfo/u2-users > ______________________________________________ > 2-Users mailing list > 2-Users@... > ttp://listserver.u2ug.org/mailman/listinfo/u2-users > > _______________________________________________ > U2-Users mailing list > U2-Users@... > http://listserver.u2ug.org/mailman/listinfo/u2-users > -- *hp* _______________________________________________ U2-Users mailing list U2-Users@... http://listserver.u2ug.org/mailman/listinfo/u2-users |
| < Prev | 1 - 2 - 3 - 4 | Next > |
| Free embeddable forum powered by Nabble | Forum Help |