Stem's 0th variable

[rajesh082]

Rem. = 0
Do i=1 to 3
Pull Var1
rem.i = Var1
End
Say rem.0
Do i = 1 to rem.0
Say rem.i
Say rem.0
End

The out put is 3 & 0

Is it true that the Stem's 0th variable doesnt get set automatically. Is there any specific function to set the variable?

 

[mainframeboy]

Is it true that the Stem's 0th variable doesnt get set automatically.

Yes.

Is there any specific function to set the variable?

No.

 

[rexxhead]

...although you could do something like this: ;-)

pull var1 .
parse value rem.0+1  var1   with  ,
             $z      rem.$z   1 rem.0  .

This code is not exactly "intuitive", so let me lead you by the hand...

"value rem.0+1 var1" represents a string which in the first instance is "1 3". This gets parsed such that

$z = 1 
rem.1 = 3

then the pattern is reset to position '1' and re-parsed such that

rem.0 = 1

The net is that you do in one motion what would otherwise take several assignments, and no one will dare touch your code because they haven't the first clue what it's doing ;-)


Frank Clarke
Support the Troops:
-- Bring them home.

http://www.RonPaul2008.com