Bruce,
Is this as intended? Would prefer that all args be local and
initialized to NULL, else would have to test arg(0) before using each
variable greater than arg(8).
Can run below from a PowerProNote.
;XXXXXXX
ARGS fuz1,fuz2,fuz3,fuz4,fuz5,fuz6,fuz7,fuz8,fuz9,fuz10,fuz11,fuz12
FOR(LOCAL j= 2; j; j= j -1)
LOCAL CR= ESC(?"\d013", ?"\")
LOCAL sGlobals= CR++ allglobals++ CR
FOR(i= 13; i; i= i -1)
IF(i lt 11)
ASSIGN("fuz"++ i, i)
WIN.Debug("fuz"++ i++ "= "++ ;;+
IfElse(EVAL("fuz"++i)=="", ??""?, EVAL("fuz"++i)), ;;+
IF(INDEX(sGlobals, CR++ "fuz"++ i++ CR), ;;+
" is now a global variable"))
ENDFOR
DEBUG below are LOCAL variables unless otherwise shown
DEBUG
ENDFOR
WIN.Debug("FYI: arg(0)="++ arg(0)+0)
QUIT
;**********
FYI, this runs differently than above?
;XXXXXXX
ARGS fuz1,fuz2,fuz3,fuz4,fuz5,fuz6,fuz7,fuz8,fuz9,fuz10,fuz11,fuz12
fuz1= 1
fuz2= 2
fuz3= 3
fuz4= 4
fuz5= 5
fuz6= 6
fuz7= 7
fuz8= 8
fuz9= 9
fuz10= 10
FOR(LOCAL j= 2; j; j= j -1)
LOCAL CR= ESC(?"\d013", ?"\")
LOCAL sGlobals= CR++ allglobals++ CR
FOR(i= 13; i; i= i -1)
WIN.Debug("fuz"++ i++ "= "++ ;;+
IfElse(EVAL("fuz"++i)=="", ??""?, EVAL("fuz"++i)), ;;+
IF(INDEX(sGlobals, CR++ "fuz"++ i++ CR), ;;+
" is now a global variable"))
ENDFOR
DEBUG below are LOCAL variables unless otherwise shown
DEBUG
ENDFOR
WIN.Debug("FYI: arg(0)="++ arg(0)+0)
QUIT
Still trying not to be a pain, thanks,
Ted
Attention: PowerPro's Web site has moved: http://www.ppro.org
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/power-pro/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
