continued. . .

|&padk    seta 3-&k
|&seqcs  setcd '&zeros2'(1,0).'&seqcs'

yields label segments that are ALL three characters in length, even
for &seqno > 99  for which '&zeros2'(1,0) yields the nul string.

On 2/12/14, John Gilmore <[email protected]> wrote:
> A distinction is called for here.
>
> k'<character set-symbol identifier> is always useful, but it is not
> always useful simplistically.
>
> For Tony's particular problem
>
> |&zeros2  setc  '00'
> |&seqno   seta  0
> | . . .
> |&seqno   seta   &seqno+1
> &seqno_overflow setb (&seqno gt 999)
>                 aif     (&seqno_overflow).seqno_overflow
> |&seqcs   seta  A2D(&seqno)
> |&k           seta  k'&seqcs
> &padk
>
>
> On 2/12/14, David Stokes <[email protected]> wrote:
>> Oh right, something like "K'& doesn't like quote and ampersand"? (I've
>> deleted the original). I guess that was easy to misinterpret.
>>
>> -----Ursprüngliche Nachricht-----
>> Von: IBM Mainframe Assembler List
>> [mailto:[email protected]]
>> Im Auftrag von Martin Truebner
>> Gesendet: Mittwoch, 12. Februar 2014 18:17
>> An: [email protected]
>> Betreff: Re: getting length of macro symbol
>>
>> David,
>>
>>>>  wouldn't work
>>
>> I di not say that.
>>
>> I did say >>  does not consider ' and & <<
>>
>> and for the purpose Tony wants it K' is the better approach. But that was
>> not obvious- could have been text (i.e. for error-messages).
>>
>> --
>> Martin
>>
>> Pi_cap_CPU - all you ever need around MWLC/SCRT/CMT in z/VSE more at
>> http://www.picapcpu.de
>>
>
>
> --
> John Gilmore, Ashland, MA 01721 - USA
>


--
John Gilmore, Ashland, MA 01721 - USA

Reply via email to